08-08-2001
Need help writing simple script
I'm trying to write a simple unix script that will delete files after 30 days of being created. I've never done this before but conceptually it sounds easy. Here is what I'm trying to do:
Get System Date
Get File Date
If (sysdate-filedate>30days)
rm file
All of these files are contained within a single directory and they could have different file names.
thanks!!!
10 More Discussions You Might Find Interesting
1. UNIX for Dummies Questions & Answers
Hi, I need help writing a unix script to change the time in the server automatically when it reaches a specified time.
Only on the 14th of april, when the time becomes midnight (00:00:00), I need the server to change the time automatically to 23:30:00 and start working on as usual with a... (2 Replies)
Discussion started by: amodha
2 Replies
2. UNIX for Dummies Questions & Answers
how would i write a shell script to show the number of lines in which int variable appears in a c++ program. (3 Replies)
Discussion started by: deadleg
3 Replies
3. Programming
I'm trying to write a small utility for syntax checking. I've tried using Flex/Bison, but these seem too advanced for my task. A simpler tool would be appreciated. (1 Reply)
Discussion started by: Ilja
1 Replies
4. Shell Programming and Scripting
Dear all,
I am a complete newbie to (perl) programming and I am completely stuck in a project. I have the following arrays
@array_1
@array_2
@array_A
@array_B
@array_C
Each element pair of array_1 and array_2 is linked to all elements of a third array (e.g. array_A, array_B or... (3 Replies)
Discussion started by: docdudetheman
3 Replies
5. Red Hat
Building software in most languages is a pain. Remember ant build.xml, maven2 pom files, and multi-level makefiles?
Python has a simple solution for building modules, applications, and extensions called distutils. Disutils comes as part of the Python distribution so there are no other packages... (0 Replies)
Discussion started by: Linux Bot
0 Replies
6. Shell Programming and Scripting
I want to write a bash script to:
1. Send an email from localhost to an external gmail account. (gmail then automatically forwards the message back to a pop account on the same server.
2. Script waits 3 minutes then checks to see if the email arrived, and if not, it sends an email to... (9 Replies)
Discussion started by: sallyanne
9 Replies
7. Shell Programming and Scripting
#!/bin/csh
echo hello world
this is what i got in a text file called ss1.
i type "chmod 755 ss1.txt" to make it executable.
then when i type
ss1
or
ss1.txt
it says
"ss1 command not found"
what am i doing wrong? (19 Replies)
Discussion started by: pantelis
19 Replies
8. HP-UX
I work on a production server. I have to check one folder named "spool" and delete files under it , which are more than 5 minutes old.
I do it manually by writing two commands.
touch -t YYMMDDHHMMSS /tmp/timeinfo
find /spool ! -newer /tmp/timeinfo -exec rm -rf {} \;
I want to... (4 Replies)
Discussion started by: manalisharmabe
4 Replies
9. Shell Programming and Scripting
Hi,
I am very new to scripting and I wanted to write a unix shell script which can give me,
1)number of cpu's in a box
2)number of cores per cpu
3)total number of cores in abox (ie multiplying 1&2)
I am also trying to figure out how to check if hyper-threading is enabled in the... (8 Replies)
Discussion started by: steven12
8 Replies
10. Shell Programming and Scripting
Hello all!
This is my first post and I'm very new to programming. I would like help creating a simple perl or bash script that I will be using in my work as a junior bioinformatician.
Essentially, I would like to take a tab-delimted or .csv text with 3 columns and write them to a "3D" matrix:
... (16 Replies)
Discussion started by: torchij
16 Replies
LEARN ABOUT SUSE
date::manip::tzdata
Date::Manip::TZdata(3) User Contributed Perl Documentation Date::Manip::TZdata(3)
NAME
Date::Manip::TZdata -- Internal module for working with the tzdata files
SYNOPSIS
use Date::Manip::TZdata;
$tzd = new Date::Manip::TZdata($dir);
DESCRIPTION
This module is not intended for public use. It is used internally by the scripts used to analyze the time zone database and generate the
modules for each time zone. The module is included in the distribution solely for the sake of completeness. Currently, no support is
offered for this module, and it can (and may) change without notice.
This module consists of routines for working with the tzdata files obtained from ftp://elsie.nci.nih.gov/pub/ . These files are updated
several times a year and are the basis for time zone descriptions for most computer systems.
At some point, I am interested in making this module a direct interface to the tzdata files, but in the limited amount of time I have to
work on perl modules, other modifications to Date::Manip are much higher priority, so I'm not sure when (or if) this will ever happen.
ROUTINES
new
use Date::Manip::TZdata;
$tzd = new Date::Manip::TZdata($dir);
This finds and reads in all the tzdata. If $dir is passed in, it is the directory where a tzdata directory is located. It defaults to
the current directory.
KNOWN LIMITATIONS
Some assumptions and limitations are assumed in the logic of this module.
When a time change occurs, the time may change backwards or forwards. Time changes rules are listed on a per-year basis. It is assumed
that time changes will not occur so close to the end or start of the year as to cross the year boundary (in other words, the year will not
change as a result of the time change). This is not accounted for, and it is hoped that this situation will never occur.
Also, because this module is strictly limited to 4 digit positive years (regardless of whether it is wallclock or universal time), and
because various parts of the module switch back and forth, valid times for this module are from Jan 2, 0001 to Dec 30, 9999. This ensures
that conversions from wallclock to universal or vice versa will never make dates occur in the year 0000 or 10000.
KNOWN BUGS
None known.
BUGS AND QUESTIONS
Please refer to the Date::Manip man page for information on submitting bug reports or questions to the author.
AUTHOR
Sullivan Beck (sbeck@cpan.org)
perl v5.12.1 2010-01-12 Date::Manip::TZdata(3)