r=*$<; r r[3,2]       # original
gets;~/:/; $_ $'      # new