Select Code to Download

use Modern::Perl qw/2015/;
use List::MoreUtils qw/uniq/;
my @mountpoints = qw/one two three three two four one one five six/;

print join ' ', uniq sort @mountpoints;