数组 – 如何在perl中以字节为单位获取数组的大小？

发布时间：2020-12-15 21:16:23 所属栏目：大数据来源：网络整理

导读：我需要在perl中获取数组大小,但大小必须以字节为单位.我找不到任何功能. 提前致谢解决方法您可以使用Devel :: Size模块执行此操作 – https://metacpan.org/pod/Devel::Size #!/usr/bin/perluse strict;use warnings;use Devel::Size qw(total_size);my @a

我需要在perl中获取数组大小,但大小必须以字节为单位.我找不到任何功能.
提前致谢

解决方法

您可以使用Devel :: Size模块执行此操作 – > https://metacpan.org/pod/Devel::Size

#!/usr/bin/perl

use strict;
use warnings;
use Devel::Size qw(total_size);

my @arr = (1,2,3,"Foo","Bar","Baz",[4,5,6],{xyz => 2048});

print "Size: ",total_size(@arr)," bytes.n";

在我的系统上打印：

bria@hel:~$./size.pl
Size: 765 bytes.
bria@hel:~$

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!