my $xlsdata = do{ local $/ = \-s( XLSFILE ); <XLSFILE> };