The Very::Long::Class::Name problem

[Arunbear]

Hello friends, is there any way to abbreviate code like this:

$obj = Very::Long::Class::Name->new;
$result = Very::Long::Class::Name->other_class_method;

In Python you can do

import Very.Long.Class.Name as Name
obj = Name()
Name.other_class_method()

Does Perl have an analogous shortcut?
Thanks for any suggestions.