do{my%h;grep!$h{$_}++,@list}