Try cat `which perldoc` it should look like

$ perldoc -m perldoc
#!/usr/bin/perl

require 5;
BEGIN { $^W = 1 if $ENV{'PERLDOCDEBUG'} }
use Pod::Perldoc;
exit( Pod::Perldoc->run() );
[download]