--- parser3/src/www/htdocs/Attic/index.html 2001/03/22 11:19:17 1.34
+++ parser3/src/www/htdocs/Attic/index.html 2001/04/03 07:02:48 1.90
@@ -1,20 +1,208 @@
+@auto[]
+!!$html-typo[^table:set{user html comment
+<< «^; длинные user вперёд
+>> »^;
+\n\n
!эти есть в таблице по умолчанию
+\n
!но т.к. заменяем, надо повторить.
+< <^; !можно этим воспользоваться,
+> >^; !и что-то сделать ДО обычных замен
+" "^; !например из << и >>
+& &^; !сделать ёлочки-кавычки.
+_  ^;
+^#AB «^; windows коды ёлочек
+^#BB »^; windows коды ёлочек
+(c) ©^;
+^#A9 ©^; windows (c)
+}]
+
+@dump[t]
+^t.menu{$n
}
+
+@func[n]
+$n
+@twop[a;b]
+($a,$b)
+
+@post-process[data]
+($data)
@main[]
-^$root_test=$root_test !
-^$site_test=$site_test !
-${cookie:н}?
+$dest[^table:set[nameless]{
+$form:d11 d12 d13
+d21 d22 d23
+}]
+$src[^table:set{a b c d
+
+s1 s2 s3 s4
+}]
+1:
^dest.menu{$0!$1!$2!$3!
}
+^dest.join[$src]
+2:
^dest.menu{$0!$1!$2!$3!
}
+
+
+$dest[^table:set{a b c
+d11 d12 d13
+d21 d22 d23
+}]
+$src[^table:set{a b c d
+s1 s2 s3 s4
+}]
+^dest.join[$src]
+^dest.menu{$a!$b!$c!
}
+
+
+^^random:generate(10)=^random:generate(10)
+
+
+
+$t[^table:load[/test.cfg]]
+$t{
+^menu{$a!$b!$c
}
+
+^append{x y z}
+^menu{$a!$b!$c
}
+
+^flip[]
+^menu{$0!$1!$2!$3
}
+
+}
+
+$a[vasya,fedya,kolya]
+^^"$a".lsplit[,]=$as[^a.lsplit[,]]$as.0|$as.1|$as.2|$as.3
+^^"$a".rsplit[,]=$as[^a.rsplit[,]]$as.0|$as.1|$as.2|$as.3
+^^a.pos(sy]="^a.pos[sy]"
+^^a.pos[zsy]="^a.pos[zsy]"
+^^a.left(3)="^a.left(3)"
+^^a.right(3)="^a.right(3)"
+^^a.mid(1;3)="^a.mid(1;3)"
+
+^^twop[a;]=^twop[a;]
+^$request:browser.type=$request:browser.type
+^$request:browser.version=$request:browser.version
+
+$tf[^file:load[test.zip;abc.zip]]
+$response:body[$tf]
+
+^$tf.name=$tf.name
+^$tf.size=$tf.size
+^$tf.mime-type=$tf.mime-type
+^$tf.text:
+$tf.text
+
+^file:find[test.cfg]
+^file:find[tes.cfg]{not found}
+
+
+$t[^table:set{n
+3
+01.3
+1.2
+2
+}]
+$t{^locate[n;2z]^found{$n}{not found}}
+$t{^locate[n;3]^found{found:$n}{not found}}
+^$t:
+^dump[$t]
+^t.sort($n)
+^^t.sort(^$n):
+^dump[$t]
+^t.sort{^:func($n)}
+^^t.sort{^^:func(^$n)}:
+^dump[$t]
+^t.sort{$n}
+^^t.sort{^$n}:
+^dump[$t]
+^t.sort{$n}[desc]
+^^t.sort{^$n}[desc]:
+^dump[$t]
+
+
+^if(-f index.html){y}{n}
+^taint[html-typo;не знаю
+я ничего
+
+<<слово длинное>>
+
+(c) by Я
+]
+$t[^table:load[/test.cfg]]
+^process[@b[]
+f
+]
+^b[]
+
+^$t.a=$t.a
+^t.offset[2]
+#$r[^t.record[]]
+#^$r.a=$r.a
+
+^$request:uri=$request:uri
+^$env:PATH_INFO=$env:PATH_INFO
+^$env:REMOTE_ADDR=$env:REMOTE_ADDR
+
+^rem{
+$response:body[]
+$response:location[http://parser3/123]
+}
+
+
+
+^^auto_test[]:
+
+^auto_test[]
+
+
+
+^${cookie:вот}=${cookie:вот}?
+^$request:query=$request:query
+^$request:uri=$request:uri
+
+$свойства_когда_пьян[
+ $цвет_глаз[красный]
+]
+$вася[
+ $свойства[$свойства_когда_пьян]
+]
+
+$кусок_имени_поля[ства]
+^$кусок_имени_поля=$кусок_имени_поля
+^$вася.свой^$кусок_имени_поля.цвет_глаз=$вася.свой$кусок_имени_поля.цвет_глаз
+
+
+
+^if($form:photo){
+
+ ^$form:photo.name='$form:photo.name'
+ ^$form:photo.size='$form:photo.size'
+ ^$form:photo.text='$form:photo.text'
+ ^form:photo.save[paf.txt]
+
+}
+
+#todo proper! untaint $response:refresh[$value[2] $content[url=http://design.ru]]
+
+
@default[test;def]
-^if(^test.length[]){$test}{$def}
+$result[^if(^test.length[]){$test}{$def}]
@exception[origin;source;comment;type;code]
+
+
ERROR:
^if(def $source){$origin '$source'}
${comment}.
^if(def $type){type=$type}
^if(def $code){code=$code}
+
+@auto_test[]
+^BASE.auto_test[]
+${request:uri}!
\ No newline at end of file