perl if的简单问题

$ export ARCHES=i386
如下代码却没有进入if分支，为何？
my @ARCHES;
if ( $ENV{ARCHES} ) {
    push @ARCHES, 'i386' if $ENV{ARCHES} =~ /[^\s]i386[\s\$]/;
    push @ARCHES, 'amd64' if $ENV{ARCHES} =~ /[^\s]amd64[\s\$]/;
    print @ARCHES;
    push @ARCHES, grep { !/^(source|i386|amd64)$/ } split /\s+/, $ENV{ARCHES};
}
@ARCHES = qw{i386 amd64} unless @ARCHES;

回复 Magicloud


    $ENV{ARCHES}改为$ENV{"ARCHES"}

回复 珞水的大叔


    无效啊。

回复 Magicloud


    我测了，有效。把你改后的代码贴出来看看