perl语言中的split和join_Perl

当前位置：首页 > 脚本编程 > Perl > 正文

perl语言中的split和join，供大家学习参考。注解：split把字符串转化为列表
join把列表转化为字符串

perl语言中的split和join，供大家学习参考。
注解：
split把字符串转化为列表
join把列表转化为字符串

为了方便理解，举两个小例子，供大家学习。
例1：

复制代码代码如下:

#!/usr/bin/perl

my $x=join":",4,6,8,10,12;

my @values=split/:/, $x;

my $z=join"-", @values;

print"$zn";

例2：

复制代码代码如下:

#!/usr/bin/perl
my @a=1..10;
my $results=join "|", @a;
my @result=split/|/, $results;
my $ok=join "!", @result;

print "$okn";

perl语言中的split和join