CPAN::Groonga

ium specification(s) from the internet and stores them in

    ~/.selenium/specs

As a variety of JSON files.

=head1 USAGE

=head2 -h --help

Print this message

=head2 -v, --verbose

Print messages 

emote::Driver that supports selenium 4

use Scalar::Util;
use Carp::Always;
use Data::Dumper;
use JSON;

use Selenium::Client;
use Selenium::Client::Commands;
use Selenium::Client::WebElement;
use Sel

  return $self->_param( JSON::true, 'auto_close', $ac ? JSON::true : JSON::false );
}

# Only here for compatibility
sub pid {
    return $$;
}

#TODO these bools may need JSONizing
sub javascript ( $

am( JSON::true, 'javascript', $js ? JSON::true : JSON::false );
}

sub accept_ssl_certs ( $self, $ssl = undef ) {
    return $self->_param( JSON::true, 'accept_ssl_certs', $ssl ? JSON::true : JSON::fa

e feature qw/signatures state unicode_strings/;

use List::Util qw{uniq};
use HTML::Parser();
use JSON::MaybeXS();
use File::HomeDir();
use File::Slurper();
use DateTime::Format::HTTP();
use HTTP::Tin

ile::Spec();
use Encode             qw{decode};
use Unicode::Normalize qw{NFC};

#TODO make a JSONWire JSON spec since it's not changing

# URLs and the container ID
our %spec_urls = (
    unstable =>

ile::Spec->catdir( $client_dir, "specs" );
        my $file = File::Spec->catfile( "$dir", "$type.json" );
        fetch( once => $nofetch, dir => $dir );
        die "could not write $file: $@" unles

6, v5.10.0 would not be understood.

no warnings 'experimental';
use feature qw/signatures/;

use JSON::MaybeXS();
use HTTP::Tiny();
use Carp       qw{confess cluck};
use File::Path qw{make_path};
use

    $options{normalize}      //= 1;
    $options{fatal}          //= 1;

    # Use the hardcoded JSON version of the stable spec in Selenium::Specification's DATA section.
    $options{hardcode}     

     headers => {
            'Content-Type'    => 'application/json; charset=utf-8',
            'Accept'          => 'application/json; charset=utf-8',
            'Accept-Encoding' => 'identity',