pib

#!/bin/bash

nc -i 10 irc.freenode.net 6667 <<EOF
USER pib_netcat foo bar :Baz Bon
: NICK pib_netcat
: JOIN #austinhackerspace
: PRIVMSG #austinhackerspace :What up, bitnotches?
: PART #austinhackerspace
EOF

pib

import Data.Char
import System.IO
import Text.Printf

main = do
  hSetBinaryMode stdin True
  contents <- getContents
  putStr (hexdump contents)

hexdump :: String -> String

pib

from string import whitespace

atom_end = set('()"\'') | set(whitespace)

def parse(sexp):
    stack, i, length = [[]], 0, len(sexp)
    while i < length:
        c = sexp[i]

        print c, stack