Re^4: How do you find duplicates in a string?


go ahead... be a heretic
	PerlMonks

Re^4: How do you find duplicates in a string?

by mk. (Friar)

on Sep 21, 2006 at 17:27 UTC ( [id://574200]=note: print w/replies, xml )

Need Help??

in reply to Re^3: How do you find duplicates in a string?
in thread How do you find duplicates in a string?

you'll need a hash to check for the dupes.

$hash{$_}++ foreach(split /\t/,$string);
foreach (keys (%hash)) {print $_."\n" if ($hash{$_} > 1 && /^\D+$/)}
[download]

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
"one who asks a question is a fool for five minutes; one who does not ask a question remains a fool forever."

mk at perl dot org dot br

Comment on Re^4: How do you find duplicates in a string? Download Code

In Section Seekers of Perl Wisdom

Domain Nodelet^?

www.com | www.net | www.org

Node Status^?

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

Chatterbox^?

How do I use this? • Last hour • Other CB clients

Other Users^?

Others drinking their drinks and smoking their pipes about the Monastery: (2)

As of 2024-04-26 02:48 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Today I Learned

Voting Booth^?

No recent polls found