$SubroutName = 'test';
    {   no strict 'refs';
        &$SubroutName;
    }