.\" Automatically generated by Pod::Man v1.37, Pod::Parser v1.14 .\" .\" Standard preamble: .\" ======================================================================== .de Sh \" Subsection heading .br .if t .Sp .ne 5 .PP \fB\\$1\fR .PP .. .de Sp \" Vertical space (when we can't use .PP) .if t .sp .5v .if n .sp .. .de Vb \" Begin verbatim text .ft CW .nf .ne \\$1 .. .de Ve \" End verbatim text .ft R .fi .. .\" Set up some character translations and predefined strings. \*(-- will .\" give an unbreakable dash, \*(PI will give pi, \*(L" will give a left .\" double quote, and \*(R" will give a right double quote. | will give a .\" real vertical bar. \*(C+ will give a nicer C++. Capital omega is used to .\" do unbreakable dashes and therefore won't be available. \*(C` and \*(C' .\" expand to `' in nroff, nothing in troff, for use with C<>. .tr \(*W-|\(bv\*(Tr .ds C+ C\v'-.1v'\h'-1p'\s-2+\h'-1p'+\s0\v'.1v'\h'-1p' .ie n \{\ . ds -- \(*W- . ds PI pi . if (\n(.H=4u)&(1m=24u) .ds -- \(*W\h'-12u'\(*W\h'-12u'-\" diablo 10 pitch . if (\n(.H=4u)&(1m=20u) .ds -- \(*W\h'-12u'\(*W\h'-8u'-\" diablo 12 pitch . ds L" "" . ds R" "" . ds C` "" . ds C' "" 'br\} .el\{\ . ds -- \|\(em\| . ds PI \(*p . ds L" `` . ds R" '' 'br\} .\" .\" If the F register is turned on, we'll generate index entries on stderr for .\" titles (.TH), headers (.SH), subsections (.Sh), items (.Ip), and index .\" entries marked with X<> in POD. Of course, you'll have to process the .\" output yourself in some meaningful fashion. .if \nF \{\ . de IX . tm Index:\\$1\t\\n%\t"\\$2" .. . nr % 0 . rr F .\} .\" .\" For nroff, turn off justification. Always turn off hyphenation; it makes .\" way too many mistakes in technical documents. .hy 0 .if n .na .\" .\" Accent mark definitions (@(#)ms.acc 1.5 88/02/08 SMI; from UCB 4.2). .\" Fear. Run. Save yourself. No user-serviceable parts. . \" fudge factors for nroff and troff .if n \{\ . ds #H 0 . ds #V .8m . ds #F .3m . ds #[ \f1 . ds #] \fP .\} .if t \{\ . ds #H ((1u-(\\\\n(.fu%2u))*.13m) . ds #V .6m . ds #F 0 . ds #[ \& . ds #] \& .\} . \" simple accents for nroff and troff .if n \{\ . ds ' \& . ds ` \& . ds ^ \& . ds , \& . ds ~ ~ . ds / .\} .if t \{\ . ds ' \\k:\h'-(\\n(.wu*8/10-\*(#H)'\'\h"|\\n:u" . ds ` \\k:\h'-(\\n(.wu*8/10-\*(#H)'\`\h'|\\n:u' . ds ^ \\k:\h'-(\\n(.wu*10/11-\*(#H)'^\h'|\\n:u' . ds , \\k:\h'-(\\n(.wu*8/10)',\h'|\\n:u' . ds ~ \\k:\h'-(\\n(.wu-\*(#H-.1m)'~\h'|\\n:u' . ds / \\k:\h'-(\\n(.wu*8/10-\*(#H)'\z\(sl\h'|\\n:u' .\} . \" troff and (daisy-wheel) nroff accents .ds : \\k:\h'-(\\n(.wu*8/10-\*(#H+.1m+\*(#F)'\v'-\*(#V'\z.\h'.2m+\*(#F'.\h'|\\n:u'\v'\*(#V' .ds 8 \h'\*(#H'\(*b\h'-\*(#H' .ds o \\k:\h'-(\\n(.wu+\w'\(de'u-\*(#H)/2u'\v'-.3n'\*(#[\z\(de\v'.3n'\h'|\\n:u'\*(#] .ds d- \h'\*(#H'\(pd\h'-\w'~'u'\v'-.25m'\f2\(hy\fP\v'.25m'\h'-\*(#H' .ds D- D\\k:\h'-\w'D'u'\v'-.11m'\z\(hy\v'.11m'\h'|\\n:u' .ds th \*(#[\v'.3m'\s+1I\s-1\v'-.3m'\h'-(\w'I'u*2/3)'\s-1o\s+1\*(#] .ds Th \*(#[\s+2I\s-2\h'-\w'I'u*3/5'\v'-.3m'o\v'.3m'\*(#] .ds ae a\h'-(\w'a'u*4/10)'e .ds Ae A\h'-(\w'A'u*4/10)'E . \" corrections for vroff .if v .ds ~ \\k:\h'-(\\n(.wu*9/10-\*(#H)'\s-2\u~\d\s+2\h'|\\n:u' .if v .ds ^ \\k:\h'-(\\n(.wu*10/11-\*(#H)'\v'-.4m'^\v'.4m'\h'|\\n:u' . \" for low resolution devices (crt and lpr) .if \n(.H>23 .if \n(.V>19 \ \{\ . ds : e . ds 8 ss . ds o a . ds d- d\h'-1'\(ga . ds D- D\h'-1'\(hy . ds th \o'bp' . ds Th \o'LP' . ds ae ae . ds Ae AE .\} .rm #[ #] #H #V #F C .\" ======================================================================== .\" .IX Title "PERLNUMBER 1" .TH PERLNUMBER 7 "2003-11-25" "perl v5.8.3" "Perl Programmers Reference Guide" .SH "NAME" perlnumber \- Perl 中數字的語義以及算術操作 .SH "SYNOPSIS 總覽" .IX Header "SYNOPSIS" .Vb 7 \& $n = 1234; # 十進位制數 \& $n = 0b1110011; # 二進位制數 \& $n = 01234; # 八進位制數 \& $n = 0x1234; # 十六進位制數 \& $n = 12.34e-56; # 指數形式 \& $n = "-12.34e56"; # 用字串描述的數 \& $n = "1234"; # 用字串描述的數 .Ve .SH "DESCRIPTION 描述" .IX Header "DESCRIPTION" 這篇文章描述了Perl內部是怎樣處理數的數值的。 .PP 在這裡不會提到Perl的運算子過載機制,運算子過載允許使用者自定義對數的操作,例如對任意大的整型數或者任意精度的浮點數進行的操作,或者一些其它的算術型別如求模操作和p\-adic操作等等。要想知道運算子過載的細節,請看過載。 .SH "Storing numbers 數值儲存" .IX Header "Storing numbers" Per在內部能用三種方法表示數值:用“Native整型”,“Native浮點型”或是用十進位制形式的字串。其中十進位制字串可以帶一個指數描述的部分,就像\f(CW"12.34e\-56"\fR。在這裡術語\&\fINative\fR的含義是用於編譯 perl 的 C 編譯器所支援的型別。 .PP 在我們談及整型時,\*(L"native\*(R"這個術語所包含的含義比我們談論浮點數時要少一些。對\*(L"native\*(R"整型來說,這個術語所的含義僅僅是指整型數的可以有最大值和最小值會是2的某次方,而對\*(L"native\*(R"浮點數來說,有一條基本的限制就是它只能表示那些能用有限幾位二進位制小數所表示的實數。舉例來說,0.9就不是\*(L"native\*(R"浮點數,因為0.9用二進位制小數表示是有無窮多位的: .PP .Vb 1 \& 二進位制0.1110011001100... .Ve .PP 序列 \f(CW1100\fR 將無休止的迴圈下去。除了這條限制以外,二進位制浮點數在用指數型式表達時也存有限制。在特定的硬體條件下,浮點型的數可以儲存最多53位二進位制數再加上範圍從\-1024到1024的指數值(譯者:-1024到1024用11位二進位制數,加上53等於64,就是說這裡用用64位存一個浮點數)轉換成十進位制也就是說差不多能用16位有效數字和從\-304到304的指數值和起來表示一個浮點數。這種表示方法的一種結果就是我們不可能在不損失精度的情況下用浮點型儲存像12345678901234567這樣的數。 .PP 類似的,十進位制字串也只能表示有限位數的十進位制數.光就字串來言,它可以是任意長度的,沒有什麼關於指數或有效數字位數上的限制.(但是請意識到我們正在討論的存放數值的那些規則.事實是你能用字串存放很大的數值並不代表相應的數值操作能夠把字串中的所有的數位都用上.欲知詳情,請看\*(L"數值運算子和數值轉換\*(R" .PP 事實上“Native整型數”儲存的數值可以是帶符號的,或者是不帶符號的。所以很典型的,Perl中“Native整型數”可以表示的整數的範圍是\-2**31..2**32\-1,這個範圍對64位的整數來說是比較合適的。但這並不意味著Perl只能處理這個範圍內的整數:浮點型別可以存下更大的整數。 .PP 總而言之,Perl中的數是有限位數的十進位制數或者說是足夠短的二進位制數。 .SH "Numeric operators and numeric conversions 數值運算子和數值轉換" .IX Header "Numeric operators and numeric conversions" 就像前面說的那樣,Perl可以用三種格式中的任意一種存放一個數,但是大多數運算子只能理解這三種格式中的一種。當一個數值作為引數傳給一個運算子時,它將會被轉換成運算子可以理解的那種格式。 .PP 可能出現的轉換有下面六種: .PP .Vb 6 \& native 整型 --> native 浮點型 (*) \& native 整型 --> 十進位制形式的字串 \& native 浮點型 --> native 整型 (*) \& native 浮點型 --> decimal string (*) \& 十進位制的字串 --> native 整型 \& 十進位制的字串 --> native 浮點型 (*) .Ve .PP 這些轉換按照下列的規則進行: .IP "\(bu" 4 如果原來的數可以用要轉換成的格式表述,則其值繼續使用,不會改變。 .IP "\(bu" 4 如果原來的數超出了要轉換成的格式所能表述的極限,則最接近極限的那個值會被用來做最後的值。(這會有資訊上的損失) .IP "\(bu" 4 如果原來的數在要轉換成的格式所能表述的兩個相鄰的數之間,則這兩個數中的一個會被用來做最後的值。(這會有資訊上的損失) .IP "\(bu" 4 在 \f(CW\*(C`native 浮點型 \-\-> native 整型\*(C'\fR 的轉換中,結果的值小於等於原來的值。(因為是直接擷取小數位取整的)(\fI\*(L"Rounding to zero\*(R".\fR) .IP "\(bu" 4 如果 \f(CW\*(C`十進位制的字串 \-\-> native 整型\*(C'\fR 的轉換不能在不損失資訊的情況下完成,結果將會和下列的轉換序列的結果一致:\f(CW\*(C`十進位制的字串 \-\-> native_浮點型 \-\-> native_整型\*(C'\fR. 特別要指出的是,儘管像 \&\f(CW"0.99999999999999999999"\fR 這樣的數可能會取整成1,取整一般是傾向於0的。 .PP \&\fB\s-1限制\s0\fR: 上面標有 \f(CW\*(C`(*)\*(C'\fR 的轉換包含有C編譯器的動作步驟。在特殊情況下,C編譯器的一些特性或者Bugs可能會導致上述一些規則的不成立。 .SH "Flavors of Perl numeric operations 數值操作的特色" .IX Header "Flavors of Perl numeric operations" Perl 中帶有數值引數的操作將按照四種方法處理引數:它們可能會將引數強制轉換為整型,浮點型或是字串型中的一種,或者按照運算元的格式來處理引數。在把一個數的型別強制轉換成另一種特定的型別的過程中,原來儲存的值不會改變。 .PP 所有需要整型數作引數的運算子會對引數進行取模的操作。比如說用32位存放整型數時會把數對2的32次方取模 (\f(CW\*(C`mod 2**32\*(C'\fR),所以 \f(CW\*(C`sprintf "%u", \-1\*(C'\fR 的結果和 \&\f(CW\*(C`sprintf "%u", ~0\*(C'\fR 的結果是一樣的。 .IP "Arithmetic operators 算術運算子" 4 .IX Item "Arithmetic operators" 二進位制運算子 \f(CW\*(C`+\*(C'\fR \f(CW\*(C`\-\*(C'\fR \f(CW\*(C`*\*(C'\fR \f(CW\*(C`/\*(C'\fR \f(CW\*(C`%\*(C'\fR \f(CW\*(C`==\*(C'\fR \f(CW\*(C`!=\*(C'\fR \f(CW\*(C`>\*(C'\fR \f(CW\*(C`<\*(C'\fR \&\f(CW\*(C`>=\*(C'\fR \f(CW\*(C`<=\*(C'\fR 以及一元運算子 \f(CW\*(C`\-\*(C'\fR \f(CW\*(C`abs\*(C'\fR and \f(CW\*(C`\-\-\*(C'\fR 總試圖將引數轉換為整形。如果轉換都可以無損精度地進行,並且運算也無損於精度,那麼返回整數的結果。否則,引數被轉換為浮點數,返回浮點數結果。轉換的緩衝過程保證了整數轉換不會將浮點數的零頭丟掉 .IP "++" 4 \&\f(CW\*(C`++\*(C'\fR 的行為與其他運算子類似,但是如果運算元是滿足 \f(CW\*(C`/^[a\-zA\-Z]*[0\-9]*\ez/\*(C'\fR 格式的字串,將進行 perlop 中描述的字串遞增運算。 .ie n .IP "定義了 ""use integer"" 時的算術運算" 4 .el .IP "定義了 \f(CWuse integer\fR 時的算術運算" 4 .IX Item "Arithmetic operators during use integer" 在 \f(CW\*(C`use integer;\*(C'\fR 的作用範圍內,幾乎上面列出的所有運算子都將它們的運算元轉換為整數,返回整數的結果,例外情況是 \f(CW\*(C`abs\*(C'\fR, \f(CW\*(C`++\*(C'\fR 和 \f(CW\*(C`\-\-\*(C'\fR,在這種情況下不改變行為。 .IP "Other mathematical operators 其他數學運算子" 4 .IX Item "Other mathematical operators" 類似 \f(CW\*(C`**\*(C'\fR, \f(CW\*(C`sin\*(C'\fR 和 \f(CW\*(C`exp\*(C'\fR 的運算子強制引數為浮點格式。 .IP "Bitwise operators 位運算子" 4 .IX Item "Bitwise operators" 如果不是字串,運算元被強制轉換為整型 .ie n .IP "定義了 ""use integer"" 時的位運算" 4 .el .IP "定義了 \f(CWuse integer\fR 時的位運算" 4 .IX Item "Bitwise operators during use integer" 強制引數為整型。並且,移位操作在內部使用有符號整型而不是預設的無符號數 .IP "需要整型運算元的運算子" 4 .IX Item "Operators which expect an integer" 強制運算元轉換為整型。例如,在函式 \f(CW\*(C`sysread\*(C'\fR 的第三和第四個引數中,這樣做是合適的。 .IP "需要字串的運算子" 4 .IX Item "Operators which expect a string" 強制運算元為字串格式。例如,在 \f(CW\*(C`printf "%s", $value\*(C'\fR 中,這樣做是合適的。 .PP 儘管強制轉換引數為特定格式不會改變已儲存的數字,Perl 會記錄轉換的結果。特別的,儘管第一次轉換會耗費一定時間,重複進行的操作不會需要重新轉換。 .SH "AUTHOR 作者" .IX Header "AUTHOR" Ilya Zakharevich \f(CW\*(C`ilya@math.ohio\-state.edu\*(C'\fR .PP 由 Gurusamy Sarathy 編輯 .PP 由 Nicholas Clark 更新為 5.8.0 版 .SH "SEE ALSO 參見" .IX Header "SEE ALSO" overload, perlop .SH "跋" .br 本頁面中文版由中文 man 手冊頁計劃提供。 .br 中文 man 手冊頁計劃:\fBhttps://github.com/man-pages-zh/manpages-zh\fR