my $file = "computernames.txt";
open FILE, "$file";

 while ($line=<FILE>){
 if ($line=~Servername){
 print $line;
  }
 }