Hallo,
ich möchte gerne aus einem Script ein anderes Perlscript auf
einem anderen Server ausführen und die Rückgabe des scriptes dann
auswerten.
Folgendes habe ich zusammengebaut:
$SIG{ALRM}=sub {die "timeout\n"}
eval{
local $SIG{ALRM} = sub {die "timeout\n"};
alarm(120);
@output = system
("https://xxx.xxx.xxx.xxx/cgi-bin/payment.pl?bestell_nr=12345");
alarm(0);
};
if ($@){
if ($@ =~ /timeout/){
print "Content-type: text/html\n\n";
print "timeout\n";
print "$@<br>\n";
print "$?<br>\n";
exit;
} else {
alarm(0);
print "Content-type: text/html\n\n";
print "no props\n";
print "$@<br>\n";
print "$?<br>\n";
die;
}
}
Leider wird aber das ganze nicht ausgeführt, da es ja kein programm ist.
Gibt es da irgendwelche Module die ich da einbinden könnte ? Ich habe leider nichts gefunden, was mir weiterhilft.
Bin für jede Antwort Dankbar,
Tobias.