diff -r e65d90b1682d -r 603b47708d37 lib/Imager.pm --- a/lib/Imager.pm Fri Aug 19 15:10:12 2011 +0200 +++ b/lib/Imager.pm Fri Aug 19 15:30:00 2011 +0200 @@ -24,16 +24,14 @@ given ($file) { when (/\.gz\.x$/) { open(my $fh => "openssl @{[CIPHER]} -d -pass $::o{pass} -in $file|"); - local $/ = undef; gunzip($fh => $buffer) or die $GunzipError; } when (/\.gz$/) { gunzip($file => $buffer) or die $GunzipError } when (/\.x$/) { open(my $fh => "openssl @{[CIPHER]} -d -pass $::o{pass} -in $file|"); - local $/ = undef; $$buffer = <$fh>; } - default { open(my $fh => $file); local $/ = undef; $$buffer = <$fh> } + default { open(my $fh => $file); sysread $fh => $$buffer, -s $fh } } }