[SP-pm] Variavel somente leitura

Luis Motta Campos luismottacampos em yahoo.co.uk
Segunda Abril 28 14:16:51 PDT 2008


Lucas Mateus wrote:
> Achei esse barato aki, o que acham ?
> 
> my $host = 'localhost';
> 
> Internals::SvREADONLY($host => 1);  # lock $host
> print eval { $host = '10.1.1.1 <http://10.1.1.1>' } ?  "O valor de 
> \$host foi alterado\n" :  "O valor de \$host nao pode ser alterado\n";
> 
> Internals::SvREADONLY($host => 0);  # unlock $host
> print eval { $host = '10.1.1.1 <http://10.1.1.1>' } ?  "O valor de 
> \$host foi alterado\n" :  "O valor de \$host nao pode ser alterado\n";

Você deve estar brincando comigo, certo?

Bom, da documentação do módulo:

BEWARE: This module is DANGEROUS!
DO NOT attempt to unlock Perl's built-in variables!
DO NOT manipulate reference counts unless you know exactly what you're 
doing!
ANYTHING might happen! Hell might break loose! :-)
YOU HAVE BEEN WARNED!

Precisa tradução?
Putamplexos!
-- 
Luis Motta Campos (a.k.a. Monsieur Champs) is a software engineer,
Perl fanatic evangelist, and amateur {cook, photographer}


Mais detalhes sobre a lista de discussão SaoPaulo-pm