Select Code to Download

package MyClass;

...

    return 'Wrapped ' . $self->$orig;
};

use 5.016;

...
        say qq{Not OK, got $res};
    }
}