Yet Another CPAN Grep

Lithium-WebDriver ( D/DM/DMOLIK/Lithium-WebDriver-1.0.0.tar.gz, DMOLIK, 2015; MetaCPAN )

Lithium-WebDriver/lib/Lithium/WebDriver.pm ( view source; MetaCPAN )

package Lithium::WebDriver;

use strict;
use warnings;

use JSON::XS;
use Time::HiRes qw/sleep gettimeofday alarm/;
use LWP::UserAgent;
use MIME::Base64;
use Lithium::WebDriver::Utils;
use HTTP::Reque

 __PACKAGE__,
		use_eval  => 0,
	);
	$self->{LWP}->default_header(
		Content_Type => "application/json;charset=UTF-8");
	# pretty sure this violates RFC 2616
	push @{$self->{LWP}->requests_redirectabl


	};
}

sub _parse_error
{
	my ($self, $error) = @_;
	my $msg = $error;
	eval {
		$error = decode_json $error;
		$self->{error} = $error;
		delete $error->{value}{screen};
		$msg = $error->{value}{mes