From cf65e27c62d53f0097851b76e29b659df366b08a Mon Sep 17 00:00:00 2001 From: Jesse Luehrs Date: Sun, 15 Mar 2015 00:48:52 -0400 Subject: don't call ->text on the element if it doesn't exist --- lib/Spreadsheet/ParseXLSX.pm | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) diff --git a/lib/Spreadsheet/ParseXLSX.pm b/lib/Spreadsheet/ParseXLSX.pm index edab490..ac33514 100644 --- a/lib/Spreadsheet/ParseXLSX.pm +++ b/lib/Spreadsheet/ParseXLSX.pm @@ -167,8 +167,13 @@ sub _parse_sheet { 'headerFooter' => sub { my ($twig, $hf) = @_; - $sheet->{header} = $hf->first_child('oddHeader')->text // ''; - $sheet->{footer} = $hf->first_child('oddFooter')->text // ''; + my ($helem, $felem) = map { + $hf->first_child($_) + } qw(oddHeader oddFooter); + $sheet->{header} = $helem->text + if $helem; + $sheet->{footer} = $felem->text + if $felem; $twig->purge; }, -- cgit v1.2.3-54-g00ecf