1.定义一个方法　　Perl使用sub定义方法。　　语法：　　sub 方法名称{方法体}　　方法体内部通过@_接收参数。@_是数组。取值的方法也可以采用下标的形式取得。br/>2.调用一个方法　　Perl直接使用方法名称调用方法。　　调用方式有以下四种：　　　　方法名称；　　　　&方法名称；　　　　方法名称();　　　　&方法名称();　　说明：方法调用可以再任何位置，可以在方法前、后调用，也可以在方法体内部调用。　　3.传递参数　　Perl通过方法名后面的括号将参数列表传递到方法体内。例如：function_name("param1","param2"...);　　方法体内部通过@_接收参数。@_是数组。取值的方法也可以采用下标的形式取得。　　关于传值和传引用：

#引用函数

fun_say_hello; &fun_say_hello; fun_say_hello(); &fun_say_hello();

#传递参数

sub fun_say_hello_withname{

($name) = @; print "hello,$name!\n"; }

fun_say_hello_with_name("Tom");

#传值和传引用

sub fun_changename1{

($fname) = @; $fname = "Jack"; }

sub fun_changename2{

@[0] = "Jack"; }

$name = "Tony";

fun_change_name1($name); print "$name\n"; fun_change_name2($name); print "$name\n";

#返回值

sub checklogin{

($name) = @; if ($name eq "Tony") { return "welcome\n"; } else { "sorry\n"; } }

print check_login("Tony");

print check_login("Jack");



版权声明：本文为博主原创文章，未经博主允许不得转载。本文已收录于以下专栏：perl学习