Я ищу элегантный способ обозначения неопределенных значений в ситуациях, когда обычно отображаются форматированные числа. Я приведу небольшой пример. Для начала вы, конечно, не можете использовать это: #!/usr/bin/perl use strict; use warnings;...

Я ожидаю, что блок во втором операторе if будет введен из-за значения undef, но журналы показывают, что он не вводится. sub getcmd{ my $self = $_[0]; if ( $self->_recv == OK ){ push @{$self->{'log'}}, ['NOTICE', "OK"]; return...

У меня есть фрагмент в таком виде: my $a = $some_href->{$code}{'A'}; # a number or undef my $b = $some_href->{$code}{'B'}; # a number or undef $a = 0 unless defined($a); $b = 0 unless defined($b); my $total = $a + $b; Реальность еще...

При чтении из файла конфигурации в Perl могут быть случаи, когда строка недействительна и ее не нужно добавлять в мой массив допустимых строк. Поскольку здесь я использую цикл for, даже недопустимые строки создают запись undef. Как я могу удалить их...

Я новичок в Perl, и у меня проблемы с модулем синтаксического анализатора электронных таблиц Excel. КОГДА я использую $cell->value() в отдельной строке, проблем не возникает, однако, когда я пытаюсь использовать это для вставки значения в массив,...