From 1f70125c798202be1a52e567e174965b639d5c73 Mon Sep 17 00:00:00 2001 From: Jesse Luehrs Date: Thu, 14 Jul 2016 22:30:42 -0400 Subject: open files in raw mode this is required on windows --- t/basic.t | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 't/basic.t') diff --git a/t/basic.t b/t/basic.t index a024619..1eb6be8 100644 --- a/t/basic.t +++ b/t/basic.t @@ -9,8 +9,8 @@ my $filename = 't/data/Test.xlsx'; my @inputs = ( $filename, - do { open my $fh, '<', $filename or die; $fh }, - do { open my $fh, '<', $filename or die; local $/; my $d = <$fh>; \$d }, + do { open my $fh, '<:raw:bytes', $filename or die; $fh }, + do { open my $fh, '<:raw:bytes', $filename or die; local $/; my $d = <$fh>; \$d }, ); for my $file (@inputs) { -- cgit v1.2.3-54-g00ecf