Select Code to Download

#! perl -slw
use strict;
...
        Rate splice   heap
splice 159/s     --    -1%
heap   160/s     1%     --

 a) 0 [ 16 ] b) 0 [ 16 ] c) 0 [ 16 ] d) 0 [ 16 ] e) 0 * 17 ]
    1 [ 12 ]    1 [ 12 ]    1 [ 12 ]    1 * 17 ]    1 * 16 ]
...
   10 [  3 ]   10 [  3 ]   10 [  3 ]   10 [  3 ]   10 [  3 ]
   11 [  8 ]   11 [  8 ]   11 [  8 ]   11 [  8 ]   11 [  8 ]
   12 * 17 ]   12 *  7 ]   12 [  7 ]   12 [  7 ]   12 [  7 ]