Perl中的循环引用

当两个引用包含彼此的引用时,就会在Perl中发生循环引用。创建引用时必须要小心,否则循环引用可能会导致内存泄漏。以下是一个例子-

示例

#!/usr/bin/perl
my $foo = 100;
$foo = \$foo;
print "Value of foo is : ", $$foo, "\n";

输出结果

执行以上程序后,将产生以下结果-

Value of foo is : REF(0x9aae38)