[REBOL] Re: Sort by first part of line
From: al:bri:xtra at: 7-Sep-2002 10:49
With Louis' data and this script:
Data: sort/skip map read/lines %test.txt
function [Line [string!]] [Loaded] [
if not empty? Line [
Loaded: load/next Line
write/lines %Sorted.txt map Data
func [N [integer!] Line [string!]] [
print now/time - Then
I got a time of two seconds (0:00:02) on my machine with Rebol/View. It's a
AMD Athlon XP 1600+, 1.40GHz with 512MB of RAM.
The first line of %Sorted.txt is:
002 umwn merimnwn dunatai prosqeinai epi thn hlikian
and the last line is:
521 tou qeou
I suspect that my machine's hardware makes most of the difference in time.
Louis, if you want, I can email the sorted text back to you. Just let me
I hope that helps!
ICQ: 26227169 http://valley.150m.com/