> 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

Reply via email to