### Unpack IP data
		($ip_verNihl,$ip_tos,$ip_length,$ip_ident,$ip_flagNfrag,
		 $ip_ttl,$ip_protocol,$ip_checksum,@ip_src[0..3],
		 @ip_dest[0..3],$ip_data) = unpack('CCnnnCCa2CCCCCCCCa*',
		 $ether_data);