В статье "Sniffing with Net::Cap to stealthily managing iptables rules remotely" приводится пример скриптов, осуществляющих перехват пакетов, на Perl, через использование модуля Net::Pcap.
