Select Code to Download

package Enemy {
  use Moo::Role;
...
# Creating lots of classes doesn't have to be painful.
package Rat { use Moo; with 'Enemy' }
package Cat { use Moo; with 'Enemy' }

use Moops;

...

class Rat with Enemy;
class Cat with Enemy;

use Moops;

...
    $target->is_sinful ? Attack->heavy : Attack->light;
  }
}