perl初心者BLOG

2009-06-01

[][]join関数 02:45

・サンプルコード

~$ cat hoge.pl
#!/usr/local/bin/perl
@arr = ("Tokyo", "Yokohama", "Oosaka");
$string = join(":", @arr);
print $string, "\n";

・実行結果

~$ ./hoge.pl
Tokyo:Yokohama:Oosaka