Perl 子程序变量外部使用--又称为闭包
2015-02-01 15:03
176 查看
my $var = "aaaaaaaaa"; print "1---\$var is $var\n"; &fun1; &fun2; #子程序用的变量会被销毁 print "3---\$var2 is $var2\n"; print "4----\$var2 is $$var3\n"; sub fun1{ print "2----\$var is $var\n"}; ##外部变量在子程序中仍旧有用 sub fun2{ my $var2="bbbbbbbbbb"; # my $var3=\$var2; $var3=\$var2; print "\$var3 is $$var3\n"; }; #此时的结果: G:\运维系统开发\Tk\1>perl 4.pl 1---$var is aaaaaaaaa 2----$var is aaaaaaaaa $var3 is bbbbbbbbbb 3---$var2 is 4----$var2 is 要想子程序里的变量在外部生效, 引用变量必须为全局变量 G:\运维系统开发\Tk\1>perl 4.pl 1---$var is aaaaaaaaa 2----$var is aaaaaaaaa $var3 is bbbbbbbbbb 3---$var2 is 4----$var2 is bbbbbbbbbb
相关文章推荐
- 使用闭包解决jQuery中AJAX的外部变量问题
- js使用闭包时,内部函数是直接访问外部函数的实际变量而非复制一份新变量
- js中解决函数中使用外部函数局部变量的问题(闭包问题)
- perl正则的命名捕获与匹配变量使用
- 在perl正则表达式中使用变量
- objective-c中 外部变量的使用方法
- 享变量内有一个函数指针,是外部传进来的。 可我一使用这个函数指针,就出错了
- 1-16使用外部变量
- 输入一段文本,求最长行(前后两个换行符之间的句子),底下特别版使用外部变量 [ 来自C程序书,小有变动 ]
- perl变量使用范围非常经典详解
- sed&awk使用外部变量
- C语言外部变量(extern)的使用
- perl 子程序传递参数不同类型变量 设置
- 为什么内部类访问的外部变量需要使用final修饰
- [译]Perl:使用__SUB__获得当前子程序的引用
- Dll 模块间(dll, exe)使用导出变量、静态变量和外部变量的试验与结论
- perl:在Subroutine中使用全局变量
- 享变量内有一个函数指针,是外部传进来的。 可我一使用这个函数指针,就出错了
- 外部声明在变量声明中的使用与原由
- perl中子程序的运用,以及在子程序中变量进行私有(my)声明的重要性