21 lines
249 B
Perl
Executable File
21 lines
249 B
Perl
Executable File
#!/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
|
|
=begin html
|
|
<p>Hello, <strong>World</strong>!</p>
|
|
=end html
|
|
=cut |