Unverified Commit b22e6a6c authored by Gavin Brown's avatar Gavin Brown
Browse files

custom useragent to avoid hitting Cloudflare's WAF

parent 97f3c674
#!/usr/bin/perl
# Simple DNS-over-HTTPS client. Copyright 2018 CentralNic Ltd
use File::Basename qw(basename);
use Getopt::Long;
use HTTP::Request::Common;
use LWP::UserAgent;
......@@ -95,7 +96,10 @@ $request->header('Accept' => $ct);
print STDERR $request->as_string if ($debug);
my %options;
my %options = (
'agent' => basename(__FILE__),
);
if ($insecure) {
$options{'ssl_opts'}->{'verify_hostname'} = undef;
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment