grep not(/$bad/, @list);