while (<>){

$front = substr( $_, 0, index($_, '"' )-1, "");
$back  = substr( $_, rindex( $_, '"' )+2);
$user_agent = substr ($_, 1, rindex( $_, '"' ));

	$front=~/^([^#\s]+\s\S+)\s(\S+)\s(\S+)\s(\S+)\s(\S+)\s(\S+)\s(\S+)\s(\S+)\s(\S+)\s(\S+)\s(\S+)\s(\S+)\s(\S+)\s(\S+)\s(\S+)$/;

		print <<END_FORMAT;

		date time 		= $1
		time taken 		= $2
		c-ip 			= $3
		sc-status 		= $4
		ns-action 		= $5
		sc-bytes 		= $6
		cs-bytes 		= $7
		cs-method 		= $8
		cs-uri-scheme 		= $9
		cs-host 		= $10
		cs-uri-stem 		= $11
		cs-username 		= $12
		s-hierarchy 		= $13
		s-supplier-name 	= $14
		cs(Content-Type)	= $15
		cs(User-Agent) 		= $user_agent
END_FORMAT

		$back=~/^(\S+)\s(\S+)\s(\S+)\s(\S+)\s(\S+)\s*$/;
		print <<END_FORMAT2
		sc-filter-result 	= $1
		sc-filter-category 	= $2
		x-virus-id		= $3
		s-ip			= $4
        	s-sitename		= $5
END_FORMAT2
}