|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Dmitry E. Oboukhov 2:5020/830.100 20 Mar 2007 20:19:45 To : Sergey Gernichenko Subject : require --------------------------------------------------------------------------------
SG> Пусть есть файл .pl, в котором определены функции и есть некоторый код вне
SG> функций. Можно ли сделать так, чтобы этот код, который вне функций
SG> выполнялся, если запускать скрипт на выполнение, и не выполнялся, если этот
SG> файл .pl подгружать в другой скрипт с помощью require?
if ($0 =~ "myscript.pl")
{
# код
}
может так? $0 в случае require будет указывать на вызывающий модуль
... Linux is like a wigwam - no windows, no gates, apache inside...
--- Mutt/1.5.13 (2006-08-11)
* Origin: Debian GNU Linux (2:5020/830.100)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/446169a2c4b2.html, оценка из 5, голосов 10
|