Help for this page

Select Code to Download

Select or download this

my %seen;
my @uniq = grep !$seen{$_}++, @proc_name1;

Select or download this

my @uniq = do {
    my %seen;
    grep !$seen{$_}++, @proc_name1;
    };