The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
package My::Target::patch::p1;

use parent qw(Module::Patch);

our %config;

sub patch_data {
    return {
        v => 3,
        config => {
            -v1 => {default=>10},
            -v2 => {},
        },
        patches => [
            {
                action => 'wrap',
                mod_version => ['0.11', '0.12'],
                sub_name => 'foo',
                code => sub { "foo from p1" },
            },
            {
                action => 'add',
                sub_name => 'baz',
                code => sub { "baz from p1" },
            },
        ],
    };
}

1;
# ABSTRACT: Patch module for My::Target