日付から期間を計算する

Perl CPAN 
#!/usr/bin/perl
use strict;
use warnings;
use Date::Simple;

my $term = Date::Simple::date('2009-02-06') - Date::Simple::date('2009-02-04');
print $term, "\n",

実行結果

1

期間は、開始日から終了日まで何日存在するかを計算して。日数を返す。
そのため、ループする制御構造の中で両端入れや片端入れを考慮する場合は、目的に沿った日数を加算する必要がある。