Select Code to Download

#!/usr/bin/perl
use strict;
...
print "    <h1>Hello world!</h1>\n";
print "  </center>\n";
print "</body>\n";

# CGI headers (note two newlines, one for a blank line)
print "Content-type:  text/html\n\n";
...
    # And output it
    print $text;
}