--- parser3/src/www/htdocs/Attic/index.html 2001/04/03 17:01:04 1.97 +++ parser3/src/www/htdocs/Attic/index.html 2001/04/04 11:47:31 1.103 @@ -24,16 +24,38 @@ $n ($a,$b) @post-process[data] -#(
$data)
-^data.match[1][g]{X} +(
$data)
+#^data.match[1][g]{X} @mt[s;m] $m ^if(^s.match[$:m][i]){matches}{do not match} $s
@main[] -first chars!
-^rem{ +^connect[$SQL.connect-string]{ + $news[^table:sql{select * from news}(1;4)] + ^$news.0=$news.0
+} +^connect[$SQL.connect-string]{ + $news[^table:sql{select * from news}(2;5)] + ^$news.0=$news.0
+} + +
+ +$with-cr[^table:set{a b +^taint[<1 +2>] 3 +}] +"$with-cr.a"
+
+^if(def $form:s){ + $form:s
+ ^form:s.match[!][g]{!}
+
+} + $r[1223] +^^"$r".match[2][]{(^$match)}=^r.match[2][]{($match)}
^^"$r".match[2][i]{(^$match)}=^r.match[2][i]{($match)}
^^"$r".match[2][g]{(^$match)}=^r.match[2][g]{($match)}
^^"$r".match[2+][g]{(^$match)}=^r.match[2+][g]{($match)}
@@ -66,7 +88,7 @@ $sm[^s.match[(.)][]] ^mt[$s;x]
-} + $dest[^table:set[nameless]{ $form:d11 d12 d13 d21 d22 d23 @@ -193,14 +215,15 @@ $response:location[http://parser3/123]
-^${coo1k0iAeB:вот}=${cookie:вот}?
-^${coo1k0iAeB:вот}=${cookie:вот}?
+^${cookie:вот}=${cookie:вот}?
+^${cookie:вот}=${cookie:вот}?
^$request:query=$request:query
^$request:uri=$request:uri
$form:name
-
+