#__________________________________________________________________
#
#  logmining'check:  Check to see if the logs are still processing.          
#__________________________________________________________________
sub logmining'check
{
	my ($pid) = @_;
	print STDERR "CHECK: ps -ef | grep $pid.log\n\n";
	#&logmining'finish ();
	my $ps_check = `ps -ef | grep $pid.log`;
	while ($ps_check =~ m|gunzip|)
	{
		sleep (60);
		$ps_check = `ps -ef | grep $pid.log`;
		if ($ps_check !~ m|gunzip|)
         {
 		    $ps_check = ''; 	
              &logmining'finish ();	
              last;	
         }
	}	
}