[0] Perl> print $string;; 2648117951505438300028047571976236505346 @sets_of_six = ( $string =~ m{ (.{6}) }xmsg );; print for @sets_of_six;; 264811 795150 543830 002804 757197 623650 #### @sets_of_six = $string =~ m{ (.{0,6}) }xmsg;; print for @sets_of_six;; 264811 795150 543830 002804 757197 623650 5346