diff --git a/src/wanijo/repl.clj b/src/wanijo/repl.clj
new file mode 100644
index 0000000..0f081e3
--- /dev/null
+++ b/src/wanijo/repl.clj
@@ -0,0 +1,12 @@
+(ns wanijo.repl
+  (:require [clojurewerkz.neocons.rest.nodes :as nodes]
+            [clojurewerkz.neocons.rest.labels :as labels]
+            [buddy.hashers :as hashers]
+            [wanijo.neo4j :as neo4j]))
+
+(defn create-user! [ident pw]
+  (let [node (nodes/create
+              neo4j/conn
+              {:ident ident
+               :pw (hashers/derive pw)})]
+    (labels/add neo4j/conn node "user")))