Re^2: Get Return Value from Unix

Thanks for your quick respond. I'm using the following package: use File::Tee qw(tee); "TraceLog" is an internal function that add time to the log. Your recommendation to use "system" command isn't good to me because it's print the error to log file and not return -1 if the build is failed… Or I'm wrong?

Comment on Re^2: Get Return Value from Unix Select or Download Code

Replies are listed 'Best First'.
Re^3: Get Return Value from Unix by mscharrer (Hermit) on May 01, 2008 at 13:01 UTC
`perldoc -f system` says: The return value is the exit status of the program as returned by the "wait" call. To get the actual exit value, shift right by eight. ... Return value of -1 indicates a failure to start the program or an error of the wait(2) system call (inspect $! for the reason). So if nmake returns a failure it should return a positive integer, not -1, which would only returned if nmake wasn't found or similar. I would code this like that: (untested) `my $pid = open (NMAKE, '-\|', "nmake .... 2>&1"); if (!defined $pid) { warn "Couldn't start nmake"; } while (<NMAKE>) { print STDERR $_; print STDOUT $_; } close (NMAKE); my $status = $?; if ($status) { # ... }` [download]	[reply] [d/l] [select]

Replies are listed 'Best First'.

Re^3: Get Return Value from Unix
by mscharrer (Hermit) on May 01, 2008 at 13:01 UTC

perldoc -f system

The return value is the exit status of the program as returned by the "wait" call. To get the actual exit value, shift right by eight.
...
Return value of -1 indicates a failure to start the program or an error of the wait(2) system call (inspect $! for the reason).

So if nmake returns a failure it should return a positive integer, not -1, which would only returned if nmake wasn't found or similar.

I would code this like that: (untested)

my $pid = open (NMAKE, '-|', "nmake .... 2>&1");
if (!defined $pid) {
   warn "Couldn't start nmake";
}
while (<NMAKE>) {
    print STDERR $_;
    print STDOUT $_;
}
close (NMAKE);
my $status = $?;
if ($status) {
   # ...
}
[download]

[reply]
[d/l]
[select]