App-PMUtils

 view release on metacpan or  search on metacpan

script/pmdir  view on Meta::CPAN

 {
     if [[ "$1" = "" ]]; then echo "Please specify a Perl module/prefix name"; return; fi
     local dir=`pmdir "$1"`
     if [[ "$dir" = "" ]]; then echo "Failed"; else cd "$dir"; fi
 }
 
 # tab completion
 _cdpm ()
 {
     local cur=${COMP_WORDS[COMP_CWORD]}
     COMPREPLY=( `COMP_LINE="pmdir $cur" COMP_POINT=$[6+${#cur}] pmdir` )
 }
 
 # activate tab completion
 complete -F _cdpm cdpm

Afterwards, you can:

 % cdpm di/zi/pl<tab>
 % cdpm Dist/Zilla/Plugin/ _

script/pmpath  view on Meta::CPAN

 {
     if [[ "$1" = "" ]]; then echo "Please specify a Perl module/prefix name"; return; fi
     local dir=`pmdir "$1"`
     if [[ "$dir" = "" ]]; then echo "Failed"; else cd "$dir"; fi
 }
 
 # tab completion
 _cdpm ()
 {
     local cur=${COMP_WORDS[COMP_CWORD]}
     COMPREPLY=( `COMP_LINE="pmdir $cur" COMP_POINT=$[6+${#cur}] pmdir` )
 }
 
 # activate tab completion
 complete -F _cdpm cdpm

Afterwards, you can:

 % cdpm di/zi/pl<tab>
 % cdpm Dist/Zilla/Plugin/ _

share/cdpm.bash  view on Meta::CPAN

{
    if [[ "$1" = "" ]]; then echo "Please specify a Perl module/prefix name"; return; fi
    local dir=`pmdir "$1"`
    if [[ "$dir" = "" ]]; then echo "Failed"; else cd "$dir"; fi
}

# tab completion
_cdpm ()
{
    local cur=${COMP_WORDS[COMP_CWORD]}
    COMPREPLY=( `COMP_LINE="pmdir $cur" COMP_POINT=$[6+${#cur}] pmdir` )
}

# activate tab completion
complete -F _cdpm cdpm



( run in 0.413 second using v1.01-cache-2.11-cpan-b61123c0432 )