Hello, World

#!//usr/local/bin/perl print "Content-type: text/html\n\n"; print "\n"; print "Hello, World\n"; print "\n"; print "\n"; foreach $H (1..6){ print "Hello, World\n"; } print "\n";