$value =~ s/%([a-fA-F0-9][a-fA-f0-9])/pack("C", hex($1))/eg;

CPAN pra quê, né?
Fraqueza intelectual quase tão revigorante quanto procurar por "site:*.
gov.br filetype:sql" no Google :P

ABS()



2011/5/3 Blabos de Blebe <bla...@gmail.com>

> Pessoal,
>
> Eu desconfiei que um comentátio em inglês num código que estou
> analisando fosse "demais" para o nível geral. Então googlei por:
>
> "Go through the pairs and determine the name"
>
> Como primeiro resultado encontrei a origem do meu comentário.
> Entretanto achei mais que isso...
>
> http://www.terra.com.br/esoterico/astrologia/afinidades.pl
>
> WTF???
> =begin disclaimer
>   Sao Paulo Perl Mongers: http://sao-paulo.pm.org/
>  SaoPaulo-pm mailing list: SaoPaulo-pm@pm.org
>  L<http://mail.pm.org/mailman/listinfo/saopaulo-pm>
> =end disclaimer
>
=begin disclaimer
   Sao Paulo Perl Mongers: http://sao-paulo.pm.org/
 SaoPaulo-pm mailing list: SaoPaulo-pm@pm.org
 L<http://mail.pm.org/mailman/listinfo/saopaulo-pm>
=end disclaimer

Responder a