Select Code to Download

if ($value !~ /^\d{2}$/)
{
print "input contains more than two digit";
}

if ($value !~ /^(-)*\d{2}$/)
{
print "input contains more than two digit";
}