燈明日記

■[Perlノート] DBでのNULLはPerlではどうなる？

DB（Microsoft SQL Sever)でのNULLは、PerlからSelectすると未定義値になります。

たとえば、@AoAにＤＢ読み込みデータが２次元（行列）で入っているとして、DBでのNULLを求めるには、defined関数で未定義値を調べます。

しかし、defined関数は定義されていると真を返すので、NULL（未定義値）を求める時は、それを否定（!）して求めます。

if (!defined($AoA[0][0])) {
    print "NULLデータ", "\n";
}

Permalink | コメント(0) | トラックバック(0) | 21:48