Here's my quick version:
Rebol []
Data: {003 apo twn presbuterwn kai arcierewn kai grammatewn
002 umwn merimnwn dunatai prosqeinai epi thn hlikian
002 umin anasthsei kurioj o qeoj umwn ek twn adelfwn
}
write %Sort.txt Data
Data: sort/skip map read/lines %Sort.txt function [Line [string!]] [Loaded]
[
Loaded: load/next trim Line
reduce [
Loaded/1
trim Loaded/2
]
] 2
probe Data
halt
Andrew Martin
ICQ: 26227169 http://valley.150m.com/
-><-
--
To unsubscribe from this list, please send an email to
[EMAIL PROTECTED] with "unsubscribe" in the
subject, without the quotes.
