A perl program to display a digital clock which displays the current time of the server

By | November 5, 2011

prog.cgi

 

#!/usr/bin/perl
print “content-type:text/html\n\n”;
use CGI”:standard”;
my($s,$m,$h)=localtime(time);
print “The current time is : “;
print “$h:$m:$s “; 

 

 

Output:

The current Time is

23 : 19: 30

Please Share: Tweet about this on TwitterShare on FacebookShare on Google+Share on RedditPin on PinterestShare on LinkedInDigg thisShare on StumbleUponShare on TumblrBuffer this pageShare on VKEmail this to someone

Leave a Reply

Your email address will not be published. Required fields are marked *