Help for this page

Select Code to Download


  1. or download this
    #! perl -sw
use 5.010;
...
close I;

printf STDERR "Found $success records in %.3f seconds\n", time() - $st
+art;
  2. or download this
    c:\test>wc -l 768941.search
   1000 768941.search
...
1101077781167
1101077781168
1101077781169
  3. or download this
    c:\test>dir 768941.dat
06/06/2009  03:55     1,625,416,082 768941.dat
...

c:\test>wc -l 768941.dat
37800374 768941.dat
  4. or download this
    c:\test>768941 768941.search >nul
Found 1000 records in 0.02 seconds
...

c:\test>768941 768941.search >nul
Found 1000 records in 0.03 seconds