41、Perl 数据存档与磁盘使用监控应用实践

Perl 数据存档与磁盘使用监控应用实践

1. 数据存档到文件

当我们获取到感兴趣的四条信息后，就可以将这些数据存档到日志文件中。以下是具体操作步骤：
1. 打开文件 ：使用 open 命令打开文件，不过这里有个小技巧。在文件名前加上两个大于号 >> ，这会告诉 Perl 以追加模式打开文件。
2. 创建字符串 ：使用 join 命令创建一个包含当前时间戳和正常运行时间信息的字符串，并用冒号分隔。
3. 获取时间戳 ：为了能准确分析这类信息随时间的变化，我们需要为每个数据点关联一个时间戳。使用 time 命令，它会返回自纪元（在 Unix 系统中是 1970 年 1 月 1 日）以来的非闰秒数。例如：

$ perl -e 'print time, "\n"'
    1011168000
$ perl -e 'print scalar localtime 1011168000, "\n"'
    Wed Jan 16 00:00:00 2002

除了内置的 localtime 命令，还有大量 Perl 扩展可用于操作时间戳。
4. 写入文件 ：使用 print 命令将分隔好的字符串写入文件，然后关闭文件并退出。

<