|
|
1.1 misha 1: @main[]
2: $sSourceFile[230_utf8.txt]
3: $sTargetFile[230_target.txt]
4:
5: $s1251[windows-1251]
6: $sUTF[UTF-8]
7:
8: $f[^file::load[text;$sSourceFile]]
9:
10:
11: ^f.save[text;$sTargetFile]
12: ^load[$sTargetFile;$sUTF]
13:
14: ^f.save[text;$sTargetFile;
15: $.charset[$s1251]
16: ]
1.4 ! moko 17: ^f.save[text;$sTargetFile;
! 18: $.charset[$s1251]
! 19: $.append(true)
! 20: ]
1.1 misha 21: ^load[$sTargetFile;$s1251]
22:
23: ^do{
24: ^f.save[text;$sTargetFile;
25: $.unknown-option[zigi]
26: ]
27: }
28:
29:
30: <hr />
31:
32: ^f.text.save[$sTargetFile]
33: ^load[$sTargetFile;$sUTF]
34:
35: ^f.text.save[append;$sTargetFile]
36: ^load[$sTargetFile;$sUTF]
37:
38:
39: ^f.text.save[$sTargetFile;
40: $.charset[$s1251]
41: ]
42: ^load[$sTargetFile;$s1251]
43:
44:
45: ^f.text.save[$sTargetFile;
46: $.charset[$s1251]
47: $.append(true)
48: ]
49: ^load[$sTargetFile;$s1251]
50:
51: ^do{
52: ^f.text.save[$sTargetFile;
53: $.charset[$s1251]
54: $.append(true)
55: $.unknown-option[zigi]
56: ]
57: }
58:
59: @load[sFileName;sCharset][f]
60: $f[^file::load[text;$sFileName;
61: $.charset[$sCharset]
62: ]]
63: $sCharset=$f.text<br />
64:
65: @do[jCode]
1.3 moko 66: ^try-catch{
1.1 misha 67: $jCode
68: }
1.3 moko 69: <br />