这个卡忙！是个人的 Haskell专门站，有自己的翻译和学习文章。以后的精力会主要在那里。

 

公司之前的服务都是基于Windows平台的，使用 radmin 进行远程管理。实在令我不爽，于是开始了我的邪恶计划，一步步的kill掉windows服务器，然后替换成 freebsd.

 

现在主Web服务器已经上线了，Freebsd 6.2。 一台机器支撑了两百多万的页面访问，700多万的文件访问（每天），外加数据库、memcache，svn，trac……，看样子还不错。

 

现在把文件上传和flv服务合并到一台机器上了。这样又…… ]]> Sat, 30 Dec 2006 07:09:41 GMT 前台部分：
    1。将页面需要ajax的组件部分，先输出其原始版本
    2。通过 javascript, document.write 的方法，将 ajax版本的代码输出
后台处理部分：
    1。原始的 POST 处理
    2。ajax请求的不同处理

在实际使用的时候要注意的是javascript在输出代码时候的escape 问题。
]]> Fri, 01 Dec 2006 07:19:41 GMT
]]> Wed, 29 Nov 2006 07:28:30 GMT Yining.write 上一篇说Ajax降解的文章中拿我做的豆瓣Rating当作反面教材，稍微有点冤枉，因为开始的时候已经考虑到了ajax的降解，并且做了一些措施，不过没有做完全。
    开始我的做法是通过判断Browser Agent，对于不能完全支持的浏览器不采用ajax的方式，但是没有处理浏览器关闭javascript的情况。确实是应该该精的一个地方。
    现在一个处理办法是：通过 j…… ]]> Mon, 20 Nov 2006 10:18:22 GMT Livid做客豆瓣，一起交流社区设计的体验。下午给我们作了一个报告。Livid是个典型的geeker，年轻有为阿。尤其令我折服的是他对SEO方面的纯熟。
    V2EX是livid做的一个多功能的社区，去年10月份用两个星期开发上线的，有很多很有趣的思路。
    在交流中，还偶然知道了另一件八卦的事情：原来 AfterS…… ]]> Fri, 17 Nov 2006 11:00:44 GMT
豆瓣“我上” blog认领 claim 功能。
]]> Wed, 08 Nov 2006 00:19:28 GMT     Emacs的Erlang mode很好用，自动排版和语法高亮自不必说，还可以自动生成程序的标准框架。可以自动生成一些基本的语法骨架：if, case等，还可以生成简单的 Server, 以及 Application 等 OTP的骨架。这对于学习来说要方便多了，像个拐棍一样。
Tue, 24 Oct 2006 08:14:44 GMT 方军blog ]]> Mon, 23 Oct 2006 18:41:26 GMT     在FC5里面，带了KDevelop 3.3.1，这个版本的KD可以支持各种脚本语言，包括Haskell, Python,Ruby, shell 等等，而且PyQt的工程结合QtDesigner开发GUI程序实在是很爽。
    在QtDesigner 中，创建slot函数，在函数中写入Python代码，然后在KD中构建工程，Python代码自动填入。
]]> Sun, 22 Oct 2006 18:44:28 GMT     舒马赫的最后一场比赛，刚开始第七圈就发生意外爆胎，从而掉到了最后一名，就是在这种不利的情况下，我们的车王给所有的车手和观众上了一课：车是这样开di
    从最后一名，一步步超越到达第4，一代车王以一种残缺的完美画上了句号。
    车王的这种永不放弃的精神与韧性，告诉我们什么是永远的王者。
    再见，车王。
]]> Thu, 19 Oct 2006 19:47:22 GMT     现在有一个 Erlang-python  bind ， 可以在python中调用erlang里的process ，这似乎是一种比较好的结合方式，但却要求对Erlang与Python都很熟悉。如果使用Python原生实现Erlang的功能，…… ]]> Fri, 13 Oct 2006 05:53:25 GMT
]]> Wed, 11 Oct 2006 18:54:08 GMT

]]> Wed, 11 Oct 2006 08:16:25 GMT 原文链接： http://rufi.yculblog.com/post.58940.html
转自如飞的blog

Haskell教程

如飞 @ 2004-06-22 08:13

Haskell教程
by rufi  2003.3.21 -- 2003.4.2

一.序

1．什么是Haskell?

     Haskell是一种函数编程语言. 1980年代以前对函数编程有很多研…… ]]> Wed, 11 Oct 2006 07:58:50 GMT -- 一个经典的菲波纳契数列的函数定义，求每一个位置上的数值
fib 1 = 1
fib 2 = 1
fib n = fib(n-1) + fib(n-2)

-- 产生一个无限长的fib数列
fib_l n = fib n : fib_l(n+1)

take 10 (fib_l 1) ＝> [1,1,2,3,5,8,13,21,34,55]

    因为 haskell 是 lazy eval 的，所以无限序列不会引起死循环，而且haskell的函数的求值顺序也是不固定的，或者说是“不关心”的。但是对于 fib_l 的性能问题，我还是不甚了解，是否…… ]]> Mon, 09 Oct 2006 16:40:15 GMT {-
题目如下：用1、2、2、3、4、5这六个数字，
打印出所有不同的排列，如：512234、412325等，要求："4"不能在第四位，"3"与"5"不能相连。
-}
import List
import Maybe

{- 辅助函数 -}
listlen [] = 0
listlen (x:nx) = 1 + listlen(nx)

inlist [] [] = True
inlist a [] = False
inlist a [x] = False
inlist a (x:nx)  = (a == [x,head(nx)] ) || inlist a nx

count a [] = 0
count a (x:nx) = if a …… ]]> Mon, 02 Oct 2006 15:24:54 GMT
-module(eserver).
-author("hanzhupeng@gmail.com").

-export([startd/0, start/0,start/1,process/1]).

-define(defPort,2000).

startd() ->
    register(eserverp, spawn(?MODULE, start, [])).
   
start() -> start(?defPort).
start(Port) ->
    case gen_tcp:listen(Port, [binary, {packet, 0}, {active, false}]) of
        {ok, LSock}  -> ser…… ]]> Sun, 01 Oct 2006 21:04:02 GMT     豆瓣公司位于北京著名的大山子艺术区的入口，办公室是用原来电子厂的厂房改的写字楼。室内放着几件IKEA的桌子沙发和书架，一件小会客厅兼会议室和休息室。
    最让我心动的还是这里的开发环境，trac+svn协同开发，刚刚上手还不是太适应，不过我已经爱上了这种方式。
    douban的web主程序写的很直接了当，看看阿北半年前在CPUG会议上的PDF就知道了，刨除了负责的架构，所有的功能都…… ]]>