Select Code to Download

<assumptions>
 2 files x 65_000 lines x 60 fields x 8 chars = ~60MB data
...
 search query is field 1
 data contains no 'escaped' |'s (e.g. \| or "xx|xx")
</assumptions>

[mk_ecl_index]
#!/usr/bin/perl
...
  }
}
untie %index;