while ($log =~ m/\d+ (\S+)/g) { }