my $pidlist = <$settings>;

# Get list of pids and process all
while ( $pidlist = <$settings> ) {