$_ = "1.0 and 2.4 and 310 and 4.7 and so on"; @a = m/([\d|\.]+)\D+/g; print "@a\n"; #result #1.0 2.4 310 4.7 #### $_ = "1.0 and 2.4 and 310 and 4.7 and so on"; @a = ($_ =~ m/([\d|\.]+)\D+/g); print "@a\n"; #result #1.0 2.4 310 4.7