> > perlで$dataが数字であるかを確認する場合
> > if($data eq \d+){print $hoge}
> > でいいんですか？(;´Д`) 
> =~ /\d+/とか…

色々書いてあるところがあった(;´Д`)
http://members.at.infoseek.co.jp/rps/tips/tips7.html

参考：2005/10/02(日)06時23分50秒