@SKIP = grep { $_ ne $SKIP } 'adrian','adm','sys','alcatel';