http://www.perlmonks.org?node_id=979345


in reply to problem web xml file

hmm well I got it worked out I think. thanks for all the help!

sub g_zip { my $file = $_; my $data; my $ptr = new IO::Uncompress::Gunzip($file) or die $!; while (defined (my $line = $ptr->getline())) { $data .= $line; } $ptr->close(); return $data; }