#=comment
	    open VIEWFILE, "< $path" or die "Can't open $patht: $!<br>\n";
	
	    while( my $v_file = <VIEWFILE>) { 
		    
		    for (my $count=0; <VIEWFILE>; $count++) {     
		
		      print "<div  STYLE=\"font-family:  8pt Courier, 'Courier New', monospace; font-size: .6em;\">$v_file</div><br>";
		      
		    }
		    
		 }
	   close VIEWFILE;
#=cut