← Back to branch summary

~ubuntu-branches/ubuntu/lucid/libamazon-sqs-simple-perl/lucid

« back to all changes in this revision

Viewing changes to lib/Amazon/SQS/Simple/SendResponse.pm

  • Committer: Bazaar Package Importer
  • Author(s): Thierry Carrez
  • Date: 2010-02-16 14:29:13 UTC
  • Revision ID: james.westby@ubuntu.com-20100216142913-keyrxsi00ko2v1v0
Tags: upstream-1.03
Import upstream version 1.03

Show diffs side-by-side

added added

removed removed

Lines of Context:
lib/Amazon/SQS/Simple/SendResponse.pm
 
1
package Amazon::SQS::Simple::SendResponse;
 
2
 
 
3
use strict;
 
4
use warnings;
 
5
 
 
6
sub new {
 
7
    my ($class, $msg) = @_;
 
8
    return bless ($msg, $class);
 
9
}
 
10
 
 
11
sub MessageId {
 
12
    my $self = shift;
 
13
    return $self->{MessageId};
 
14
}
 
15
 
 
16
sub MD5OfMessageBody {
 
17
    my $self = shift;
 
18
    return $self->{MD5OfMessageBody};
 
19
}
 
20
 
 
21
1;
 
22
 
 
23
__END__
 
24
 
 
25
=head1 NAME
 
26
 
 
27
Amazon::SQS::Simple::SendResponse - OO API for representing responses to
 
28
messages sent to the Amazon Simple Queue Service.
 
29
 
 
30
=head1 INTRODUCTION
 
31
 
 
32
Don't instantiate this class directly. Objects of this class are returned
 
33
by SendMessage in C<Amazon::SQS::Simple::Queue>. 
 
34
See L<Amazon::SQS::Simple::Queue> for more details.
 
35
 
 
36
=head1 METHODS
 
37
 
 
38
=over 2
 
39
 
 
40
=item B<MessageId()>
 
41
 
 
42
Get the message unique identifier
 
43
 
 
44
=item B<MD5OfMessageBody()>
 
45
 
 
46
Get the MD5 checksum of the message body you sent
 
47
 
 
48
=back
 
49
 
 
50
=head1 AUTHOR
 
51
 
 
52
Copyright 2007-2008 Simon Whitaker E<lt>swhitaker@cpan.orgE<gt>
 
53
 
 
54
This program is free software; you can redistribute it and/or modify it
 
55
under the same terms as Perl itself.
 
56
 
 
57
=cut