my @dispatch = (
    sub {},
    sub {},
    sub {},
    sub {},
    sub {},
    sub {},
    sub {},
    sub {},
    sub {},
    sub {},
);

sub test4 {
    return if $_[0] > 9;
    $dispatch[ $_[0] ]->( $_[0] );
}