my @nums = ("123456789" =~ /(\d{3})/g); print "$_\n" for @nums; output - 123 456 789