perl：文字列を数値として変換 警告でないように

ある変数に　文字列として　数値が格納されている。
ノイズがあり、時には　その変数に　英字数字のごちゃ混ぜ文字列が入るときがある。
文字列には数字だけが入っている前提で処理すると、時に
その場合、Argument "○○"isn't numeric in addition・・・エラーがでてしまう。

このエラーを出力したくない、エラーログファイルに　読込エラーだったレコード内容を吐き出すようにしたい。

文字列が数字のみで構成されている場合は　○○を実行し、数字以外で構成されている場合は　XXを実行するという　if文を作成したいと考えている。よい判定方法を教えてください。

現在は、
$i=$i＋0；
if( $i =~ /^\d+$/ ){　○○｝　else｛　XX｝としているが、
$i=$i＋0；　の行でエラーが出てしまうときがある。

No.6 回答者： Tacosan 回答日時： 2012/06/26 03:05

「(先頭に空白があるかもしれない) 数字」なら

/^\s*\d+$/
でチェックできる.

ただ, #4 とそれへの「お礼」を読み返すと, なんかおかしい. 「数字以外だったら、$i=$i＋0；をしないようにするように考えております。」のあとに「その数字チェックのやり方を知りたいと思っております。」がくるって, おかしいと思わない? どのように「数字チェックをした」としても, それと「数字以外だったら、$i=$i＋0；をしないようにする」は直接つながらないでしょ? そして, 少なくともこの質問文からは「数字以外だったら、$i=$i＋0；をしないようにする」という意図が見られない.

No.5 回答者： Tacosan 回答日時： 2012/06/22 13:18

あなたのいう「数字」とやらがどのような形式のものであるかがわかれば「チェックの方法」を書けるかもしれません.

この回答へのお礼

秒数が入っているので、本来は　0　もしくは　正の整数が入っている項目です。
ただし、空だったり、abcなどの数字以外が入ってくる場合があり、エラーメッセージなく　処理したいと思っております。
エラーがはきだされるレベルであれば、現状処理はできているのですが、エラーメッセージをなくし、エラーの場合はその行自体を　別のログファイルに吐き出ししたいと考えております。
この情報で、解決できますでしょうか？

お礼日時：2012/06/25 07:50

No.4 回答者： Gletscher 回答日時： 2012/06/19 13:16

根本的な間違いがあるようですね。

どんな方法を使おうが、判定をした結果を生かしてないようです。
判定して数値以外が含まれていたら演算をしてはダメですよ。演算した途端にエラーになります。
計算できないのであたりまえですよね？
判定して数値以外があったら、
$i=$i＋0；
は実行しないようにしていますよね？

この回答へのお礼

ご指摘の通り、数字以外だったら、$i=$i＋0；をしないようにするように考えております。
その数字チェックのやり方を知りたいと思っております。
数字チェックの際に、Argument ～　メッセージがでてしまわない方法が知りたいのです。

お礼日時：2012/06/22 09:13

No.3 回答者： Tacosan 回答日時： 2012/06/19 12:10

そもそも

$i=$i＋0；
であなたは何をしたいんですか? それは, 「文字列が数字のみで構成されている場合は　○○を実行し、数字以外で構成されている場合は　XXを実行する」こととどのような関係があるんですか?

この回答へのお礼

$iに入っているのは、数字のみと思っていたのですが、$iを文字列認識しないようにするために、$i=$i＋0；を設定しておりました。
実際は、その際はelse｛　XX｝は設定しておりませんでした。

お礼日時：2012/06/22 09:11

No.2 回答者： Tacosan 回答日時： 2012/06/18 17:53

なんで「数字のみで構成されている」かどうかを判定する前に加算してるの?

この回答へのお礼

数字チェックを先に実施しても見たのですが、警告メッセージがでてしまうので、何かよい方法がありましたら、教えてください。

お礼日時：2012/06/19 08:28

No.1 回答者： Gletscher 回答日時： 2012/06/18 13:10

入力値が数値だけかどうかは、

if(($input !~ /[\d]/) || (length($input) ne $limit)){ $outvalue = 'false'; }
で判定できますが、いかがでしょうか？
ここで、
$input　は入力
$limit　は桁数
$outvalue　は出力値
です。

この回答へのお礼

先に　このチェックをしても　警告メッセージは消えません。
警告メッセージを出ないようにすることはできないでしょうか？

お礼日時：2012/06/19 08:26