($text, $nums) = /(text);((?:$float$non_num){4})/;
@nums = split $non_num, $nums;