#!/usr/local/bin/perl

use strict;
use warnings;

open (FILE_MAKE_ERR,'<', "make.err") or die $!;

while(my $line = <FILE_MAKE_ERR>)
    if(my ($test) = $line =~ /(?i:error)\s+in\s+([^\s]+)/){
        print $test,"\n";
    }
}

close FILE_MAKE_ERR;