Spreadsheet::ParseExcel $cell->value(), возвращающий undef

Question

Я новичок в Perl и у меня возникли проблемы с модулем анализатора Excel для электронных таблиц.

Когда я использую $cell->value() в отдельной строке, проблем не возникает, однако, когда я пытаюсь использовать это для вставки значения в массив, возвращается undef, код показан ниже:

for my $row ($row_min .. $row_max) {
    my @line;
        for my $col ( $col_min .. $col_max) {
                my $cell = $worksheet->get_cell( $row, $col );
                $value = $cell->value;
                push @line, $value if defined($cell);
                print $cell->value;
                print Dumper $line;
                }

         }
}

Здесь выведите $cell->value; возвращает содержимое ячейки, но выводит строку Dumper $; возвращает undef

Answer 1

Вы должны подтолкнуть $cell->valueне $value

push @line, $cell->value if defined($cell);

Вы должны добавить use strict в начале вашей программы, так что вы получите сообщение об ошибке в таком случае.