perl获取linux缓存的内存号

内容导读

互联网集市收集整理的这篇技术教程文章主要介绍了perl获取linux缓存的内存号，小编现在分享给大家，供广大互联网技能从业者学习和参考。文章包含1316字，纯文字阅读大概需要2分钟。

内容图文

我正在写一个perl脚本,我真的想获得当前在我的linux盒子上使用的缓存内存量.当你运行“free -m”时,你得到这个输出：

             total       used       free     shared    buffers     cached
Mem:           496        322        173          0         33        106
-/+ buffers/cache:        183        312
Swap:         1023         25        998

“缓存”下的数字是我想要的值.我一直在使用Linux::SysInfo,这有助于我获得有关我的盒子的很多有用信息,但似乎缺乏缓存内存.有没有人知道perl中的另一个模块或优雅方式来获取我的机器上的缓存内存量？我知道我可以通过运行它来获得它：

my $val = `free -m`;

然后在val上运行正则表达式,但如果存在,我更喜欢另一种解决方案.谢谢！

解决方法:

我不确定您是否只需要Perl解决方案,或者是否可以接受任何命令行解决方案.以防万一,这是一个简单的AWK解决方案：

free -m | awk '/^Mem:/{print $NF}'

这将打印您感兴趣的数字.

如果有必要,您可以将其分配给某个shell变量：

$c_val=`free -m | awk '/^Mem:/{print $NF}'`
$echo $c_val

将显示要验证的值.

awk命令的说明：

/ ^ Mem：/在开始时搜索包含字符串Mem：的行.如果找到它,则打印该行上的最后一项,这是我们感兴趣的数字.在awk中,该行根据空白区域分割成字段. $0是整行,$1是第一个字段,$2是第二个字段等.每行的字段数由预定义的awk NF变量给出,因此我们可以使用$NF访问该行的最后一个字段.

我们也可以使用这个awk命令：

awk 'NR==2{print $NF}'

它使用包含当前行号的预定义awk NR变量.在这种情况下,我们打印第二行的最后一项(字段).

内容总结

以上是互联网集市为您收集整理的perl获取linux缓存的内存号全部内容，希望文章能够帮你解决perl获取linux缓存的内存号所遇到的程序开发问题。 如果觉得互联网集市技术教程内容还不错，欢迎将互联网集市网站推荐给程序员好友。

内容备注

版权声明：本文内容由互联网用户自发贡献，该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容， 请发送邮件至 gblab@vip.qq.com 举报，一经查实，本站将立刻删除。

内容手机端

---