need to put values (from unpack) into array-ref

[jeanluca]

Dear Monks,

I've written the following not working code:

#! /usr/bin/perl
#
$b = "abefcdghijklmn" ;

$a[0]->[0] = "start 0" ;
$a[1]->[0] = "start 1" ;

for($i = 0; $i < 14; $i += 2) {
    (push(@{$a[0]}), push(@{$a[1]}) ) = unpack("x$i A1 A1", $b) ;
}

foreach ( @{$a[0]} ) {
    print "$_\n" ;
}

Using push like this doesn't work, but I hope I'm close to the true solution... :)
Any suggestions ?

Thanks Luca