sub verifyRecCount ($,$,$) { my ($recCount) = @_[0]; my ($tlrRecordCount) = @_[1]; my ($verRecordCount) = @_[2]; if ($recCount == $tlrRecordCount) { slog($logfile,"Comparing Record Count: $recCount to $tlrRecordCount. (OK!)"); $verRecordCount = 1; } else { slog($logfile,"Comparing Record Count: $recCount to $tlrRecordCount. (FAILED!)"); exit 6; } return $verRecordCount; }# verifyRecCount()