Perl 子程序变量外部使用--又称为闭包

概述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"};##外部变量在子程

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>perl 4.pl1---$var is aaaaaaaaa2----$var is aaaaaaaaa$var3 is bbbbbbbbbb3---$var2 is4----$var2 is要想子程序里的变量在外部生效,引用变量必须为全局变量G:\运维系统开发\Tk>perl 4.pl1---$var is aaaaaaaaa2----$var is aaaaaaaaa$var3 is bbbbbbbbbb3---$var2 is4----$var2 is bbbbbbbbbb

总结

以上是内存溢出为你收集整理的Perl 子程序变量外部使用--又称为闭包全部内容，希望文章能够帮你解决Perl 子程序变量外部使用--又称为闭包所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。