Re: Re: Re: Perl Idioms Explained - keys %{{map{$

by RMGir (Prior)

on Aug 04, 2003 at 20:28 UTC ( #280791=note: print w/replies, xml )

Need Help??

Adding

'keys_map_undef' => sub { my @uniq = keys %{{ map {$_ => undef} @list 
+}}; },
[download]

to test the undef suggestion, it turns out to be 15-20% faster than using 1.

grep still wins, though.
--
Mike

Comment on Re: Re: Re: Perl Idioms Explained - keys %{{map{$_=>1}@list}} Download Code

In Section Meditations

Node Status^?

node history
Node Type: note [id://280791]
help

Chatterbox^?

How do I use this? | Other CB clients

Other Users^?

Others imbibing at the Monastery: (5)

As of 2019-01-18 23:47 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Voting Booth^?

Notices^?