>perl -wMstrict -le "use List::MoreUtils qw(uniq); ;; my @ra = qw(one spam spam spam two spam three four spam spam five); ;; my @unique = uniq @ra; print qq{@unique}; " one spam two three four five