Selam;

process_pkt fonksiyonuna parametre gönderebilir misiniz?(toplam 3 tane olacak, fonksiyonla ilgili)

>Net::PcapUtils::loop(\&process_pkt(1,2,3), FILTER => 'ip');

gibi

Net::PcapUtils modulü yüklü olmadiği için kesin bir cevap veremeyeceğim.

Perl'de derleme, çalisma aninda olur.
perl tarafindan kodun yorumlanmasi diyebiliriz.

Sevgiler & Saygilar

volkan kaya wrote:
Selam arkadaşlar FreeBSD de perl ile alttaki kodu derlediğimde
Segmantation fault (Core Dumped ) hatası veriyor. yardımcı olursanız
çok sevinirim Sistem Free BSD  5.3 iyi çalışmlar.
***********************************************************
#!/usr/bin/perl -w

  use strict;
  use Net::PcapUtils;
  use NetPacket::Ethernet qw(:strip);
  use NetPacket::IP;

  sub process_pkt {
      my ($user, $hdr, $pkt) = @_;

      my $ip_obj = NetPacket::IP->decode(eth_strip($pkt));
      print("$ip_obj->{src_ip}:$ip_obj->{dest_ip} $ip_obj->{proto}\n");
  }

  Net::PcapUtils::loop(\&process_pkt, FILTER => 'ip');
******************************************************************************


---------------------------------------------------------------------
Cikmak icin, e-mail: [EMAIL PROTECTED]
Liste arsivi: http://lists.enderunix.org
Turkiye'nin ilk FreeBSD kitabi: http://www.acikakademi.com/freebsd.php




Cevap