Estranho... de um jeito o "engine de warnings" (isso ecziste ?) acha que é opendir ( my ( $file, $dir ) ) .<br>Do outro jeito, é opendir ( my $file , $dir ) .<br>O resultado da compilação é o mesmo, mas o perl só percebeu isso depois...
<br><br>É isso ?<br><br><div><span class="gmail_quote">On 5/10/07, <b class="gmail_sendername">Igor Sutton Lopes</b> <<a href="mailto:igor.sutton@gmail.com">igor.sutton@gmail.com</a>> wrote:</span><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
<div style=""><div><div>Interessante:</div><div><br></div><div>elvis:~ igorsutton$ perl -MO=Deparse -we '$dir = q{.}; opendir my $file, $dir'</div><div>BEGIN { $^W = 1; }</div><div>$dir = '.';</div><div>opendir my $file, $dir;
</div><div>-e syntax OK</div><div><br></div><div>elvis:~ igorsutton$ perl -MO=Deparse -we '$dir = q{.}; opendir my $file, $dir;'</div><span class="q"><div>Parentheses missing around "my" list at -e line 1.
</div></span><div>BEGIN { $^W = 1; }</div><div>$dir = '.';</div><div>opendir my $file, $dir;</div><div>-e syntax OK</div><div><br></div><div>Descubram o que é ;-)</div></div><span class="sg"></span></div></blockquote>
</div><br>-- <br>[]s<br>Wendel<br><br>"Não ajustar o auto-ajuste" - <a href="http://wendel.scardua.net/">http://wendel.scardua.net/</a>