for (0..$#arr) {delete($arr[$_]) if $arr[$_] eq $var;};