#!/usr/bin/perl

use strict;
use warnings;
use IPC::System::Simple qw(capture);

my $results = capture('gunzip -cf /usr/lib/perl5/5.8.8/CGI.pm');
print $results;