Perl
C の複数行コメントを削除する次のコードがあります。
sub StripMultilineComments {
my $string=shift();
$string =~ s#/\*.*?\*/##sg; #strip multiline C comments
return $string;
}
私はPerl
と 正規表現についてまったく新しいので、それがどのように機能するのか正確にはわかりません。
まあ、それがうまくいくと言うのはやや誇張されています。例えば、
char* s1 = "/*";
char* s2 = "*/";
になる
char* s1 = "";
と
// /*
i = 5;
// */
になる
//
そうは言っても、
$string
。$string
。置換演算子が使用するパターンが一致する
/
_*
_.*?
/s を使用)。*
_/
_3 番目のアトムは、non-greediness 修飾子 ( ) により (必要な位置で) 可能な最小文字数に一致し?
ます。