sample.pl   [plain text]

#!perl -w

print "Hello, world";

__END__

=head1 NAME

sample.pl - sample script to test manifypods action

=cut