我正在写一个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)!