数値の取得

AWKは、数字を数値として扱うか、文字列とするかは、
式によって判断されます。関数や演算子はありません。
前回 は、　苦肉の策で、For文を使って対応したのですが、
正規表現が使えることが、わかりました。
スクリプトは ↓ になります。備忘録です。

#文字データ取得

/^ch/{chr=substr($6,2) 

if(chr ~ /^[0-9]+$/){ #正規表現

chr=chr+0 #数値変換

if(chr<1000){

x[j]=$2;y[j]=$3

w[j]=$4;ch[j]=$6

if(chr<100){ra[j]=ra2}else{ra[j]=ra3}

j=j+1;k=j;next} #if

else{}

} #if

} #ch