(PERL) use, require и “1” в конце работы.

oraweb
Дата: 07.10.2006 15:40:15
При работе с подгружаемыми, самописными модулями (use…, require…) с использованием (пример)
sub example {…} в Example.pm
и в скрипте
use Example;
print &Example::example ();
после успешного выполнения скрипта, иногда программа завершается добавлением 1 (единицы) при выводе на экран сгенерированной страницы. Очевидно, что подгружается та самая единица, которая стоит в конце Example.pm - (1;), что означает успешное выполнение (впрочем, возможно, и не факт?!). По какой причине она выводится на экран, (не всегда и не везде) логику понять сложно. У кого какие мысли?
Anjey aka PM
Дата: 07.10.2006 20:21:14
замени на return 1; хотя не поможет 100%

лучше код в студию, желательно в архиве