for ($i = 0; $i<=$#array; ++$i) {
   undef $array[$i];
}

##</code><code>##

for ($i = 0; $i<=$#array; ++$i) {
   $array[$i] = undef;
}