Annotation of parser3/tests/228.html, revision 1.3

1.1       misha       1: @main[]
                      2: $request:charset[windows-1251]
                      3: $response:charset[windows-1251]
                      4: $response:content-type[
                      5:        $.value[text/html]
                      6:        $.charset[$response:charset]
                      7: ]
                      8: 
                      9: ^do[utf-8]
                     10: 
                     11: ^do[utf-8;
                     12:        $.content-type[
                     13:                $.value[application/x-www-form-urlencoded]
                     14:                $.charset[utf-8]
                     15:        ]
                     16: ]
                     17: 
                     18: ^do[windows-1251;
                     19:        $.content-type[
                     20:                $.value[application/x-www-form-urlencoded]
                     21:                $.charset[windows-1251]
                     22:        ]
                     23: ]
                     24: 
                     25: @do[sCharset;hHeaders][f]
                     26: $f[^file::load[text;http://www.parser.ru/_/tests/228.html;
                     27:        $.charset[$sCharset]
                     28:        $.timeout(5)
                     29:        $.any-status(1)
                     30:        $.method[post]
                     31:        ^if(def $hHeaders){
                     32:                $.headers[$hHeaders]
                     33:        }
                     34:        $.body[charset=$sCharset&a=áóêâû&b=^taint[uri][ÁÓÊÂÛ]]
                     35: ]]
                     36: ^taint[as-is][$f.text]<br />

E-mail: