>>318
$errmsg =~ /\d{10}/
かなぁ。。。

$errmsg + 1 < 10000000001
なんてのも有りかな？（文字列に対してもインクリメント出来るから）