| Subject: | Module::Info doesn't pick up lexical subroutines. |
Module::Info won't see "lexical" subroutines.
$ cat ~/tmp/bug.plx
#!/usr/bin/perl -w
my $_private = sub {
foo();
};
sub foo { 42 }
sub bar { foo() }
$ perl -MData::Dumper -MModule::Info -wle '$m = Module::Info->new_from_file(shift); print Dumper $m->subroutines_called' ~/tmp/bug.plx
$VAR1 = {
'name' => 'foo',
'type' => 'function',
'class' => undef,
'line' => '9'
};