# if you want @robots to be interpreted as
# regexes, delete the map { ... }
my $regex = join '|', map { quotemeta $_ } @robots;


for (grep { ! /$regex/ } @logmessages){
    print OUTFILE $_;
}