単一の単語/変数で特殊文字を削除する方法

Question

my $var= "File/"; 
$var=~ /\w/; 
print "$var"; 

期待される結果はファイルですが、それはうまくいっています。

Answer 1

です。一致演算子（m/.../またはそれを使用している場合は/.../）は、と一致するです。文字列が正規表現と一致するかどうかを示します。文字列はまったく変更されません。

代入演算子（s/.../.../）が必要です。これは、一致するテキストを新しいものに置き換えます。この場合、一致する文字列を空の文字列に置き換えます。

my $var= "File/"; 
$var =~ s/\w//; # // is an empty replacement string 
print "$var"; 

しかし、それはまだ\wマッチ任意の単語文字（英数字とアンダースコア）として正しくありません。必要なのは\Wです。これは単語以外の文字に一致します。

my $var= "File/"; 
$var =~ s/\W//; # // is an empty replacement string 
print "$var"; 

Answer 2

ほとんどの場合、\wの代わりに\Wを使用しています。

my $var= "File/"; 

$var =~ s/\W+//g; 

print "$var"; 

出力は、あなたが間違った演算子を使用しているファイル