emacs(lisp)で、リージョン中の内容をre-search-forwardとreplace-matchなどの組み合わせで置換していくときに、構文のfooは置換したいけれど、文字列中のfooは置換したくない、という場合は、どうするのが定石なのでしょうか。
foo "foo" foo Foo
=> bar "foo" bar Foo
という風に置換したい場合の定石があれば教えて下さい。
二重引用符に囲まれているものが syntax的に文字列として認識されているので
あれば syntax-tableの情報を使うという手があります. 文字列内にいるか
どうかは syntax-ppss
の 4番目(index的には 3)が non-nilの場合,
現在文字列内にいるということになります.
これを使うと以下のようにすることで文字列中以外のところに fooだけ barに置換することができます.
(while (re-search-forward "foo" nil t)
(unless (nth 3 (syntax-ppss))
(replace-match "bar")))
上述のとおり syntax-tableの情報を使うので, fundamental-mode等では 利用することができません.
ちょっと複雑ですが、正規表現の後読み (?<=PATTERN)
や 先読み (?=PATTERN)
を使えばできます。
emacs 標準の正規表現置換 replace-regexp
は後読み・先読みが使えない (Emacs does not support Perl-style lookahead/lookbehind) ので、M-|
で起動する shell-command-on-region
で Perl ワンライナを実行します。
C-u M-|
をタイプperl -pe 's/(?<!")foo(?!")/bar/g'
上記手順 2 の C-u
は、選択中のリージョンを Perl の出力で置き換えるために必要な prefix argument というものです。これをタイプしないと外部コマンドの出力は *Shell Command Output* バッファに出力されます。
emacs 標準の正規表現は機能不足であったりエスケープも面倒なので、手の込んだ置換をしたい場合には外部コマンドの正規表現を使うのがオススメです。