<br><br><div class="gmail_quote">2009/7/8 Daniel de Oliveira Mantovani <span dir="ltr"><<a href="mailto:daniel.oliveira.mantovani@gmail.com">daniel.oliveira.mantovani@gmail.com</a>></span><br><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
<br><br><div class="gmail_quote">2009/7/8 Eden Cardim <span dir="ltr"><<a href="mailto:edencardim@gmail.com" target="_blank">edencardim@gmail.com</a>></span><div class="im"><br><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
2009/7/8 Daniel de Oliveira Mantovani <<a href="mailto:daniel.oliveira.mantovani@gmail.com" target="_blank">daniel.oliveira.mantovani@gmail.com</a>>:<br>
<div>> Olha esse código, vai te ajudar.<br>
><br>
> my $x = 1;<br>
> my $y = undef;<br>
> my $z = 0;<br>
><br>
> if ( defined $x ) { print "Verdadeiro\n"; } else { print "Falso\n"; }<br>
><br>
> if ( defined $y ) { print "Verdadeiro\n"; } else { print "Falso\n"; }<br>
><br>
> if ( defined $z ) { print "Verdadeiro\n"; } else { print "Falso\n"; }<br>
><br>
> if ( $x ) { print "Verdadeiro\n"; } else { print "Falso\n"; }<br>
><br>
> if ( $y ) { print "Verdadeiro\n"; } else { print "Falso\n"; }<br>
><br>
> if ( $z ) { print "Verdadeiro\n"; } else { print "Falso\n"; }<br>
><br>
> if ( defined $x and defined $z ) { print "Verdadeiro\n"; } else { print<br>
> "Falso\n"; }<br>
><br>
> if ( $x and $z ) { print "Verdadeiro\n"; } else { print "Falso\n"; }<br>
><br>
> if ( $x or $z ) { print "Verdadeiro\n"; } else { print "Falso\n"; }<br>
><br>
> if ( defined $y or $z ) { print "Verdadeiro\n"; } else { print "Falso\n"; }<br>
><br>
> if ( $y or $z ) { print "Verdadeiro\n"; } else { print "Falso\n"; }<br>
<br>
</div>Nada nesse código tem relação alguma com o problema do cláudio, o que<br>
ele queria saber era como fazer uma operação bitwise entre dois<br>
valores.</blockquote></div><div><br>Acabei de ver o que é bitwise.<br><br>perl -E 'say "10" if 10 & 5'<br><br>1010<br>0101<br>--------<br>0000<br>Falso.<br><br>perl -E 'say "10" if 5 & 5'<br>
<br>0101<br>0101<br>-------<br>0101<br>Verdadeiro.<br><br>Só não entendi porque usar isso em um script Perl.</div></div></blockquote><div><br>Então vc não entendeu o que é um bitwise meu querido.<br> </div><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
<div class="gmail_quote"><div><br><br>[]'s<br></div><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
<br>
<font color="#888888"><br>
--<div class="im"><br>
Eden Cardim Need help with your Catalyst or DBIx::Class project?<br>
Code Monkey <a href="http://www.shadowcat.co.uk/catalyst/" target="_blank">http://www.shadowcat.co.uk/catalyst/</a><br>
Shadowcat Systems Ltd. Want a managed development or deployment platform?<br>
<a href="http://edenc.vox.com/" target="_blank">http://edenc.vox.com/</a> <a href="http://www.shadowcat.co.uk/servers/" target="_blank">http://www.shadowcat.co.uk/servers/</a><br>
</div></font><div class="im"><div><div></div><div>_______________________________________________<br>
SaoPaulo-pm mailing list<br>
<a href="mailto:SaoPaulo-pm@pm.org" target="_blank">SaoPaulo-pm@pm.org</a><br>
<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a><br>
</div></div></div></blockquote></div><br><br clear="all"><div><div></div><div class="h5"><br>-- <br><a href="http://mantovanihouse.blogspot.com/" target="_blank">http://mantovanihouse.blogspot.com/</a><br>This is my poney:<br>
-------(\_------------_/)-----------<br>-------)--(----------)--(-----------<br>
------(----(---------)----)----------<br>-------)----(-------)----(-----------<br>-------(----(-------)----)-----------<br>--------\_-(\\.---.//)-_/------------<br>----------\)' -8--8- '(/--------------<br>-----------/------------\---------------<br>
----------(--)--------(--)--------------<br>------------(_c__c_)----------------<br>----------------------------------------<br>perl -MLWP::Simple -le 'grep{ print $1 if /href="(http.+?)"/}split($/,get("<a href="http://www.perl.org.br" target="_blank">http://www.perl.org.br</a>"))'<br>
</div></div><br>_______________________________________________<br>
SaoPaulo-pm mailing list<br>
<a href="mailto:SaoPaulo-pm@pm.org">SaoPaulo-pm@pm.org</a><br>
<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a><br></blockquote></div><br><br clear="all"><br>-- <br>"o animal satisfeito dorme". - Guimarães Rosa<br>