io-compress

Why is Perl's IO:Compress::Adapter::Deflate running out of memory?

I'm trying to set the file permissions of files contained in a tarball with the following: print "Checking $tgz_file... "; my $edited = 0; my $tarball = Archive::Tar->new($tgz_file); my @items = $tarball->get_files(); foreach (@items) { if ($_->is_dir && $_->mode != 0755) { $_->mode(0755); $edited = 1; } elsif ($...