カットしてもカットされない場合は何を使用すればよいですか？

citiesこのようなファイルがあります：

[1598] San Diego, US (inactive)
[4517] St Louis, US (inactive)
[6346] Orlando, US (inactive)

私は次のように都市名を切り取りたいです。

San Diego
St Louis
Orlando

これは私が思いつくことができる最高のものです：

cut -d ',' -f1 cities | cut -d ']' -f2

しかし、それでも名前の前にスペースが残っています。cutいくつかの文字の区切り文字を受け入れるように使用できる類似のコマンドはあり]ますか？

Awk（Awk Infoも確認してください）は、この種の質問にぴったりです。試してください：

awk -F'[],] *' '{print $2}' cities

これは、フィールドセパレータ-Fを[],] *- として定義します。これは、閉じ角括弧またはコンマのいずれかが出現し、その後にゼロまたは任意の数のスペースが続くことを意味します。もちろん、要件に合わせて変更できます。正規表現を読んでください。

行が分割されると、分割結果を使用して必要な処理を実行できます。ここでは、でのみ2番目のフィールドを印刷することにしましたprint $2。awk命令は単一引用符で囲むことが重要です。そうしないと、シェルによって$ 2が置換されます。

cutパイプラインの最後を次のように変更できます。

cut -d ' ' -f2-

上記は、フィールドセパレーターが空白であり、2番目から始まるすべてのフィールドを選択することを意味します。完全なシーケンスは次のようになります。

cut -d ',' -f1 cities | cut -d ' ' -f2-

より複雑な解析を行うには、sed（1）を使用する必要があります。

sed -e 's/\[[0-9]\+\] \([^,]\+\),.*/\1/' cities

または-r、pepoluanが示唆するように、正規表現を単純化するために使用します。

sed -re 's/\[[0-9]+\] ([^,]+),.*/\1/' cities

私は通常、sedやgrepが困難になったときにPerlを使用します。

Perlで作成する方法はいくつかあります。たとえば、高速であることを好むかもしれませんし、入力のわずかな予期しない問題を処理することを好むかもしれません（たとえば、1つが予期されていた2つのスペース）。

1つの明白な方法（idは数値、市はアルファベット、ステータスはアルファベットと仮定）：

while (<>) {
    if (/^\[\d+\] (\w+(?: \w+)*), \w+ \(\w*\)$/) {
        my $city = $1;
        print "$city\n";
    }
}

または、より遅いがより寛容です（より多くのバックトラッキングを行います）：

while (<>) {
    if (/^.*\]\s+(.*),.*$/) {
        my $city = $1;
        print "$city\n";
    }
}

またはより高速です（閉じ括弧の最初の出現でフィールドが停止します）：

while (<>) {
    if (/^\[[^]]*\] ([^,]*), \S+ \([^)]*\)$/) {
        my $city = $1;
        print "$city\n";
    }
}

スクリプトではなくコマンドラインから、-n基本的にwhile (<>) { BLOCK }ループを追加するオプションを使用できます。

perl -ne '/^\[[^]]*\] ([^,]*), \S+ \([^)]*\)$/ and print $1, "\n";' cities

または、使用法をカットに似せたい場合-Fは、awkの-Fオプションに似たオプションを使用できます。たとえば、次のようになります。

perl -a -n -F'/[],]\s+/' -e 'print $F[1], "\n"' cities

この方法は、明らかに、フィールドに区切り文字が含まれないことを前提としています。