I don't quite get what your question is, but I'll guess that you're asking how to empty an array:

@array = ();
[download]

Or if you're in a loop you can just rely on redeclaration:

while (1) {
   my @array;
   ...
   Dumper(\@array)
}
[download]