$len = length($day[5]); if ($len =~ /8/) { print "$day[5]"; } else { print "00:00:00"; }