如何查找持有多少字节的数据数组

Question

如何查找持有多少字节的数据数组？ @aead =（“ansfl; ahslhfalkhf aklshfakl;”）;

我在数组中找到它有多少字节的数据。

Answer 1

Devel::Size提供了衡量内存使用情况的工具。

use Devel::Size qw( total_size );
my $memory_usage = total_size(\@a);

如果您真的想要找到数组中每个字符串中的字符总数，

use List::Util qw( sum );
my $total = sum 0, map length, @a;

或

my $total = 0;
$total += length for @a;