Re: Modifying Array inside While statement

From: "John W. Krahn" <someone@xxxxxxxxxxx>
Date: Wed, 28 Dec 2005 04:20:22 GMT

ced@xxxxxxxxxxxxxxxxxxxxx wrote:
> Andy wrote:
>>I have a perl script that takes an array and processes the arguments
>>inside it.
>>
>>while (<@my_array>) {
>> print "$_";
>> if (/new/i) {
>> @new_array = shift @my_array;
>> }
>>}
>>
>>....
>
> @my_array = map { /new/i ? () : $_ } @my_array;
>
> hth,

How would that help?

John
--
use Perl;
program
fulfillment
.

Follow-Ups:
- Re: Modifying Array inside While statement
  - From: ced@xxxxxxxxxxxxxxxxxxxxx

References:
- Modifying Array inside While statement
  - From: Andy
- Re: Modifying Array inside While statement
  - From: ced@xxxxxxxxxxxxxxxxxxxxx

Prev by Date: Re: Modifying Array inside While statement
Next by Date: FAQ 4.69 How can I use a reference as a hash key?
Previous by thread: Re: Modifying Array inside While statement
Next by thread: Re: Modifying Array inside While statement
Index(es):
- Date
- Thread

Relevant Pages

How to grep $string from a file? How to run sed-like commands from Perl?
... Please note the Perl script that am trying to write at end the of this email, ... time and do a grep against the array. ... but it still consumes a lot of resource. ... convert this script to grep the string from a file instead of from the array. ...
(perl.beginners)
Re: Modifying Array inside While statement
... John W. Krahn wrote: ... >> Andy wrote: ... >>>I have a perl script that takes an array and processes the arguments ...
(comp.lang.perl.misc)
Re: Modifying Array inside While statement
... Andy wrote: ... > I have a perl script that takes an array and processes the arguments ... > the while loop get executed for all the indices in @my_array. ...
(comp.lang.perl.misc)
Re: Bash/Zsh-script: Reading a particular line from a file?
... Caveat programmer. ... Load up an entire file into an array to get a single line? ... note the use of the range operator there. ...
(comp.os.linux.misc)
Re: Modifying Array inside While statement
... Andy wrote: ... > I have a perl script that takes an array and processes the arguments ...
(comp.lang.perl.misc)