Perl中的"$$ q"是什么意思?

use*_*870 5 perl

我正在学习Perl,我遇到了下面的代码:

print $$q, "\n"
Run Code Online (Sandbox Code Playgroud)

有一个$q变量,我们不确切知道它是什么.但是,我们知道当我们运行此代码时,它会打印出来"world".

那么,可能$q是什么?什么$$q意思?

PSI*_*Alt 5

在你的情况下$q是一个标量参考.所以$$q给你一个参考指向的标量$q.简单的例子:

$a = \"world"; #Put reference to scalar with string "world" into $a
print $$a."\n"; #Print scalar pointed by $a
Run Code Online (Sandbox Code Playgroud)