[閒聊] Perl語言講費氏數列..

[CindyLinz (Cindy Wang)]

這程式執行方式是這樣:

$ perl fibonacci.pl 5
8
$ perl fibonacci.pl 10
89

以下是 fibonacci.pl 的程式碼 :p

use Lingua::Sinica::PerlYuYan;

用通兮

副費始
回壹倘起此
內零外小二合兮

費起此
內零外減壹
合正費起此
內零外減貳合兮

終印費起純青羊白豬
內零外合又純分兮

--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 112.121.80.249
※ 文章網址: http://www.ptt.cc/bbs/Perl/M.1415037427.A.E59.html
推 skenbo0916: O____________Q
推 flu: 看到git上有洋人的commit, 像是「倘」字是他貢獻的 :D
→ CindyLinz: XD
→ CindyLinz: 昨天我丟個沒頭沒尾的一句「陣青羊白豬」給 AudreyT
→ CindyLinz: 她就回我 @ARGV 耶.. 真是太恐怖惹 XDXD
推 flu: 我猜接著就開始用這套術語閒話家常了 只是很難接話
→ flu: C: 大風起兮        AT:...compile error ?
→ CindyLinz: 才不會..... OAO
推 Neisseria: 這是 Perl 嗎？為什麼覺得這段完全看不懂？@_@
推 flu: PerlYuYan能把source code中的漢字符號轉成英數字, 再執行
→ flu: 這中間的轉換關係定義在PerlYuYan.pm中 上面就是拿它作文章:D
推 Neisseria: 這真的太有材了 XD，突然覺得原來的 Perl 還蠻簡單的嘛
→ CindyLinz: https://metacpan.org/pod/Lingua::Sinica::PerlYuYan
→ CindyLinz: 用=use 通=utf8 兮=; 副=sub 費=費 始={ 回=return
推 herculus6502: 有才+1