data to L650-F01 is ip address
 sdf sdf sdf
sdf sdf sdfs
Thu Oct 27 11:16:55 GMT 2005
 	
 
data to L650-F01 is sdf..1 . . .
 sdf sdf sdf
sdf sdf sdfs
Thu Oct 27 11:16:55 GMT 2005

	
data to  . . . #(no is here )
 sdf gdfg dfgdf
dfgdf dfgdf dfg
Thu Oct 27 10:58:46 GMT 2005

data to  MAP050-DFyutv01 is
 sdf gdfg dfgdf
dfgdf dfgdf dfg
Thu Oct 27 10:58:46 GMT 2005

data to  . . . (same as above)
 sdf gdfg dfgdf
dfgdf dfgdf dfg
Thu Oct 27 10:58:46 GMT 2005

 data to gbsdfghfif7 is ip address
 fgd dfgdf dfg 
dfg dfgd fdfgdf
dfg ddfg fd dgfd 
Thu Oct 27 10:59:23 GMT 2005
 	


##</code><code>##


while (! eof inFile)
  {
  $line .= ' ' . <inFile>;
  chomp $line;
 next if ! ($line =~ /logging\sto\s+\s+(.*?)\s+/i) and ! eof inFile;