05-02-2008
Date Difference in PERL
Hi
I have a file which has start time as my first line and End time in last line
start time: 23 May 2008 03:30:33
End time : 23 May 2008 04:30:00
I have to extract these two lines and find the time of execution for the script in PERl.
Any help appreciated
Thanks
10 More Discussions You Might Find Interesting
1. UNIX for Advanced & Expert Users
Hi...I need some help with a date script. I need to allow the user to enter the month (alpha) day (int) and year (YYYY) and count the difference in number of days since Jan 1, 1952 to the users date. I've been messing with this for about 10 hours and I think I'm just making the script worse =(
... (1 Reply)
Discussion started by: mtnbaby
1 Replies
2. UNIX for Dummies Questions & Answers
Hi
Can any buddy give mi a simple program or logic or command which will get
difference between two dates
ex:diff between 20051008 2005908 is 24hours 12 min 2 sec
regards (1 Reply)
Discussion started by: rajuMBT
1 Replies
3. Linux
hi,
i have 2 dates in the form: '20080315120030' and '20080310140030'. i.e. YYYYMMDDHHMMSS.
i need a way of getting the difference between them using shell script.
any thoughts? (14 Replies)
Discussion started by: muay_tb
14 Replies
4. Shell Programming and Scripting
Hi All!
I would like to know the time difference between two dates which are in same format...
$ date -r abc
Thu Oct 29 09:40:37 EDT 2009
$ date
Fri Oct 30 02:07:03 EDT 2009
i would like to find the diff between these two dates in hours..please help..:)
Regards,
Kiran (3 Replies)
Discussion started by: dddkiran
3 Replies
5. Shell Programming and Scripting
Dear all,
I fancy that I'm pretty competent in ksh, but I have someone on HP-UX wanting me to script up a simple interface to handle user alterations rather than giving them high privileges to run up SAM. This is all fairly straightforward, but I'm stuck on an epoch date issue.
When we have... (6 Replies)
Discussion started by: rbatte1
6 Replies
6. Programming
I tried the below code to find difference between two dates. It works fine if the day of the month is 2-digit number. But it fails when we have a single-digit day of month(ex:1-9). my code is as below. please help me soon.
#!/usr/bin/perl -w
use strict;
use Time::Local;
... (2 Replies)
Discussion started by: anandrec
2 Replies
7. Shell Programming and Scripting
HI All ,
i need a bash script to find the number of days between two dates .
Format YYYY-MM-DD
THanks,
Neil (1 Reply)
Discussion started by: nevil
1 Replies
8. AIX
Hi Everyone,
We are having an issue with date and date -u in our AIX Systems.
We have checked environment variable TZ and /etc/environment and however, we could not rectify the difference.
>date
Thu Mar 19 22:31:40 IST 2015
>date -u
Thu Mar 19 17:01:44 GMT 2015
Any clue... (5 Replies)
Discussion started by: madhav.kunapa
5 Replies
9. Shell Programming and Scripting
Hi,
I created a script for finding the duration of a job using the start and end time of the job. But the command doesnt calculate correct value if the duration is more than 24 hours. Any help would be really good
.
cat test1 --- start time
03/27/15 17:41:00
03/24/15 11:58:04
03/23/15... (3 Replies)
Discussion started by: rogerben
3 Replies
10. Shell Programming and Scripting
Hi All,
I am using the below code to get the days difference between 2 dates
ddate="05/31/2018"
bdate="06/10/2018"
diff=$(perl -e 'use Time::Local;
my ($month1,$day1,$year1)=split /\W+/, $ENV{'ddate'};
my ($month2,$day2,$year2)=split /\W+/, $ENV{'bdate'};
my $time1 =... (5 Replies)
Discussion started by: jayadanabalan
5 Replies
LEARN ABOUT DEBIAN
email::date
Email::Date(3pm) User Contributed Perl Documentation Email::Date(3pm)
NAME
Email::Date - Find and Format Date Headers
SYNOPSIS
use Email::Date;
my $email = join '', <>;
my $date = find_date($email);
print $date->ymd;
my $header = format_date($date->epoch);
Email::Simple->create(
header => [
Date => $header,
],
body => '...',
);
DESCRIPTION
RFC 2822 defines the "Date:" header. It declares the header a required part of an email message. The syntax for date headers is clearly
laid out. Stil, even a perfectly planned world has storms. The truth is, many programs get it wrong. Very wrong. Or, they don't include a
"Date:" header at all. This often forces you to look elsewhere for the date, and hoping to find something.
For this reason, the tedious process of looking for a valid date has been encapsulated in this software. Further, the process of creating
RFC compliant date strings is also found in this software.
FUNCTIONS
find_date
my $time_piece = find_date $email;
"find_date" accepts an email message in any format Email::Abstract can understand. It looks through the email message and finds a date,
converting it to a Time::Piece object.
If it can't find a date, it returns false.
"find_date" is exported by default.
format_date
my $date = format_date; # now
my $date = format_date( time - 60*60 ); # one hour ago
"format_date" accepts an epoch value, such as the one returned by "time". It returns a string representing the date and time of the
input, as specified in RFC 2822. If no input value is provided, the current value of "time" is used.
"format_date" is exported by default.
format_gmdate
my $date = format_gmdate;
"format_gmdate" is identical to "format_date", but it will return a string indicating the time in Greenwich Mean Time, rather than
local time.
"format_gmdate" is exported on demand, but not by default.
PERL EMAIL PROJECT
This module is maintained by the Perl Email Project
<http://emailproject.perl.org/wiki/Email::Date>
SEE ALSO
Email::Abstract, Time::Piece, Date::Parse, perl.
AUTHOR
Casey West, <casey@geeknest.com>.
Ricardo SIGNES, <rjbs@cpan.org>.
COPYRIGHT
Copyright (c) 2004 Casey West. All rights reserved.
This module is free software; you can redistribute it and/or modify it
under the same terms as Perl itself.
perl v5.10.1 2007-12-01 Email::Date(3pm)