如何在 Perl 中创建数组?
Perl 数组变量名前应加 @ 符号,并且使用括号或 qw 运算符填充。例如:
@array = (1, 2, 'Hello'); @array = qw/This is an array/;
第二行使用 qw // 运算符,它返回一个字符串列表,用空格分隔定界字符串。在该示例中,这会产生一个包含四个元素的数组;第一个元素为 'this',最后一个(第四个)元素为 'array'。这意味着你可以使用不同行,如下所示:
@days = qw/Monday Tuesday ... Sunday/;
你还可以通过分别将每个值分配给数组来填充数组,如下所示:
$array[0] = 'Monday'; ... $array[6] = 'Sunday';
广告