Return to 185.html CVS log

Up to [parser3project] / parser3 / tests

Annotation of parser3/tests/185.html, revision 1.4

1.1       misha       1: @main[]
                      2: $request:charset[UTF-8]
                      3: $response:charset[UTF-8]
                      4: $response:content-type[
                      5:        $.value[text/html]
                      6:        $.charset[$response:charset]
                      7: ]
                      8: 
1.3       misha       9: $str[ab^taint["]"cd^taint[xml][&]&ef]
                     10: <pre>^$str[$str] [^str.length[]]</pre>
1.1       misha      11: 
1.2       misha      12: ^^str.left(4): ^left[$str](4)<br />
                     13: ^^str.left(9): ^left[$str](9)<br />
                     14: ^^str.right(4): ^right[$str](4)<br />
                     15: ^^str.right(9): ^right[$str](9)<br />
                     16: ^^str.mid(1;8): ^mid[$str](1;8)<br />
                     17: 
                     18: <hr />
1.1       misha      19: $str[о сколько нам открытий чудных...10.11.2005]
                     20: $length(^str.length[]) ^rem{ *** length in real chars (not in bytes) == 42 *** }
                     21: 
                     22: <pre>^taint[as-is][
1.2       misha      23: ^$str[$str] [^str.length[]]
1.1       misha      24:      <b>0</b>123456789<b>0</b>123456789<b>0</b>123456789<b>0</b>123456789<b>0</b>123456789
                     25: ]</pre>
                     26: 
                     27: ^pos[$str;о]
1.4     ! misha      28: ^pos[$str;о;2]
1.1       misha      29: ^pos[$str; ]
                     30: ^pos[$str;чудных]
                     31: ^pos[$str;2005]
                     32: ^pos[$str;zzz]
                     33: 
1.2       misha      34: <br />
1.1       misha      35: <table border="1">
                     36:        <tr>
1.3       misha      37:                <td>L</td>
                     38:                <td>^^str.left(L) [^^substr.length[]]</tr>
                     39:                <td>R</td>
                     40:                <td>^^str.right(R) [^^substr.length[]]</tr>
                     41:                <td>N, O</td>
1.2       misha      42:                <td>^^str.mid(N;O)</tr>
1.1       misha      43:        </tr>
                     44: ^for[i](0;$length\2+1){
                     45:        <tr>
1.3       misha      46:                $iLeft($i*2+$i%2)
                     47:                <td>$iLeft</td>
                     48:                <td>^left[$str]($iLeft)</td>
                     49:                
                     50:                $iRight($i*2+($i+1)%2)
                     51:                <td>$iRight</td>
                     52:                <td>^right[$str]($iRight)</td>
                     53: 
                     54:                $iMid($i*2)
                     55:                $iLength(^if($i%2)(3;4))
                     56:                <td>$iMid, $iLength</td>
                     57:                <td>^mid[$str]($iMid;$iLength)</td>
1.1       misha      58:        </tr>
                     59: }
                     60: </table>
                     61: 
                     62: 
                     63: 
1.2       misha      64: @left[str;num][substr]
                     65: $substr[^str.left($num)]
                     66: '$substr' [^substr.length[]]
                     67: 
1.1       misha      68: 
                     69: 
1.2       misha      70: @right[str;num][substr]
                     71: $substr[^str.right($num)]
                     72: '$substr' [^substr.length[]]
1.1       misha      73: 
                     74: 
                     75: 
                     76: @mid[str;num;count]
                     77: '^str.mid($num;$count)'
                     78: 
                     79: 
1.2       misha      80: 
1.4     ! misha      81: @pos[str;substr;offset]
        !            82: ^^str.pos[$substr]^if(def $offset){($offset)}: ^if(def $offset){^str.pos[$substr]($offset)}{^str.pos[$substr]}<br />