# 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: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |