$ip_obj = NetPacket::IP->decode();

##</code><code>##

print $conn $raw_tcp_pkg;