##Time function @days = ("0","1","2","3","4","5","6"); @Months = ("0","1","2","3","4","5","6","7","8","9","10","11"); ($sec,$min,$hr,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time); ($sec2,$min2,$hr2,$mday2,$mon2,$year2,$wday2,$yday2,$isdst) = localtime(time-86400); $year = $year + 1900; $timerF="@Months[$mon]/$mday/@days[$wday]/$hr:$min:$sec"; $timerF2="@Months[$mon2]/$mday2/@days[$wday2]/$hr2:$min2:$sec2"; print "$timerF\n\n\n$timerF2";