aboutsummaryrefslogtreecommitdiff
path: root/tests/ftp.pm
diff options
context:
space:
mode:
Diffstat (limited to 'tests/ftp.pm')
-rw-r--r--tests/ftp.pm21
1 files changed, 15 insertions, 6 deletions
diff --git a/tests/ftp.pm b/tests/ftp.pm
index 32c6779e3..663744545 100644
--- a/tests/ftp.pm
+++ b/tests/ftp.pm
@@ -55,12 +55,14 @@ sub pidfromfile {
if(open(PIDF, "<$pidfile")) {
my $pidline = <PIDF>;
close(PIDF);
- chomp $pidline;
- $pidline =~ s/^\s+//;
- $pidline =~ s/\s+$//;
- $pidline =~ s/^[+-]?0+//;
- if($pidline =~ $pidpattern) {
- $pid = $1;
+ if($pidline) {
+ chomp $pidline;
+ $pidline =~ s/^\s+//;
+ $pidline =~ s/\s+$//;
+ $pidline =~ s/^[+-]?0+//;
+ if($pidline =~ $pidpattern) {
+ $pid = $1;
+ }
}
}
}
@@ -150,6 +152,13 @@ sub signalpids {
if((not defined $signal) || (not defined $pids)) {
return;
}
+ if($pids !~ /\s+/) {
+ # avoid sorting if only one pid
+ if(checkalivepid($pids) > 0) {
+ kill($signal, $pids);
+ }
+ return;
+ }
my $prev = 0;
for(sort({$a <=> $b} split(" ", $pids))) {
if($_ =~ $pidpattern) {