RosettaCodeData/Task/Determine-if-a-string-is-numeric/Pike/determine-if-a-string-is-numeric.pike
Ingy döt Net d066446780 langs a-z
2013-04-10 22:43:41 -07:00

12 lines
256 B
Text

int(0..1) is_number(string s)
{
array test = array_sscanf(s, "%s%f%s");
if (sizeof(test) == 3 && test[1] && !sizeof(test[0]) && !sizeof(test[2]) )
return true;
else
return false;
}
string num = "-1.234"
is_number(num);
-> true