> > 
> > That's too much there...
> > 
> >   /add_\w+/ and print("Yippie!\n"), last while $_ = each %hash;
> > 
> > "scalar each" is underutilized. :)
> 

what happened to grep?

print "found it" if grep{$_ =~ /foo/}keys %bar


If find this more readable, allthough Randall's solution is more efficient.

Maarten.



-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to