tools/pandora/stacks

   1 # -*- perl -*-
   2
   3 %separator {
   4    @pcap [$file = "trace.dump"]
   5    @ipprotoswitch [$tcp = 1, $udp = 2]
   6    (
   7       @tcpscan
   8       @demux [$algo = "tcpquad"] <
   9          @tcpreorder
  10          @tcpprint
  11       >
  12    |
  13       @udpscan
  14       @tcpprint
  15    )
  16    @discard
  17 }