Stop. Moshertime.

Aug 20, 2007 18:59

Run the following script in the same directory as a copy of "Killing in the name of" by Rage Against The Machine.



#!/usr/bin/env perl

$maxtime = 2700;

unless (@ARGV == 0) { # For testing volume, etc
#print "Dude!\n";
`mplayer -ss 41.7 -endpos 48.3 rage.mp3`;
}

while(1) {
$num = rand $maxtime;
sleep $num;
# print "Dude!\n";
`mplayer -ss 41.7 -endpos 48.3 rage.mp3`;
}

Whenever the music's playing, everyone has to mosh. That's the Rule.

Other track/activity pair suggestions are welcome. Particularly if they happen to work nicely with the existing timestamps ;)

anti-angst, perl, hacking, meedja

Previous post Next post
Up