System Functions Perl

use warnings;
use strict;
print "Content-type: text/html\n\n";
print "Current date and time";
print "\n";
print scalar( localtime() );
print "";