[devel] perl.req and strange use wrappers

[Alexey Tourbin]

On Sat, Jan 28, 2006 at 11:35:39PM +0300, Sergey Vlasov wrote:
> Используется это, например, таким образом:
> 
> use FVWM::Module::Toolkit qw(FileHandle IO::Select X11::Protocol>=0.52 Tk>=804.025 Tk::Balloon Tk::DragDrop Tk::DropSite Tk::LabFrame Tk::BrowseEntry Tk::PNG);

Я не вижу смысла в использовании такой конструкции.

> В результате perl.req не видит таких зависимостей.
> 
> С этим вообще как-то можно бороться централизованно (т.е., запатчив
> этот самый sub import в FVWM::Module::Toolkit)?  Или единственный
> способ - написать в том месте, где стоит use FVWM::Module::Toolkit,
> нормальные use на все используемые модули?

Лучше всего написать нормальные use.  Бороться можно, только если
изобрести альтернативный алгоритм поиска зависимостей.  Самый дубовый,
который в данном случае может сработать, -- это что-то вроде

	perl -le "use $shell_var_module; print keys %INC"
----------- следующая часть -----------
Было удалено вложение не в текстовом формате...
Имя     : =?iso-8859-1?q?=CF=D4=D3=D5=D4=D3=D4=D7=D5=C5=D4?=
Тип     : application/pgp-signature
Размер  : 189 байтов
Описание: =?iso-8859-1?q?=CF=D4=D3=D5=D4=D3=D4=D7=D5=C5=D4?=
Url     : <http://lists.altlinux.org/pipermail/devel/attachments/20060420/27a64c75/attachment-0001.bin>