#!/usr/bin/perl

print "Content-type: text/html\n";
print "\n";

print "<html>\n";
print "<head>\n";
print "<meta http-equiv=\"content-TYPE\" content=\"text/html; charset=UTF-8\">\n";
print "</head>\n";

print "<body>\n";
print "<h2>こんにちは Perl</h2>\n";
print "<font size=+1 color=#c01010>\n";
print "現在の時刻は \n";

$time = localtime(time);
print $time;

print "<br/></font>\n";
print "</body>\n";

print "</html>\n";