in reply to no output of spreadsheet

Just a guess. Perhaps this-

my $osheet = $obook->{worksheet}[1]; # 2nd page

Should be-

my $osheet = $obook->{worksheet}->[0]; # 1st page