小编use*_*639的帖子

我正在尝试将1.4亿比特的二进制向量解包到列表中.我正在检查这个函数的内存使用情况,但看起来很奇怪.内存使用量增加到35GB(GB而不是MB).我怎样才能减少内存使用量？

sub bin2list {
    # This sub translates a binary vector to a list of "1","0" 
    my $vector = shift;
    my @unpacked = split //, (unpack "B*", $vector );
    return @unpacked;

}