# Run another Perl program and print list of loaded files to STDERR #!/usr/bin/perl -w my $db = <<'EOF'; sub DB::postponed { my $glob = shift; $glob =~ s/.*::_<//; print STDERR "$glob\n"; } sub DB::DB { } EOF ($ENV{PERL5DB} = $db) =~ tr/\n/ /; system($^X, '-d', @ARGV);
In reply to Monitor file require/use by bikeNomad
For: | Use: | ||
& | & | ||
< | < | ||
> | > | ||
[ | [ | ||
] | ] |