#!/usr/local/bin/perl -w
use strict;

open (FILE_MAKE_ERR, "make.err");

while(my $line = <FILE_MAKE_ERR>)
{
   if($line =~ /(ERROR|error)/ && $line !~ /errors/)
   { 
       $line =~ / (ERROR|error)\s+in\s+(\w+)\s+/;
       $line = $2;
       print "$line\n";
   }
}