Parsing zipped xml data

[space_monk]

So I wrote this little application at work using XML::Parser, and then my line manager said "that works great, but the files are huge and I'd be much happier if it took .gz files as input. Now as far as I know, XML::Parser is based on expat, and if I had chosen to write my app using XML::LibXML::Parser instead, which uses the C libxml2 library, it would have taken .gz files as input automagically.

What's the easiest way to get my XML::Parser based app to process .xml.gz files with the minimum of changes?

[Anonymous Monk]

gzcat, but you knew that already :)

[space_monk]

I probably did, but the grey cells that hold that information have been killed off by the influx of alcohol between XMas and New Year :-)

Plus, I was interested to see various TMTOWTDI alternatives if there are any....

[Jenda]

The parse() method accepts an opened filehandle so something like

use PerlIO::gzip;
open my $IN, "<:gzip", "file.gz" or die $!;
$parser->parse($IN);
...

should work. (untested)