Skip to content

Instantly share code, notes, and snippets.

Clack clack click clack

Gergely Nagy algernon

Clack clack click clack
Block or report user

Report or block algernon

Hide content and notifications from this user.

Learn more about blocking users

Contact Support about this user’s behavior.

Learn more about reporting abuse

Report abuse
View GitHub Profile
algernon /
Created Oct 9, 2012
AMQP consumer in python, for testing
#! /usr/bin/python
import sys
import pika
# Import all adapters for easier experimentation
from pika.adapters import *
pika.log.setup(pika.log.INFO, color=True)
algernon /
Created Aug 24, 2012
Obfuscated uniq -c in Perl
#!perl -n
BEGIN{$;=open(STDOUT,"|sort -nr")&&0;}$"=$_ if !$;++;next if $_ eq $";print $;-1 ."|".$";($;,$")=(1,$_);END{print "$;|".$";}
algernon /
Created Nov 25, 2011
The Journal => JSON exporter, via systemd-journalctl
#! /usr/bin/python
## Usage: systemd-journalctl |
import json
import sys
class JournalCtlParser:
fp = None
def __init__(self, fp):
algernon / utf8wtf.rb
Created Nov 17, 2011
Fun stuff with UTF-8
View utf8wtf.rb
#! ruby -KUTF-8
hello world = "Goodbye world!"
  = "For real?!?"
 1 = 2
puts 1 + 1
puts hello world
algernon / trim-at-boundary.clj
Created Aug 7, 2011
Trim strings at word boundary, with a maximum length
View trim-at-boundary.clj
(ns algernon.util
(:require [clojure.contrib.str-util2 :as s]))
(defn trim-at-boundary [string max-len]
(if (< (.length string) max-len)
(str (s/take
(reduce #(if (< (+ (.length %1) (.length %2) 1) (- max-len 3))
(str %1 " " %2) %1)
(s/split string #"\s"))
algernon / Makefile
Created Jul 7, 2011
JSON to BSON conversion in C
View Makefile
all: json2bson
rm -f json2bson
json2bson: json2bson.c
${CC} $(shell pkg-config --cflags json libmongo-client glib-2.0) -Wall -O0 -ggdb3 -std=c99 ${CFLAGS} \
$(shell pkg-config --libs json libmongo-client glib-2.0) -o $@ $^
check: all
./json2bson <test.json >test.bson
You can’t perform that action at this time.