我可以在bash中执行以下操作：
output=`command` retcode=$?
在Perl中有什么办法吗？这样的事情
$output=`command` $retcode=???
解决方法
你可以阅读$？变量(如在shell中).从人的perlvar
$? The status returned by the last pipe close,backtick ("``") command,successful call to wait() or waitpid(),or from the
system() operator. This is just the 16-bit status word returned by the Traditional Unix wait() system call (or else is made up
to look like it). Thus,the exit value of the subprocess is really ("$? >> 8"),and "$? & 127" gives which signal,if any,the
process died from,and "$? & 128" reports whether there was a core dump. (Mnemonic: similar to sh and ksh.)
Additionally,if the "h_errno" variable is supported in C,its value is returned via $? if any "gethost*()" function fails.
If you have installed a signal handler for "SIGCHLD",the value of $? will usually be wrong outside that handler.
Inside an "END" subroutine $? contains the value that is going to be given to "exit()". You can modify $? in an "END"
subroutine to change the exit status of your program. For example:
END {
$? = 1 if $? == 255; # die would make it 255
}
Under VMS,the pragma "use vmsish 'status'" makes $? reflect the actual VMS exit status,instead of the default emulation of
POSIX status; see "$?" in perlvms for details.
Also see "Error Indicators".