<div>Pessoal,</div>
<div> </div>
<div>No post "Perl Golf Ethics" <a href="http://www.perlmonks.com/?node_id=592386">http://www.perlmonks.com/?node_id=592386</a>, o cara comenta sobre um desafio de Perl Golf da empresa Fonality. Curioso entrei na parte de Carrers e fiquei curioso sobre o desafio proposto pela empresa para determinar o grau de conhecimento na linguagem.
</div>
<div> </div>
<div>Segundo eles, o "Junior Perl Developer" tem que compreender o segundo código "<font face="courier new,monospace">s|(\d)|length(9 x $1)|eg;</font>". Bom, este é fácil, só não sei para que serve, já que na minha leitura não funciona.
</div>
<div> </div>
<div>Já o "Senior Perl Developer" tem que explicar o código :</div>
<div><font face="courier new,monospace">s;(?:SEEKING)?;PERLqny~%|fsyx%~tz&;?$^X=~m.\w+$.<br>:DEVELOPERS;s"$&"Ktsf"i;s^.^chr ord($&)-5^eg;$\=$/;print||" ;) "</font></div>
<div>... e este eu compreendi nada.</div>
<div> </div>
<div>Será que algum santo poderia explicar o que significa isto ?</div>
<div> </div>
<div>Abraços,</div>
<div> </div>
<div>Solli M. Honório</div>
<div> </div>