Как убить массив?!! Perl

Имеется сценарий Perl, подключаем к нему модуль в котором описана функция, выдающая результат своей работы в массив. Функцию необходимо прогнать несколько раз, но данные, оставшиеся в массиве с предидущего запуска мешают корректному выводу информации при повторном запуске. Необходимо перед новым запуском функции уничтодить массив с инормацией. Может быть кто-нибудь знает, как решить данную проблему? (с переменными проще: undef($string), но нужен именно массив)