Select Code to Download

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

@array = qw(hi hello howdy);
for (@array) {
    if ($_ eq 'hello') {
...
}
@array = grep {defined} @array;
print join "\n", @array;