Title: 펄의 구문은 분석될 수 없다: 형식적인 증명 Package: Seoul.pm Category: perl Category: Seoul.pm Author: Jeffrey Kegler
# deb cdrom:[Ubuntu 10.04 LTS _Lucid Lynx_ - Release i386 (20100429)]/ lucid main restricted | |
# See http://help.ubuntu.com/community/UpgradeNotes for how to upgrade to | |
# newer versions of the distribution. | |
deb http://ftp.daum.net/ubuntu/ lucid main restricted | |
deb-src http://ftp.daum.net/ubuntu/ lucid main restricted | |
## Major bug fix updates produced after the final release of the | |
## distribution. | |
deb http://ftp.daum.net/ubuntu/ lucid-updates main restricted |
#!/bin/sh | |
BZ_ADMIN_EMAIL='<user>@gmail.com' | |
BZ_ADMIN_PASSWORD='****' | |
BZ_ADMIN_REALNAME='realname' | |
BZ_SERVER_NAME='bz4.localhost' | |
BZ_URLBASE='http://bz4.localhost/' | |
BZ_APACHE_GROUP='www-data' | |
BZ_INSTALL_PATH='/home/bugzilla/public_html/bugzilla' |
#include <stdio.h> | |
#include <sys/types.h> | |
#include <sys/socket.h> | |
#include <sys/un.h> | |
#include <netinet/in.h> | |
#include <unistd.h> | |
#include <stddef.h> | |
#include <errno.h> | |
#include <fcntl.h> |
;; eshell init script which let | |
;; perlbrew to be enabled in emacs eshell environment | |
;; it is translated from $HOME/perl5/perlbrew/etc/bashrc | |
;; to elisp script | |
;; | |
;; am0c <am0c@perl.kr> http://twitter.com/am0c | |
;; | |
(require 'cl) | |
(defmacro get-home-path () '(getenv "HOME")) |
Previously, in The Architecture of Open Source Applications, I described SocialCalc, an in-browser spreadsheet system that replaced the server-centric WikiCalc architecture. SocialCalc performs all of its computations in the browser; it uses the server only for loading and saving spreadsheets.
...diagram on SocialCalc's scalability model...
For the Socialtext team, performance was the primary goal behind SocialCalc's design. The key observation was this: Client-side computation in JavaScript, while an order of magnitude slower than server-side computation in Perl, was much faster than the network latency incurred during AJAX roundtrips.
Toward the end of the AOSA chapter, we introduced simultaneous collaboration on spreadsheets, using a simple, chatroom-like architecture:
;; copy region as `fill-region`ed even | |
;; in longlines-mode or visual-line-mode. | |
;; | |
;; thanks to @y0ngbin for this idea. | |
(global-set-key [?\C-x ?\M-w] 'copy-region-as-fill) | |
(defun copy-region-as-fill (beg end) | |
(interactive "r") | |
(when (region-active-p) |
am0c@amolap:~/local/pt$ cat MainWindow.pm | |
use Listener; | |
class MainWindow { | |
has Listener $.listener; | |
} | |
am0c@amolap:~/local/pt$ cat Listener.pm | |
use MainWindow; |
use v6; | |
class Hubot::Listener { | |
has Code $.match is rw; | |
has Code $.callback is rw; # handles cb => postcircum:<( )> | |
# .. does not work | |
method call ($message --> Bool) { | |
my @matching = $.match.($message); |
$ traceroute 64.111.29.139 | |
traceroute to 64.111.29.139 (64.111.29.139), 30 hops max, 60 byte packets | |
1 192.168.219.1 (192.168.219.1) 29.574 ms 40.702 ms 52.115 ms | |
2 * * * | |
3 * * * | |
4 * * * | |
5 * * * | |
6 * * * | |
7 * * * | |
8 * * * |