將 Perl 陣列轉換為字串

在 Perl 中，我們可以使用 join() 函式重新連線陣列元素，形成一個長標量字串。此函式的語法如下 −

語法

join EXPR, LIST

此函式將 LIST 的多個字串連線成一個字串，各個欄位由 EXPR 的值分隔，並返回該字串。以下為示例 −

示例

 即時演示

#!/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);

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

print "$string1\n";
print "$string2\n";

輸出

將生成以下結果 −

Rain-Drops-On-Roses-And-Whiskers-On-Kittens
Larry,David,Roger,Ken,Michael,Tom

Mohd Mohtashim

更新於： 2019-11-29

8K+ 次瀏覽

開啟你的 職業生涯

完成課程即可獲得認證

開始