格式化日期:: MANIP的三角洲天

我想保存三角洲之间的所有天数，并从天在从对对我有2维数组，我只需要工作日。

说为

$date_from = 2012-02-09; 
$date_to = 2012-02-13; 
$delta_string = 4 

sub calc_usage { 
    use Date::Manip::Date; 

    my $date_from; 
    my $date_to; 
    my $delta; 

    my $i; 
    for $i (0 .. $#DATE_HOLDER) { 
     $date_from = new Date::Manip::Date; 
     $date_to = new Date::Manip::Date; 

     $date_from->parse($DATE_HOLDER[$i][0]); 
     $date_to->parse($DATE_HOLDER[$i][1]); 

     $delta = $date_from->calc($date_to, "business"); 

    } 

}

来源

2012-02-08 Recct

它确实，但它不是人类可读的增量是日期:: MANIP ::德尔塔= HASH（0xa0b9db0）（差异地址上的每个运行ofc） – Recct 2012-02-08 14:20:34

这意味着它是（引用到）Date :: Manip :: Delta对象。你可以在http://metacpan.org上找到关于这方面的文档 – zgpmax 2012-02-08 17:05:06

要检索增量值，则必须使用folllowing：

my @val = $delta->value();

至极给出7个元件的阵列，其中：

$val[0] holds years 
$val[1] holds months 
$val[2] holds weeks 
$val[3] holds days 
$val[4] holds hours 
$val[5] holds minutes 
$val[6] holds seconds

你也可以在标量环境中使用它：

my $val = $delta->value();

至极给出具有相同的7个元素冒号分隔的字符串：

years:months:weeks:days:hours:minutes:seconds

来源

2012-02-08 15:10:22 Toto

格式化日期:: MANIP的三角洲天

回答

相关问题