Perl中以my开头的语句，my是什么作用？

像C语言中有作用域的概念，比如一个在函数中定义的变量，在函数外是无效的。
perl也有作用域的概念，perl定义的变量默认是全局的，当在定义变量时使用
my $abc，那么$abc的作用域就限定在当前函数体或当前for循环中。
乃局部变量。
不知道我的回答是否贴切，总之是作用域的定义。

my是关键字，表示定义局部变量，你试试取消my看，如果在严格语法下会出错，否则my的语句都可以取消。

our,"把名字限于某个范围“，其实就是明确声明一个"全局变量"，虽然是在某个模块或者函数里面定义的，外面的也可以访问，如果已经声明过了，再次用"our",表示此处用的是全局的那个，不是同名的私有或者局部变量

our $PROGRAM_NAME = "waiter";
{

my $PROGRAM_NAME = "something";
our $PROGRAM_NAME = "server"; #这里的our和外面的相同，和前句不同。
# 这里调用的代码看到的是"server"
}
# 这里执行的代码看到的仍然是"server".

my ,"把名字和值都限于限于某个范围",简单说，就是只能本层模块或者函数可以看到这个变量，高一层的或者低一层的都看不到的。
sub greeting1{
my ($hello) = "How are you do?";
greeting2();
}

sub greeting2{
print "$hello\n";
}
$hello = "How are you doing?";
greeting2();
greeting1();
greeting2();

运行