sub o { 
#          1         2         3         4         5         6 
# 12345678901234567890123456789012345678901234567890123456789012345678 
  split/[,:]/,pop;$hash{$_[$_]}=$_[$_+$#_/2+1]for 0..$#_/2;%hash; 
}