<div>fica dificil adivinhar sem ver seu código, mas <br></div><div><br></div><div>penso que vc quer:<br>perl -e "my @items = qw( aaaa bbbb ccc); foreach $i (@items) { print $i; } "<br><br>mas vc esta fazendo:<br>
perl -e "my @items = qw( 'aaaa' 'bbbb' 'ccc'); foreach $i (@items) { print $i; } "</div><div><br></div><div>abs</div><br><div class="gmail_quote">2011/7/14 "Flávio R. Lopes" <span dir="ltr"><<a href="mailto:flavio.lopes@links.inf.br">flavio.lopes@links.inf.br</a>></span><br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex;">Boa noite pessoal.<br>
<br>
Onde estou errando nisso:<br>
<br>
Supondo que eu tenha um array "@dias", onde desejo passar elemento por elemento para uma Sub (pesquisa)<br>
<br>
my @dias = qw ("12-7-2011" "13-7-2011" "14-7-2011");<br>
<br>
foreach my $dia (@dias) {<br>
<br>
    $data = $dia;<br>
    pesquisa($data);<br>
<br>
<br>
<br>
}<br>
<br>
Se eu rodar o código acima não acontece nada.<br>
<br>
<br>
Mas funciona se eu fizer da forma abaixo, redefinindo "$data" a cada linha:<br>
<br>
$data = "12-07-2011";<br>
pesquisa ($data);<br>
<br>
$data = "14-07-2011";<br>
pesquisa ($data);<br>
<br>
<br>
O que está errado?<br>
<br>
Abraço,<br>
Flávio<br>
<br>
<br>
=begin disclaimer<br>
  Sao Paulo Perl Mongers: <a href="http://sao-paulo.pm.org/" target="_blank">http://sao-paulo.pm.org/</a><br>
SaoPaulo-pm mailing list: <a href="mailto:SaoPaulo-pm@pm.org" target="_blank">SaoPaulo-pm@pm.org</a><br>
L<<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a>><br>
=end disclaimer<br>
</blockquote></div><br>