Help for this page

Select Code to Download


  1. or download this
    C:\test>perl -E"say int( rand 100 ) for 1 .. 10e6" > 10e6(of100).dat
    
    ...
    C:\test>timeit \perl64\bin\sort.exe -o sorted "10e6(of100).dat"
    Took: 87.626558680 seconds
    
  2. or download this
    static void
    mergefps (char **files, register int nfiles,
    ...
          /* If uniquified output is turned on, output only the first of
         an identical series of lines. */
          if (unique)