Breaking News: Grepper is joining You.com. Read the official announcement!

rest api in perl

@CodeGrepperManu answered on March 30, 2023 Popularity 3/10 Helpfulness 1/10

answer rest api in perl

related rest api in perl

rest api in perl

Comment

# Create a user agent object
use LWP::UserAgent;
my $ua = LWP::UserAgent->new;
$ua->agent("MyApp/0.1 ");
 
# Create a request
my $req = HTTP::Request->new(POST => 'http://search.cpan.org/search');
$req->content_type('application/x-www-form-urlencoded');
$req->content('query=libwww-perl&mode=dist');
 
# Pass request to the user agent and get a response back
my $res = $ua->request($req);
 
# Check the outcome of the response
if ($res->is_success) {
    print $res->content;
}
else {
    print $res->status_line, "\n";
}

Popularity 3/10 Helpfulness 1/10 Language perl

Source: Grepper

Tags: api perl rest

Link to this answer
Share Copy Link

Contributed on Mar 30 2023

@CodeGrepperManu

0 Answers Avg Quality 2/10

Closely Related Answers

rest api in perl

Comment

use REST::Client;
 
#The basic use case
my $client = REST::Client->new();
$client->GET('http://example.com/dir/file.xml');
print $client->responseContent();
  
#A host can be set for convienience
$client->setHost('http://example.com');
$client->PUT('/dir/file.xml', '<example>new content</example>');
if( $client->responseCode() eq '200' ){
    print "Updated\n";
}
  
#custom request headers may be added
$client->addHeader('CustomHeader', 'Value');
  
#response headers may be gathered
print $client->responseHeader('ResponseHeader');
  
#X509 client authentication
$client->setCert('/path/to/ssl.crt');
$client->setKey('/path/to/ssl.key');
  
#add a CA to verify server certificates
$client->setCa('/path/to/ca.file');
  
#you may set a timeout on requests, in seconds
$client->setTimeout(10);
  
#options may be passed as well as set
$client = REST::Client->new({
        host    => 'https://example.com',
        cert    => '/path/to/ssl.crt',
        key     => '/path/to/ssl.key',
        ca      => '/path/to/ca.file',
        timeout => 10,
    });
$client->GET('/dir/file', {CustomHeader => 'Value'});
  
# Requests can be specificed directly as well
$client->request('GET', '/dir/file', 'request body content', {CustomHeader => 'Value'});
 
# Requests can optionally automatically follow redirects and auth, defaults to
# false 
$client->setFollow(1);
 
#It is possible to access the L<LWP::UserAgent> object REST::Client is using to
#make requests, and set advanced options on it, for instance:
$client->getUseragent()->proxy(['http'], 'http://proxy.example.com/');
  
# request responses can be written directly to a file 
$client->setContentFile( "FileName" );
 
# or call back method
$client->setContentFile( \&callback_method );
# see LWP::UserAgent for how to define callback methods

Popularity 3/10 Helpfulness 2/10 Language perl

Source: Grepper

Tags: perl rest api

Link to this answer
Share Copy Link

Contributed on Mar 30 2023

@CodeGrepperManu

0 Answers Avg Quality 2/10

rest api in perl

Contents

More Related Answers

rest api in perl

Closely Related Answers

rest api in perl

Grepper

Documentation

Social

Legal

Contact

Oops, You will need to install Grepper and log-in to perform this action.