# cat foo.pl
# -----------
#!/usr/bin/perl -w
use strict;

use CGI;
use LWP::Simple;
1;

strace perl foo.pl 2> foo.pl.strace
perl -ne 'if(m/(\S+\.pm)/){print qq|$1\n|}' foo.pl.strace|sort|uniq|cat -n

##</code><code>##

...
   149	stat64("/usr/lib/perl5/site_perl/5.10.0/LWP.pm
   150	stat64("/usr/lib/perl5/site_perl/5.10.0/LWP/Protocol.pm
   151	stat64("/usr/lib/perl5/site_perl/5.10.0/LWP/Simple.pm
   152	stat64("/usr/lib/perl5/site_perl/5.10.0/LWP/UserAgent.pm
   153	stat64("/usr/lib/perl5/site_perl/5.10.0/URI/Escape.pm
   154	stat64("/usr/lib/perl5/site_perl/5.10.0/URI.pm
   155	stat64("/usr/lib/perl5/vendor_perl/5.10.0/Encode/ConfigLocal.pm
   156	stat64("/usr/lib/perl5/vendor_perl/5.10.0/i586-linux-thread-multi/Encode/ConfigLocal.pm
   157	stat64("/usr/lib/perl5/vendor_perl/5.10.0/i586-linux-thread-multi/Log/Agent.pm
   158	stat64("/usr/lib/perl5/vendor_perl/5.10.0/Log/Agent.pm
   159	stat64("/usr/lib/perl5/vendor_perl/Encode/ConfigLocal.pm
   160	stat64("/usr/lib/perl5/vendor_perl/Log/Agent.pm
   161	XSLoader.pm