05-02-2004
Thanks guys, i will try and let you know how I get on.
9 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
i tried to use "find" to get all of yesterdays files but missed something in the 24 hours logic.
can anybody help me with this one?
i thought that -daystart -atime 1 was enough but i got more files (2 Replies)
Discussion started by: progressdll
2 Replies
2. Shell Programming and Scripting
To get yesterays date, execute the command :
TZ=aaa24 date +%Y%m%d
Output format will be yyyymmdd (2 Replies)
Discussion started by: sujju1985
2 Replies
3. UNIX for Dummies Questions & Answers
Hi,
Was using date +%Y%j to get current julian date. Can anyone let me know how can I get y'day's julin date. Thx
Did check FAQ but couldn't find anything.
Thanks. (3 Replies)
Discussion started by: er_ashu
3 Replies
4. UNIX for Dummies Questions & Answers
I tried this and it works for the most part, but if the date is 20090301, it displays 20090300.
YESTERDAY=$((`date +%Y%m%d` -1)) (2 Replies)
Discussion started by: cards0622
2 Replies
5. Shell Programming and Scripting
hi All,
I have this sample text file - access.log:
Jan 18 21:34:29 root 209.151.232.70
Jan 18 21:34:40 root 209.151.232.70
Jan 18 21:34:43 root 209.151.232.70
Jan 18 21:34:56 root 209.151.232.70
Jan 18 21:35:10 root 209.151.232.70
Jan 18 21:35:23 root 209.151.232.70
Jan 18 21:36:04 root... (2 Replies)
Discussion started by: linuxgeek
2 Replies
6. Shell Programming and Scripting
Hi All,
Can anybody help me to get the yesterdays date in perl script.
My script is as below
#!/bin/perl -w
$yes=system("TZ=IST+24 date +%d-%m-%Y");
print "$yes\n";
script is writting the date but with 0
pls see the output below
#!/bin/perl -w
$yes=system("TZ=IST+24 date... (2 Replies)
Discussion started by: jam_prasanna
2 Replies
7. Shell Programming and Scripting
I am trying to display todays and yesterdays .rej files from a directory.
ls -lrt *.rej | grep 'Aug 12' ; ls -lrt *.rej | grep 'Aug 13'
Which is working as above.
But i want take 'Aug 12' and 'Aug 13' from a variable and the command should work everyday.
I am able to get todays files by... (9 Replies)
Discussion started by: GopalKrishnaP
9 Replies
8. UNIX for Dummies Questions & Answers
Using the find command to find files in a directory and automatically delete files older than 24 hours find . -mtime +0 | grep file | xargs rm. Using the find man page but I can't seem to make it work for files that have the previous day's time stamp but are not 24 hours old. Is there a way for... (4 Replies)
Discussion started by: jimmyf
4 Replies
9. UNIX for Beginners Questions & Answers
Hello,
I have a syslog server at home and am currently experiencing an issue where my logs will rotate and compress however it will rotate and compress yesterdays file and the newly created log file for the current day. When it does this however it will also create another new file for today... (9 Replies)
Discussion started by: MyUserName7000
9 Replies
LEARN ABOUT DEBIAN
email::received
Email::Received(3pm) User Contributed Perl Documentation Email::Received(3pm)
NAME
Email::Received - Parse an email Received: header
SYNOPSIS
use Email::Received;
for ($mail->header("Received")) {
my $data = parse_received($_);
return "SPAM" if rbl_lookup($data->{ip});
}
DESCRIPTION
This module is a Perl Email Project rewrite of SpamAssassin's email header parser. We did this so that the great work they did in analysing
pretty much every possible Received header format could be used in applications other than SpamAssassin itself.
The module provides one function, "parse_received", which takes a single Received line. It then produces either nothing, if the line is
unparsable, a hash reference like this:
{ reason => "gateway noise" }
if the line should be ignored for some good reason, and one like this:
{ ip => '64.12.136.4', id => '875522', by => 'xxx.com',
helo => 'imo-m01.mx.aol.com' }
if it parsed the message. Possible keys are:
ip rdns helo ident envfrom auth by id
RULE FORMAT
Where SpamAssassin used a big static subroutine full of regular expressions to parse the data, we build up a big subroutine full of regular
expressions dynamically from a set of rules. The rules are stored at the bottom of this module. The basic format for a rule looks like
this:
((var=~)?/REGEXP/)? [ACTION; ]+
The "ACTION" is either "SET variable = $value", "IGNORE "reason"?", "UNPARSABLE" or "DONE".
One control structure is provided, which is basically an "if" statement:
GIVEN (NOT)? /REGEXP/ {
ACTION+
}
EXPORT
parse_received
SEE ALSO
Mail::SpamAssassin::Message::Metadata::Received, from which the rules and some of the IP address matching constants were blatantly stolen.
Thanks, guys, for doing such a comprehensive job!
AUTHOR
simon, <simon@>
COPYRIGHT AND LICENSE
Copyright (C) 2006 by simon
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.7 or,
at your option, any later version of Perl 5 you may have available.
perl v5.10.0 2006-03-24 Email::Received(3pm)