open LOG,(">checkall.log") || die "Cannot open log file: $!";
my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);
open LOG,(">checkall.log") || die "Cannot open log file: $!";
my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);