perl scalar

语法

scalar EXPR

定义和用法

强制计算EXPR在标量上下文中，即使它会在列表环境中正常工作。

返回值

• 标量（Scalar）

例子 #!/usr/bin/perl -w
 #by
@a = (1,2,3,4);
@b = (10,20,30,40);
@c = ( @a, @b );
print "1 - Final Arrary is @c\n";
@c = ( scalar(@a), scalar(@b) );
print "2 - Final Arrary is @c\n";

这将产生以下结果：

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