Question

我正在研究一个 perl 模块, 寻找窗体的输出( 字符串) : < code> a: value1 OR a: value2 OR a: value3 OR...

数值 value1, value2, value3... 在数组中( says, @values) 。

我知道我们可以使用 join( OR, @values) 来创建窗体的连接字符串: value1 ORvalue2 ORvalue3 OR...

但如上所述,我还需要一个额外的 < code> a: 来为每个值预设。

这样做有什么好办法?

Answer 1

您通常使用 < a href=> "http://perldoc.perl.org/forms/map.html" rel="noreferrer">map 来做这些事情:

#!/usr/bin/env perl
use strict;
use warnings;

my @array = qw(value1 value2 value3);
print join(" OR ", map "a:$_", @array),"
";

产出:

a:value1 OR a:value2 OR a:value3

map 是一个简单的循环构造, 如果您想要对列表的每个元素应用一些简单的逻辑, 而不对您的代码做太多的杂乱, 这会有用。