perlメモ:join(区切り文字を指定して文字列を連結)

文字列を特定の区切り文字で結合して一つの文字列にする場合はjoinコマンドを利用する。
join EXPR,LIST

$rec = join(‘:’, $login,$passwd,$uid,$gid,$gcos,$home,$shell);

・EXPRには区切り文字
・LISTには結合したい文字列をカンマ区切りまたは配列(@array)で指定する。


こう書くのと同じ

$rec = “$login:$passwd:$uid:$gid:$gcos:$home:$shell”;

掲示板のCGIとかでログの一行を作る時に使うかな?
こういう風にすると

$rec = join(‘:’, $login,$passwd,$uid,$gid,$gcos,$home,$shell,”\n”);

作成されるデータは実質下記の様になってログ用にいいかな?
login:passwd:uid:gid:gcos:home:shell:改行
こう書くのと同じ

$rec = “$login:$passwd:$uid:$gid:$gcos:$home:$shell:\n”;

▼詳細(英語)
http://perldoc.perl.org/functions/join.html

(Visited 88 times, 1 visits today)

タグ :