【perl】if判断语句，新手求解！

gdzy1987

#!/usr/bin/env perl
use strict;
my $proc_name = $ARGV[0];
my $proc_exit = `/bin/ps auxw | /bin/grep $proc_name | /bin/egrep -v "(grep|\\$0)" | /usr/bin/wc -l`;
print "\$proc_exit=".$proc_exit;
if ($proc_exit){
        print "aaaaaaaaaaaaaaaaaaaaaaaaa\n";
}else{
        print "bbbbbbbbbbbbbbbbbbbbbbbbb\n";
}
print "-------------test--------------\n";
my $a = 0;
print "\$a=".$a."\n";
if ($a) {
        print "cccccccccccccccccccccccccc\n";
}else{
        print "dddddddddddddddddddddddddd\n";
}
执行结果：
******# ./test.pl NGINX
$proc_exit=0
aaaaaaaaaaaaaaaaaaaaaaaaa
---------------------------------
$a=0
dddddddddddddddddddddddddd





搞不明白为什么$proc_exit=0但是if判断还是为真呢？

kk861123

第四句后加一行：

1. chomp($proc_exit);

复制代码

jason680

the $proc_exit is "0\n" not "0" only

gdzy1987

嗯，谢谢各位，刚发出来就想到是这问题了，解决了，感谢哈~