Initial commit of tireswing.pl

Right now it's a perl script.