#!/usr/bin/perl

$path_current = '/usr01/rzs96/logmining/logs';

print "Firing off process 1\n";

if (fork ())
{
	# RUN PARENT PROCESS
	print "PARENT = $$\n";
}
else
{
	# RUN CHILD PROCESS
	print "CHILD = $$\n";
	close (STDOUT);

        # I need to get the PID from this gunzip process!
	`gunzip -c $path_current/access.webcache*.80.*-1200AM.gz | grep "01225322"  > Xtract-1.PID.log &`;
}