文本写入的问题【脚本】

司马睿风 · 发表于 2009-1-11 00:13:25

加入我们，或者，欢迎回来。

您需要登录才可以下载或查看，没有账号？注册会员

×

class File def read_short b = read(2).unpack("C2") return ((b[0] << 8) | b[1]) end def read_short2 b = read(2).unpack("C2") return ((b[1] << 8) | b[0]) end end #require 'iconv' #conv = Iconv.new("UTF16","UTF-8") #result = conv.iconv() #Iconv.iconv("UTF-8//IGNORE","GB2312//IGNORE",text) module MSGFILE def self.dump(filename, codetable) @file = open(filename, "rb") @fr = open(codetable, "r") @fw = open("msg.txt", "w") @table = Array.new(0xffff) @fr.each_line do |line| arr = line.split(/=/) @table[arr[0].to_i] = arr[1] end @fr.close while !@file.eof? @fw.write @table[@file.read_short].to_s end @file.close @fw.close end end MSGFILE.dump("d0200.txt", "unicode.txt") print "done"

八云紫 · 发表于 2009-1-11 00:16:31

"w": 以写入模式打开文件。打开文件时，若文件已存在就清空文件内容。
"w+": 与 "r+" 一样，打开文件时，若文件已存在就清空其内容。

司马睿风 · 发表于 2009-1-11 00:17:58

问题是这个文件是不存在的
模式含义
r 只读，从文件头开始（默认模式）
r+ 读写，从文件头开始
w 只写，文件不存在则创建文件，文件存在则清空内容
w+ 读写，文件不存在则创建文件，文件存在则清空内容
a 只写，文件不存在则创建文件，文件存在则在尾部添加
a+ 读写，文件不存在则创建文件，文件存在则在尾部添加
b (只用于DOS/Windows)二进制文件，可以和上述模式一同出现

八云紫 · 发表于 2009-1-11 00:20:12

file.write($a).to_s

这个是不是 file.write($a.to_s)

司马睿风 · 发表于 2009-1-11 00:22:04

这个就不要抓小毛病，还是一样的撒

八云紫 · 发表于 2009-1-11 00:27:39

还是先看看要写入的数组是不是空的吧~~~

另外：

$q.push(ls.split(/\[/)[0])

这个匹配的是 "[" ？不是 "==" 号么？？

司马睿风 · 发表于 2009-1-11 00:32:21

我P了下，不空的

八云紫 · 发表于 2009-1-11 00:38:03

那就可能是 if(lr==$q) 这个判断是假的~~~~

大概是 $q.push(ls.split(/\[/)[0]) 这个原因吧。

看你的注释是要匹配 "=="。

司马睿风 · 发表于 2009-1-11 00:40:13

对哦

八云紫 · 发表于 2009-1-11 00:42:12

对呀，那至少也应该是

$q.push(ls.split(/\==/)[0])

正则苦手，大概是这样~~~