Beefy Boxes and Bandwidth Generously Provided by pair Networks
We don't bite newbies here... much
 
PerlMonks  

Re: How to Trap exit code from system calls

by tcf22 (Priest)
on Jan 21, 2004 at 15:59 UTC ( #322916=note: print w/replies, xml ) Need Help??


in reply to How to Trap exit code from system calls

You could always just use a system call. Below is what the docs say about checking exit values and such. 
Because system() and backticks block SIGINT and SIGQUIT, killing the p
+rogram they're running doesn't actually interrupt your program.

    @args = ("command", "arg1", "arg2");
    system(@args) == 0
         or die "system @args failed: $?"

You can check all the failure possibilities by inspecting $? like this
+:

    $exit_value  = $? >> 8;
    $signal_num  = $? & 127;
    $dumped_core = $? & 128;

[download]

- Tom

Replies are listed 'Best First'.
Re: Re: How to Trap exit code from system calls
by emjga1 (Novice) on Jan 22, 2004 at 11:02 UTC
    Tom

    Thanks , I had looked at $? but did not get the expected answers from it
    and asumed I was doing somthing wrong.

    But using
    $exit_value  = $? >> 8;

    Does just the job.

    Thanks

    Matt

[reply]
[d/l]

In Section Seekers of Perl Wisdom

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://322916]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others chanting in the Monastery: (6)
As of 2021-01-28 05:59 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    The STEM quote I most wish I'd made is:









    Results (317 votes). Check out past polls.
    Notices?