图解以太网帧格式

                $tcp->{seqnum},$tcp->{acknum}
                |----------------------------------------------------|
                |Hlen:@<<<|Reserve:@<<<<|Flags:@<<<<<<<<<|Wsize:@<<<<|
                $tcp->{hlen},$tcp->{reserved},$flags,$tcp->{winsize}
                |----------------------------------------------------|
                |Cksum:@<<<<<<<<<<<<<<<|USG:@<<<<<<<<<<<<<<<<<<<<<<<<|
                $tcp->{cksum},$tcp->{urg}
                |----------------------------------------------------|
                |                      Options                       |
                |----------------------------------------------------|
                |Data:  @<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< |
                $tcp->{data}
                |----------------------------------------------------|
.
$~='TCPHEADER';
write;
=for
print <<"EOF";
Src Port:$tcp->{src_port}
Dest Port:$tcp->{dest_port}
Seq Number:$tcp->{seqnum}
Ack Number:$tcp->{acknum}
Haed Length:$tcp->{hlen}
Reserved:$tcp->{reserved}
Flags:@{[map{ $tcp->{flags}&$_&&$tcpflags{$_}||''}keys %tcpflags] }
Window Size:$tcp->{winsize}
Cksum:$tcp->{cksum}
Urg Ptr:$tcp->{urg}
Options:@{[unpack("B*",$tcp->{options})]}
Data:$tcp->{data}
EOF
=cut
}

sub showudphead {

论坛热门帖子:	[lch203] 写得蛮好的linux学习笔记(10-21) [黑马制造] 学习java的30个目标(10-19) [笑傲股林] 做测试半年了，有点迷茫，应该再学些什么提高自己的测试水平和测试能力呢？(10-19) [udp8589] 大家用google的来吱一声? 用百度的~~也来报道下?(10-18) [沂偌掳兆] 本人总结的一些认为C++比较经典的书籍，希望对大家有用(10-18)
TAG标签:	格式 图解 my ip_obj- eth_obj- main::proto ip- tcp-