pmver - Utility shell function for checking version of an arbitrary Perl module

example

$ pmver Carp
1.26
/home/hirose31/perlbrew/perls/perl-5.16.3/lib/5.16.3/Carp.pm

$ pmver -cd Carp
1.26
/home/hirose31/perlbrew/perls/perl-5.16.3/lib/5.16.3/Carp.pm
$ pwd
/home/hirose31/perlbrew/perls/perl-5.16.3/lib/5.16.3

pmver

pmver () {
  do_cd=
  if [ "$1" = '-cd' ]; then
    do_cd=1
    shift
  fi
  module=$1
  perl -M${module} -e "print \$${module}::VERSION,\"\n\""
  fullpath=$(
    perldoc -ml ${module} 2>/dev/null
    [ $? -eq  255 ] && perldoc -l ${module}
  )
  echo $fullpath
  if [ "$do_cd" = '1' ]; then
    \cd $(dirname $fullpath)
  fi
}