view release on metacpan or  search on metacpan

lib/App/ReslirpTunnel/ElevatedSlave.pm  view on Meta::CPAN

    my $pid_fn = $request->{pid_fn} // '';
    my $log_fn = $request->{log_fn};

    my @args = ('dnsmasq',
                '--pid-file='.$pid_fn,
                '--log-facility='.$log_fn,
                '--user='.$user,
                '--group='.$group,
                '--no-hosts',
                '--no-resolv',
                '--bind-interfaces',
                '--except-interface=lo',
                '--log-queries',
                '--server=',
                '--no-dhcp-interface=*');

    for my $domain (keys %$mapping) {
        push @args, "--address=/$domain/$_" for @{$mapping->{$domain}};
    }

    for my $domain (keys %$forward) {