use aliased "Some::Obnoxiously::Long::Name::For::A::Customer";
my $cust = Customer->new;