>>791
”0〜9と半角カンマ「,」以外の文字を含まない場合”
→”0〜9と半角カンマ「,」のみを含む場合”
$Fm{"data"} =~ /^[0-9,]*$/ # NULLもマッチ
あるいは $Fm{"data"} =~ /^[0-9,]+$/ # NULLはマッチしない