$ perl -e " BEGIN { unshift @INC => sub { my $Pm =$_[1]; my($Pack,$File )=caller;  print qq!$Pm\n!  if $File eq $ARGV[0]; return; }; } do $ARGV[0]"     Module-Depends-0.15\lib\Module\Depends.pm      | perl -pe " s/\.pm$//; s!/!::!g; "
strict
Parse::CPAN::Meta
Cwd
base