[Rio-pm] fazer string ficar undef

Renato Santos renato.cron em gmail.com
Terça Janeiro 8 07:46:04 PST 2013


$b = '' é defined.

2013/1/8 Aureliano Guedes <guedes_1000 em hotmail.com>

>  Ola monges,
>
> Quanto tempo, ne?! A paz reinava aqui sem minha ignorância. hahaha
>
> Desejando de cara um ótimo ano a todos venho trazer mais uma simples
> dúvida.
>
> Eu tenho o seguinte:
>
> chomp (my $b = <>);
> $b = undef if $b eq '';
> my $c = 'c';
> my $a = defined($b) ? $b : $c;
> print $a, "\n";
>
>
> Funciona perfeitamente, mas o que não entendo é porque se eu remover a
> segunda linha ($b = undef if $b eq '';).
> Ja não funciona.
>
> Se eu inserir algum valor em $b $a devera assumir o valor de $b, mas se
> não inserir devera assumir o valor de $c.
>
> Se eu fizer apenas:
> chomp (my $b = <>);
> my $c = 'c';
> my $a = defined($b) ? $b : $c;
> print $a, "\n";
>
> Não da certo.
>
>
> Sim, eu sei que as formas abaixo funcionam, mas é apenas uma questão de
> estudo mesmo.
>
> chomp (my $b = <>);
> my $c = 'c';
> my $a = $b ? $b : $c;
> print $a, "\n";
>
>
> chomp (my $b = <>);
> my $c = 'c';
> my $a = $b || $c;
> print $a, "\n";
>
> daria certo, mas minha intenção é estudo apenas
>
> _______________________________________________
> Rio-pm mailing list
> Rio-pm em pm.org
> http://mail.pm.org/mailman/listinfo/rio-pm
>



-- 
Saravá,
Renato CRON
http://www.renatocron.com/blog/
@renato_cron <http://twitter.com/#!/renato_cron>
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://mail.pm.org/pipermail/rio-pm/attachments/20130108/2fbb6fe8/attachment.html>


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