--- Image-Info-1.31/lib/Image/Info/PNG.pm-	2009-11-22 22:06:39.000000000 +0300
+++ Image-Info-1.31/lib/Image/Info/PNG.pm	2011-11-15 05:04:09.252243979 +0400
@@ -23,11 +23,8 @@ use vars qw/$VERSION/;
 $VERSION = 1.01;
 
 # Test for Compress::Zlib (for reading zTXt chunks)
-my $have_zlib = 0;
-eval {
-    require Compress::Zlib;
-    $have_zlib++;
-};
+my $have_zlib = 1;
+require Compress::Zlib;
 
 sub my_read
 {