{   package SomeRole;
    # Implementor must provide y
    sub y { shift->x }
}

{   package Class;
    our @ISA = 'SomeRole';
    sub x { ... }
}