> I have a long string of characters (> 40,000 chars) > that I need to break up into strings of 6 chars each. > Is there a simple way to do this in Perl? unpack() > doesn't seem to be the right solution; there are no
my $alphabet = join( '', 'A'..'Z' ); my @chunks = unpack( "(A6)*", $alphabet ); print join( ", ", @chunks ), "\n"; xoxo, Andy -- Andy Lester => [EMAIL PROTECTED] => www.petdance.com => AIM:petdance