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)