Perl 中的循环引用
当两个引用包含彼此的引用时,就会在 Perl 中发生循环引用。在创建引用时必须小心,否则循环引用会导致内存泄漏。以下是一个示例 −
示例
#!/usr/bin/perl my $foo = 100; $foo = \$foo; print "Value of foo is : ", $$foo, "\n";
输出
当执行上述程序时,会产生以下结果 −
Value of foo is : REF(0x9aae38)
广告
当两个引用包含彼此的引用时,就会在 Perl 中发生循环引用。在创建引用时必须小心,否则循环引用会导致内存泄漏。以下是一个示例 −
#!/usr/bin/perl my $foo = 100; $foo = \$foo; print "Value of foo is : ", $$foo, "\n";
当执行上述程序时,会产生以下结果 −
Value of foo is : REF(0x9aae38)