Testsuite: perl version oddity
[exim.git] / test / scripts / 0000-Basic / 0438
1 # -oP to override pid file
2 need_ipv4
3 #
4 exim -d -DSERVER=server -bd -oX PORT_D
5 ****
6 millisleep 1000
7 killdaemon
8 # PID file must be DIR/spool/exim-daemon.* in order for "killdaemon" to work
9 exim -d -DSERVER=server -bd -oX PORT_D -oP DIR/spool/exim-daemon.anotherpid
10 ****
11 millisleep 1000
12 killdaemon
13 #
14 # Check for a SIGTERM daemon kill removing the pid file
15 exim -d -DSERVER=server -bd -oX PORT_D -oP DIR/spool/mypidfile
16 ****
17 sleep 1
18 sudo perl
19 system "ls DIR/spool | grep pid";
20 print "\n";
21 open(IN, "<", "DIR/spool/mypidfile");
22 while (<IN>) { kill "TERM", $_; }
23 ****
24 sleep 1
25 ls DIR/spool
26 #