在Perl中定义和调用子例程

Perl编程语言中子例程定义的一般形式如下：

sub subroutine_name {
   body of the subroutine
}

调用该Perl子例程的典型方式如下-

subroutine_name( list of arguments );

在Perl 5.0之前的版本中，调用子例程的语法略有不同，如下所示。这仍然可以在最新版本的Perl中使用，但不建议这样做，因为它会绕过子例程原型。

&subroutine_name( list of arguments );

让我们看下面的示例，该示例定义一个简单的函数，然后调用它。因为Perl在执行程序之前先对其进行编译，所以在哪里声明子例程都没有关系。

示例

#!/usr/bin/perl
# Function definition
sub Hello {
   print "Hello, World!\n";
}
# Function call
Hello();

输出结果

执行以上程序后，将产生以下结果-

Hello, World!