perl与shell获取昨天、明天或多天前的日期的代码

一、首先说下perl如何获取

代码如下:
#!/usr/bin/perl -w
use POSIX qw(strftime);
my $day = strftime("%Y%m%d", localtime(time - 24*3600));#获取昨天的日期

二、在Linux中对man date -d 参数说的比拟笼统,以下示例进一步解释:

# -d, --date=STRING display time described by STRING, not `now'
[root@Gman root]# date -d next-day +%Y%m%d #明天日期
20091024
[root@Gman root]# date -d last-day +%Y%m%d #昨天日期
20091022
[root@Gman root]# date -d yesterday +%Y%m%d #昨天日期
20091022
[root@Gman root]# date -d tomorrow +%Y%m%d # 明天日期
20091024
[root@Gman root]# date -d last-month +%Y%m #上个月日期
200909
[root@Gman root]# date -d next-month +%Y%m #下个月日期
200911
[root@Gman root]# date -d next-year +%Y #明年日期
2010
DATE=$(date +%Y%m%d -d '2 days ago') #获得2天前的日期

20111022

DATE=$(date +%Y%m%d -d '2 day') #获得2天后的日期

20111026

名目 : date

利用权限 : 所利于用者
利用措施 : date [-u] [-d datestr] [-s datestr] [--utc] [--universal] [--date=datestr] [--set=datestr] [--help] [--version] [+FORMAT] [MMDDhhmm[[CC]YY][.ss]]
解释 : date 能用来揭示或设定系统的日期和工夫，在揭示方面，利用者能设定欲揭示的款式，款式设定为一个加号后接数个符号，其中可用的符号列表如下 :
工夫方面 :
% : 印出
% %n : 下一行
%t : 跳格
%H : 小时(00..23)
%I : 小时(01..12)
%k : 小时(0..23)
%l : 小时(1..12)
%M : 分钟(00..59)
%p : 揭示本地 AM 或 PM
%r : 直接揭示工夫 (12 小时制，款式为 hh:mm:ss [AP]M)
%s : 从 1970 年 1 月 1 日 00:00:00 UTC 到现在为止的秒数 %S : 秒(00..61)
%T : 直接揭示工夫 (24 小时制)
%X : 相当于 %H:%M:%S
%Z : 揭示时区
日期方面 :
%a : 礼拜几 (Sun..Sat)
%A : 礼拜几 (Sunday..Saturday)
%b : 月份 (Jan..Dec)
%B : 月份 (January..December)
%c : 直接揭示日期和工夫
%d : 日 (01..31)
%D : 直接揭示日期 (mm/dd/yy)
%h : 同 %b
%j : 一年中的第几天 (001..366)
%m : 月份 (01..12)
%U : 一年中的第几周 (00..53) (以 Sunday 为一周的第一天的情形)
%w : 一周中的第几天 (0..6)
%W : 一年中的第几周 (00..53) (以 Monday 为一周的第一天的情形)
%x : 直接揭示日期 (mm/dd/yy)
%y : 年份的最后两位数字 (00.99)
%Y : 全面年份 (0000..9999)
若是不以加号作为开始，则表示要设定工夫，而工夫款式为 MMDDhhmm[[CC]YY][.ss]，
其中 MM 为月份，
DD 为日，
hh 为小时，
mm 为分钟，
CC 为年份前两位数字，
YY 为年份后两位数字，
ss 为秒数
把计 :
-d datestr : 揭示 datestr 中所设定的工夫 (非系统工夫)
--help : 揭示帮助讯息
-s datestr : 将系统工夫设为 datestr 中所设定的工夫
-u : 揭示现在的格林威治工夫
--version : 揭示版本编号