Help for this page

Select Code to Download


  1. or download this
    pmver () {
            perl -le '$exit=0;for $f (@ARGV) { eval qq{require $f}; if( $@
    + =~ /locate (\S+)\.pm/ ) { print qq{$f not installed}; $exit=1;next} 
    +print qq{$f: },${"${f}::VERSION"}||q{undefined}}exit $exit' "$@"
    }