while(<>){$a{$_}++||print"$_
"for split}