Perl HTTP::Tiny Post: 302977929

Sponsored Content

Top Forums Shell Programming and Scripting Perl HTTP::Tiny Post 302977929 by azdps on Saturday 23rd of July 2016 05:35:07 PM

07-23-2016

Registered User

All the following are working solutions to reboot the ARRIS SURFboard SB6183 cable modem:

Using curl

Code:

curl -d Rebooting=1 http://192.168.100.1/goform/RgConfiguration

Using wget

Code:

wget --quiet -O /dev/null --post-data=Rebooting=1 http://192.168.100.1/goform/RgConfiguration

Using HTTP:Tiny module included in Perl (one liner which can be used at a command prompt)

Code:

perl -MHTTP::Tiny -E 'HTTP::Tiny->new->post_form("http://192.168.100.1/goform/RgConfiguration", { Rebooting => 1 })'

Using a Perl script

Code:

#!/usr/bin/perl 
 
use strict; 
use warnings; 
use HTTP::Tiny; 
 
my $url       = 'http://192.168.100.1/goform/RgConfiguration'; 
my $form_data = { Rebooting => 1 }; 
my $http      = HTTP::Tiny->new; 
my $response  = $http->post_form($url, $form_data); 
 
if ( $response->{success} ) { 
    print "Modem rebooted\n"; 
} 
else { 
    print "Reboot failed: ", $response->{reason}, "\n"; 
}

Thanks to FishMonger for his help over at the http://perlguru.com forums.

.
.

Last edited by azdps; 07-23-2016 at 06:52 PM..

azdps

View Public Profile for azdps

Find all posts by azdps

3 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Assistance with Perl and HTTP

I need to query a http site and then parse the xml results, this works well if I use the string in IE but I require an automated solution. I have tried using the following as well as HTTP::Request, nothing seems to work any suggestions would be appreciated, I have tried diffrnt things I found on...

2. Shell Programming and Scripting

Perl Http Post over SSL

Hello, I'm using a tunnel broker for tunneling IPv6 traffic, as my ISP does not support it natively. As of recent i switched from Hurricane Electrics tunnel broker to Sixxs. Whenever my IP address changes, i have to manually log in and change it. This is a bit cumbersome so i was thinking of...

3. Shell Programming and Scripting

awk script to find time difference between HTTP PUT and HTTP DELETE requests in access.log

Hi, I'm trying to write a script to determine the time gap between HTTP PUT and HTTP DELETE requests in the HTTP Servers access log. Normally client will do HTTP PUT to push content e.g. file_1.txt and 21 seconds later it will do HTTP DELETE, but sometimes the time varies causing some issues...

LEARN ABOUT MOJAVE

curlopt_useragent

CURLOPT_USERAGENT(3)					     curl_easy_setopt options					      CURLOPT_USERAGENT(3)

NAME

       CURLOPT_USERAGENT - set HTTP user-agent header

SYNOPSIS

       #include <curl/curl.h>

       CURLcode curl_easy_setopt(CURL *handle, CURLOPT_USERAGENT, char *ua);

DESCRIPTION

       Pass  a	pointer  to  a	zero terminated string as parameter. It will be used to set the User-Agent: header in the HTTP request sent to the
       remote server. This can be used to fool servers or scripts. You can also set any custom header with CURLOPT_HTTPHEADER(3).

       The application does not have to keep the string around after setting this option.

DEFAULT

       NULL, no User-Agent: header is used by default.

PROTOCOLS

       HTTP, HTTPS

EXAMPLE

       CURL *curl = curl_easy_init();
       if(curl) {
	 curl_easy_setopt(curl, CURLOPT_URL, "http://example.com");

	 curl_easy_setopt(curl, CURLOPT_USERAGENT, "Dark Secret Ninja/1.0");

	 curl_easy_perform(curl);
       }

AVAILABILITY

       As long as HTTP is supported

RETURN VALUE

       Returns CURLE_OK if HTTP is supported, CURLE_UNKNOWN_OPTION if not, or CURLE_OUT_OF_MEMORY if there was insufficient heap space.

SEE ALSO

       CURLOPT_REFERER(3), CURLOPT_HTTPHEADER(3),

libcurl 7.54.0							 December 21, 2016					      CURLOPT_USERAGENT(3)

3 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Assistance with Perl and HTTP

Discussion started by: bryanthomas

2. Shell Programming and Scripting

Perl Http Post over SSL

Discussion started by: regexp

3. Shell Programming and Scripting

awk script to find time difference between HTTP PUT and HTTP DELETE requests in access.log

Discussion started by: Juha

LEARN ABOUT MOJAVE

curlopt_useragent