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