my @e; push @e, 0 for 1 .. grep !( $_ % 2 ), @c;