|
ru.unix.bsd
- RU.UNIX.BSD ------------------------------------------------------------------
From : Slawa Olhovchenkov 2:5030/500 07 Sep 2005 11:10:32
To : Sergey Skvortsov
Subject : perl модули
--------------------------------------------------------------------------------
06 Sep 05, Sergey Skvortsov writes to Slawa Olhovchenkov:
SS> Если очень хочется - лучше использовать lazy evaluation:
А вот такие вопросы по трюкам.
Говорят, что из модуля при инициализации надо возвращать TRUE.
А если я верну строку?
И модули вот так грузить буду:
$dir = $1 if($ENV{SCRIPT_FILENAME} =~ /^(.*)\/.*$/);
opendir(DIR, $dir) || die "can't opendir $dir: $!";
while($file = readdir(DIR)) {
next if($file !~ /\.pm$/);
$pth = "$dir/$file";
$module = require "$pth";
$Modules{$module} = ${module}->ident;
$Actions{$module} = eval {\&{"${module}::action"}};
}
closedir DIR;
И что-то мне от этого eval избавиься не удается.
... И какой-то Win95 будет мне указывать, когда комп выключать?!
--- GoldED+/BSD 1.1.5
* Origin: (2:5030/500)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
