peterwang

* install git-annex on mac os x 10.8.4
# cabal -v install --ghc-options=-L/usr/lib git-annex

peterwang

<?php

$input = isset($argv[1]) ? $argv[1] : 'fb.com/username';
$pattern = '#(?:https?\://)?(?:www\.)?(?:facebook|fb)\.com/(\d+|[A-Za-z0-9\.]+)/?#';
var_dump(preg_match($pattern, $input, $matches));
var_dump($matches);

peterwang

Prelude Data.Char> mapM_ (putChar . chr) [0..127]

peterwang

import System.Directory
import System.IO

testFileSize :: String -> Int -> IO ()
testFileSize filepath size = do
  writeFile filepath $ replicate size '\0'
  openFile filepath ReadMode >>= hFileSize >>= putStrLn.show

peterwang

<?php

// cascading configurations via
// merging with defaults options

$defaults = array(
    'foo'  => 'bar',
    'baz'  => 'qux',
    'quux' => 'fred',
);

peterwang

(format t "Hello World!")