>[оверквотинг удален]
> В основной программе имя пакета получаем в переменной:
> my $p='pack1';
> require "$p.pl"; #пакет загружаем
> а теперь нужно вывести переменную $test находящуюся в пакете, стандартно было бы
> так:
> print $pack1::test;
> но тут имя пакета нужно указывать через переменную $p и не соображу
> как сделать, например это, не работает:
> print $${p}::test;
> print $($p::test);

eval "print \$${p}::test";