/* NetRexx */ options replace format comments java crossref symbols nobinary -- Read from default input stream (console) until end of data lines = '' lines[0] = 0 inScanner = Scanner(System.in) loop l_ = 1 while inScanner.hasNext() inLine = inScanner.nextLine() lines[0] = l_ lines[l_] = inLine end l_ inScanner.close() loop l_ = 1 to lines[0] say l_.right(4)':' lines[l_] end l_ return