cmpthese (5000, {
    radiantmatrix => sub { my $array = [1..1000]; insert_array_elem1($array,1,$_) for 50..100 },
    use_splice => sub { my $array = [1..1000]; insert_array_elem2($array,1,$_) for 50..100 },
});