package Liberl::Provider::Amazon;

use strict;
use warnings;

use base qw/Net::Amazon/;

#use Net::Amazon;
use Net::Amazon::Request::ISBN;

sub search {
    my $self = shift;
    my $isbn = shift;

    my $req = Net::Amazon::Request::ISBN->new(
        isbn => $isbn,
        );
    my $resp = $self->request($req);

    return $resp;
}

1;

