|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Vadim Tzirulnicov 2:5020/40.102 20 Dec 2003 23:13:27
To : All
Subject : Hаписание сетевого модуля
--------------------------------------------------------------------------------
Сабж. Пишу модуль для работы по протоколу, средств для работы с которым на
cpan.org не обнаружено.
Хотел просто банально переписать Net::SMTP, но оказалось, что для этого и
Net::Cmd переписывать надо. :)
Посему стал писать с нуля. Модуль работает, но хотелось бы создание такого же
интерфейса работы, как и у Net::SMTP и иже сходных.
У меня так: Для начала работы вызываеться стартовая функция, которая
здороваеться с сервером и возвращает дескриптор открытого сокета для дальнейшей
работы с ним. Hо нужно организовать интерфейс а-ля Net:Cmd: отдавать переменную
с вложенными объектами.
Т.е. сейчас следующим образом реализовано:
$handle=Net::MyProtocol->new('abc.com');
Net::MyProtocol->send($handle,'la-la-la');
Hужно:
$myProtocol=Net::MyProtocol->new('abc.com');
$myProtocol->send('la-la-la');
Вопрос: Как организовать подобное ? Прошу кинуть в меня "Скелетом" подобного
модуля. Исследование Net::Cmd только ещё более запутали меня...
... Людям свойственно приписывать другим качества, присущие им самим.
--- Team: [Ru.Znakomstva] [Mo.Apartments] [Mo.Apartments.Talk]
* Origin: (2:5020/40.102)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
