03-26-2008
Perl: Extracting date from file name and comparing with current date
I need to extract the date part from the file name (20080221 in this ex) and compare it with the current date and delete it, if it is a past date.
$file = exp_ABCD4_T-2584780_upto_20080221.dmp.Z
really appreciate any help.
thanks
mkneni
10 More Discussions You Might Find Interesting
1. Linux
Daily one file will dropped into this directory.
Directory: /opt/app/jt/drop
File name: XXXX_<timestamp>.dat.gz
I need to write a script which checks whether the file is dropped daily or not.
Any idea in the script how can we compare timestamp of the file to today's date?? (3 Replies)
Discussion started by: Rajneel
3 Replies
2. Shell Programming and Scripting
Hi,
I have start date and end date in the following format. I need to check the current date is greater than the start date and less than the end date. if i use the command date --date "Tue 6:00 AM", it takes next Tues day not the current week's Tues day. Is there a way to get the current Tues... (9 Replies)
Discussion started by: bharathappriyan
9 Replies
3. UNIX for Dummies Questions & Answers
Hello gurus,
I am hoping someone can help me with the required code/script to make this work. I have the following file with records starting at line 4:
NETW~US60~000000000013220694~002~~IT~USD~2.24~20110201~99991231~01~01~20101104~... (4 Replies)
Discussion started by: chumsky
4 Replies
4. UNIX for Dummies Questions & Answers
Hi,
I am new to unix and I am stuck on how to compare two .zip file with date stamp in my directory. I need to compare out of the two file which is oldest to current date and unzip it after that done continue to unzip the second zip file.
Thanks for your help. (5 Replies)
Discussion started by: lilvi3tboix1
5 Replies
5. UNIX for Dummies Questions & Answers
Hi Guys,
Anyone who knows how to compare the current date with the a file containing a date, say for example I have a file that looks like this:
Command was launched from partition 0.
------------------------------------------------
Executing command in server server6
Fri Dec 16... (7 Replies)
Discussion started by: rymnd_12345
7 Replies
6. Shell Programming and Scripting
$beginDate = substr(DateCalc("today", "-7Days"),0,8);
This fetches the date 7 days back
Can I fetch the date before 7 years from todays date in Perl using same syntax
Use code tags, see PM. (3 Replies)
Discussion started by: parthmittal2007
3 Replies
7. Shell Programming and Scripting
Hi
i have a file containg dates likebelow
4/30/2013
3/31/2013
4/30/2013
4/16/2013
4/30/2013
4/30/2013
5/30/2013
5/30/2013
4/30/2013
5/30/2013
5/30/2013
3/31/2013
now i want to compare the above dates with current date and i want to display the difference . (10 Replies)
Discussion started by: siva kumar
10 Replies
8. Shell Programming and Scripting
SunOS -s 5.10 Generic_147440-04 sun4u sparc SUNW,SPARC-Enterprise
Hi,
In a folder, there are files. I have a script which reads the current date and subtract the modification date of each file.
How do I achieve this?
Regards,
Joe (2 Replies)
Discussion started by: roshanbi
2 Replies
9. UNIX for Beginners Questions & Answers
We want to call a parameter file (.txt) where my application read dynamic values when the job is triggered, one of such values are below:
abc.txt
------------------
Code:
line1
line2
line3
$$EDWS_DATE_INSERT=08-27-2019
line4
$$EDWS_PREV_DATE_INSERT=08-26-2019
I am trying to write a... (3 Replies)
Discussion started by: pradeepp
3 Replies
10. UNIX for Beginners Questions & Answers
I Have text like
XXX_20190908.csv.gz need to replace Only date in this format with current date every day
Thanks! (1 Reply)
Discussion started by: yamasani1991
1 Replies
LEARN ABOUT DEBIAN
netsds::util::datetime
NetSDS::Util::DateTime(3pm) User Contributed Perl Documentation NetSDS::Util::DateTime(3pm)
NAME
NetSDS::Util::DateTime - common date/time processing routines
SYNOPSIS
use NetSDS::Util::DateTime;
print "Current date: " . date_now();
DESCRIPTION
This package provides set of routines for date and time processing.
EXPORTED FUNCTIONS
date_now_array([TIME])
Returns array of date items for given date. If source date is not set current date used.
date_now([TIME])
Return [given] date as string.
2001-12-23 14:39:53
date_now_iso8601([TIME])
Return date as ISO 8601 string.
20011223T14:39:53Z
<http://en.wikipedia.org/wiki/ISO_8601> http://www.w3.org/TR/NOTE-datetime <http://www.w3.org/TR/NOTE-datetime>
date_strip(DATE)
Trim miliseconds from date.
date_date(DATE)
Trim time part from date.
date_time(DATE)
Trim date part from date.
time_from_string($string)
Return parsed date/time structure.
date_from_string($string)
Return date from string representation.
date_inc([INCREMENT, [TIME]])
Return date incremented with given number of seconds.
date_inc_string([INCREMENT, [TIME]])
Return string representation of date incremented with given number of seconds.
EXAMPLES
None yet
BUGS
Unknown yet
SEE ALSO
Date::Parse, Date::Format
TODO
Import stuff from Wono project
AUTHOR
Valentyn Solomko <val@pere.org.ua>
Michael Bochkaryov <misha@rattler.kiev.ua>
perl v5.12.4 2011-08-27 NetSDS::Util::DateTime(3pm)