Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Perl: Общие вопросы > Создание PM модуля

Автор: Atlete 29.7.2008, 10:38

Я начал разбираться с Perl и вот столкнулся с такой проблемой.
Написал небольшую программку, которую сразу разбил на модули.
В Eclipse ысе запускалось и вот начал запускать без него и получилось что мои модули не видны (наверное).
Нашел в инете небольшую статью как правильно сделать свой модуль, вот код:

Код


package Module1;
BEGIN {
use Exporter ();
@ISA = "Exporter";
@EXPORT = "&subroutine1";
}
sub subroutine1 {print "Hello!n";}
return 1;
END { }

я просто скопировал данный код, создал файл module1.pm (пробовал и Module1.pm разницы нет)
и подключил его в основной программе следующим образом:

Код


use Module1;
print "hello world!";

соответсвенно ошибок не выводит и при этом на экран тоже ничего не выводит (убираем use Module1; все работает)
дальше создал аналогичный файл сединственной разницой что назвал его test.pm и написал
туда точно такой же код, только название пакета поменял:

Код


package Test;
BEGIN {
use Exporter ();
@ISA = "Exporter";
@EXPORT = "&subroutine1";
}
sub subroutine1 {print "Hello!n";}
return 1;
END { }

и если его подключаю то выводит желанный "Hello world!"

Вопрос, что я делаю не так? Как правильно оформить модуль чтобы он работал и был виден?

Автор: arto 29.7.2008, 10:50

все работает:

# cat > Module1.pm
package Module1;
BEGIN {
use Exporter ();
@ISA = "Exporter";
@EXPORT = "&subroutine1";
}
sub subroutine1 {print "Hello!n";}
return 1;
END { }
# perl -MModule1 -le 'subroutine1()'
Hello!n
#

Автор: Atlete 29.7.2008, 11:41

Я запускаю программу при помощи PHP использую функцию exec.
Вот таким образом и не работает. Для тестирования использую ActivePerl 5.8.8.

Автор: arto 29.7.2008, 12:17

указывайте путь до каталога с модулем

Автор: IceSunrise 29.7.2008, 14:02

Ваш код работает, если запустить скрипт из той же директории, где лежит модуль. Если файл модуля вы назвали Module1.pm, то пакет должен у вас называться package Module1, в скрипте нужно загружать модуль командой use Module1. Можете попробовать прописать путь к модулю командой use lib qw/PATH/; где PATH - путь к директории, где лежит ваш модуль.