|
|
| version 1.70, 2004/12/08 08:45:13 | version 1.73, 2004/12/23 14:40:54 |
|---|---|
| Line 1 | Line 1 |
| <pre>$response:charset[windows-1251] | @main[] |
| $request:charset[UTF-8] | |
| $s[ | $cH[^cH[]] |
| ^mail:send[ | |
| ... | ^if($cH.this is "junction"){ |
| $.charset[windows-1251] | $result[^cH.this[$cH.th_par]] |
| ... | }{ |
| $.text[Для подтверждения пройдите по ссылке: http://aaa.ru/?name=^taint[uri][Миша]] | $result[0] |
| ] | } |
| #################################################################################################################### | |
| @cH[] | |
| $result[ | |
| $.this[$mThis] | |
| $.th_par[ | |
| $.a(2) | |
| $.b(3) | |
| ] | |
| ] | ] |
| ^s.save[s.txt] | |
| OK | |
| #################################################################################################################### | |
| @mThis[lparams][params] | |
| $params[^hash::create[$lparams]] | |
| $result[^eval($params.a * $params.b)] |