package MyApp;

use v5.34;
use warnings;

use Moo;
use Types qw/ InvoiceType CreditType /;

has 'type' => (
    is       => 'ro',
    isa      => InvoiceType | CreditType,
    required => 1,
    coerce   => 1,
);


sub run {
    my ($self) = @_;

    say "Running with ".$self->type;
}

1;