Select Code to Download

#!/usr/bin/env perl

use strict;
...
}
print '<\table">', "\n";
print '<!-- run length compression saved ', $saved, ' table fields-->'
+, "\n";