if ($text =~ /^(?:REGISTER|INVITE|BYE)\s\w+[-@_]\w+\.\w+\sSIP\/2\.0/)
{
	print "IN:$text\n";
}