次のテキストと数字を含むファイルがあります。
state(1, s(1,a), [s(1,b)]).
state(1, s(1,b), [s(1,a)]).
state(1, s(2,a), [s(2,b)]).
state(1, s(2,b), [s(2,a)]).
state(1, s(3,a), [s(3,b)]).
state(1, s(3,b), [s(3,a)]).
state(1, s(4,a), [t(1), t(2)]).
state(1, s(5,a), [t(1), t(3)]).
state(1, s(6,a), [s(6,b)]).
state(1, s(6,b), [s(6,a)]).
...so on
s(x,y) の数字を次のように変更したいと思います。
state(1, p(1), 0, [p(2)]).
state(1, p(2), 0, [p(1)]).
state(1, p(3), 0, [p(4)]).
state(1, p(4), 0, [p(3)]).
state(1, p(5), 0, [p(6)]).
state(1, p(6), 0, [p(5)]).
state(1, p(7), -1, [t(1), t(2)]).
state(1, p(8), -1, [t(1), t(3)]).
state(1, p(9), 0, [p(10)]).
state(1, p(10), 0, [p(9)]).
...so on
状態の3番目のパラメータの0と-1は、単にss（またはpp）接続の存在/存在（0と表示）または接続の欠如（-1と表示）を表します。
私は「sed」を試しましたが、まったく成功しませんでした。
いくつかのヒントや回避策を得ることができますか？
ベストアンサー1
シェルループの代わりに適切なテキスト処理ツールを使用してください。:
gawk -F'(,[[:blank:]]+\\[?|\\]\\)\\.)' '!twice{ seen[$2]=NR; next } {
print $1, "p(" FNR ")", (($3 in seen)?"0, [p("seen[$3]")":"-1, ["$3", "$4)"]).";
}' OFS=', ' infile twice=1 infile
フィールド区切り文字を,<one-or-more-whitespaces><with-optional-]>またはセットとして定義します。]).
入力ファイルをinfile2回処理するので、最初に上記のFSに基づいて2番目のフィールドを読み取り、それを関連する名前付きseen配列に追加します。この配列のキーは2番目のフィールドの内容で、各値はNRです（NRawkで表されます）。窒素数量右入力されたレコードFNRは同じですが、次の入力ファイルごとにリセットされます。すべての行を読み取り、完了するまでこのループが繰り返されます。変数twice=1と条件は、!twiceawkが最初のブロックを1回だけ実行し、最初は入力ファイルのみを処理できるようにするために使用されます。
この行はprint2番目の実行のためのもので、最初のフィールドを印刷してp(#)（ここで#sはFNRとして再現されます）、seen配列に一致するものが見つかった場合は、配列内のすべてのキーの3番目のフィールドを確認します。その後、印刷します0, [p(#)]).（#配列内の一致するキー値が表示される位置番号はどこにありますか？）。それ以外の場合は印刷します。-1, [...]).