cmd.exe>type foo.pl && perldoc foo.pl
#!/usr/bin/perl -w
use strict;

=item foo.pl

My Documentation

=cut

No documentation found for "foo.pl".

cmd.exe>type foo.pl && perldoc foo.pl
#!/usr/bin/perl -w
use strict;

=head1 foo.pl

My Documentation

=cut

foo.pl
    My Documentation


cmd.exe>type foo.pl && perldoc foo.pl
#!/usr/bin/perl -w
use strict;

=begin foo.pl

My Documentation

=cut

No documentation found for "foo.pl".

cmd.exe>type foo.pl && perldoc foo.pl
#!/usr/bin/perl -w
use strict;

=head1 SomethingElse

My Documentation

=cut

SomethingElse
    My Documentation

cmd.exe>type foo.pl && perldoc foo.pl
#!/usr/bin/perl -w
use strict;

=head4 SomethingElse

My Documentation

=cut

   SomethingElse
    My Documentation

cmd.exe>type foo.pod && perldoc foo.pod
#!/usr/bin/perl -w
use strict;

=pod

My Documentation

=cut

    My Documentation