perl -lne '$a[$.].=$_;END{print for@a}'