I currently have written a socket script that creates a socket connection
to a remote socket. Passes some values, and the remote script then takes
those values and passes them to a system() call.

The local script then waits for the remote script to send a response back.
Since the local script has no visibility into the command being ran, I
would like to have a time out on the local script.

Below is a blurb of the local script:

$connect->send($bkcommand);             # Command to run
$connect->send($partition);             # Which partition to dump
$connect->send($bs);                    # Location of the BS
$connect->send($bkserv);                # Which server to backup to
$connect->send($bkuser);                # Which login user to use
--> This is where it waits on the remote to finish
print LOG "END - $fdate - $remote_host - $partition\n";
close($connect);                        # Close the connection

I would like to have it wait say 1 hour before it moves on. This is within
a while loop, so it has a list of machines to run through.

Thanks!
Scott


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>


Reply via email to