flow_num
IP_src
IP_dest
TCP_srcPort
TCP_dstPort
num_of_packets_in_flow
avg_packet_payload_size
avg_packet_interarrival_time

##</code><code>##

@monologues = new monologues("capture.dump");
foreach $monologue (@monologues){
  foreach $packet ($monologue){
    //print and create stats on header information and payload etc
  }
}


##</code><code>##

[1] http://www.circlemud.org/~jelson/software/tcpflow/
[2] http://search.cpan.org/~worrall/Net-Analysis/