say $_=get;say $_~" "x$++~$_ for .comb[1..*]