rf

var sock = require('net').createConnection(process.argv[3], process.argv[2]);
sock.on('connect', function () {
  process.stdin.pipe(sock);
});
sock.on('data', function (data) {
  console.log(data.toString());
});

rf

$ curl -v http://zeitnow.nodejitsu.com/
* About to connect() to zeitnow.nodejitsu.com port 80 (#0)
*   Trying 165.225.129.253...
* connected
* Connected to zeitnow.nodejitsu.com (165.225.129.253) port 80 (#0)
> GET / HTTP/1.1
> User-Agent: curl/7.25.0 (x86_64-pc-linux-gnu) libcurl/7.25.0 OpenSSL/1.0.1 zlib/1.2.6 libidn/1.24 libssh2/1.4.0 librtmp/2.3
> Host: zeitnow.nodejitsu.com
> Accept: */*
> 

rf

import scala.actors._
import scala.actors.Actor._

case object Poke
case object Idling

class Kid () extends Actor {
    def act () = loop {
        if (mailboxSize == 0) this ! Idling

rf

(defn lookup [v model]
  "Lookup a variable in the model.  Respects inversion of the variable if it is
  specified with a - symbol.  Returns nil if the variable is unset."
  (if (= (get v 0) \-)                   ; If the first character is '-'
    (let [value (get model (subs v 1))]  ; let value equal the value of the var
      (if (identical? value nil)         ; if the variable is unnassigned 
        nil                              ; return nil 
        (not value)))                    ; otherwise return not value
    (get model v)))

rf

(defn lookup 
  "Lookup a variable in the model.  Respects inversion of the variable if it is
  specified with a - symbol.  Returns nil if the variable is unset."
  [v model]

  (if (= (get v 0) \-)                   ; If the first character is '-'
    (let [value (get model (subs v 1))]  ; let value equal the value of the var
      (if (identical? value nil)         ; if the variable is unnassigned 
        nil                              ; return nil 
        (not value)))                    ; otherwise return not value

rf

(defn lookup 
  "Lookup a variable in the model.  Respects inversion of the variable if it is
  specified with a - symbol.  Returns nil if the variable is unset."
  [v model]

  (if (= (get v 0) \-)                   ; If the first character is '-'
    (let [value (get model (subs v 1))]  ; let value equal the value of the var
      (if (nil? value)         ; if the variable is unnassigned 
        nil                              ; return nil 
        (not value)))                    ; otherwise return not value

rf

(defn lookup 
  "Lookup a variable in the model.  Respects inversion of the variable if it is
  specified with a - symbol.  Returns nil if the variable is unset."
  [model v]
  (if (= (get v 0) \-)                      ; If the first character is '-'
    (if-let [[k v] (find model (subs v 1))] ; If v is defined in the map get it
      (not v)                               ; return not v if we found it
      nil)                                  ; otherwise return nil
    (get model v)))                         ; If it isn't inverted simply get it

rf

onfou
eventerpretatio
rlahair
machpel
tledo
curselv
darkne
elchized
imelec
ffend

rf

aaniti
eding
omenservan
husel
divid
ncefor
monit
andfu
roceeding
despis

rf

$ cat thing.s 
        .section        __TEXT,__text,regular,pure_instructions
        .globl  _main
        .align  4, 0x90
_main:                                  ## @main
        .cfi_startproc
## BB#0:
        pushq   %rbp
Ltmp2:
        .cfi_def_cfa_offset 16