> -----Original Message-----
> From: Angerstein [mailto:[EMAIL PROTECTED]]
> Sent: Wednesday, August 28, 2002 6:12 AM
> To: [EMAIL PROTECTED]
> Subject: How to unshift to an array in an array of arrays?
>
>
> How to unshift to an array in an array of arrays?
$ perl -d -e 1
....
DB<1> @aoa = ([qw(foo bar baz)]) << create array of arrays
DB<2> x @aoa
0 ARRAY(0x80f82dc)
0 'foo'
1 'bar'
2 'baz'
DB<3> unshift @{$aoa[0]}, 'qux' << unshift to inner array
DB<4> x @aoa
0 ARRAY(0x80f82dc)
0 'qux' << there is is!
1 'foo'
2 'bar'
3 'baz'
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]