Yes... and then showed an example that matched 1-5. Does he want to round down to ten minutes for low numbers, and up to ten minutes for high ones?
Being unsure, I showed him how backreferences worked and left the rest for him.
Thanks a lot to you and disedorgue and a big sorry for the imprecise description.
what a finally want, was rounding down the decade-minute and it works fine with
I'm trying to write a script that checks the DTS of a file the compares it to the current time. If greater that 60 mins has gone by and the file has not been written to alert.
So far I have the time pulled from the file but I dont know how to compare the times against a 60 min difference.
... (2 Replies)
Hi,
I am using the below copy command, to copy the file sbn to sbn1,
cp sbn sbn1
but its changing the date stamp of file sbn1, but i dont want to change the date stamp of sbn1.
Could you please help me out in this. (3 Replies)
Hi all;
I'm relatively new to scripting,I am working on a monitoring script.....where in i have to write subroutine
which does the follows:
It will check the time stamp of a file ( Oracle remarchive files) and compare it with existing time.If the time difference happen to be more than 90... (6 Replies)
I need some help recovering from a "slight" screwup. We just moved 3 TB of data from one RAID Array to another. Low lever archive files. This was done with a regular cp (for some reason) and now we have lost all the timestamps on the files, and we urgently need to get the timestamps back on these... (7 Replies)
Hi,
I have to find the next time stamp in perl.
Here is the code.
@time = loaltime(time);
print "\n Present time: $time:$time:$time \n";
For example if the time is: "12:55:02" after some process the time becomes 1:00:00.
How do i check when it becomes 00:00 i.e from "12:55:02... (0 Replies)
hi everyone
i am facing a strange problem here
suppose content of my file is
a=1,2,3
b=2,3,4
c=4,5,6
time=
now the problem is i want to add value in front of time variable
and the value should be i format only "HHMMSS"
so it should be like this
a=1,2,3
b=2,3,4
c=4,5,6... (3 Replies)
Here is two time I have:
Jul 12 16:02:01
Jul 13 01:02:01
and how can I do a simple match to get difference between two time which is 09:00:00
Thanks in advance. (3 Replies)
On Solaris 10 server the system date won't match with the timestamp on files created by a cron jobs, Please help
here is what i get when i check for system date
infodba-ie10ux014:/tcpdv1_ie10/tcadmin/bin\n\r-> date
Tue Apr 24 15:27:43 GMT 2012at same time i executed a cron job, and checked... (4 Replies)
Hi All
i have a file data like below format
A, B
2016-04-14 16:30:00,2016-04-14 16:31:17
2016-04-14 16:40:00,2016-04-14 16:41:10
2016-04-14 16:50:00,2016-04-14 16:50:41
2016-04-14 17:00:00,2016-04-14 17:00:35
2016-04-14 17:10:00,2016-04-14 17:11:48
2016-04-14 17:20:00,2016-04-14 17:20:37
i... (2 Replies)
Discussion started by: Tarak_nath
2 Replies
LEARN ABOUT CENTOS
lwp::robotua
LWP::RobotUA(3) User Contributed Perl Documentation LWP::RobotUA(3)NAME
LWP::RobotUA - a class for well-behaved Web robots
SYNOPSIS
use LWP::RobotUA;
my $ua = LWP::RobotUA->new('my-robot/0.1', 'me@foo.com');
$ua->delay(10); # be very nice -- max one hit every ten minutes!
...
# Then just use it just like a normal LWP::UserAgent:
my $response = $ua->get('http://whatever.int/...');
...
DESCRIPTION
This class implements a user agent that is suitable for robot applications. Robots should be nice to the servers they visit. They should
consult the /robots.txt file to ensure that they are welcomed and they should not make requests too frequently.
But before you consider writing a robot, take a look at <URL:http://www.robotstxt.org/>.
When you use a LWP::RobotUA object as your user agent, then you do not really have to think about these things yourself; "robots.txt" files
are automatically consulted and obeyed, the server isn't queried too rapidly, and so on. Just send requests as you do when you are using a
normal LWP::UserAgent object (using "$ua->get(...)", "$ua->head(...)", "$ua->request(...)", etc.), and this special agent will make sure
you are nice.
METHODS
The LWP::RobotUA is a sub-class of LWP::UserAgent and implements the same methods. In addition the following methods are provided:
$ua = LWP::RobotUA->new( %options )
$ua = LWP::RobotUA->new( $agent, $from )
$ua = LWP::RobotUA->new( $agent, $from, $rules )
The LWP::UserAgent options "agent" and "from" are mandatory. The options "delay", "use_sleep" and "rules" initialize attributes
private to the RobotUA. If "rules" are not provided, then "WWW::RobotRules" is instantiated providing an internal database of
robots.txt.
It is also possible to just pass the value of "agent", "from" and optionally "rules" as plain positional arguments.
$ua->delay
$ua->delay( $minutes )
Get/set the minimum delay between requests to the same server, in minutes. The default is 1 minute. Note that this number doesn't
have to be an integer; for example, this sets the delay to 10 seconds:
$ua->delay(10/60);
$ua->use_sleep
$ua->use_sleep( $boolean )
Get/set a value indicating whether the UA should sleep() if requests arrive too fast, defined as $ua->delay minutes not passed since
last request to the given server. The default is TRUE. If this value is FALSE then an internal SERVICE_UNAVAILABLE response will be
generated. It will have an Retry-After header that indicates when it is OK to send another request to this server.
$ua->rules
$ua->rules( $rules )
Set/get which WWW::RobotRules object to use.
$ua->no_visits( $netloc )
Returns the number of documents fetched from this server host. Yeah I know, this method should probably have been named num_visits() or
something like that. :-(
$ua->host_wait( $netloc )
Returns the number of seconds (from now) you must wait before you can make a new request to this host.
$ua->as_string
Returns a string that describes the state of the UA. Mainly useful for debugging.
SEE ALSO
LWP::UserAgent, WWW::RobotRules
COPYRIGHT
Copyright 1996-2004 Gisle Aas.
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
perl v5.16.3 2012-02-11 LWP::RobotUA(3)