|
|
| version 1.80, 2005/01/20 14:10:29 | version 1.84.4.3, 2005/08/09 08:19:04 |
|---|---|
| Line 1 | Line 1 |
| @main[] | $request:charset |
| ^first[] | $response:charset |
| ^if(def $error){ | |
| ^if(^error.pos[koshmar]>=0){ | |
| $error, TODO:recover | |
| }{ | |
| $error, TODO:die | |
| } | |
| } | |
| @first[] | |
| ^second[] | |
| ^if(!def $error){ | |
| working1 | |
| } | |
| @second[] | |
| ^if(^math:random(2)){ | |
| $error[koshmar,test1] | |
| } | |
| ^if(!def $error){ | |
| working2 | |
| ^if(^math:random(2)){ | |
| $error[uzhas,test2] | |
| } | |
| ^if(!def $error){ | |
| working3 | |
| } | |
| } | |
| $f[^file::exec[_bug.pl; | |
| $.charset[koi8-r] | |
| $.QUERY_STRING[тест=работает];параметр]] | |
| $f.text |