当前位置:首页 > 操作系统 > Linux

perl获取linux缓存的内存号

我正在写一个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变量.在这种情况下,我们打印第二行的最后一项(字段).


【说明】本文章由站长整理发布,文章内容不代表本站观点,如文中有侵权行为,请与本站客服联系(QQ:254677821)!

相关教程推荐

其他课程推荐