Select Code to Download

zcat file.gz | grep "Joe Sinclair" > output.txt

my $filename = "file.gz";
my $reg1 = "Joe Sinclair";
...
        print $line if($line =~ /$reg2/);
}
close(INFILE);