--- 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
-(^$form:name=$form:name)
- +
$form:name
+
+
+$свойства_когда_пьян[ + $цвет_глаз[красный] +] +$вася[ + $свойства[$свойства_когда_пьян] +] + +$кусок_имени_поля[ства] +^$кусок_имени_поля=$кусок_имени_поля
+^$вася.свой^$кусок_имени_поля.цвет_глаз=$вася.свой$кусок_имени_поля.цвет_глаз +
+
+ + +
+
+^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