Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation

Re: breaking from a script

by krujos (Curate)
on Jul 31, 2002 at 20:17 UTC ( #186589=note: print w/ replies, xml ) Need Help??

in reply to breaking from a script

To exit from the script you can use  exit $errorcode;
I would use a reg ex to match that string i guess. Or check the error level of the adduser command (which is probably a better option for what your trying to do). Do this using perls built in system call.If you try to add a user that already exists it probably wont exit with 0.

if (!system("adduser bob")) { exit 0; } else { exit 122 }

Comment on Re: breaking from a script
Select or Download Code
Re: Re: breaking from a script
by hostux (Initiate) on Jul 31, 2002 at 21:23 UTC
    hi again, excuse me for my complete stupidity, but how can i integrate that into my script? where would i print the error message in this code?
      if (!system("adduser bob")) { print "system returned 0 everything is ok"; exit 0; } else { print "there was an error, exit and return 127 to the os"; exit 122; }

Log In?

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

How do I use this? | Other CB clients
Other Users?
Others cooling their heels in the Monastery: (4)
As of 2014-12-28 00:43 GMT
Find Nodes?
    Voting Booth?

    Is guessing a good strategy for surviving in the IT business?

    Results (177 votes), past polls