@newlist = grep !((split /:/)[0] ~~ @removelist), @testlist; #### ctahci ctsata_1:25:seed