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


There's more than one way to do things
	PerlMonks

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 exploiting the Monastery: (5)

As of 2018-06-20 04:19 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Voting Booth^?

Should cpanminus be part of the standard Perl release?

Notices^?