Beefy Boxes and Bandwidth Generously Provided by pair Networks
Syntactic Confectionery Delight
 
PerlMonks  

Re: Re: Re: Re: NetPacket::TCP output

by Anonymous Monk
on Oct 10, 2001 at 18:06 UTC ( #117995=note: print w/ replies, xml ) Need Help??


in reply to Re: Re: Re: NetPacket::TCP output
in thread NetPacket::TCP output

Nope, that explanation doesn't work. Help?

Benedict


Comment on Re: Re: Re: Re: NetPacket::TCP output
Replies are listed 'Best First'.
Re: Re: Re: Re: Re: NetPacket::TCP output
by jlargent (Initiate) on Apr 08, 2003 at 13:39 UTC
    I can't take credit for this, I copied from someone elses code.
    sub parse_tcp_flags { my $flagword = shift(@_); my %flags = ("FIN"=>0,"SYN"=>0,"RST"=>0,"PSH"=>0,"ACK"=>0,"URG"=>0) +; $flags{FIN} = ($flagword & 0x01)? 1: 0; $flags{SYN} = ($flagword & 0x02)? 1: 0; $flags{RST} = ($flagword & 0x04)? 1: 0; $flags{PSH} = ($flagword & 0x08)? 1: 0; $flags{ACK} = ($flagword & 0x10)? 1: 0; $flags{URG} = ($flagword & 0x20)? 1: 0; return \%flags; }
    Pass this function the flags from parse_tcp_flags

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://117995]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others having an uproarious good time at the Monastery: (11)
As of 2015-07-31 13:04 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (277 votes), past polls