myfile.txtたとえば、次のデータを含む入力テキストファイルがあります。
WO_ID
------------------------------------------------------------------------
moveover_virus_8493020020_virus.final
moveover_virus_7483920322_virus.csvwork
待って、電話番号だけが変更されます。作業注文が13個ほどありますが、Perlスクリプトが必要なので、入力として番号を入力するだけです。このスクリプトを作成する必要があります。 grepを試していますが、数字しか取得できません。
ベストアンサー1
入力ファイルを見ると、次のようなことができますawk。
awk -F"_" '{print $3}' inputfile | uniq > outputfile
または使用grep、
grep -o -E '[0-9]+' inputfile | uniq > outputfile
使用sed、
sed 's/[^0-9]*//g;/^\s*$/d' inputfile | uniq