<>=~? ?,$_+=$'+print$_,$/for(~-$`%(++$|+$'))x6