珀尔 | reverse()函数

Perl 中的 reverse()函数在列表上下文中使用时，会更改列表中元素的顺序并以相反的顺序返回列表。在标量上下文中，返回 List 值的串联字符串，字符串的每个字符以相反的顺序排列。

Syntax: reverse List

Returns:
String in Scalar Context and List in List Context.

示例 1：在列表上下文中：

#!/usr/bin/perl -w
  
# Defining list of +ve Integers to the array
@array1 = (20, 30, 40, 50, 60, 70);
print reverse(@array1), "\n";
  
# Defining list of Integers to the array
@array2 = (1, -2, 3, 4, -5, 6);
print reverse(@array2), "\n";

输出：

706050403020
6-543-21

示例 2：在标量上下文中：

#!/usr/bin/perl -w
  
# Defining string to be reversed
$string = "Hello World";
print scalar reverse("$string"), "\n";
  
$string = "Geeks For Geeks";
print scalar reverse("$string"), "\n";

输出：

dlroW olleH
skeeG roF skeeG