我如何在Perl中sprintf（）？

Question

考虑：

sprintf("%02d:%1d0", $tm[2], int($tm[1]/10)) if $rollup eq "600s";

每10分钟打印一次数据。

如果我想每30分钟打印一次数据，那么正确的方法是什么？ 我试过了：

 sprintf("%02d:%1d0", $tm[2], int($tm[3]/10)) if $rollup eq "600s";

如何解决此问题？

Answer 1

所有sprintf都会对参数进行格式化 - 它运行的频率由if $rollup eq "600s"部分控制。这取决于您的汇总设置/更新的方式，但假设它只是越来越多的秒数，那么像if $rollup eq "1800s"这样的东西可能会起作用