foreach $logrecord (@errorcheck)
{
    open (LOGFILE, "$logrecord");
    while (<LOGFILE>)
        {
        my $logline = $_;
        if ($logline =~ /$error/)
            {
            $errorcount++;
            }
        }
}
system ('page Mike') if $errorcount;
print "$errorcount\n";