Select Code to Download

with length()
        1000 L=    256000 t=0.510602
...
       13000 L=   3328000 t=0.006128
       14000 L=   3584000 t=0.002311
       15000 L=   3840000 t=0.002231

use strict;
use warnings;
...
        return $len;
    }
}