Beefy Boxes and Bandwidth Generously Provided by pair Networks
The stupid question is the question not asked
 
PerlMonks  

Re: Call URL

by f00li5h (Chaplain)
on Nov 07, 2008 at 13:18 UTC ( [id://722222]=note: print w/replies, xml ) Need Help??


in reply to Call URL

You could LWP::Simple... Although you don't get HTTP response codes, so you'd have to check the page sent back for something to indicate success...

use LWP::Simple; get($smsurl);

@_=qw; ask f00li5h to appear and remain for a moment of pretend better than a lifetime;;s;;@_[map hex,split'',B204316D8C2A4516DE];;y/05/os/&print;

Replies are listed 'Best First'.
Re^2: Call URL
by ikegami (Patriarch) on Nov 07, 2008 at 20:44 UTC

    so you'd have to check the page sent back for something to indicate success...

    It's easier just using LWP::UserAgent.

    use LWP::UserAgent; my $response = LWP::UserAgent->new()->get($smsurl); die if !$response->is_success;

      quoth LWP::Simple::get

      The get() function will fetch the document identified by the given URL and return it. It returns undef if it fails.

      @_=qw; ask f00li5h to appear and remain for a moment of pretend better than a lifetime;;s;;@_[map hex,split'',B204316D8C2A4516DE];;y/05/os/&print;

        Good to know. I was just going by what you said (that the page would need to be checked).

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://722222]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others wandering the Monastery: (None)
    As of 2024-09-07 16:41 GMT
    Sections?
    Information?
    Find Nodes?
    Leftovers?
      Voting Booth?

      No recent polls found

      Notices?
      erzuuli‥ 🛈The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.