有些不爽，perl好像没有内置计算time_diff的功能(其实有~)

工作后主要使用的语言是C++，最近又在看erlang学学基于函数式编程的消息传递的并发模型
于是有些日子没有用perl了

今天忽然要算算自己工作几周了，本来这种事情掐掐手指也是可以算的，不过区区最终想用程序
来算（因为旁边还有几个哥们儿也要算日期）

当时机子的情况是：
开启着emacs，里面有一个*erlang*的buffer，
机子里装有几乎所有我常用的语言解释器，（如perl,python,lua,tcl,scheme,common lisp）

第一个想到使用的是python，因为有interactive shell，又可以用help(module)来查
帮助（实用主义）。结果用下面的代码算出工作时间了。。用时4分钟（比掐手指算慢太多，惭愧）

from datetime import * (date(2007,8,14) - date(2006,7,7)).days / 7

后来回想一下，自己真不够意思，明明在学erlang的呀，erlang也是interactive shell，
虽然没有类似emacs或者python那样的在线帮助，可以也可以打开docs目录查的~
所以又查erlang的文档来算（没事找抽主义），因为模块名叫calendar而不是dateXXX/timeXXX，所以花了7分钟~

代码如下：

{Diff, _} = (calendar:time_difference({ {2006,7, 7},{0,0,0} },                                           { {2007,8,14},{0,0,0} })) , Diff div 7.

晚上在家上网，忽然想起这件事情，又想着用perl是不是也可以很快算出来呢。（百无聊赖主义）

perldoc perlsub            #才想起来，这个doc不是sub列表的 perldoc perltoc             #没办法，只好看看目录了 #............................. #目录太长，只好改看activestate的html版， perldoc perlfunc            #只找到time times gmtime localtime #不过这三个函数都没有区区想要的功能 #无奈，只好到CPAN去搜， #一开始找到一个Date::Time，细看才知道是个差不多算夭折的模块 #再接着，找到DateTime，总算是找到一个功能对头的CPAN了。。。不过些时区区也不想再搜下去了 #.................不爽。

C++之父BS大伯说过，程序库对一个语言是至关重要的。。
那区区觉得，标准库对一个语言，那就是相当重要了，
回想起这个事件上perl的表现，看来大部分perl用户已经有把CPAN当作标准库的习惯了。。