Another way:

if ($a eq $a+0) {
  #$a is a decimal number
}
[download]

This won't work if you were planning on accepting input numbers in hex or octal though, only decimal.