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.