[精讚] [會員登入]
1787

[PERL] 位元運算 Bitwise operation

PERL的位元運算整理

分享此文連結 //n.sfs.tw/10676

分享連結 [PERL] 位元運算 Bitwise operation@新精讚
(文章歡迎轉載,務必尊重版權註明連結來源)
2019-10-22 07:59:00 最後編修
2017-01-24 13:29:33 By 張○○
 

自動目錄

AND運算 & --同時有才為真

A & B

0

1

0

0

0

1

0

1

OR運算 | -- 只要有即為真

A | B

0

1

0

0

1

1

1

1

EXCLUSIVE-OR運算 XOR ^ -- 互斥才為真

A ^ B

0

1

0

0

1

1

1

0

NOT OR -- 和OR相反,只要有即為假

!(A | B) 

0

1

0

1

0

1

0

0

NOT ! -- 相反

A

!A

defined( !A) ?

0
undef

1

true

1

null

true

真的相反是 null

這裡要特別注意,就算 A 為 null 值,defined( !A) 仍為真

補數 COMPLEMENT ~ -- 和補數加起來為 2^32-1

A

~A

0

4294967295

1

4294967294

推位運算

The SHIFT RIGHT >> 等於除2

The SHIFT LEFT << 等於乘2


原文 2009-11-19 16:30:55

END

你可能感興趣的文章

[PERL] 常態分配亂數產生函數 一般而言我們使用程式內建的 rand 函數取得的亂數是平均分配的,但如果需要常態分配的亂數產生器該怎麼做?

自行撰寫syslog server建立資訊安全控管中心#2 -- 架構和作法 利用PERL將syslog收攏到資料庫的程式,架構和作法

[PERL] 位元運算 Bitwise operation PERL的位元運算整理

[PERL] 13- 變數的視界 變數的使用範圍,什麼是my,什麼是our?

[PERL] split 寫法 Perl 將字串分開可以用 split 這個函數,此函數可以用Regex作分隔判斷

[PERL] 檢查IP是否在某個網段內:matchcidr 檢查IP是否在某個網段內 matchcidr in perl

隨機好文

為什麼要買長達二十年的保單? 為什麼要買長達二十年的保單?找一個可以說服我買二十年保單的理由。

SELinux 常用指令和檔案 在Redhat系列中,Centos5以後加入了selinux,他並沒有這麼可怕,不必每次看到Selinux ,就想把他

[Freebsd] 定時測試 ADSL 是否斷線並重連 中華電信 ADSL 雖有固定 ip,可是他卻會不定時「斷線」, 使用以下的 方法可以定時測試是否斷線,以及重新撥接。

Linux shell 的date表示法 linux下SHELL中的date表示法

為什麼要重造輪子? 什麼輪子?造什麼輪子?我為什麼要重造輪子?