#!/usr/bin/perl use Parse::ePerl; use CGI; use Data::Dumper; use strict; use Time::localtime; my $q=new CGI; print "Content-type: text/html\n\n";