Select Code to Download

$ perl time_to_add_doc.plx
          s/iter   size_4M   size_2M   size_1M size_500k size_250k
...
size_500k   2.20      646%      264%       70%        --      -52%
size_250k   1.06     1450%      656%      253%      108%        --
$

#!/usr/bin/perl
use strict;
...
    $doc->set_value( content => $content );
    $invindexer->add_doc($doc);
}