#! perl -slw
use strict;
use My::Types;

my $typeA = new TypeA;