On Sun, Jan 23, 2011 at 10:08 PM, James Bowery <[email protected]> wrote:
> ~/ncgi-bin$ cat t.pl
> use Hash::Case::Lower;
> tie my(%lchash), 'Hash::Case::Lower';
> $lchash{StraNGeKeY} = 3;
> print keys %lchash; # strangekey
> ~/ncgi-bin$ pp -M Hash::Case::Lower t.pl
Note that "-M Hash::Case::Lower" isn't necessary.
> ~/ncgi-bin$ ./a.out
> Can't locate object method "init" via package
> "Log::Report::Dispatcher::Perl" at Log/Report/Dispatcher.pm line 47.
Looks more like a problem of Log::Report (which is "use"d by Hash::Case::Lower).
Probably it loads other Log::Report::* modules in a way that can't be
detected by static analysis (done by Module::ScanDeps). I'll
investigate tonight.
As a quick workaround, can you try using dynamic analysis ("pp -x ...").
Note that this will actually run the script during "pp".
Cheers, Roderich
