hunk ./xsakd 14
-    exit if $pid;
+    if ($pid) {
+	open(my $fh, '>', $opt{pidfile})
+	    or die "can't open pidfile $opt{pidfile}\n";
+	print $fh "$pid \n";
+	close($fh);
+	exit(0);
+    }
hunk ./xsakd 51
-	open(my $fh, '>', $opt{pidfile})
-	    or die "can't open pidfile $opt{pidfile}\n";
hunk ./xsakd 52
-	print $fh, "$$\n";
-	close($fh);