BESTOP is a procedural language with a one character op-code, a one
character file code and positional notation for the data fields. BESTOP
supports the classical operations of If, Else, Move, Write, arithmetic,
Find, Do loops, subroutine calls and a table lookup. Also supported is 
match file processing. BESTOP programs can be written very quickly to
reformat files, extract data, summarize data, and write reports.

It's ideal for scanning code for year 2000 problems.
