|
|
| version 1.6, 2004/02/18 13:07:55 | version 1.15, 2004/02/27 15:24:03 |
|---|---|
| Line 1 | Line 1 |
| @main[] | @main[] |
| $request:charset[UTF-8] | $s[// 123/] |
| #$response:charset[UTF-8] | ^taint[as-is][^s.trim[start;/3 1]] |
| $response:charset[windows-1251] | |
| $response:content-type[$.value[text/html]$.charset[$response:charset]] | @leechy[] |
| $xdoc[^xdoc::create{<?xml version="1.0" encoding="$request:charset"?> | $xdoc[^xdoc::load[_bug.xml]] |
| <doc> | |
| исходный | |
| </doc> | |
| }] | |
| $xdoc[^xdoc.transform[_bug.xsl]] | $xdoc[^xdoc.transform[_bug.xsl]] |
| ^xdoc.string[] | |
| ^xdoc.save[_bug.xml;$.encoding[koi8-r]] | |
| <hr> | |
| $request:charset/$response:charset | |
| ^xdoc.save[_bug_saved.xml] | |
| OK? |