perl -ne 'print grep /lnxws/, $_;' /tmp/rechner.lst
123
open(IN,"/tmp/rechner.lst") or die "$!";print grep /lnxws/,<IN> ;close IN;