lib/DX/Role/Op.pm

   1 package DX::Role::Op;
   2
   3 use Moo::Role;
   4
   5 has next => (is => 'ro');
   6
   7 requires 'run';
   8
   9 sub but {
  10   my ($self, @but) = @_;
  11   $self->new(%$self, @but);
  12 }
  13
  14 1;