> -----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]