diff --git a/icecast-title-service/icecast-track-title-to-json.sh b/icecast-title-service/icecast-track-title-to-json.sh
new file mode 100644
index 0000000..a463ae0
--- /dev/null
+++ b/icecast-title-service/icecast-track-title-to-json.sh
@@ -0,0 +1,3 @@
+#!/usr/bin/bash
+
+curl -s http://shred.ing:8000/live.mp3.vclt | perl -nle 'print qq({ "title" : "$1" }) if /^TITLE=(.*)$/'