7、Perl语言深入解析：数据结构与运算符

Perl语言深入解析：数据结构与运算符

1. 内存管理：引用计数

Perl 5采用引用计数的内存管理技术。程序中的每个值都有一个关联的计数器，当有东西引用该值时，计数器增加；引用消失时，计数器减少。当计数器为零时，Perl可以安全地回收该值。

示例代码

use autodie;
use IO::Handle;
sub show_off_scope
{
    say 'file not open';
    {
        open my $fh, '>', 'inner_scope.txt';
        $fh->say( 'file open here' );
    }
    say 'file closed here';
}

在上述示例的内部块中， $fh 仅在该块内有效，且未赋值给块外的任何变量。当块结束时，其引用计数变为零，Perl会隐式调用 close() 方法关闭文件。

引用与函数

使用引用作为函数参数时，需仔细记录意图。在函数内部修改引用的值可能会让调用代码感到意外。若需修改引用内容而不影响引用本身，可将其值复制到新变量：

my @new_array = @{ $array_ref };
my %new_hash = %{ $hash_ref };

对于更复杂的引用（如嵌套数据结构），可考虑使用核心模块 Sto