[Moscow.pm] Странности и неожиданности Perl
Andrew Fedorov
Andrei.Fedorov на sup.com
Чт Фев 28 02:53:06 PST 2008
use Data::Dumper;
sub aa {
my $bad_day = 1;
return if $bad_day;
return 'bla-bla-bla';
}
my $test = {
a => aa,
b => 1,
};
print Dumper($test);
=====================
$VAR1 = {
'1' => undef,
'a' => 'b'
};
=====================
Очень многие используют return if/unless для выхода и вот к чему это может привести. Особенно следует учитывать при использовании чужих библиотек :)
Подробная информация о списке рассылки Moscow-pm