cat(tail(a<-readLines("stdin"),1),head(a,-1),sep="
")