version 1.108, 2018/08/08 11:49:48
|
version 1.109, 2018/10/25 02:48:56
|
Line 1057 sub reset_nosslverify_pids {
|
Line 1057 sub reset_nosslverify_pids {
|
if ($sslrem{$host}) { |
if ($sslrem{$host}) { |
if (ref($pids_by_host{$host}) eq 'HASH') { |
if (ref($pids_by_host{$host}) eq 'HASH') { |
if (ref($pids_by_host{$host}{'insecure'}) eq 'HASH') { |
if (ref($pids_by_host{$host}{'insecure'}) eq 'HASH') { |
if (keys($pids_by_host{$host}{'insecure'})) { |
if (keys(%{$pids_by_host{$host}{'insecure'}})) { |
foreach my $pid (keys($pids_by_host{$host}{'insecure'})) { |
foreach my $pid (keys(%{$pids_by_host{$host}{'insecure'}})) { |
if (open(PIPE,"ps -o ppid= -p $pid |")) { |
if (open(PIPE,"ps -o ppid= -p $pid |")) { |
my $ppid = <PIPE>; |
my $ppid = <PIPE>; |
chomp($ppid); |
chomp($ppid); |