批处理之家 - Powered by Discuz! Board

标题: [问题求助] [已解决]Perl怎样根据日期计算星期？ [打印本页]

作者: DAIC 时间: 2011-6-3 20:53 标题: [已解决]Perl怎样根据日期计算星期？

本帖最后由 DAIC 于 2011-6-3 23:59 编辑

星期一：1
星期二：2
......
星期日：7

今天是2011-06-03，如果计算出对应的数字5？

作者: Demon 时间: 2011-6-3 21:43

本帖最后由 Demon 于 2011-6-3 21:48 编辑

我再说一遍，问问题要找对地方。下一次我不会回答！

use Date::Calc 'Day_of_Week';
$date = '2011-06-03';
($year, $month, $day) = ($date =~ (/(\d+)-(\d+)-(\d+)/));
print Day_of_Week($year, $month, $day);
复制代码

作者: 随风 时间: 2011-6-3 21:57

2# Demon

这里也有 Perl 版块，只是刚刚开设，人气还少，很欢迎也很需要你这样高手多多解答新手的问题.
为何就一定要别人不要到这里提问呢？

作者: Demon 时间: 2011-6-3 22:03

本帖最后由 Demon 于 2011-6-3 22:05 编辑

2# Demon

这里也有 Perl 版块，只是刚刚开设，人气还少，很欢迎也很需要你这样高手多多解答新手的问题.
为何就一定要别人不要到这里提问呢？
随风发表于 2011-6-3 21:57

在这里提问无异于缘木求鱼，你会到一个Perl论坛去问批处理的问题？

我不是什么高手，我也只看了两天Perl，这些问题只要认真看书根本就不是问题。让他找个正确的地方，不是能更快找到答案吗？

作者: 随风 时间: 2011-6-3 22:17

4# Demon

如果那个 Perl论坛也有批处理版块的话，如果我又正好在那里学 perl 的话，我会。
到相对专业点的论坛去找答案当然是最好的
可是在自己喜欢或方便的论坛来提问也未尝不好
论坛既然开设了相关版块，就是希望能多多吸收该类的问题和答案，任何会员的提问或解答都是论坛宝贵的财富
方便自己和帮助别人的同时，也为论坛添砖加瓦，何乐而不为呢 ^_^

作者: Demon 时间: 2011-6-3 22:42

4# Demon

如果那个 Perl论坛也有批处理版块的话，如果我又正好在那里学 perl 的话，我会。
到相对专业点的论坛去找答案当然是最好的
可是在自己喜欢或方便的论坛来提问也未尝不好
论坛既然开设了相关版块 ...
随风发表于 2011-6-3 22:17

放在这里一个月也不见得会有人回答。

作者: Batcher 时间: 2011-6-3 23:06

perl -le "($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);printf $wday"
复制代码

作者: 523066680 时间: 2011-6-3 23:18

我再说一遍，问问题要找对地方。下一次我不会回答！

欢迎光临批处理之家 (http://bbs.bathome.net/)