Inserting words

Pipelines v1.6

 

.* Example by TenFiftyTwo(c).

Home

 
.* The following pipeline reads the file: example.txt and inserts the text '123456789'
.* in between words 5 and 6 of each record.
 
pipe (endchar ?)
     < &installdrive:\&installpath\Examples\Input\example.txt .* Read input file.
     | strip trailing                              .* Trim off whitespace.
     | a: locate                                   .* Bypass null records.
     | specs w1-5 1 /123456789/ nw w6-* nw         .* Insert the text between words 5 and 6.
     | b: faninany                                 .* Merge input streams.
     | console                                     .* Display on the console.
     ?
     a:
     | take *                                      .* Read all records.
     | b:                                          .* Route back null records.