Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl -w 
use strict;
use CGI qw/:all/;

print start_html,p("Hello world"),end_html;
  2. or download this
    <!DOCTYPE html
        PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
...
</body>
</html>
  3. or download this
    #!/usr/bin/perl -w 
use strict;
...

open FOUT,"> my_html_page.html" or die $!;
print FOUT start_html,p("Hello world"),end_html;
  4. or download this
    #!/usr/bin/perl -w 
use strict;
use CGI qw/:all/;

print start_html,p({ style => "color: red;"},"Hello world"),end_html;
  5. or download this
    print table({width=>'80%',tr(td({width=>'30%',"thing1"),
                             td({width=>'60%',"thing2"),
                             td({width=>'10%',"a really long thing")
            ));