test page

Main Music Linux Perl Family Links

Test #1
2002-03-25
Various
This is a test. It might someday have something interesting.

Main Music Linux Perl Family Links

Test Page ##

##

Test #1
2002-03-25
Various
 This is a test. It might someday have something interesting.

##

##

#!/usr/bin/perl -w
use strict;
use exitwound::BuildLink qw(&buildLinks);

my ($NodeTitle, $NodeDate, $NodeSection, @words) = buildLinks(1);

########################
# BEGIN STANDARD HEADERS
########################
require("HEADER01.pl");
require("standard.css.pl");
require("HEADER02.pl");
require("shock-header-links.pl");
require("HEADER03.pl");
########################
# END STANDARD HEADERS
########################

print "$NodeTitle
";
print "$NodeDate
";
print "$NodeSection
";
print @words;
# print "test page";

########################
# BEGIN STANDARD FOOTERS
########################
require("FOOTER01.pl");
require("shock-footer-links.pl");
require("FOOTER02.pl");
########################
# END STANDARD FOOTERS
########################