else Instead in your main program call do "foo.pl args..."
And in foo.pl set some scope defined variable like
#foo.pl $dbh=connect(....) unless($dbh){ $GLOBAL::ERRORSTR="Couldnot connect to database $@"; exit 1 }
And in the main program you can check
if($GLOBAL::ERRORSTR) { # Hmm something went wrong ...........
}
But personally I consider this as dirty work though it works. Let me know If you get a better way
Ram
I don't understand how can perl pass variables across processes. Sort of magic?
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]