Re: [devel] Поиск зависимостей

[Slava Dubrovskiy <slava@tangramltd.com>]

[-- Attachment #1: Type: text/plain, Size: 2293 bytes --]

Alexey Tourbin пишет:
>>>> Есть набор скриптов расположенных в /var/www/cgi-bin на перле.
>>>> Нужно определить их зависимости на перловые модули. Собирать их в пакет
>>>> нет необходимости.
>>>> Возможно ли запустить парсер для /var/www/cgi-bin чтобы получить список
>>>> всех используемых модулей?    
>>>>         
>>> В каком формате Вам хочется получить список перловых модулей?  
>>>       
>> А какие возможны варианты? Хотелось бы иметь в виде списка пакетов или в
>> виде  Math::BigInt
>>     
> В общем-то то что дает perl.req это и есть список пакетов.
> Его можно скармливать апту почти что в чистом виде.
>   
Не очень понятно как. Приведите пример, пожалуйста.
>>> Попробуйте /usr/lib/rpm/perl.req .  
>>>       
>> # /usr/lib/rpm/perl.req .
>> /usr/lib/rpm/perl.req: .: No such file or directory
>>     
> Вы хотите немало.  Для отбора перловых файлов есть отдельная программа:
> $ find /var/www/cgi-bin -type f |file -NF$'\t' -f - |/usr/lib/rpm/perl.req.files |/usr/lib/rpm/perl.req
>   
Запустил:
# find /var/www/cgi-bin -type f |file -NF$'\t' -f -
|/usr/lib/rpm/perl.req.files |/usr/lib/rpm/perl.req
/var/www/cgi-bin/printenv syntax OK
/var/www/cgi-bin/video/get_dir_url.pm syntax OK
/var/www/cgi-bin/video/filter_tvc.pm syntax OK
# perl(cgi-lib.pl) at line 9 (depth 3) inside eval SKIP
# perl(easydata.set) at line 12 (depth 3) invalid SKIP
# perl(staff_users.set) at line 14 (depth 3) invalid SKIP
# perl(dblib.pl) at line 15 (depth 3) inside eval SKIP
# perl(edfunc.pl) at line 16 (depth 3) inside eval SKIP
# perl(staff_auth.pm) at line 17 (depth 3) inside eval SKIP
/var/www/cgi-bin/video/staff_adm_login.cgi syntax OK

и т.д. Там где Ok все понятно, а там где "inside eval SKIP" что это значит?

-- 
WBR,
Dubrovskiy Vyacheslav


[-- Attachment #2: S/MIME Cryptographic Signature --]
[-- Type: application/x-pkcs7-signature, Size: 3249 bytes --]