[Moscow.pm] AND, & ,&& или история моих багов

[Nikolay Mishin]

Спасибо, ну во всяком случае

my $a;
if ( length($a) == 0 ) {
    print 'test2';
}

лучше, чем
my $a;
if ( $a) {
    print 'test2';
}

да, но является ли эквивалентом запись
my $a;
if ( length($a) > 0 ) {
    print 'test2';
}

if ( defined $a ) {
    print 'test3';
}
??


13.12.2011, 12:51, "Mons Anderson" <mons на rambler-co.ru>:
> а если no warnings 'uninitialized' или use uni::perl
>
> say "ok" if length $var;
>
> и на defined проверять незачем.
> length(undef) == 0
>
> On 12.12.2011, at 17:20, Андрей П. Ковбович wrote:
>
>>  say 'ok' if defined $var and length $var;
>>
>>  11 декабря 2011 г. 20:21 пользователь Nikolay Mishin <mi на ya.ru> написал:
>>>  о, нереально, спасибо
>>>
>>>  11.12.2011, 13:14, "Denis Evdokimov" <evdokimov.denis на gmail.com>:
>>>>  if ( defined $var && length $var ) {
>>>>     print 'ok';
>>>>  }
>>>>
>>>>  --
>>>>  Moscow.pm mailing list
>>>>  moscow-pm на pm.org | http://moscow.pm.org
>>>  --
>>>  Nikolay Mishin
>>>  --
>>>  Moscow.pm mailing list
>>>  moscow-pm на pm.org | http://moscow.pm.org
>>  --
>>  Moscow.pm mailing list
>>  moscow-pm на pm.org | http://moscow.pm.org
> --
> Moscow.pm mailing list
> moscow-pm на pm.org | http://moscow.pm.org

--
Nikolay Mishin