##
for (0..$#array) {
if ($array[$_] == $whatever) {
splice @array, $_, 1;
}
}
####
for (0..$#array) {
splice @array, $_, 1
if $array[$_] == $whatever;
}
####
for (reverse 0..$#array) {
splice @array, $_, 1
if $array[$_] == $whatever;
}