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

SMS::Send::BR::Facilitamovel - SMS::Send driver for the Facilita Movel service

VERSION

version 0.03

SYNOPSIS

use SMS::Send;
my $sender = SMS::Send->new('BR::Facilitamovel',
    _login    => 'foo',
    _password => 'bar',
);

my $sent = $sender->send_sms(
    'text'    => 'This is a test message',
    'to'      => '19991913030',
);

# Did the send succeed.
if ( $sent ) {
    print "Message sent ok\n";
} else {
    print 'Failed to send message\n";
}

DESCRIPTION

This module currently uses the HTTP API.

METHODS

send_sms

It is called by "send_sms" in SMS::Send and passes all arguments starting with an underscore to the request having the first underscore removed as shown in the SYNOPSIS above.

It returns a boolean value telling if the message was successfully sent or not.

It throws an exception if a fatal error like a http timeout in the underlying connection occurred.

AUTHOR

Mario Celso Teixeira <marioct37@gmail.com>

COPYRIGHT AND LICENSE

This software is copyright (c) CPqD 2016 by Mario Celso Teixeira.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.