function perldoc() { command perldoc -n less "$@" |man -l -; }