\n";
		print "function parse( \$doc_root,  \$file, \$_debug ) called with debug mode enabled\n";
		print "	\$doc_root	= $doc_root\n";
		print "	\$file	= $file\n";
		print "	\$_debug	= $_debug\n";
	}

	unset( $buf );
#    $buf =  ""; 

	if( eregi( "[a-z0-9]\.([a-z0-9]*)", $file, $ext ) )
		$extention = $ext[1];
	else
		return "\n";
	
	unset( $tag_use );
	for( $i = 0, $n = strlen( $extention ); $i < $n; $i++ ) {
		$use_tag .= "[" . substr( $extention, $i, 1 ) . "]";
	}

	if( $file_contents = file( $doc_root . $file ) ) {
		for( $i = 0, $n = count( $file_contents ); $i < $n; $i++ ) {
			if( $_debug ) print "\$file_contents[$i] = " . str_replace( ">", ">", str_replace( "<", "<", $file_contents[$i] ) );
			$buf .= parse_it( $file_contents[$i], $doc_root, $use_tag, $_debug );
		}
	}

	if( $_debug ) {
		print "	\$buf = $buf\n";
		print "\nEnd of parse()