perl,rrdtool及时间转换

gaochong

现在已经用perl和rrdtool画出图来，图见附件。


但我需要能够实现：根据在页面中，指定开始时间和终止时间，得到对应的图。


我现在遇到的困难有2点：
1.如果根据时间（比如格式如：2010-05-10 00:00:00)转换为从1970年1月1日00：00：00到这个时间的秒数。
2.如何实现，根据开始和终止时间，来得到这个时间段的图？见下图


谢谢！

orangetouch

回复 1# gaochong

1. use Date::Calc

复制代码

gaochong

谢谢！

第二个问题如何实现呢？

请教。

nuclearxin

等待高手。但是你都实现了画图了 剩下的第二个问题就是 使用软件的问题了吧

py

回复 1# gaochong


    1. 在简单的时间日期转换的时候我觉得用模块不值。

1. my ($sec,$min,$hour,$mday,$mon,$year,$wday) = localtime($unixtime);

复制代码

然后sprintf一下也就可以得到日期格式了，比如：

1. my $timestamp = sprintf("%04d-%02d-%02d %02d:%02d:%02d",
   
2.          $year+1900,$mon+1,$mday,$hour,$min,$sec);

复制代码

2. 看过RRD文档吗？即使只看过一点也能知道这个答案的。
通过RRD画图的模块很多，但基本上都是基于RRDs，所以最好是直接use RRDs

1. RRDs::graph("file.rrd",'--width=700', '--height=200','--start', $start_time,'--end', $end_time,....);

复制代码

后面我省略了参数，其实RRDs的使用和命令rrdtool graph的使用是一样的，RRDs模块只是用XS把rrdtool的C API简单包装了一下而已。所以用的时候就觉得比较简陋，但效率肯定是最高的。