foreach (grep { not (/start/../stop/) =~ /^1?$|E/ } @data) {
 ..
}