Re: [問題] 判斷數字與否

[jlovet (偷拿程式碼的八卦)]

※ 引述《heliosy (這一欄是要做啥用的)》之銘言：
: 請問一下
: Perl中有沒有function可以判斷這個變數是否為數字呢？
: 例如：isNumeric() 或 isNumber()
: 之類的
: 謝謝

$i=<STDIN>;
chomp $i;
print $i," ",length($i),"\n";
print $i+0," ",length($i+0),"\n";

gung-shi-jiede-macbook-2:tmp adolf$ perl number.pl
1234
1234 4
1234 4
gung-shi-jiede-macbook-2:tmp adolf$ perl number.pl
1.234
1.234 5
1.234 5
gung-shi-jiede-macbook-2:tmp adolf$ perl number.pl
1.23a
1.23a 5         <--
1.23 4          <--


--
※ 發信站: 批踢踢實業坊(ptt.cc) 
◆ From: 59.104.212.158
→ jlovet:如果是後面有一堆0的小數,就先把0去掉...
→ heliosy:謝謝 :)