- or download this
package My::Abstract::Interface;
use Moose::Role;
requires qw( foo bar baz qux );
- or download this
package My::Abstract::Interface;
use Carp;
...
sub bar { croak }
sub baz { croak }
sub qux { croak }
- or download this
#!/usr/bin/env perl
...
my $bar = Bar->new( %$foo );
print $bar->to_string, $/;