求助!perl的读取xml信息问题!

shimingh 2003-11-12 10:11:45
各位高手, 我是perl新手, 问题请教。
我用perl读取非中文的 xml 格式的配置文件。 操作系统是solaris 2.6 在读出的某个信息后和另外一个中文字符连接,打印后发现是乱码。
代码如下:
#!/usr/local/bin/perl

use Getopt::Long;
use Data::Dumper;
use XML::Simple;
use Date::Manip;

my $hashxml= XMLin("../config/tablename.xml");
my $a = '测试';
foreach $key (keys %$hashxml) {
$table = $hashxml->{$key}{table};
my $statement = $table.$a;
print " $statement \n";
}

输出的中文全是乱码。
$table 不是中文! $a 是中文!
我把$table 单独输出到文件。 然后又手工写了个相同的内容到另一个文件中。 发现两个文件是不同的。 我匹配掉$table 的最后一个字符, 问题依旧。
是不是perl 在解析xml的时候有问题?
...全文
52 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
shimingh 2003-11-17
  • 打赏
  • 举报
回复
怎么没人理,急啊!
klbt 2003-11-12
  • 打赏
  • 举报
回复
不清楚,帮你顶上去。

37,720

社区成员

发帖
与我相关
我的任务
社区描述
JavaScript,VBScript,AngleScript,ActionScript,Shell,Perl,Ruby,Lua,Tcl,Scala,MaxScript 等脚本语言交流。
社区管理员
  • 脚本语言(Perl/Python)社区
  • IT.BOB
加入社区
  • 近7日
  • 近30日
  • 至今

试试用AI创作助手写篇文章吧