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

Reply via email to