http://www.perlmonks.org?node_id=507323


in reply to Re: split and join
in thread split and join

$data = "0.7591.4166.6352.6465.4574.1653.833"; @data = $data =~ /\d\.\d\d\d/g;