| Net-SAJAX documentation | Contained in the Net-SAJAX distribution. |
Net::SAJAX::Exception::RemoteError - Exception object for exceptions that occur when an error is given by the remote server.
This documentation refers to Net::SAJAX::Exception::RemoteError version 0.106
use Net::SAJAX::Exception::RemoteError;
Net::SAJAX::Exception::RemoteError->throw(
message => 'This is some error message',
);
This is an exception class for an error given by the remote server by the SAJAX protocol in the Net::SAJAX library.
This class inherits from the base class of Net::SAJAX::Exception and all attributes and methods in that class are also in this class.
This returns the error message prefixed with "Recieved error message: ".
Douglas Christopher Wilson, <doug at somethingdoug.com>
Please report any bugs or feature requests to bug-net-sajax at rt.cpan.org,
or through the web interface at
http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Net-SAJAX.
I will be notified, and then you'll automatically be notified of progress on
your bug as I make changes.
I highly encourage the submission of bugs and enhancements to my modules.
Copyright 2009 Douglas Christopher Wilson.
This program is free software; you can redistribute it and/or modify it under the terms of either:
| Net-SAJAX documentation | Contained in the Net-SAJAX distribution. |
package Net::SAJAX::Exception::RemoteError; use 5.008003; use strict; use warnings 'all'; ############################################################################### # METADATA our $AUTHORITY = 'cpan:DOUGDUDE'; our $VERSION = '0.106'; ############################################################################### # MOOSE use Moose 0.77; use MooseX::StrictConstructor 0.08; ############################################################################### # BASE CLASS extends q{Net::SAJAX::Exception}; ############################################################################### # ALL IMPORTS BEFORE THIS WILL BE ERASED use namespace::clean 0.04 -except => [qw(meta)]; ############################################################################### # METHODS sub stringify { my ($self) = @_; # Just prefix the error message return sprintf 'Recieved error message: %s', $self->message; } ############################################################################### # MAKE MOOSE OBJECT IMMUTABLE __PACKAGE__->meta->make_immutable; 1; __END__