0

我正在使用该Net::Pcap模块通过此过滤器捕获数据包：

dst $my_host and dst port 80

在 Net::Pcap 事件循环中，我使用了一个回调函数：

Net::Pcap::pcap_loop($pcap_t, -1, \my_callback, '')

my_callback看起来像这样：

my_callback {
    my ($user_data, $header, $packet) = @_;
    #   Strip ethernet IP and TCP
    my $ether_data = NetPacket::Ethernet::strip($packet);
    my $ip         = NetPacket::IP->decode($ether_data);
    my $tcp        = NetPacket::TCP->decode($ip->{'data'});
}

如何将 HTTP 数据包组合成一个数据包并提取其标头？

4

1 回答 1

0

尝试使用来自 CPAN 的 Sniffer::HTTP

于 2011-02-24T16:42:35.580 回答