my @newlist = grep { $_ != 2 and $_ != 4 } @list;