in reply to foreach loops
I think a C-style for loop would be appropriate here:
Output:my @names = ('rita', 'sue','bob', 'daisy'); for (my $i = 0; $i < @names; ++$i) { print $names[$i], ' ', ($names[$i+1] || ''), "\n"; }
rita sue sue bob bob daisy daisy
pbeckingham - typist, perishable vertebrate.
In Section
Seekers of Perl Wisdom