点击运行
#!/usr/bin/perl my $foo = 100; $foo = \$foo; print "Value of foo is : ", $$foo, "\n";
1
#!/usr/bin/perl
2
3
my
$foo
=
100
;
4
$foo
=
\
$foo
;
5
6
print
"Value of foo is : "
,
$$
foo
,
"\n"
;
运行结果 :
正在执行...
