[Chicago-talk] Why won't this work?

[Andy Lester]

On Aug 1, 2007, at 8:56 AM, Richard Reina wrote:

> foreach $def (@arr) {
>         if ($def eq "b") {
>              my $trash = shift  # get rid of (trash) b
>         }
> }
>
> print "@arr\n";
>
> "b" does not get eliminated?

Because you're shifting from @ARGV, not @arr.

The better way to do it is to replace the entire for loop with:

   @arr = grep { $_ ne 'b' } @arr;

xoxo,
Andy

--
Andy Lester => andy at petdance.com => www.petdance.com => AIM:petdance