use strict;
use warnings;
open FILE, "/tmp/result_2";
my $regex="\\[INFO\\] Starting program ver. (.*)";
my $res='Program started, version <$1> - OK.\n';
while (<FILE>) {
if ($_ =~ /$regex/) {
eval print $res;
}
}
close FILE;
Hi All,
I need some help with arrays. I need to take input from the user for hostname, username and password until he enters .(dot) or any other character and store the values in the variable array.
I would further connect to the hostname using username and passwd and copy files from server to... (7 Replies)
Hi All,
I can;t seem to print out the array in sequence using the below subroutine.
My first element in the array @lotsuffix is suppose to be $lotsuffix as defined in the subroutine, but when the array variable is being pass on the main program, my first element actually becomes $lotsuffix ! ... (4 Replies)
Hi all
I need help on how to store two or more date formates captured using regex from an input sentence in PERL ? For example, I have an input sentence consisting of two dates such as :
The departure date is August 12, 2009 and arrival date is 20.08.2009.
Now, I want to capture the two... (4 Replies)
Hi Forum
im trying to use grouping in a regex statement in a function in a script
this is the criteria im trying to match :It MUST have 3 character at the beginning. After that it can have a mix of spaces,alpha-numeric and dashes in any order
eg HUG this-stuff, FGU taylor-8-shoes, ZDFnintendo... (2 Replies)
Hi so I have these files where the first thing in them says something along the lines of "This document was accessed 'date' blah blah", I was thinking of a way to extract that date and then sort the files based on that date.
My question is how do I get rid of the words in that statement so that... (6 Replies)
I am writing the code in perl.
I have an array in perl and each variable in the array contains the data in the below format
Now I need to check the below variable w.r.t system month I need to store the date and time(Tue Aug 7 03:54:12 2012) from the below data into file if contains only 'Aug'... (5 Replies)
Requirement 1) I need to execute 15 SQL queries in oracle through linux script. All these query results needs to be stored in array variables.
Requirement 2) And these 15 queries needs to be executed in parallel.
Requirement 3) Once all the queries executed then the shell script should... (3 Replies)
Trying to do some control flow parsing based on the index postion of an array member. Here is the pseudo code I am trying to write in (preferably in pure bash) where possible. I am thinking regex with do the trick, but need a little help.
pesudo code
if == ENDSINFIVEINTS ]]; then
do... (4 Replies)
Hi
I am trying to store the output of a command into an array in perl script.
I am able to store but the problem is i am unable to print the array line with one line space. i mean i inserted the \n in loop ...but not getting the result.
I have written like this
#!/usr/bin/perl
@a =... (2 Replies)
Discussion started by: kumar85shiv
2 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)
08-29-2008
