Thread Perl Skript auf einem Server auführen (16 answers)
Opened by mkk at 2013-09-09 09:49

Gast wer
 2013-09-11 16:31
#170117 #170117
Um zu testen ob das eigene script noch läuft schreibst du beim ersten Start die prozessid des scripts in eine datei: open(fh, '>',$pid_file) and print $fh $$ and close($fh);
beim nächsten starten holst du die pid aus der datei: $pid=eval{local($/,@ARGV)=(undef,$pid_file); <>};
beende das neue script, wenn das alte noch läuft: exit if($pid and kill(0,$pid));
Last edited: 2013-09-11 17:10:41 +0200 (CEST)

View full thread Perl Skript auf einem Server auführen