perl-examples/docs/24_pod.md

POD

#!/usr/bin/perl
use warnings;
use strict;

print "Hello, World!";

while(<DATA>){
    print $_;
}

__END__

=head1 'Hello World' Program
=over 4
=item * option 1
=item * option 2
=back
=cut

pod2html xxxx.pl