Select Code to Download

package MyClass;
use Moo;
...
} 

1;

package Odd;
use Moo::Role;
...
}

1;

package Even;
use Moo::Role;
...
}

1;

#!usr/bin/perl
use strict; use warnings;
...
}

__END__

$ perl test.pl

...
Loaded Even at Even.pm line 4.
2 MyClass=HASH(0x11b68e8)->bar at test.pl line 13.
2 MyClass=HASH(0x11b68e8) I am Odd at Odd.pm line 7.

package MyClass;
use Moo;

1;

#!usr/bin/perl
use strict; use warnings;
...
}

__END__

$ perl test.pl
1 MyClass__WITH__Odd=HASH(0x23f5f80) I am Odd at Odd.pm line 8.
2 MyClass__WITH__Even=HASH(0x2442db0) I am Even at Even.pm line 7.