ご存じのとおり、Perlのsplit関数は、指定したセパレーターで文字列を分割してリストにします。
使い方とサンプルは下記の通り。
■使い方
■サンプル
@listの内容は、下のようになっています。※Data::Dumperを使用した出力。
そして、この逆の処理をしてくれるのが、join関数です。
$var_afterの内容は、下のようになって$var_beforeと同じになりました。
でも、splitしてjoinして元に戻すのは、はたしてこの方法で良いのでしょうか？
使い方とサンプルは下記の通り。
■使い方
split /PATTERN/, EXPR, LIMIT
split /PATTERN/, EXPR
split /PATTERN/
split
$var_before = "Sato:Suzuki:Kimura";
@list = split(/:/, $var_before);
@listの内容は、下のようになっています。※Data::Dumperを使用した出力。
$VAR1 = 'Sato'; $VAR2 = 'Suzuki'; $VAR3 = 'Kimura';
そして、この逆の処理をしてくれるのが、join関数です。
$var_before = "Sato:Suzuki:Kimura";
@list = split(/:/, $var_before);
$var_after = join(":", @list);
$var_afterの内容は、下のようになって$var_beforeと同じになりました。
$VAR1 = 'Sato:Suzuki:Kimura';
でも、splitしてjoinして元に戻すのは、はたしてこの方法で良いのでしょうか？
Continue reading Perl splitしてjoinしても元に戻らない？.
