[Moscow.pm] Удаление модуля из системы

[Oleg Kostyuk]

Вот, есть такое чудо - правда, не помню, где нашел:

~% cat ~/bin/uninstall-perl-module
#!/usr/bin/perl -w

use ExtUtils::Packlist;
use ExtUtils::Installed;

$ARGV[0] or die "Usage: $0 Module::Name\n";
my $mod  = $ARGV[0];
my $inst = ExtUtils::Installed->new();
foreach my $item ( sort( $inst->files($mod) ) ) {
    print "removing $item\n";
    unlink $item;
}
my $packfile = $inst->packlist($mod)->packlist_file();
print "removing $packfile\n";
unlink $packfile;





5 апреля 2011 г. 13:01 пользователь Aleksander N. Gorohovski
<angel на feht.dgtu.donetsk.ua> написал:
> On Tue, 05 Apr 2011 12:21:01 +0300, Naim Shafiev wrote:
>
>> App::pmuninstall  - не пойдет?
>> P.S Незнаю как оно будет вести с XS модулями,ибо не юзал,для этого.
>
> O!
> Премного благодарен.
> :)
> Вечером буду пробовать как работает.
>
>> 5 апреля 2011 г. 13:57 пользователь Aleksander N. Gorohovski написал:
>>
>>> Уважаемое сообщество,
>>> Доброго времени суток!
>>>
>>> Подскажите, кто знает,
>>> как удалить из системы (Linux или иной)
>>> установленный(е) модуль(и) штатными средствами
>>> не прибегая к ручному режиму, а-ля:
>>>
>>> # cd /usr/local/lib....
>>> # rm <модуль>
>>>
>>> ?
>>>
>>> Модули установлены через
>>> cpan install
>>>
>>> Или может штатные средства не предусмотрены в cpan
>>> ?
>>>
>>> Спасибо.
>
> --
> Moscow.pm mailing list
> moscow-pm на pm.org | http://moscow.pm.org
>



-- 
Sincerely yours,
Oleg Kostyuk (CUB-UANIC)