Форматирование даты :: Дельта манипа по дням

Question

У меня есть эта рутина,

Я хочу сохранить эту дельту для подсчета дней между всеми до и из дней в парах из-в У меня есть в 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");

    }

}

Answer 1

Чтобы получить значения дельты, вы должны использовать следующее:

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();

, который дает строку с одинаковыми разделенными двоеточиями элементами:

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