のデータ型を確認したいoutput.txt
。
例:
52 40.5 60 yes
30.3 20 40 no
結果:
52 is Integer
40.5 is Decimal
60 is Integer
Yes is Character
このタスクにはどちらを選択するのが良いですか?bash
それともawk
?
ありがとうございました。
awk '
BEGIN {
types["Integer"] = "^[[:digit:]]+$";
types["Decimal"] = "^[[:digit:]]+[.][[:digit:]]+$";
types["Character"] = "^[[:alpha:]]+$"
}
{
for (i = 1; i <= NF; i++) {
found = 0;
for (type in types) {
if ($i ~ types[type]) {
print $i, "is", type;
found = 1
}
}
if (! found) {
print "Type not found for:", $i
}
}
printf "\n"
}' inputfile
shopt -s extglob
while read line; do
set -- $line
for word; do
case $word in
?([-+])+([[:digit:]]) ) echo "$word is an integer" ;;
?([-+])@(*([[:digit:]]).+([[:digit:]])|+([[:digit:]]).*([[:digit:]])) ) echo "$word is a decimal" ;;
+([[:alpha:]]) ) echo "$word is alphabetical" ;;
*) echo "$word is a mixed string" ;;
esac
done
done < output.txt
TXR:少しの正規表現と少しの型システム。トークンが数字のように見える場合は、それを文字列から。を使用して数値オブジェクトに変換してみましょうnum-str
。それが失敗した場合は、範囲エラーである必要があります。このtypeof
関数は、オブジェクトのタイプを示します:fixnum
、bignum
またはfloat
。
@(freeform)
@(coll)@{token /[^\s]+/}@(end)
@(output)
@ (repeat)
@token @(if (eql (match-regex token #/[+\-]?\d+([.]\d+)?([Ee][+\-]?\d+)?/)
(length token))
(let ((x (num-str token)))
(if x (typeof x) "out-of-range"))
"non-numeric")
@ (end)
@(end)
走る:
$ txr verify.txr -
hello world
1.5E900 1.43 52 5A 12341234123412341234 12341234123412341234243.42 42
[Ctrl-D]
hello non-numeric
world non-numeric
1.5E900 out-of-range
1.43 float
52 fixnum
5A non-numeric
12341234123412341234 bignum
12341234123412341234243.42 float
42 fixnum