--- sap.monitor 2002/10/28 08:36:48 1.11 +++ sap.monitor 2003/10/02 08:18:32 1.13 @@ -29,6 +29,8 @@ my $repeat = 3; # seconds to wait between retries my $repeat_wait = 5; +# sapinfo timeout +my $sapinfo_timeout = 10; my %opts; getopt('h:s:H:S:', \%opts); @@ -64,11 +66,12 @@ for(my $i=0; $i<$repeat; $i++) { eval { local $SIG{ALRM} = sub { die "timeout\n"; }; - alarm 30; # wait for sapinfo to finish + alarm $sapinfo_timeout; # wait for sapinfo to finish $output = `$SAPINFO trace=0 ashost=$ashost sysnr=$sysnr`; }; alarm 0; # turn alarm off undef $sys_id; + $output = "" if (! defined $output); if ($output =~ m/System\s+ID\s+(\w+)/i) { $sys_id = $1; last;