подпрограммы

[gibz]

Люди подскажите плз. Как подключать подпрограммы из других фалов в основной скрипт, а то когда я включаю файл с подпрограммой командой
require "somefile.pl"
то после работы основного скрипта в експлорере ничего не отображается, пустое окно и все, что за х. не пойму помогите плз

[NeoNox]

Експлорер к твоему скрипту не имеет никакого отношения.
Что ему дали - то он и показал.
Подключается с помощью require.
Скрипты в студию.

[gibz]

NeoNox:
Експлорер к твоему скрипту не имеет никакого отношения.
Что ему дали - то он и показал.
Подключается с помощью require.
Скрипты в студию.

Содержание файла
Index.pl
#!/usr/bin/perl
print "Content-type: text/html; charset=windows-1251\\n\\n";
require “vars.pl”;
print  “”;
print  “$date”;
print  “”;


Содержание файла
Vars.pl
#!/usr/bin/perl
$date=’04.02.2003’;

index.pl ничего не выводит, как сделать чтобы работало?

[PROnya]

Надо написать так:

unshift(@INC,"/path/vars.pl");
require “vars.pl”;

где path - точный путь (например /usr/temp/perllib)

И еще: в конце файла vars.pl поставь 1;

[NeoNox]

require “vars.pl”;
а файл называется Vars.pl

[gibz]

NeoNox:
require “vars.pl”;
а файл называется Vars.pl

блин дело не в этом если не понимаешь вопроса то я не виноват.
ну написал тут с большой буквы но файл называется с маленькой

[NeoNox]

gibz:
ну написал тут с большой буквы но файл называется с маленькой

Это я должен угадывать?!
Эти файлы лежат в одной директории?
require \'./somefile.pl\';

[Phoinix]

gibz
Я конечно не знаю, но если ты со скрипта копировал строки ннапрямую и webscript не заменяет некоторые символы другими, то хочу сказать, что символ ’ и символ \' несколько разные...

не так ’04.02.2003’

а вот  так \'04.02.2003\'

А вообще что в логах пишет-то???

[Alone]

напиши так
$date=’04.02.2003’;
1; (или return 1; )