я хава CGI страницу index.cgi и один шаблон формы входа в качестве index.cgi use Singleton::CGI;
use Singleton::Session;
$q = new Singleton::CGI();
$session = new Singleton::Session();
$template
Я использую apache mod_cgi в течение нескольких лет. Теперь я перехожу к mod_perl, и я нашел некоторые проблемы, особенно с подпрограммами. До сих пор я никогда не использовал my, our или local; и скр
Я получаю $VAR1 = bless(\*{'Fh::fh00001Screenshot.png'}, 'Fh');
в переменной. Но мне нужно извлечь из него fh00001Screenshot.png. Как я могу его получить?