Perl 标量函数

描述

该函数强制 EXPR 的计算在标量上下文中进行，即使它通常在列表上下文中工作。

句法

以下是该函数的简单语法 -

scalar EXPR

返回值

该函数返回标量。

例子

以下是显示其基本用法的示例代码 -

#!/usr/bin/perl -w

@a = (1,2,3,4);
@b = (10,20,30,40);

@c = ( @a, @b );
print "1 - Final Array is @c\n";

@c = ( scalar(@a), scalar(@b) );
print "2 - Final Array is @c\n";

执行上述代码时，会产生以下结果 -

1 - Final Array is 1 2 3 4 10 20 30 40
2 - Final Array is 4 4