aboutsummaryrefslogtreecommitdiffstats
path: root/web/tech.gathering.org/event-720p.mp4.pl
diff options
context:
space:
mode:
authorJoachim Tingvold <joachim@tingvold.com>2014-04-06 03:11:04 +0200
committerJoachim Tingvold <joachim@tingvold.com>2014-04-06 03:11:04 +0200
commit2a0c0a3dbbdf7fa5040953c0b0d88ad6f62c011e (patch)
tree92c7cbf54272466b46f64e5dc8d1ddb429858836 /web/tech.gathering.org/event-720p.mp4.pl
parentfe0be5960aac1f9bb600dbf853d862a9f4e60de8 (diff)
Initial commit. Source; TG13-goodiebag.
Diffstat (limited to 'web/tech.gathering.org/event-720p.mp4.pl')
-rwxr-xr-xweb/tech.gathering.org/event-720p.mp4.pl11
1 files changed, 11 insertions, 0 deletions
diff --git a/web/tech.gathering.org/event-720p.mp4.pl b/web/tech.gathering.org/event-720p.mp4.pl
new file mode 100755
index 0000000..631e40d
--- /dev/null
+++ b/web/tech.gathering.org/event-720p.mp4.pl
@@ -0,0 +1,11 @@
+#!/usr/bin/env
+use strict;
+use warnings;
+use Capture::Tiny ':all';
+
+$! = 1;
+print "Content-Type: video/mp4\n\n";
+
+my ($stdout, $stderr) = tee {
+ system('wget', '-qO-', 'http://stream.tg13.gathering.org:3013');
+};