# implicit aliasing takes the last part of the package name
use aliased 'Really::Long::Class::Name';
my $name = Name->new;

# explicit aliasing allows a rename
use aliased 'Some::Long::Name::That::I::Hate' => 'Name';