linux日文乱码,解决日文压缩文件乱码问题的方法——深圳培训linux

这篇文章，

有关日文压缩文件乱码的问题，自己用的是日文的linux系统，昨天从同事那儿收了个压缩文件，结果解压之后文件名都乱吗了(内容正常显示)。网上

google了以下发现是因为windows下默认的编码方式时Shift-JIS，到了linux下之后虽然内容可以显示但是文件名却乱码。解决方法也挺简单的，perl提供了一些方法，直接写一个简短的程序即可。

我也是从其他地方参照的，给一个例子程序。(这里需要安装Archive::Zip模块)

#!/usr/bin/perl

use strict;

use warnings;

use Archive::Zip qw( :ERROR_CODES :CONSTANTS );

use Encode qw/from_to/;

use Getopt::Long;

use DateTime;

use DateTime::TimeZone::Local;

GetOptions('list|l' => \ my $mode_list);

if (scalar @ARGV < 1) {

print "Usage: $0 [-l]

file>\n";

exit 1;

}

my $zipfile = shift @ARGV;

my $zip = Archive::Zip->new();

unless ( $zip->read($zipfile) == AZ_OK ) {

die 'read error';

}<