perl +从perl脚本返回代码1

Question

在我的小perl脚本(test.pl)中如果EXIT_STATUS等于1,我执行以下操作以退出程序

   if ( $EXIT_STATUS  == 1  )
       {
            system (exit);
      }

但我还需要从test.pl返回代码1

例如

./test.pl

回声$？

如果EXIT_STATUS = 1,如何启用返回码1？

利迪娅

Answer 1

这不是你应该如何退出perl.它的:

if ($EXIT_STATUS == 1) {
    exit 1;
}

如果你想正常退出,否则:

if ($EXIT_STATUS == 1) {
    exit 1;
}
else {
    exit 0;
}

或者(取决于你的意图)更简单:

exit $EXIT_STATUS;

请参阅:http://perldoc.perl.org/functions/exit.html