Народ подскажите можно ли в ActivePerl под Windows работать с Raw-сокетами ? Если можно то пожалуста приведите пример .
И еще вопросец. Для работы с транспортными протоколами (tcp, udp) нужно работать через Raw-сокеты либо как-то по другому?

SATYR да можно.
Есть модуль Socket и производный IO::Socket, которые входят в стандартную поставку ActiveState.
Типы сокетов, которые поддерживаются модулем:

Цитата

SOCK_STREAM  A continuous stream of data SOCK_DGRAM  Individual packets of data SOCK_RAW  Access to internal protocols and interfaces

Протоколы, которые поддерживает модуль:

Цитата

tcp  Transmission Control Protocol for stream sockets udp  User Datagram Protocol for datagram sockets icmp  Internet Control Message Protocol raw  Creates IP packets manually

Протоколы TCP и UDP непосредственно поддерживаются сокетами в перле, а остальные нет.
Если тебе нужно работать с TCP или UDP, то используй эти модули.
Для работы с протоколами ICMP и raw используют модули Net::ICMP и Net::RawIP соответственно.

Вот тебе пример работы с модулем Net::RawIP из документации:

Код

use Net::RawIP;   $a = new Net::RawIP;   $a->set({ip => {saddr => 'my.target.lan',daddr => 'my.target.lan'},            tcp => {source => 139,dest => 139,psh => 1, syn => 1}});   $a->send;   $a->ethnew("eth0");   $a->ethset(source => 'my.target.lan',dest =>'my.target.lan');       $a->ethsend;   $p = $a->pcapinit("eth0","dst port 21",1500,30);   $f = dump_open($p,"/my/home/log");   loop $p,10,\&dump,$f;

Также есть модули Net::Packet::RAW, Net::Whois::Raw и др.
Можно посмотреть, какие есть еще, на CPAN.

Для установки модулей можешь почитать статью "Установка perl-модулей", скачать здесь.



Это сообщение отредактировал(а) sharq - 16.10.2005, 23:19

[quote]Можно посмотреть, какие есть еще, на CPAN.
Это где ?
Добавлено @ 10:21
Нашел )

SATYR ты сильно не замарачивайся с модулями, тебе в полне хватит Socket и IO::Socket.

Что нужно сделать тебе?

Хочу програмно попробоать сформировать tcp пакет

SATYR тебе полезна будет книжка Network Programming with Perl By Lincoln D. Stein.

в электронном виде есть где нибудь?

SATYR качать здесь, смотреть здесь.

sharq, а приведенный выше пример кода для Перл под винду?

SATYR perldoc Net::RawIP.

Не заметил,

Цитата

NOTE: Ethernet related methods are implemented on Linux and *BSD only

.



Это сообщение отредактировал(а) sharq - 17.10.2005, 15:10

Почитал статейки с описанием примеров работы с RawIP. Это то что мне надо , но вопрос в том есть ли какой-нить его эквивалент под винду?

Попробуй сам написать