$string = "Fri Nov 8 15:00:02 2002:"; my ($a, $b, $c, $d, $e) = split(/\s+/, $string, 5);