600さんへ、早速の解答有難う御座います。
最初のif文の所は、パスしてしまいました。
機会があったら、試してみます。

604さんへ、こちらの方がコードが少なくてこちらの方は大体は理解出
来ました。要は、longの型に変換すると言う事ですね。こちらは、試し
てきちんと動きました。助かりました。

一番のシンプルさでは、602さんです。
このコードでは、このままでは何かをincludeしないと動かないと思い
ますが、何をincludeしないといけないのかと言うのが分かりません。
これは、詰まりc言語からperlインターフェースを呼んでいるんですよ
ね。これが、簡単で良いとは思いますが、includeするべきヘッダーフ
ァイルは、何処から持って来れば良いのか、分かりません。

602さん、その辺を宜しくお願いします。