view release on metacpan or  search on metacpan

t/lib/API/ParallelsWPB/Mock.pm  view on Meta::CPAN

package API::ParallelsWPB::Mock;
use strict;
use warnings;

use base 'API::ParallelsWPB';

# ABSTRACT: mock for testing API::ParallelsWPB

# VERSION
# AUTHORITY


1;

t/lib/Mock.pm  view on Meta::CPAN

package t::lib::Mock;
use strict;
use warnings;

use base 'API::ParallelsWPB';

# ABSTRACT: mock for testing API::ParallelsWPB

# VERSION
# AUTHORITY

my %send_request_params = ();

{
    no warnings 'redefine';
    *API::ParallelsWPB::_send_request = sub {
        my ( $self, $data, $url, $post_data ) = @_;