Return to searchcat.pl CVS log | Up to [LON-CAPA] / loncom / metadata_database |
version 1.13, 2001/04/16 20:32:20 | version 1.14, 2001/04/16 20:45:42 |
---|---|
Line 188 sub propath { | Line 188 sub propath { |
sub sqltime { | sub sqltime { |
my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = | my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = |
localtime(@_[0]); | localtime(@_[0]); |
$year+=1900; | $mon++; $year+=1900; |
return "$year-$mon-$mday $hour:$min:$sec"; | return "$year-$mon-$mday $hour:$min:$sec"; |
} | } |