Re: Accessing previous element of an array in a 'foreach' loop

On Feb 6, Brett W. McCoy said:

>On Wed, 6 Feb 2002, Carl Rogers wrote:
>
>> foreach(@array) {
>>
>> 	if ($_ =~/somecondition/) {
>> 	# I want to do something to the element prior to $_ ($_ - 1)
>> 	}
>> }
>
>The problem here is that $_ is a *copy* of the element in the array --
>modifying it does not modify the array (I think in earlier versions it was
>actually an alias, which, I have read, led to all sorts of abuse), so
>without some kind of a counter, you will not have any knowledge of the
>previous value.

Err, no.  $_ is STILL an alias.

  my @words = qw( once upon a time );
  length > 1 and $_ = ucfirst($_) for @words;
  print "@words";  # Once Upon a Time

The problem will be storing the PREVIOUS element, which WILL be a copy,
NOT an alias.

-- 
Jeff "japhy" Pinyan      japhy@pobox.com      http://www.pobox.com/~japhy/
RPI Acacia brother #734   http://www.perlmonks.org/   http://www.cpan.org/
** Look for "Regular Expressions in Perl" published by Manning, in 2002 **
<stu> what does y/// stand for?  <tenderpuss> why, yansliterate of course.

• Accessing previous element of an array in a 'foreach' loop by Carl Rogers
• RE: Accessing previous element of an array in a 'foreach' loop by Nikola Janceski
• Re: Accessing previous element of an array in a 'foreach' loop by Brett W. McCoy
• Re: Accessing previous element of an array in a 'foreach' loop by Jeff 'japhy' Pinyan
• Re: Accessing previous element of an array in a 'foreach' loop by Jenda Krynicky
• Re: Accessing previous element of an array in a 'foreach' loop by Brett W. McCoy
• Re: Accessing previous element of an array in a 'foreach' loop by Jeff 'japhy' Pinyan