Yet Another CPAN Grep

VM-CloudAtCost ( L/LI/LITTLEURL/VM-CloudAtCost-0.1.tar.gz, LITTLEURL, 2015; MetaCPAN )

VM-CloudAtCost/lib/VM/CloudAtCost.pm ( view source; MetaCPAN )

ackage VM::CloudAtCost;

use strict;
use warnings;
use Carp;
use LWP::UserAgent;
use JSON;
use Data::Clean::FromJSON;

use Exporter qw(import);

our $VERSION = "0.1";  

sub new {
    my ($class, %par

 my $result = eval { from_json($response->content()) };

    if ($response->is_success()) {
        my $JSONcleaner=Data::Clean::FromJSON->new();
        my $cleanJSON = $JSONcleaner->clean_in_place($

 my $result = eval { from_json($response->content()) };

    if ($response->is_success()) {
        my $JSONcleaner=Data::Clean::FromJSON->new();
        my $cleanJSON = $JSONcleaner->clean_in_place($