Yet Another CPAN Grep

WebService-WsScreenshot ( S/SY/SYMKAT/WebService-WsScreenshot-0.002.tar.gz, SYMKAT, 2022; MetaCPAN )

WebService-WsScreenshot/lib/WebService/WsScreenshot.pm ( view source; MetaCPAN )

ice::WsScreenshot;
use Moo;
use URI::Encode qw( uri_encode );
use LWP::UserAgent;
use JSON::MaybeXS qw( decode_json );
use URI;

our $VERSION = '0.002';

has base_url => (
    is       => 'rw',
    re

e_screenshot_url( $args ) );
    
    if ( $res->content_type eq 'application/json' ) {
        die "Error: " . decode_json($res->decoded_content)->{details};
    } 

    return $res;
}

sub store_scr