use strict;
use warnings;

my $blacklist_server = "de9899svc";
my $server = undef;
my $exit_value = undef;

 open(SERVERLISTE,"/home/ansible/serverscan/scan_results/serverliste_22.02.17.txt") or die "$!";

OUTER: while (<SERVERLISTE>) {
    $server = $_;

    system("grep -i '$server' /home/ansible/serverscan/black.list");
    $exit_value  = $? >> 8;
    print "$exit_valuen";
}

close SERVERLISTE;