私のプログラムには次のような配列があります。
... #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
]