perl 中的my和全局变量

本文介绍了 Perl 语言中 my、our 和 local 三种变量的作用域。my 变量是词法作用域,只在声明它的代码块内可见;our 变量在同一作用域内可以被多次声明并修改值;local 则是对全局变量的临时覆盖,仅在特定作用域内有效。通过示例代码展示了它们的使用和效果。

摘要生成于 C知道 ,由 DeepSeek-R1 满血版支持, 前往体验 >

$Some::stuff 使用包some的标准变量$stuff


our 把名字限制于一个作用域,

local 把值限制于一个作用域,

my 把名字和值都限制于一个作用域



my变量:
[root@master Webqq]# cat t5.pl 
{my $var=11;print "\$var is 1--$var\n";}{print "\$var is 2--$var\n"};
{our $var=11;print "\$var is 1--$var\n";}{print "\$var is 2--$var\n"};
[root@master Webqq]# perl t5.pl 
$var is 1--11
$var is 2--
$var is 1--11
$var is 2--11



our变量:

[root@master Webqq]# cat t6.pl 
our $PROGRAM_NAME = "waiter";
{
my $PROGRAM_NAME = "something";
print "\$PROGRAM_NAME is 1---$PROGRAM_NAME\n";
our $PROGRAM_NAME = "server"; #这里的our和外面的相同,和前句不同。
print "\$PROGRAM_NAME is 2----$PROGRAM_NAME\n";
# 这里调用的代码看到的是"server"
 }
print "\$PROGRAM_NAME is 3----$PROGRAM_NAME\n";
[root@master Webqq]# perl t6.pl 
$PROGRAM_NAME is 1---something
$PROGRAM_NAME is 2--
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包

打赏作者

scan724

你的鼓励将是我创作的最大动力

¥1 ¥2 ¥4 ¥6 ¥10 ¥20
扫码支付:¥1
获取中
扫码支付

您的余额不足,请更换扫码支付或充值

打赏作者

实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值