The most convenient way to sniff data is Wireshark/libpcap, which also has a Perl binding in Net::PCap. You might be interested in Net::IMP and Sniffer::HTTP.