>perl -MList::Util=uniqnum -E "say for uniqnum 1,1,2,1 1 2