Perl 获取文件年龄，整数
Perl get file age, round numbers
我有以下命令。
perl -l -e 'print -M $ARGV[0], " days"' $testfile
它工作正常，因为它给了我正确的年龄，并根据需要在 solaris、linux、unix 上工作。
但是格式是
"1.000000394945 days."
我想将其四舍五入，使 post 的处理比
更容易
"1.00 days."
知道如何修改它以使它们成为整数吗？
使用printf:
perl -l -e 'printf "%.2f days", -M $ARGV[0]' file
我有以下命令。
perl -l -e 'print -M $ARGV[0], " days"' $testfile
它工作正常，因为它给了我正确的年龄，并根据需要在 solaris、linux、unix 上工作。
但是格式是
"1.000000394945 days."
我想将其四舍五入，使 post 的处理比
更容易"1.00 days."
知道如何修改它以使它们成为整数吗？
使用printf:
perl -l -e 'printf "%.2f days", -M $ARGV[0]' file