Michael Ellery wrote:
>
> hmmm - I tried this and get the same results (so far I've let it run for
> 20 minutes max). I wonder if this archive is simply too big for this
> library to handle (it's about 40 mb, which doesn't seem particularly
> large to me, but who knows...)
This works fine for me (version 1.38 of Tar on perl 5.8.8):
use strict;
use warnings;
use Archive::Tar;
my $tar = Archive::Tar->new('E:/tmp/somefile.tgz');
my @list = $tar->extract();
foreach (@list) {
printf "%s\n", $_->{name};
}
__END__
_______________________________________________
ActivePerl mailing list
[email protected]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
