Perl 教程 之 Perl 数组 10

Perl 数组

Perl 数组一个是存储标量值的列表变量，变量可以是不同类型。

将数组转换为字符串

Perl 中将数组转换为字符串使用 join() 函数，语法格式如下：

join EXPR, LIST
参数说明：

EXPR：连接符。
LIST：列表或数组。
实例

!/usr/bin/perl

定义字符串

$var_string = "www-baidu-com";
$var_names = "google,taobao,baidu,weibo";

字符串转为数组

@string = split('-', $var_string);
@names = split(',', $var_names);

数组转为字符串

$string1 = join( '-', @string );
$string2 = join( ',', @names );

print "$string1\n";
print "$string2\n";
执行以上程序，输出结果为：

www-baidu-com
google,taobao,baidu,weibo