print grep$,=$_~~[map$,+=$_,(/./g)x$$]&&$/,0..$$