while () {
my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime time;
$time_val="$hour:$min:$sec";
while ($time_val == "08:28:00") {
print "1st loop\n";
}
while ($time_val == "08:28:30") {
print "2nd loop\n";
}
}