Показать сообщение отдельно
Старый 12.02.2003, 17:55     # 1
usach
Junior Member
 
Регистрация: 05.07.2002
Сообщения: 58

usach Путь к славе только начался
Question Подключение модулей в Perl

Вот в умной книжке прчитал если я вот так сделаю:
use strict;
use vars qw(@ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);

use Exporter;
@ISA = qw(Exporter);

@EXPORT = qw(&myfunc);

sub myfunc
{........
}

а в скрипте
use этот модуль
то ф-ия myfunc будет доступна, но если в @EXPORT myfunc невключать то ее не получится использовать.

На практике получаеться поровну напишу я @EXPORT = qw(&myfunc); или нет myfunk в любом случае запускаеться

Неподскажите что я не так делаю или не так понял ???


usach вне форума