@list = grep !$temp{$_}++, @list; # same thing, shorter.