Hi doo_the_dew,
For anything complex, Template::Toolkit is very useful, as has already been mentioned.
If it's something simple you can of course just use a perl CGI script as long as your server is configured to support it. On my server, as an example, I created these 3 files:
# head.html
<head style="background:cyan">
<style type="text/css">
body { background: cyan; }
</style>
</head>
and
# body.html
<body>
<center>
<h1>Simple CGI Example for <a href="http://perlmonks.com/?node_id=
+1006655">doo_the_dew</a>
</center>
<hr>
and the file "index.cgi" (make sure it is executable if you're on a Unix/Linux server of course):
#!/usr/bin/perl -w
# Libraries
use strict;
use warnings;
use CGI::Carp qw{ fatalsToBrowser };
use IO::File;
# IMPORTANT -- CGI scripts need to provide the header
print "Content-type: text/html\n\n";
# Main program
insert_file("head.html"); # Insert common header
insert_file("body.html"); # Insert common body start
#
# YOUR CODE HERE
#
# Subroutines
sub insert_file {
my ($fn) = @_;
my $fh = new IO::File;
open($fh, "<", $fn) or die "Can't read file '$fn' ($!)\n";
foreach (<$fh>) {
print;
}
close $fh;
}
Hopefully that gives you something you can get up-and-running quickly. Once you need more power, you can always add Template::Toolkit, or even create your own HTML-generating libraries, as you desire.
say
substr+lc crypt(qw $i3 SI$),4,5
|