Actually in the server we dont have wget ,curl utility and we cannot install as well.
Btw, i found the answer and i was able to get the output which i supposed to get. Hope it will be useful for others who are in search of such thing. and it was pretty simple.
Code:
#!/usr/bin/perl
use strict;
use warnings;
use LWP::UserAgent;
my $req;
my $res;
my $ua = LWP::UserAgent->new;
$ua->agent("Firefox/1.5.0.10");
$ua->timeout(1000);
$req = HTTP::Request->new(GET => 'http://yyyzzzzzxxxxxxxiiiii');
$res = $ua->request($req);
if ($res->is_success) {
print $res->content;
}
else {
print "Error: " . $res->status . "\n";
}
Last edited by scott_cog; 02-17-2014 at 11:22 AM..
Reason: .
Hi,
I have a file with a URL text written in it within double quotes e.g.
"http://abcd.xyz.com/mno/somefile.dtd"
I want the above text to get replaced by a single space character.
I tried
cat File1.txt | sed -e 's/("http)*(dtd")/ /g' > File2.txt
But it didnt work out. Can someone... (5 Replies)
Hello,
I need to redirect an existing URL, how can i do that?
There's a current web address to a GUI that I have to redirect to another webaddress. Does anyone know how to do this?
This is on Unix boxes Linux.
example:
https://m45.testing.address.net/host.php
make it so the... (3 Replies)
Hi :)
How to use dump in lynx.
$ lynx -dump http://www.google.com
So, this is an example of a lynx dump:
txt1 blabla Other txt
some text
1. http://url_of_txt1
2. http://url_of_blabla
3. http://url_of_Other_txt
4. http://url_of_some_text
...
How can i obtain this output?
... (12 Replies)
I am trying to find a way to test some code, but I need to rewrite a specific URL only from a specific HTTP_HOST
The call goes out to
http://SUB.DOMAIN.COM/showAssignment/7bde10b45efdd7a97629ef2fe01f7303/jsmodule/Nevow.Athena
The ID in the middle is always random due to the cookie.
I... (5 Replies)
HI,
I have a URL that points to a file:
LINK= "http://www.webpage.org/project/team2/file.tar"
However when I try to use wget on this variable I receive the following error.
wget $LINK
line 4: http://www.webpage.org/project/team2/file.tar: No such file or directory
wget:... (1 Reply)
Here is what I have so far:
find . -name "*php*" -or -name "*htm*" | xargs grep -i iframe | awk -F'"' '/<iframe*/{gsub(/.\*iframe>/,"\"");print $2}'
Here is an example content of a PHP or HTM(HTML) file:
<iframe src="http://ADDRESS_1/?click=5BBB08\" width=1 height=1... (18 Replies)
Hello Everyone,
I am trying to write a shell script(or Perl Script) that would do the following:
I have a file that contains the following lines:
File:
https://ims-svnus.com/dev/DB/trunk/feeds/templates/shell_script.txt -r860... (5 Replies)
Discussion started by: filter
5 Replies
LEARN ABOUT DEBIAN
uri::fetch::response
URI::Fetch::Response(3pm) User Contributed Perl Documentation URI::Fetch::Response(3pm)NAME
URI::Fetch::Response - Feed response for URI::Fetch
SYNOPSIS
use URI::Fetch;
my $res = URI::Fetch->fetch('http://example.com/atom.xml')
or die URI::Fetch->errstr;
print $res->content;
DESCRIPTION
URI::Fetch::Response encapsulates the response from fetching a feed using URI::Fetch.
USAGE
$res->content
The contents of the feed.
$res->uri
The URI of the feed. If the feed was moved, this reflects the new URI; otherwise, it will match the URI that you passed to fetch.
$res->etag
The ETag that was returned in the response, if any.
$res->last_modified
The Last-Modified date (in seconds since the epoch) that was returned in the response, if any.
$res->status
The status of the response, which will match one of the following enumerations:
o URI::Fetch::URI_OK()
o URI::Fetch::URI_MOVED_PERMANENTLY()
o URI::Fetch::URI_GONE()
o URI::Fetch::URI_NOT_MODIFIED()
$res->http_status
The HTTP status code from the response.
$res->http_response
The HTTP::Response object returned from the fetch.
$res->is_success
$res->is_redirect
$res->is_error
Wrappers around the "$res->response" methods of the same name, for convenience.
$res->content_type
The Content-Type header from the response.
AUTHOR & COPYRIGHT
Please see the URI::Fetch manpage for author, copyright, and license information.
perl v5.12.4 2011-08-29 URI::Fetch::Response(3pm)