2010年12月14日星期二
2010年12月9日星期四
2010年9月5日星期日
2010年8月31日星期二
杨辉三角erlang版
perl6社区最近一堆关于如何答应杨辉三角的文章,下面是最酷的一个版本
([1], -> @p { 0, @p Z+ @p, 0 } ... *).[^10].perl.say;
尝试export到erlang上面来,生成了以下代码,演示效果是
29> pascal:pascal(5).
[[1,4,6,4,1],[1,3,3,1],[1,2,1],[1,1],[1]]
短短几行代码,查资料看文档费了一个多小时,情何以堪
([1], -> @p { 0, @p Z+ @p, 0 } ... *).[^10].perl.say;
尝试export到erlang上面来,生成了以下代码,演示效果是
29> pascal:pascal(5).
[[1,4,6,4,1],[1,3,3,1],[1,2,1],[1,1],[1]]
短短几行代码,查资料看文档费了一个多小时,情何以堪
-module(pascal).
-import(lists).
-export([pascal/1]).
-import(lists).
-export([pascal/1]).
pascal(1)-> [[1]];
pascal(N) ->
L = pascal(N-1),
[H|_] = L,
[lists:zipwith(fun(X,Y)->X+Y end, [0]++H,H++[0])|L].
Posted via email from 单行道
2010年8月9日星期一
read perldoc inside vim shotcut
In $VIM/_vimrc:
command -nargs=1 Doc !perldoc <args>
then you can type
:Doc Moose
works great under WINDOWS
Posted via email from 单行道
2010年7月22日星期四
recently...
1:马上要离开苏州,去上海,一个从来都没喜欢过的城市,入职爱立信。
2:因为一些事被各种bs,叹某人有远比表面看起来强悍的神经。
3:深刻怀念08年的潇洒姿态,如今走在一条和常人无异的路上,不自觉的追求一些社会让我们追求的东西。
4:严重好奇大多数人做事情的动机
5:决定为两年后准备一些东西,让自己不至于一直如此sb
2:因为一些事被各种bs,叹某人有远比表面看起来强悍的神经。
3:深刻怀念08年的潇洒姿态,如今走在一条和常人无异的路上,不自觉的追求一些社会让我们追求的东西。
4:严重好奇大多数人做事情的动机
5:决定为两年后准备一些东西,让自己不至于一直如此sb
Posted via email from 单行道
2010年4月17日星期六
忆东港帮
<<忆东港帮>>这故事断然不能写入经书
因为只有我们才会把它传诵
或忘却
在传送门前面
散落于姑苏秀丽的亭落里五月,拒绝阳春白雪
三五人,
拿可乐和白水当酒
喝得酩酊大醉
但黑眼睛亮得像星辰
英雄豪气满正溢
只恨此处不是“景阳岗”罢
更有红酥手
以巧破新橙
明眸浅笑恰那时最是青春韶华
于是心有千结
无迎有往
有人为一支红豆远走南国
有人为一席前程去了金陵
剩下的
这块陌生而熟悉的土地
谁来弹琴
谁来歌唱?八楼熟悉的面孔减少
少得悄没声息
彼时小鱼远游
尚能把酒言欢
而今昨日之青衫,今夕便无迹
罢了罢了
当时明月在
何必叹西东?独坐于城西老屋
茶几和灶头在打闹
人已恍惚
灵魂也在黑暗的灯光里静静生长
因为只有我们才会把它传诵
或忘却
在传送门前面
散落于姑苏秀丽的亭落里五月,拒绝阳春白雪
三五人,
拿可乐和白水当酒
喝得酩酊大醉
但黑眼睛亮得像星辰
英雄豪气满正溢
只恨此处不是“景阳岗”罢
更有红酥手
以巧破新橙
明眸浅笑恰那时最是青春韶华
于是心有千结
无迎有往
有人为一支红豆远走南国
有人为一席前程去了金陵
剩下的
这块陌生而熟悉的土地
谁来弹琴
谁来歌唱?八楼熟悉的面孔减少
少得悄没声息
彼时小鱼远游
尚能把酒言欢
而今昨日之青衫,今夕便无迹
罢了罢了
当时明月在
何必叹西东?独坐于城西老屋
茶几和灶头在打闹
人已恍惚
灵魂也在黑暗的灯光里静静生长
Posted via email from 单行道
订阅:
博文 (Atom)
