[Rio-pm] Bit-a-Bit

[Tiago Peczenyj]

opa

2012/2/11 breno <breno em rio.pm.org>:
>
> sub inverter {
>   my $string = shift;
>   $string = ~ tr/a-zA-Z/A-Za-z/;
>   return $string;
> }
>

Esta abordagem é otima mas tem suas limitações, como no caso da
palavra ação. como estou com preguiça não vou propor uma solução  mas
um uso de split com reduce e alguma magia negra pode resolver.


-- 
Tiago B. Peczenyj
Linux User #405772

http://pacman.blog.br