@array = qw(hi hello howdy);
@array = grep {!/^hello$/} @array;
print join "\n", @array;