http://search.cpan.org/~stbey/Date-Calc-5.4/Calc.pod


use Date::Calc qw(Days_in_Month);
$days = Days_in_Month('2006','4');
print $days,"\n";

答案是30天
arrow
arrow
    全站熱搜
    創作者介紹
    創作者 付爸爸 的頭像
    付爸爸

    付爸爸的神奇日記本

    付爸爸 發表在 痞客邦 留言(0) 人氣()