stanislaw++ // trollface :D<br><br><div class="gmail_quote">2011/2/2 Otavio Pereira <span dir="ltr">&lt;<a href="mailto:otavio.pereira@gmail.com">otavio.pereira@gmail.com</a>&gt;</span><br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex;">
trollface lol<div><br clear="all">Otávio<br>
<br><br><div class="gmail_quote"><div class="im">2011/2/2 Stanislaw Pusep <span dir="ltr">&lt;<a href="mailto:creaktive@gmail.com" target="_blank">creaktive@gmail.com</a>&gt;</span><br></div><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">


E nesse caso, vai imprimir o que?<div><div></div><div class="h5"><br><br><span style="font-family:courier new,monospace">#!/usr/bin/perl</span><br style="font-family:courier new,monospace"><span style="font-family:courier new,monospace">eval eval &#39;&quot;&#39;.</span><br style="font-family:courier new,monospace">




<br style="font-family:courier new,monospace"><br style="font-family:courier new,monospace"><span style="font-family:courier new,monospace">           (&#39;[&#39;^&#39;+&#39;).(&#39;[&#39;^&quot;\)&quot;).( &#39;`&#39;|&#39;)&#39;)          </span><br style="font-family:courier new,monospace">




<span style="font-family:courier new,monospace">       .(&#39;`&#39;|&#39;.&#39;).(&#39;[&#39;^&#39;/&#39;).(&#39;{&#39;^ &#39;[&#39; ).&#39;(&#39;.        </span><br style="font-family:courier new,monospace"><span style="font-family:courier new,monospace">     &#39;(&#39;.&quot;&#39;&quot;.(&#39;`&#39;^(&#39;&amp;&#39;)). &quot;&#39;&quot;.((&#39;{&#39;)^ (( &#39;[&#39;)       </span><br style="font-family:courier new,monospace">




<span style="font-family:courier new,monospace">    )).(&#39;[&#39;^&#39;#&#39;). (&#39;{&#39;^&#39;[&#39;).(&#39;^&#39;^(&#39;`&#39; | &#39;/&#39;)).      </span><br style="font-family:courier new,monospace"><span style="font-family:courier new,monospace">    ((&#39;^&#39;)^(  &#39;`&#39;|&quot;\.&quot;)).(   (       &#39;^&#39;)^(&#39;`&#39;|     </span><br style="font-family:courier new,monospace">




<span style="font-family:courier new,monospace">  ((    (         &#39;.&#39;)))  ))          .( &#39;^&#39;        </span><br style="font-family:courier new,monospace"><span style="font-family:courier new,monospace">^ ( &#39;`&#39;|&#39;.&#39;)).&#39;)&#39;  .(&#39;{&#39;^  &#39;[&#39;). (&#39;.&#39;).(       ((   </span><br style="font-family:courier new,monospace">




<span style="font-family:courier new,monospace">(( (  (   (  &#39;{&#39;) ))))))^&#39;[&#39;).&#39;(&#39;.     &quot;&#39;&quot;. ((( &#39;{&#39;)</span><br style="font-family:courier new,monospace"><span style="font-family:courier new,monospace">)^ &#39;.&#39; ).&quot;\&#39;&quot;.(  &#39;{&#39;^&#39;[&#39;)   .(&#39;[&#39;^&#39;#&#39;).(     &#39;{&#39; ^((</span><br style="font-family:courier new,monospace">




<span style="font-family:courier new,monospace">  &#39;[&#39;)  )).+(   &#39;;&#39;&amp;&#39;=&#39;  ). ((&#39;^&#39;)^(   &#39;`&#39;| &#39;.&#39;  )).</span><br style="font-family:courier new,monospace"><span style="font-family:courier new,monospace">  (((    &#39;^&#39;))^(  ( (&#39;`&#39;))| ((    &#39;.&#39; )))   ).&#39;)&#39; . </span><br style="font-family:courier new,monospace">




<span style="font-family:courier new,monospace">  (((  (      &quot;\{&quot;)))^        &#39;[&#39;).     ( &quot;\.&quot;).(   </span><br style="font-family:courier new,monospace"><span style="font-family:courier new,monospace">  &#39;{&#39;  ^ ((  &#39;[&#39;  ))). (&#39;(&#39;). (       (( &quot;&#39;&quot;))).    </span><br style="font-family:courier new,monospace">




<span style="font-family:courier new,monospace">   ((                           &#39;!&#39;)    ).&quot;&#39;&quot;.(     </span><br style="font-family:courier new,monospace"><span style="font-family:courier new,monospace">  &#39;{&#39;                     ^&#39;[&#39; ).&#39;&#39;.  (&#39;[&#39;^&#39;#&#39;      </span><br style="font-family:courier new,monospace">




<span style="font-family:courier new,monospace">  ).+(   ( ((  (  &#39;{&#39;)) ))^&#39;[&#39;  )  .((&#39;^&#39;)^(        </span><br style="font-family:courier new,monospace"><span style="font-family:courier new,monospace">  &quot;\`&quot;|  (( (  ((  &#39;,&#39;) )))))   ).+( &#39;^&#39;^(          </span><br style="font-family:courier new,monospace">




<span style="font-family:courier new,monospace">  &#39;`&#39;|&#39;.&#39;)).              &quot;\)&quot;.( &#39;{&#39; ^+             </span><br style="font-family:courier new,monospace"><span style="font-family:courier new,monospace">  &quot;\[&quot;). &#39;.&#39;.(&#39;{&#39;^&#39;[&#39;).&#39;\\&#39;. &#39;&quot;&#39; .((                </span><br style="font-family:courier new,monospace">




<span style="font-family:courier new,monospace">  &#39;\\&#39; )).&#39;\\&#39;.(&#39;`&#39;|&#39;.&#39;).  &#39;\\&#39;.                    </span><br style="font-family:courier new,monospace"><span style="font-family:courier new,monospace">   &#39;&quot;&#39;.&#39;)&#39;.&#39;;&#39;.(&#39;!&#39;^&#39;+&#39;).&#39;&quot;&#39;                        </span><br style="font-family:courier new,monospace">




<span style="font-family:courier new,monospace">    ;$:=&#39;.&#39;^&#39;~&#39;;$~=&#39;@&#39;</span><br><br>Desculpem, não pude resistir ;)<br clear="all"><br>ABS()<div><div></div><div><br><br>
<br><br><div class="gmail_quote">On Wed, Feb 2, 2011 at 03:06, Daniel de Oliveira Mantovani <span dir="ltr">&lt;<a href="mailto:daniel.oliveira.mantovani@gmail.com" target="_blank">daniel.oliveira.mantovani@gmail.com</a>&gt;</span> wrote:<br>




<blockquote class="gmail_quote" style="margin:0pt 0pt 0pt 0.8ex;border-left:1px solid rgb(204, 204, 204);padding-left:1ex">perl -E &#39;my $num = 1; my $happy=$num+\$num;say $happy&#39;<br>
Qual o valor, você acha que vai imprimir ?<br>
<br>
perl -E &#39;$main::Foo::foo = 1;say &quot;Primeiro {$foo}&quot;;package Foo;say<br>
&quot;Segundo {$foo}&quot;&#39;<br>
Qual o valor, você acha que vai imprimir ?<br>
<br>
perl -E &#39;my @list = 1 .. 10; my $eba = (@list,1,1); say $eba&#39;<br>
Qual o valor, você acha que vai imprimir ?<br>
<br>
perl -E &#39;$a-&gt;{$_} = sub {return 0+\$a} for 1 .. 10; say $a-&gt;{$_}-&gt;()<br>
for 1 .. 10&#39;<br>
Quantos números diferentes apareceram ?<br>
<br>
perl -E &#39;sub foo {return undef}; my@heyhey=foo(); say 42 if @heyhey&#39;<br>
Vai imprimir alguma coisa na tela ?<br>
<br>
perl -E &#39;$foo-&gt;{a} = &quot;&quot;; say &quot;uha&quot; if exists $foo-&gt;{a}; say &quot;buuu&quot; if $foo-&gt;{a}&#39;<br>
&quot;uha&quot; ou &quot;buuu&quot; qual sai na tela ?<br>
<br>
perl -E &#39;say 41+a+1&#39;<br>
Qual o resultado ?<br>
<br>
perl -le &#39;print$2while s/(\d*):?(\d*)/($1+$2||1).&quot;:$1&quot;/e&#39;<br>
Qual o nome dessa seqüência famosa ?<br>
<br>
perl -E &#39;@foo{1 .. 5} = (a .. e); say sort %foo&#39;<br>
O que vai imprimir ?<br>
<br>
perl -E &#39;say localtime; say scalar localtime&#39;<br>
Qual a diferença ?<br>
<br>
O mais legal, é saber o &quot;porque&quot;. Acho que um &quot;Perl Quiz&quot; com<br>
perguntas divertidas, ajuda no conhecimento da linguagem.<br>
<br>
--<br>
&quot;If you’ve never written anything thoughtful, then you’ve never had<br>
any difficult, important, or interesting thoughts. That’s the secret:<br>
people who don’t write, are people who don’t think.&quot;<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&lt;<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a>&gt;<br>
=end disclaimer<br>
</blockquote></div><br>
</div></div><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&lt;<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a>&gt;<br>
=end disclaimer<br>
<br></div></div></blockquote></div><br></div>
<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">SaoPaulo-pm@pm.org</a><br>
 L&lt;<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a>&gt;<br>
=end disclaimer<br>
<br></blockquote></div><br><br clear="all"><br>-- <br>lorn at lornlab dot org<br>Lindolfo &quot;Lorn&quot; Rodrigues<br><br>