#compdef pd

words[1]=perldoc
_perldoc "$@"