Исключение из массива повторяющихся записей

Цель: Исключение из массива повторяющихся записей.
Дано: @cur_list - исходный массив
Решение:

my @new_list; # массив куда будут помещены "отфильтованные" значения
my @cur_list; 
my %seen; #хеш для работы
@new_list = grep {$_ && !$seen{$_}++} @cur_list;