@a=(@a,$_,@a)for 1..9;print@a[0..<>-1]