将 Perl 字符串转换成数组

我们来研究一个叫作 split() 的 Perl 函数，其语法如下 -

语法

split [ PATTERN [ , EXPR [ , LIMIT ] ] ]

此函数将字符串分成一个字符串数组并返回它。如果指定了 LIMIT，则最多拆分为那么多域。如果省略了 PATTERN，则按空格拆分。以下是示例 -

示例

 现场演示

#!/usr/bin/perl
# define Strings
$var_string = "Rain-Drops-On-Roses-And-Whiskers-On-Kittens";
$var_names = "Larry,David,Roger,Ken,Michael,Tom";

# transform above strings into arrays.
@string = split('-', $var_string);
@names = split(',', $var_names);

print "$string[3]\n";    # This will print Roses
print "$names[4]\n";     # This will print Michael

输出

这将产生以下结果 -

Roses
Michael

更新日期： 2019 年 11 月 29 日

2K+ 浏览量

开启你的 职业生涯

通过完成课程，获得认证

开始吧
广告