x $ perl cmp.pl -t 1000 -s 1000
        Rate splice  undef
splice 287/s     --    -3%
undef  296/s     3%     --