文字列から改行を取り除く

変数の中に余計な改行が含まれていると、出力した際に表示が崩れてしまうなどの原因になります。というわけで、文字列の中から改行だけをバッサリ削除してしまいましょう。 Perlでは、正規表現を使うと、いとも簡単に改行を削除できてしまいます。

「 \n 」と「 \r 」を削除すれば、改行を削除したことになります。正規表現を使って次のように書けばOKです。


			$string =~ s/\r//;

			$string =~ s/\n//;

上記は、変数 $string を処理対象にしていて、1行目では「文字列中の \r を削除」、2行目では「文字列中の \n を削除」しています。

正規表現で s/ABC/DEF/; と書けば、それは、「ABC」を「DEF」に置き換える、という指示になります。ここでは、「DEF」の部分をなくし、s/ABC//; とすることで、「ABC」を削除、しているわけです。


			$string = "本日は晴天なり。";

			$string =~ s/晴天/雨天/;

			print $string;

上記のコードを実行すると、「本日は雨天なり。」と表示されます。(^^;)
「晴天」が「雨天」に置き換えられたわけです。

2004/02/23. Mon.

このページに記載の内容は、必ずしも正しいとは限りません。ご注意下さい。
製作者にししへのご連絡は、メールなどでお送り下さい。
どのページへもリンクは歓迎します。

文字列操作関連TIPS