I tried this myself with Archive::Tar 1.44 on an ubuntu box and got out of memory almost straight away:

use strict;
use warnings;
use Archive::Tar;
use Devel::Leak;


my $handle;

my @results = qw ( u1.tar.gz u2.tar.gz u3.tar.gz u4.tar.gz u5.tar.gz u
+6.tar.gz u7.tar.gz u8.tar.gz u9.tar.gz u10.tar.gz );
foreach my $tar_file ( @results ) {
  my $count = Devel::Leak::NoteSV($handle);
  print $count,"\n";
  my $x = Archive::Tar->new or die "Failed to get tar object";
  my $extracts = $x->read($tar_file);
  print "extracts $extracts\n";
  $x->clear;
  undef $extracts;
  print Devel::Leak::CheckSV($handle), "\n";
}

[download]

with 10 tar.gz files in the current directly all the same and of size 6.2Mb it fails with out of memory after only one:

~/tmp$ perl t.pl
28447
extracts 1
new 0x85fdce0 : 
new 0x85fdcec : 
loads and loads of these
old (1):
 0 
old (1):
 0 
quite a lot of those
28647
28649
Out of memory!

[download]

Tracking it through it failed in

Archive::Tar::_read_tar(/usr/local/share/perl/5.8.8/Archive/Tar.pm:318
+):
318: my $offset = eval { tell $handle } || 'unknown';
  DB<1> 
Out of memory!

[download]

In reply to Re^5: Archive::Tar Memory deallocation problem by mje
in thread Archive::Tar Memory deallocation problem by bgupta

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.