print "'$_' " for unpack '(A5)5', 'abcdeabcd abc  ab   a   ';
'abcde' 'abcd' 'abc' 'ab' 'a';