perl - 正規表現を使用して変数の末尾に \n を一致させる方法

Question

たとえば、ファイルを変数に保存しました$buffer。"\n"の末尾にがあります$buffer。空の値に置き換えたい。私は試した

regexp "\n$" $buffer

動作していません。コードは TCL で書かれていますが、Perl または TCL でそれを行う方法を知る必要があります。

score 5 · Accepted Answer

5

string trim $buffer \n

マニュアルを参照してください。

于 2012-05-05T09:13:42.217 に答える

score 3 · Accepted Answer

In Perl chomp removes the end-of-record separator. So, to remove the '\n' all you need in is chomp $buffer.

score 2 · Accepted Answer

2

どうですか：regsub {\n$} $buffer ""

于 2012-05-05T09:14:47.313 に答える

score 2 · Accepted Answer

chomp@Borodinが言ったように、おそらく最良ですが\z、文字列の最後でのみ一致させるために使用することもできます：

$buffer =~ s/\n\z//;

score 1 · Accepted Answer

パールでは:

$buffer =~ s/\n$//;

=~は結合演算子、sは置換演算子、は/オペランドの区切り文字であるため\n$、空の文字列に置き換えられます。

chomp($buffer)同じことを達成します。

score -2 · Accepted Answer

これが機能するかどうかを確認します。

regsub "\n$" "" $buffer

6 に答える 6