alien_8.78.tar.gz
alien_8.89.tar.gz
上面这两个版本出现的问题都一样。
在安装好alien以后，执行命令时，出现如下错误：
[fd ~/下载]$ sudo alien -r WineTM2013-20131206-Longene.deb
Use of uninitialized value in lc at /usr/lib/perl5/site_perl/5.18.1/Alien/Package/Deb.pm line 545.
Use of uninitialized value in lc at /usr/lib/perl5/site_perl/5.18.1/Alien/Package/Deb.pm line 545.
Warning: Skipping conversion of scripts in package : postinst postrm preinst prerm
Warning: Use the --scripts parameter to include the scripts.
Use of uninitialized value in lc at /usr/lib/perl5/site_perl/5.18.1/Alien/Package/Deb.pm line 545.
mkdir：无效选项 – 2
Try ‘mkdir --help’ for more information.
unable to mkdir -2013.12.06: at /usr/lib/perl5/site_perl/5.18.1/Alien/Package.pm line 257.
[fd ~/下载]$ vi /usr/lib/perl5/site_perl/5.18.1/Alien/Package/Deb.pm
L53-L549代码如下：
sub name {
my $this=shift;
# set
$this->{name} = shift if @_;
return unless defined wantarray; # optimization
# get
$_=lc($this->{name});
tr/_/-/;
s/^a-z0-9-\.\+]//g;
return $_;
}
L253 - L264代码如下 ：
sub unpack {
my $this=shift;
my $workdir = $this->name."-".$this->version;
$this->do("mkdir $workdir") or
die "unable to mkdir $workdir: $!";
# If the parent directory is suid/sgid, mkdir will make the root
# directory of the package inherit those bits. That is a bad thing,
# so explicitly force perms to 755.
$this->do("chmod 755 $workdir");
$this->unpacked_tree($workdir);
}
请问该如何解决？