Beefy Boxes and Bandwidth Generously Provided by pair Networks
There's more than one way to do things
 
PerlMonks  

Re: Re: The fastest way of searching a certain element in an array

by ccn (Vicar)
on Apr 15, 2004 at 22:56 UTC ( #345576=note: print w/ replies, xml ) Need Help??


in reply to Re: The fastest way of searching a certain element in an array
in thread The fastest way of searching a certain element in an array

Hmm..., surely it is not the fastest. Here is it's code:

sub first (&@) { my $code = shift; foreach (@_) { return $_ if &{$code}(); } undef; }
You can see, it is similar to my for_block which was benchmarked.


Comment on Re: Re: The fastest way of searching a certain element in an array
Download Code
Re^3: The fastest way of searching a certain element in an array
by Limbic~Region (Chancellor) on Jan 14, 2005 at 19:38 UTC
    ccn,
    Here is it's code:

    Well that depends. As I indicated in Getting Matching Items From An Array, List::Util falls back to pure perl (which has obvious inefficiencies) only if the XS version is unavailable. Which version of 'first' did you use in your benchmarks?

    Cheers - L~R

      I benchmarked 'first' with XS loaded. To make shure that XS was loaded I've inserted some alerting printouts in pure perl version of the 'first'.

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others exploiting the Monastery: (9)
As of 2014-08-22 13:48 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The best computer themed movie is:











    Results (158 votes), past polls