|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Alex Dedul 2:450/82 15 Sep 2002 13:12:08
To : All
Subject : __DATA__ blocks & use
--------------------------------------------------------------------------------
Хочется заиметь доступ к filehandle ::DATA из модуля подключенного через
use. Знаю что напрямую это не сделаешь, потому как use выполняется on compile
time, в то время как ::DATA мы имеем на стадии выполнения. Пробовал читать
SelfLoader, perlsub, perldata и ничего дельного не вычитал, только еще больше
убедился в неосуществимости сей задачки. И вот чтоб окончательно завалить эту
горячо желанную фичу обращаюсь к общественности, подсобите плиз ж).
Для наглядности
----script.pl----
use lib "./";
use Mod; # если тут меняем на require то конечно
# все сразу начинает работать
__DATA__
print "Ok";
----script.pl----
----Mod.pm----
package Mod;
use strict;
print <::DATA>;
return 1;
----Mod.pm----
WBR, Alex
winamp is out there
--- GoldED+/W32 1.1.4.7
* Origin: Iron Hills Lab. (2:450/82)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
