Привет,
есть некий код запущенный под мод перлом, в этом коде в одной из библиотек есть такая часть, которая запускается при компиляции
BEGIN{
        my $dir=Engine::Config->get('site_config','actions','path') ;
        opendir(DIR, $dir) || die "can't opendir : $!";
        map {require 'Actions/'.$_} grep{$_=~/\.pm$/} readdir(DIR);
        close DIR;
}

также есть некоторая функция в этой же библиотеке которая запускается при каждом запросе пользователя на веб. И в этой функции мне необходимо получить список всех пакетов которые сейчас подключены.

В принципе если упростить задачу то будет наверно так, есть например
use My::Module2;
use You::Module33;

как мне далее получить список, который содержит ('My::Module2','You::Module33') в этом же пакете?
Спасибо заранее!

• Список подключенных модулей,XAnder, 17:54 , 07-Сен-11
  • Список подключенных модулей,Алексей, 10:26 , 08-Сен-11

> use My::Module2;
> use You::Module33;
> как мне далее получить список, который содержит ('My::Module2','You::Module33') в этом
> же пакете?

%INC (не @INC)

>> use My::Module2;
>> use You::Module33;
>> как мне далее получить список, который содержит ('My::Module2','You::Module33') в этом
>> же пакете?
> %INC (не @INC)

Спасибо! всё гениальное просто))