Beefy Boxes and Bandwidth Generously Provided by pair Networks
Clear questions and runnable code
get the best and fastest answer

Re^3: filtering an array

by philiprbrenan (Monk)
on Sep 01, 2012 at 22:41 UTC ( #991206=note: print w/replies, xml ) Need Help??

in reply to Re^2: filtering an array
in thread filtering an array

You are using a variable in a pattern matching regular expression and said variable currently has no value. Please try assigning a value to the variable and see what happens. Thanks.

Replies are listed 'Best First'.
Re^4: filtering an array
by prbndr (Acolyte) on Sep 01, 2012 at 22:48 UTC

    i see. so if my array @positions is already defined and created, do i need to loop over all the values in @positions and then execute the code you posted?

    something like:

     for (@positions) {@positions = grep $_->[1] =~ /ac/i, @positions;}

    and then:

     for (@positions) {@positions = map $_->[0], @positions;}

      Likewise, the for is unnecessary in this code too:

      for (@positions) {@positions = map $_->[0], @positions;}

      It should just be:

      @positions = map $_->[0], @positions;

      because map iterates over the array you give it. Even better, you could write:

      $_ = $_->[0] for @positions;

      here we are making the for implicit in map explicit.

        perl still has a problem with this:

        @positions = grep $_->[1] =~ /ac/i, @positions;

        with the same error Use of uninitialized value in pattern match (m//)

      You do not need the for becuase grep loops over the array you give it. Please change:

      for (@positions) {@positions = grep $_->[1] =~ /ac/i, @positions;}


      @positions = grep $_->[1] =~ /ac/i, @positions;
        right, but the error still persists. what here isn't defined?

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://991206]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others imbibing at the Monastery: (7)
As of 2018-06-20 20:05 GMT
Find Nodes?
    Voting Booth?
    Should cpanminus be part of the standard Perl release?

    Results (117 votes). Check out past polls.