Select Code to Download

sub is_numeric {
  local $_=shift;
  return if not defined $_;
}

use Scalar::Util 'looks_like_number';
sub is_numeric {
...
    return looks_like_number($_);
  }
}

use Scalar::Util 'looks_like_number', 'blessed';
sub is_numeric {
...
    return;
  }
}

use Scalar::Util 'looks_like_number', 'blessed';
require overload;
...
    return;
  }
}

<code>
use Scalar::Util 'looks_like_number', 'blessed';
...
  # or just return; if it should be false per default
  return 1;
}