718 |
|
|
719 |
{ |
{ |
720 |
id => 42, # unique ID of received message |
id => 42, # unique ID of received message |
721 |
list => 'My list', # useful only of filtering by email |
list => 'My list', # useful if filtering by email |
722 |
ext_id => 9999, # ext_id from message user |
ext_id => 9999, # ext_id from message sender |
723 |
email => 'jdoe@example.com', # e-mail of user |
email => 'jdoe@example.com', # e-mail of message sender |
724 |
bounced => 0, # true value if message is bounce |
bounced => 0, # true if message is bounce |
725 |
date => '2005-08-24 18:57:24', # date of recival in ISO format |
date => '2005-08-24 18:57:24', # date of receival in ISO format |
726 |
} |
} |
727 |
|
|
728 |
|
|
1155 |
} |
} |
1156 |
} |
} |
1157 |
|
|
|
=head1 UNIMPLEMENTED FUNCTIONS |
|
|
|
|
|
This is a stub for documentation of unimplemented functions. |
|
|
|
|
1158 |
=head2 MessagesReceived |
=head2 MessagesReceived |
1159 |
|
|
1160 |
|
Return statistics about received messages. |
1161 |
|
|
1162 |
my @result = MessagesReceived( |
my @result = MessagesReceived( |
1163 |
list => 'My list', |
list => 'My list', |
1164 |
email => 'jdoe@example.com', |
email => 'jdoe@example.com', |
1165 |
); |
); |
1166 |
|
|
1167 |
You can specify just C<list> or C<email> or any combination of those. |
You must specify C<list> or C<email> or any combination of those. |
1168 |
|
|
1169 |
For format of returned array element see C<received_messages>. |
For format of returned array element see C<received_messages>. |
1170 |
|
|
1171 |
|
=cut |
1172 |
|
|
1173 |
|
sub MessagesReceived { |
1174 |
|
my $self = shift; |
1175 |
|
|
1176 |
|
if ($_[0] !~ m/^HASH/) { |
1177 |
|
die "need both list and email" unless (scalar @_ < 2); |
1178 |
|
return $nos->received_messages( |
1179 |
|
list => $_[0], email => $_[1], |
1180 |
|
); |
1181 |
|
} else { |
1182 |
|
my $arg = {@_}; |
1183 |
|
die "need both list and email" unless ($arg->{'list'} && $arg->{'email'}); |
1184 |
|
return $nos->received_messages( $arg ); |
1185 |
|
} |
1186 |
|
} |
1187 |
|
|
1188 |
|
### |
1189 |
|
|
1190 |
|
=head1 UNIMPLEMENTED SOAP FUNCTIONS |
1191 |
|
|
1192 |
|
This is a stub for documentation of unimplemented functions. |
1193 |
|
|
1194 |
=head2 MessagesReceivedByDate |
=head2 MessagesReceivedByDate |
1195 |
|
|
1196 |
=head2 MessagesReceivedByDateWithContent |
=head2 MessagesReceivedByDateWithContent |
1197 |
|
|
1198 |
=head2 ReceivedMessasgeContent |
=head2 ReceivedMessageContent |
1199 |
|
|
1200 |
Return content of received message. |
Return content of received message. |
1201 |
|
|
1202 |
my $mail_body = ReceivedMessageContent( id => 42 ); |
my $mail_body = ReceivedMessageContent( id => 42 ); |
1203 |
|
|
|
=cut |
|
|
|
|
|
|
|
1204 |
|
|
1205 |
|
|
|
### |
|
1206 |
|
|
1207 |
=head1 NOTE ON ARRAYS IN SOAP |
=head1 NOTE ON ARRAYS IN SOAP |
1208 |
|
|