PERL5中怎樣找到一年中的星期和一年中的一天

領測軟件測試網 日期是由函數localtime()返回的數組中的一個元素。(參見localtime在PERL的幫助頁面的perlfunc章節中的localtime部份)。
$day_of_year = (localtime(time()))[7];
或者更容易地表示為(在5.004或以上版本中)
use Time::localtime;
$day_of_year = localtime(time())->yday;
你能夠通過這個7來區分出一年中的這個星期。
$week_of_year = int($day_of_year / 7);
當然，這個星期是從0開始的。
CPAN中的Date::Calc模塊提供了許多日期計算的功能，包括：
一年中的哪一天，一年中的哪一個星期，等等。
注意，并不是所有的事情都認為星期是從“week 1”開始的。比如，美國人常常認為第一個星期是從第一個星期一開始的，盡管ISO 8601認為WW1是第一個星期是從星期三開始的

文章來源于領測軟件測試網 http://www.kjueaiud.com/