inserting-blank-records.rex

Pipelines v2.1

.....|...+....1....+....2....+....3....+....4....+....5....+....6....+....7....+....8....+....9....+....10...

Home

 **** Top of file ****
 1
 2 /* The following pipeline reads the input file: aldous.txt and inserts a blank record in between
 3 records which contain data. The output is displayed on the console. */
 4
 5 Address Rxpipe
 6
 7 'pipe (endchar ? stagesep ~)',
 8 '< &installdrive:\&installpath\examples\input\aldous.txt',
 9 '~ take 13', /* Select the first 13 records. */
 10 '~ strip trailing', /* Trim off whitespace. */
 11 '~ a: locate', /* Ignore null records. */
 12 '~ specs 1-* 1 x0a n', /* Append an NL character. */
 13 '~ b: faninany', /* Read from all streams. */
 14 '~ cons', /* Display on the console. */
 15 '?',
 16 'a:',
 17 '~ take *', /* Accept the records. */
 18 '~ b:' /* Route back to main pipeline. */
 19
 20 Say 'Hit Enter to close..'
 21 Parse Pull
 22
 23 Exit 0
 **** End of file ****
 

Console output

 
.....|...+....1....+....2....+....3....+....4....+....5....+....6....+....7....+....8....+....9....+....10...
 1 A SQUAT grey building of only thirty-four stories. Over the main entrance the words,
 2
 3 CENTRAL LONDON HATCHERY AND CONDITIONING CENTRE, and, in a shield, the World State's
 4
 5 motto, COMMUNITY, IDENTITY, STABILITY.
 6
 7
 8 The enormous room on the ground floor faced towards the north. Cold for all the summer
 9
 10 beyond the panes, for all the tropical heat of the room itself, a harsh thin light
 11
 12 glared through the windows, hungrily seeking some draped lay figure, some pallid shape
 13
 14 of academic gooseflesh, but finding only the glass and nickel and bleakly shining
 15
 16 porcelain of a laboratory. Wintriness responded to wintriness. The overalls of the
 17
 18 workers were white, their hands gloved with a pale corpse-coloured rubber. The light was
 19
 20 frozen, dead, a ghost. Only from the yellow barrels of the microscopes did it borrow a
 21
 22 certain rich and living substance, lying along the polished tubes like butter, streak
 23
 24 after luscious streak in long recession down the work tables.
 25
 26 Hit Enter to close..