Yet Another CPAN Grep

WebService-Nonoh ( A/AN/ANEI/WebService-Nonoh-0.1.tar.gz, ANEI, 2013; MetaCPAN )

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

se CGI;
    use Text::Balanced qw(extract_bracketed extract_quotelike extract_codeblock);
    use JSON::PP;
    use XML::LibXML;
    use Hash::Util qw(lock_ref_keys_plus lock_keys);
    use MIME::Base

_ } $q->param($n) } $q->param ],
				'X-Requested-With' => 'XMLHttpRequest');
	    my $d = decode_json $self->{mech}->content;
	    lock_ref_keys_plus($d, qw(code endcause calculated_balance));
	    $