Beefy Boxes and Bandwidth Generously Provided by pair Networks
No such thing as a small change
 
PerlMonks  

Re^2: (Mis)Understanding <c>grep...eq $_<c>

by ysth (Canon)
on Feb 24, 2009 at 07:21 UTC ( #745922=note: print w/ replies, xml ) Need Help??


in reply to Re: (Mis)Understanding <c>grep...eq $_<c>
in thread (Mis)Understanding grep...eq $_

It makes no sense to use it on scalars.
Hey, that's not such a bad idea. For conditional inclusion in lists, instead of something like:
@foo = ( ... ( $include_bar ? 'bar' : () ) ... );
you'd have
@foo = ( ... grep( $include_bar, 'bar' ) ... );


Comment on Re^2: (Mis)Understanding <c>grep...eq $_<c>
Select or Download Code
Re^3: (Mis)Understanding grep...eq $_ (versus ex-bang-bang)
by grinder (Bishop) on Feb 24, 2009 at 07:50 UTC

    Ooh, nice! That's eminently readable. Much more likely to survive a code review than aristotle's ex-bang-bang operator.

    Rather than

    my @part = ( 'http://example.net/app', ( 'admin' ) x!! $is_admin_link, ( $subsite ) x!! defined $subsite, $mode, ( $id ) x!! defined $id, ( $submode ) x!! defined $submode, );

    we would now have

    my @part = ( 'http://example.net/app', grep( $is_admin_link. 'admin' ), grep( defined($subsite), $subsite ), $mode, grep( defined($id), $id ), grep( defined($submode), $submode ), );

    I like it.

    • another intruder with the mooring in the heart of the Perl

      What is the difference?

        None.

        I dare say the ex-bang-bang approach is faster, but then I would be rightly accused of premature optimisation. The grep approach, while slower (but at a cost approaching zero) is more easily figured out from first principles.

        The effect of x!! is not easily discerned; one has to write a harness to explore its behaviour. Either because one has encountered a similar idiom in a different language and wants to see if Perl matches expectations based on prior experience, or else they have not the faintest idea of what it does (and once one sees what it does, can they determine why?)

        So in summary, there is a difference. One is tricksy, the other is merely degenerate.

        • another intruder with the mooring in the heart of the Perl

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://745922]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others examining the Monastery: (6)
As of 2014-08-21 11:03 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The best computer themed movie is:











    Results (134 votes), past polls