The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

NAME

Catalyst::Model::Net::Amazon - Catalyst model for Net::Amazon SOAP interface

SYNOPSIS

# Use the helper to add an Net::Amazon model to your application...
script/myapp_create.pl create model Net::Amazon Net::Amazon

# This creates the following file...
# lib/MyApp/Model/Net/Amazon.pm

package MyApp::Model::Net::Amazon;

use base qw/ Catalyst::Model::S3 /;

__PACKAGE__->config(
    token => 'my amazon secret token',
);

1;


# Then in your Catalyst controller, you just need to do...
my $ua = $c->model('Net::Amazon');

my $response = $ua->search( asin => '0201360683' );

if ( $response->is_success ) {
    print $response->as_string, "\n";
} else {
    print "Error: ", $response->message, "\n";
}

METHODS

new

Instantiate a new Net::Amazon Model. See Net::Amazon's new method for the options available.

SEE ALSO

Catalyst::Helper::Net::Amazon, Net::Amazon

Catalyst::Model::S3

AUTHOR

Carl Franks, cfranks@cpan.org

COPYRIGHT AND LICENSE

Copyright (C) 2007 by Carl Franks

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.8 or, at your option, any later version of Perl 5 you may have available.