my $class = shift;

my $self = ExceptionThrowingModule->new(args);

$self->{_myOwnattributes} = $this;
$self->{_myOwnattributes} = $that;

bless($self, $class);