|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Dmitry Smolin 2:5020/949 15 Sep 2002 23:24:28
To : Alex Dedul
Subject : __DATA__ blocks & use
--------------------------------------------------------------------------------
Once, 15 Sep 2002 13:12, Alex Dedul wrote to All:
AD> Знаю что напрямую это не сделаешь, потому как use выполняется on
AD> compile time, в то время как ::DATA мы имеем на стадии выполнения.
И что с того?
AD> Пробовал читать SelfLoader, perlsub, perldata и ничего
AD> дельного не вычитал, только еще больше убедился в неосуществимости сей
AD> задачки. И вот чтоб окончательно завалить эту горячо желанную фичу
AD> обращаюсь к общественности, подсобите плиз ж).
=== Cut ===
package Mod;
use strict;
sub test {
print <main::DATA>;
}
return 1;
=== Cut ===
=== Cut ===
#!/usr/bin/perl -w
use strict;
use Mod;
Mod::test();
__DATA__
print "Ok";
=== Cut ===
Take care.
--- skanking to the rhythm of the music by my side
* Origin: While the cats away the rats will surely go down (2:5020/949)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
__DATA__ blocks & use 
