英國的健腳者

2005-06-10 2005-06-10 70 words One minute

好厲害的駕車技巧，流暢極了。

下面的 link 是 CL 傳給我的，可惜英國最高的山只有 1344M ，下面這個人已經把英國從頭走到尾，他已經開始在弄地圖，要準備 hiking 了。他太無聊所以讓 perl6 可以吃 CPAN，還丟給我一段 perl6 的 code：

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11


class Area {
has @.x;
has @.y;

method intersect (Area $a) {
if $a.x.[0] < any(@.x) < $a.x.[1] &&
$a.y.[0] < any(@.y) < $a.y.[1] {
return Area.new(:x( ({$a.x},@.x).sort.[1,2]),
:y( ({$a.x},@.x).sort.[1,2]) );
}
}

看不懂喔？很多好用的玩意，什麼 junction , chained comparison, haper operator，沒事的話 K 一下，http://pugscode.org/talks/apw/，非常 expressive。