SYNOPSIS

This module represents a response from Nexmo.

    use Nexmo::SMS::Response;

    my $nexmo = Nexmo::SMS::Response->new(
        json => '{
            "message-count":"1",
            "messages":[
              {
              "status":"4",
              "message-id":"message001",
              "client-ref":"Test001 - Reference",
              "remaining-balance":"20.0",
              "message-price":"0.05",
              "error-text":""
              }
            ]
        }',
    );
    
    for my $message ( $response ) {
        print $message->status;
    }

METHODS

new

create a new object

    my $foo = Nexmo::SMS::Response->new(
        json => '{
            "message-count":"1",
            "messages":[
              {
              "status":"4",
              "message-id":"message001",
              "client-ref":"Test001 - Reference",
              "remaining-balance":"20.0",
              "message-price":"0.05",
              "error-text":""
              }
            ]
        }',
    );

messages

returns the list of messages included in the response. Each element is an object of Nexmo::SMS::Response::Message.

    my @messages = $response->messages;

errstr

return the "last" error as string.

    print $response->errstr;

is_success

returns 1 if all messages have a status = 0, undef otherwise.

is_error

Returns 1 if an error occured, 0 otherwise...

ATTRIBUTES

These attributes are available for Nexmo::SMS::TextMessage objects:

  $nexmo->status( 'status' );
  my $status = $nexmo->status;

• json
• message_count
• status