Gidday all,

The time module has not been installed on our server and our server team don't have 
time to install it so I cant use this command in my script

use Time::Local;

but I need to calculate todays date. From the following script I can calculate what 
year it is but how to get the month and the day.

#!/usr/bin/perl

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

my $time = time();
print "Time is $time<br>";
my $days = $time/86400;
print "The number of days since January 1 1970 = $days<br>";
my $year = $days/365 + 1970;
print "Year is $year<br>";

Thanks
Colin  

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to