- 论坛徽章:
- 0
|
跪求如何在UNIX下实现时间变量运算
你的第二种需求相对简单,因为应用次数很多,被许多人写过了,你可以自己搜下论坛,shell和perl实现的都有
第一种,perl有专门的模块实现,象我这样的懒人当然不会重写它了~
下面的代码两种需求都实现了,不过需要装Date::Calc 模块
- #!/bin/perl -w
- use strict;
- use Time::Local;
- use POSIX qw(strftime);
- use Date::Calc qw(Add_Delta_Days);
- use Date::Calc qw(Delta_Days);
- my $year=strftime "%Y", localtime;
- my $month=strftime "%m", localtime;
- my $day=strftime "%d", localtime;
- print Add_Delta_Days($year,$month,$day,1),"\n";
- (my $new_year,my $new_month,my $new_day)=Add_Delta_Days($year,$month,$day,1);
- my $day_diff=Delta_Days($year,$month,$day,$new_year,$new_month,$new_day);
- print $day_diff;
复制代码 |
|