- or download this
# 1 2 3 4 5
#1234567890123456789012345678901234567890123456789012345678
...
#map{print$j=''if$l!=$_;print++$i.") $_-".++$j;$l=$_}@_
#map{print''if!$A{$_};print++$i.") $_-".++$A{$_}}@_
print$A{$_}?'':$/,++$i.") $_-".++$A{$_}for@_
- or download this
print!$A{$_}&&$/,++$i.") $_-".++$A{$_}for@_
- or download this
print!$A{$_}++&&$/,++$i.") $_-$A{$_}"for@_
- or download this
print$/x!$A{$_}++,++$i.") $_-$A{$_}"for@_