<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>Pessoal, <br>como de sugestao de pessoas da lista, estou tentar contar quantidade de elementos em um array..<br><br>vou no banco e recupero os dados :<br><br>.....<br>.....<br><br><br>while ( my @row = $sth2->fetchrow_array( ) )<br>{ <br> my $tot=0;<br> my @cont_var;<br> my $cont_var;<br> <br> @cont_var=("$umid","$dir","$ven","$pre","$vel","$velv","$pres","$par","$min","$max","$tacao","$lo"); <br><br> <br> $cont_var{$_}++ for @cont_var; # contar os números<br> <br> <br> foreach my $key1 (keys %cont_var)<br>
{<br> <br> if($key1 >= 5)<br> {<br> $tot_flag++;<br> <br> }<br> <br> }<br><br> print "TOT_FLAG=>>$tot_flag\n";<br><br><br><br><br><br>so que ele nao esta zerando.. na 1 passagem ele faz correto na segunda ele conta a 1 + a 2 :/<br><br>Alguem pode me dar uma luz..<br><br>Obrigada<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>