Help for this page
use strict; use warnings; ... $b[ $_ - 1 ] ne q{z} } 0 .. $#b ]; print qq{@aNew};
1 9 3 5 6 4 3