C:\Users\ken>where perlmodver C:\Users\ken\local\bin\perlmodver.bat C:\Users\ken>more C:\Users\ken\local\bin\perlmodver.bat @echo off perl -E "my ($err_msg, $missing); BEGIN { $err_msg = q{}; $missing = 0; eval { require %1; 1; } or ($err_msg, $missing) = ($@,1); } say q{Module: %1}; if ($missing) { say qq{Not installed.\n\@INC:}; say qq{\t$_} for @INC; say qq{ERROR MESSAGE:\n$err_msg}; } else { say qq{Version: $%1::VERSION\nLocation: $INC{q{%1} =~ s{::}{\/}gr . q{.pm}}}; }"