$ perldoc junk
No documentation found for "junk".

$ cat junk
=cut

=cut

=cut

print "what? \n";
__END__

$ perldoc junk
No documentation found for "junk".

$ perl junk

$ perl -MO=Deparse junk
junk syntax OK

$ perl -MPod::Simple::Checker -e  "exit Pod::Simple::Checker->filter(shift)->any_errata_seen"  junk
junk -- POD ERRORS
Hey! The above document had some coding errors, which are explained below:
Around line 1:
  =cut found outside a pod block.  Skipping to next block.
Around line 3:
  =cut found outside a pod block.  Skipping to next block.
Around line 5:
  =cut found outside a pod block.  Skipping to next block.