tomasmuller

(def frequency-table (atom {}))

(defn random-quote []
  (slurp "http://www.braveclojure.com/random-quote"))

(defn word-frequencies [s]
  (frequencies (str/split (.toLowerCase s) #"\W+")))

(defn update-frequency-table []
  (swap! frequency-table (fn [current-state] (merge-with + current-state (word-frequencies (random-quote))))))

tomasmuller

#!/bin/bash
file="$1"

key_id="***AWS_ACCESS_KEY_ID***"
key_secret="***AWS_SECRET_ACCESS_KEY***"
path="your/path/$file"
bucket="your-bucket"
content_type="application/octet-stream"
date="$(LC_ALL=C date -u +"%a, %d %b %Y %X %z")"
md5="$(openssl md5 -binary < "$file" | base64)"

tomasmuller

s = "Tomás Augusto Müller"

# Hex Array
#
s.unpack('U' * s.length).collect { |x| x.to_s(16) }

# Hex String
#
s.unpack('U' * s.length).collect { |x| x.to_s(16) }.join

tomasmuller

function currentTimeMillis() {
    list($usec, $sec) = explode(" ", microtime());
    return round(((float)$usec + (float)$sec) * 1000);
}