Sending sms through a Perl Script

Discussion in 'Perl Misc' started by Nikos, Apr 20, 2005.

  1. Nikos

    Nikos Guest

    If someone has made a perl script that somehow can send sms please post it!

    cpans modules of sending sms aint working or they are outdated.

    For exaple thia aint working:

    #/usr/bin/perl -w
    use WWW::SMS;

    my $sms = WWW::SMS->new("36973814824", "This is a test!");

    for ( $sms->gateways(sorted => 'reliability') ) #for every compatible
    gateway
    {
    if ( $sms->send( $_ ) )
    { #try to send sms
    last; #until it succeds
    }
    else
    {
    print $WWW::SMS::Error; #here is the error
    }
    }

    Do you written one or know of one that actually works?
     
    Nikos, Apr 20, 2005
    #1
    1. Advertising

Want to reply to this thread or ask your own question?

It takes just 2 minutes to sign up (and it's free!). Just click the sign up button to choose a username and then you can ask your own questions on the forum.
Similar Threads
  1. John
    Replies:
    0
    Views:
    1,141
  2. John
    Replies:
    0
    Views:
    1,109
  3. Great Job
    Replies:
    0
    Views:
    439
    Great Job
    Feb 9, 2008
  4. freesms
    Replies:
    0
    Views:
    393
    freesms
    May 11, 2008
  5. freesms
    Replies:
    0
    Views:
    369
    freesms
    May 11, 2008
Loading...

Share This Page