<div dir="ltr">use aliased<br></div><div class="gmail_extra"><br><br><div class="gmail_quote">17 октября 2013 г., 14:50 пользователь Анатолий Гришаев <span dir="ltr"><<a href="mailto:0body0@rambler.ru" target="_blank">0body0@rambler.ru</a>></span> написал:<br>

<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">Проблема:<br>
Вот есть у меная много классов с длинными именами типа MyCompany::MySchema::Sklad::<u></u>Feature::SubFeatureClass .<br>
<br>
И дальше используем<br>
use MyCompany::MySchema::Sklad::<u></u>Feature::SubFeatureClass;<br>
my $feature_obj1 = MyCompany::MySchema::Sklad::<u></u>Feature::SubFeatureClass->new;<br>
my $feature_obj2 = MyCompany::MySchema::Sklad::<u></u>Feature::SubFeatureClass->new;<br>
....<br>
<br>
можно сократить не много кода<br>
use MyCompany::MySchema::Sklad::<u></u>Feature::SubFeatureClass;<br>
use constant Feature=> 'MyCompany::MySchema::Sklad::<u></u>Feature::SubFeatureClass';<br>
my $feature_obj1 = Feature->new;<br>
my $feature_obj2 = Feature->new;<br>
....<br>
<br>
Но хотелось бы примерно такого:<br>
<br>
use MyCompany::MySchema::Sklad::<u></u>Feature::SubFeatureClass -as => 'Feature';<br>
<br>
и далее<br>
my $feature_obj1 = Feature->new;<br>
my $feature_obj2 = Feature->new;<br>
....<br>
<br>
Собрать такое  минут за двадцать можно ,  но хотелось бы чего-нибудь уже готового.<span class="HOEnZb"><font color="#888888"><br>
<br>
<br>
<br>
-- <br>
Moscow.pm mailing list<br>
<a href="mailto:moscow-pm@pm.org" target="_blank">moscow-pm@pm.org</a> | <a href="http://moscow.pm.org" target="_blank">http://moscow.pm.org</a><br>
</font></span></blockquote></div><br><br clear="all"><div><br></div>-- <br>Sincerely yours,<br>Oleg Kostyuk (CUB-UANIC)
</div>