$update = "February 25th, 2020"; # routine.lib - ldb.co.uk ##### sub header { print "Content-type: text/html\n\n"; print <<"HTML code";
| |||||
HTML code
}
#####
sub footer {
print <<"HTML code";
Top of Page Last updated: $update | |||||
\n"; print "\n"; print "There is an error on the form at the moment\n"; print "\n"; print "
\n"; print "\n"; print ">>>>> $fault\n"; print "
\n"; print "\n"; print "Hit the button below to return to the page from which you came. \n"; print "