On Mon, 02 Jul 2007 06:20:26 -0700
[EMAIL PROTECTED] wrote:

lets say you're looking for "34567" so 


my $what_i_am_looking_for = "34567";
# LOOP THROUGH IT
foreach $value (sort {$coins{$a} cmp $coins{$b} } keys %coins)
{
     next unless $value == $what_i_am_looking_for; 
     print "<$value---> $coins{$value}>\n";
}


HTH
Martin

-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/


Reply via email to