Привет,
есть некий код запущенный под мод перлом, в этом коде в одной из библиотек есть такая часть, которая запускается при компиляции
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') в этом же пакете?
Спасибо заранее!