手抜きfunction

zshでほんの少しだけ楽をする俺専用function
だって毎回perldoc -lとか打つのめどい

# vi open perl file
vip () {
    vi `perldoc -l $1 | perl -pe 's/pod$/pm/'`
}

# cd module dist
cdp () {
    cd `perldoc -l $1 | perl -pe 's/[^\/]+\.\w+$//'`
}