perl - Net::Pcap から HTTP パケットを再構築するにはどうすればよいですか?

Question

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 パケットを 1 つのパケットに組み立てて、そのヘッダーを抽出するにはどうすればよいですか?

Answer 1

CPANからSniffer::HTTPを使用してみてください