diff --git a/src/main/blog/core.cljs b/src/main/blog/core.cljs
index be61ffc..a4aa78f 100644
--- a/src/main/blog/core.cljs
+++ b/src/main/blog/core.cljs
@@ -1,8 +1,9 @@
 (ns blog.core
-  (:require ["express" :as express]))
+  (:require ["express" :as express]
+            [blog.env :as env]))
 
 (def app (express))
-(def port 3000)
+(def port (env/get-port))
 
 (defn main []
   (. app get "/"
diff --git a/src/main/blog/env.cljs b/src/main/blog/env.cljs
new file mode 100644
index 0000000..137c72c
--- /dev/null
+++ b/src/main/blog/env.cljs
@@ -0,0 +1,9 @@
+(ns blog.env)
+
+(defn get-port
+  "Gets the environment variable PORT. If no variable, then the default port is 3000. Server will listen requests on this port."
+  []
+  (or (-> (.-env js/process)
+          (.-PORT))
+      "3000"))
+