package OurClass; use Badger::Class base => 'Badger::Base', mutators => 'arg1 arg2', config => 'arg1 arg2', init_method => 'configure', ;;;; sub printargs { my $self = shift; print $self->arg1, "\n", $self->arg2, "\n"; }