<html><head><style type="text/css"><!-- DIV {margin:0px;} --></style></head><body><div style="font-family:times new roman, new york, times, serif;font-size:12pt"><div style="font-family: times new roman,new york,times,serif; font-size: 12pt;">Yess :)<br>Obrigada.. era isso msm <br><br><br><div style="font-family: times new roman,new york,times,serif; font-size: 12pt;">----- Mensagem original ----<br>De: eden &lt;edencardim@gmail.com&gt;<br>Para: Cascavel Perl Mongers &lt;cascavel-pm@pm.org&gt;<br>Enviadas: Quinta-feira, 31 de Janeiro de 2008 18:06:07<br>Assunto: Re: [Cascavel-pm] Res: Ajuda com Jash - retornar chave<br><br>2008/1/31 
Patty 
Silva 
&lt;<a ymailto="mailto:ptfzs@yahoo.com.br" href="mailto:ptfzs@yahoo.com.br">ptfzs@yahoo.com.br</a>&gt;:<br>&gt;<br>&gt; 
opS 
:)<br>&gt; 
Errei 
Assunto 
:)<br>&gt; 

errei 
comando 
:)<br>&gt;<br>&gt; 
my 
%hash= 
(<br>&gt;&nbsp; 
maca 
=&gt; 
34,<br>&gt;&nbsp; 
banana 
=&gt; 
23,<br>&gt;&nbsp; 
uva 
=&gt; 
23,<br>&gt;&nbsp; 
melao=&gt;10,<br>&gt;&nbsp; 
maracuja=&gt;12,<br>&gt;&nbsp; 
abacaxi 
=&gt;19<br>&gt;<br>&gt; 
);<br>&gt;<br>&gt; 
para 
eu 
contar 
quantas 
frutas 
&gt; 
20 
eu 
fiz:<br>&gt;<br>&gt; 
my 
$cont=scalar 
grep{$_&gt;20} 
values 
%hash;<br><br>my 
$cont 

my 
@frutas 

grep 

$hash{$_} 
&gt; 
20 

keys 
%hash;<br><br>-- <br>edenc.vox.com<br>_______________________________________________<br>Cascavel-pm 
mailing 
list<br><a ymailto="mailto:Cascavel-pm@pm.org" href="mailto:Cascavel-pm@pm.org">Cascavel-pm@pm.org</a><br><a href="http://mail.pm.org/mailman/listinfo/cascavel-pm" target="_blank">http://mail.pm.org/mailman/listinfo/cascavel-pm</a><br></div><br></div></div><br>


      <hr size=1>Abra sua conta no <a href="http://br.rd.yahoo.com/mail/taglines/mail/*http://br.mail.yahoo.com/">Yahoo! Mail</a>, o único sem limite de espaço para armazenamento! 
</body></html>