$pid = open2(*Reader, *Writer, "tethereal -V -i -" ); # open tethereal reading on STDIN
  my $pcap_dumper_t = Net::Pcap::dump_open($pcap_desc, *Writer); # write to Writer FH
  Net::Pcap::dump($pcap_dumper_t, $header, $packet);
  Net::Pcap::dump_close($pcap_dumper_t);
  $got = <Reader>;
  print $got;