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

下载首页

网络学院

最近更新

ASP技术 PHP技术 JSP技术 .Net专区数据库网站建设服务器图形图像程序设计网络安全冲浪宝典软件教学认证考试特别专栏

ASP代码	.NET代码	PHP代码	CGI&Perl	Java代码	Flash代码	C/C++/VC	PowerBuilder	Delphi	VisualBasic	论坛相关
常用软件	汇编	开发工具	控件库	服务器类	书籍教程	网页素材	VisualFoxpro	字体下载	其它源码	商业注册

赞助广告

当前位置：网络学院 → 图形图像 → Authorware → PERL5中怎样找到一年中的星期和一年中的一天

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

日期：2001年7月17日作者：不详人气： 查看:[大字体中字体小字体]

日期是由函数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是第一个星期是从星期三开始的

（出处：不详）

相关文章：