テキストAの最初のインスタンスからテキストBの最初のインスタンスに印刷[重複]

テキストAの最初のインスタンスからテキストBの最初のインスタンスに印刷[重複]

私のプログラムには次のような配列があります。

  ... #code
  $packages = [ 
    'git',        # version control
     ...
    'iftop',      # monitor network usage by ip
    'iotop',      # monitor io usage
  ]
  ... #more code

awk$packagesの最初の発生から発生の]最初の終わりまで行を印刷するために使用したいと思います$packages

どうすればいいですか?

ベストアンサー1

レコードを繰り返し、識別子を保持し$packages、識別子が設定されている場合は行を印刷し、次が見つかった場合は終了します]

awk '/\$packages/ {c=1; print; next} /\]/ {print; exit}; c{print}'

例:

% cat file.txt 
  ... #code
  $packages = [ 
    'git',        # version control
     ...
    'iftop',      # monitor network usage by ip
    'iotop',      # monitor io usage
  ]
  ... #more code

  ... #code
  $packages = [ 
    'git',        # version control
     ...
    'iftop',      # monitor network usage by ip
    'iotop',      # monitor io usage
  ]
  ... #more code

% awk '/\$packages/ {c=1; print; next} /\]/ {print; exit}; c{print}' file.txt   
  $packages = [ 
    'git',        # version control
     ...
    'iftop',      # monitor network usage by ip
    'iotop',      # monitor io usage
  ]

おすすめ記事