|
Я в курсе.....
Вот листинг скрипта:
##################################
#!/usr/bin/perl
##################################
$z="test.pl";
@size=stat($z);
$min=(time-$size[10])/60;
$sec=(time-$size[10])%60;
print "Content-type: text/html\n\n";
print int $min;
print ".$sec";
##################################
все ок ?
__________________
wbr, Vitaliy 'O Korolev
|