File:  [parser3project] / parser3 / src / www / htdocs / Attic / index.html
Revision 1.172: download - view: text, annotated - select for diffs - revision graph
Tue May 8 06:42:58 2001 UTC (25 years, 2 months ago) by paf
Branches: MAIN
CVS tags: HEAD
table:record have name

@main[]
$t2[^table:set{key	a	b
1	a1	b1
2	a2	b2
}]
^t2.record[]
<hr>
#^OP:eval(1<2)

$filelist[^table:dir[.]]
<hr>
$path[/news/tululu/]
#^path.flip[]
<hr>
$branches[^table:set{name	val
index.cgihtml	123
}]
$splitURI[^request:uri.lsplit[/]]
name ^if(^branches.locate[name;$splitURI.1]){found;not found}:
$branches.name
<HR>
$splitURI[^request:uri.lsplit[/]]
$splitURI.0!$splitURI.1
<HR>

$t2[^table:set{dir	title
/here	Here
}]
$t2{^menu{${dir}-$title}[,]}
<HR>
$dir[news]
$list[^table:dir[$dir]]
^list.menu{
    $subdir[$dir/$list.name]
	$sublist[^table:dir[$subdir]]
	${list.name}/ $sublist{^menu{$name}[,]}<br>
}
<HR>
^t[x]
<HR>
^if(in "/otherdeeper"){y;n}
<HR>
^$form:проверка_имя=$form:проверка_имя<BR>
<form method=post>
<input name=проверка_имя value=проверка_значение>
<input type=submit>
</form>
<HR>

^^table:dir[/]:<BR>
$d[^table:dir[/]]
$d{^menu{$name &nbsp^;&nbsp^;&nbsp^;&nbsp^;^if(-f $name){-f} ^if(-d $name){-d};<BR>}}
<HR>

$files[^table:set{name}]
$d{^menu{
    ^if(-d "$name"){
        ^:files.append{$name}
    }
}}

$files{^menu{$name}[,]}
<HR>

@exception[origin;source;comment;type;code][i;j]
<body bgcolor=black>
<font color=white>
ERROR:
^if(def $source){$origin '$source'}
${comment}.
^if(def $type){type=$type}
^if(def $code){code=$code}

@auto_test[]
^BASE.auto_test[]
<li>${request:uri}!

@t[a]
-${a}-
@end


E-mail: