Jason,
    Play with the script below:
my @a1 = qw( one ace );
my @a2 = qw( two deuce );
my @a3 = qw( thr tri );
my @a4 = qw( fou quad );
my @a5 = qw( fiv quat );
my @myarray = (\@a1, \@a2, \@a3, \@a4, \@a5);
foreach my $item (@myarray) {
   my($item1, $item2) = @$item;
   print "$item1 and $item2\n";
}
my @item;
foreach ( @myarray ) {
   print "$$_[0] and $$_[1]\n";
}

"Jason Frisvold" <[EMAIL PROTECTED]> wrote in message
[EMAIL PROTECTED]">news:[EMAIL PROTECTED]...
Here's another simple question....  I have an array of arrays and I want
to use a foreach to do something with each entry...  currently I do this
:

foreach my $item (@myarray) {
my ($item1, $item2) = @$item;
<do stuff here>
}

Is there a way to combine the first 2 lines?  Is it any faster and less
memory intensive?  (granted it's not much now, but hey, I like
optimizing things to death...)

Something along the lines of :

foreach my ($item1, $item2) (@myarray) {
<do stuff>
}

That doesn't seem to work for me, so I'm at a loss as to how to do
this...

Thanks,

---------------------------
Jason H. Frisvold
Senior ATM Engineer
Engineering Dept.
Penteledata
CCNA Certified - CSCO10151622
[EMAIL PROTECTED]
---------------------------
"I love deadlines.  I especially like the whooshing sound they make as
they go flying by." -- Douglas Adams [1952-2001]






-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to