diff options
| -rw-r--r-- | lib/App/ArchLinux/PackagerTools/CPAN.pm | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lib/App/ArchLinux/PackagerTools/CPAN.pm b/lib/App/ArchLinux/PackagerTools/CPAN.pm index 0bf201f..4faf0d6 100644 --- a/lib/App/ArchLinux/PackagerTools/CPAN.pm +++ b/lib/App/ArchLinux/PackagerTools/CPAN.pm @@ -6,7 +6,6 @@ use CPAN::DistnameInfo; use CPANPLUS::Backend; use Carp; use Function::Parameters; -use IO::Zlib; use Log::Any qw($log); use Syntax::Keyword::Try; use version; @@ -140,7 +139,7 @@ method _build_dist_index() { $log->debug("Building index..."); my $packages_file = "$ENV{HOME}/.cpanplus/02packages.details.txt.gz"; - my $fh = IO::Zlib->new($packages_file, 'r'); + open my $fh, '-|', 'zcat', $packages_file; my %seen; my $line_number = 0; while (<$fh>) { |