using unpack

[indapa]

Hi, I am trying to assign the result of unpack to an array:

@a = unpack(A10, $some_string);

My thinking was that the array would have the list of 10-length substrings taken from $some_string. But it appears that you cannot assign the result of unpack to an array. What I get is just the first 10 characters of the string.

Is there a way to work around this? I have list of of length >300, that I want to print out in length 10 substrings.

Thanks for the help.

[Albannach]

While greenfox has a good solution, if you really must have your strings 10 characters long, then you'd better use 'a' instead of 'A', as the latter will drop trailing spaces or nulls when unpacking.

--
I'd like to be able to assign to an luser

[I0]

@a = unpack(A10 x ((length$some_string)/10),$some_string)

[greenFox]

which loses characters if the string length is not an exact multiple of 10 (may not be a problem in this case?) One solution-

my @a = unpack('A10' x (length($string)/10) . 'A' . length($string)%10
+,$string);

--
my $chainsaw = 'Perl';

[I0]

#or
my @a = $string=~/(.{1,10})/gs;