From: Don Armstrong <don@donarmstrong.com>
Date: Tue, 13 Jul 2010 02:52:14 +0000 (+0000)
Subject: add show bp video
X-Git-Url: https://git.donarmstrong.com/?p=bin.git;a=commitdiff_plain;h=94c91944bd1d51d7aa514fdd6126c702fa17e2c9

add show bp video
---

diff --git a/show_bp_video b/show_bp_video
new file mode 100755
index 0000000..974d3c6
--- /dev/null
+++ b/show_bp_video
@@ -0,0 +1,5 @@
+#!/bin/sh
+
+URL=$(GET $1|perl -ne 'if (/embed/ && m/src=\"([^"]+)/) { print $1.qq(\n)}'|xargs GET|perl -ne 'if (/mms/ && m/HREF="([^"]+)/) {print $1.qq(\n); exit}')
+
+exec mplayer $URL
\ No newline at end of file