SYNOPSIS
use SMS::Send;
# Create a sender
my $sender = SMS::Send->new('AQL',
_login => 'your_aql_username',
_password => 'your_aql_password',
_sender => 'sender number',
);
# Send a message
my $sent = $sender->send_sms(
text => 'This is a test message',
to => '+61 (4) 1234 5678',
);
if ( $sent ) {
print "Message sent ok\n";
} else {
print "Failed to send message\n";
}
DESCRIPTION
A driver for SMS::Send to send SMS text messages via AQL (www.aql.com)This is not intended to be used directly, but instead called by SMS::Send (see synopsis above for a basic illustration, and see SMS::Send's documentation for further information).
METHODS
- new
- Constructor, takes argument pairs passed by SMS::Send, returns an SMS::Send::AQL object. See usage synopsis for example, and see SMS::Send documentation for further info on using SMS::Send drivers.
- send_sms
- Send the message - see SMS::Send for details.
AUTHOR
David Precious, <[email protected]>COPYRIGHT AND LICENSE
Copyright (C) 2008-2011 by David PreciousThis library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.7 or, at your option, any later version of Perl 5 you may have available.