Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
my ($tsec,$tmin,$thour,$tmday,$tmon,$tyear,$twd,$tyd,$tds) = localtime
+(time);
...
my ($tdate) = "$tweekday, $tmday $tmonth, $tyear";
print "Content-type: text/html\n\n";
print "$tdate\n";
  2. or download this
    <html lang="el">
<head>
<meta HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=windows-12
+53">