.\" 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