| Subject: | addsheet() fails for ODS format |
The following code should work, but fails:
use strict;
use warnings;
use Spreadsheet::Wright;
my $s = Spreadsheet::Wright->new( file => "file.ods", format => "ods" );
$s->addsheet( "first" );
$s->addrow( 1, 2, 5 );
die $s->error if $s->error;
$s->close;
The output:
Can't call method "addNewChild" on an undefined value at /usr/share/perl5/Spreadsheet/Wright/OpenDocumentXML.pm line 75.
(in cleanup) Can't call method "toString" on an undefined value at /usr/share/perl5/Spreadsheet/Wright/OpenDocumentXML.pm line 133.
Setting severity to important, as this essentially renders multisheet ODS spreadsheets unachievable.