#!/bin/sh

perl "-M$1" -e 'print map { sprintf( "%20s : %s\n", $_, $INC{$_} ) } sort keys %INC; print "\n'$1' version : $'$1'::VERSION\n\n"'

##</code><code>##

$ ./whichpm XML::Parser
       AutoLoader.pm : /System/Library/Perl/5.8.1/AutoLoader.pm
             Carp.pm : /System/Library/Perl/5.8.1/Carp.pm
           Config.pm : /System/Library/Perl/5.8.1/darwin-thread-multi-2level/Config.pm
              Cwd.pm : /System/Library/Perl/5.8.1/darwin-thread-multi-2level/Cwd.pm
       DynaLoader.pm : /System/Library/Perl/5.8.1/darwin-thread-multi-2level/DynaLoader.pm
         Exporter.pm : /System/Library/Perl/5.8.1/Exporter.pm
        File/Spec.pm : /System/Library/Perl/5.8.1/File/Spec.pm
   File/Spec/Unix.pm : /System/Library/Perl/5.8.1/File/Spec/Unix.pm
       XML/Parser.pm : /Library/Perl/5.8.1/darwin-thread-multi-2level/XML/Parser.pm
 XML/Parser/Expat.pm : /Library/Perl/5.8.1/darwin-thread-multi-2level/XML/Parser/Expat.pm
         XSLoader.pm : /System/Library/Perl/5.8.1/darwin-thread-multi-2level/XSLoader.pm
             base.pm : /System/Library/Perl/5.8.1/base.pm
         overload.pm : /System/Library/Perl/5.8.1/overload.pm
           strict.pm : /System/Library/Perl/5.8.1/strict.pm
             vars.pm : /System/Library/Perl/5.8.1/vars.pm
         warnings.pm : /System/Library/Perl/5.8.1/warnings.pm
warnings/register.pm : /System/Library/Perl/5.8.1/warnings/register.pm

XML::Parser version : 2.34