> if(投稿文字列=~/^[0-9]+$/)
> {
>   TPO処理...
> }
> でもいいんじゃないかね？

一番駄目なｻﾞ・ｲﾀﾁｺﾞｯｺだな(;´Д`)

参考：2008/09/27(土)03時30分07秒