Красиво я сегодня попался на вот такой безобидной на первый взгляд конструкции:
if ( $fields{message_type}{set} ) {
...
}
...
for my $f (keys %fields) {
...
$obj->method($f, $fields{$f}{set});
...
}
Вываливалась ошибка, что где-то внутри method используется undef. А всё потому, что простое упоминание $fields{message_type}{set} в
(
Read more... )