#use wavcut to split a mix into 5min tracks

$i = 1;
$start = 0;
$end = 300;

system "mpg123 -w @ARGV[0].wav @ARGV[0]";

while ($end < 5000)
{
	system "/usr/local/bin/wavcut -info -if @ARGV[0].wav -of $i@ARGV[0].wav -bt $start -et $end";

	$start+=300;
	$end+=300;

	$i++;
}

$z = 1;

mkdir temp;

while ($z <= $i)
{
	system "lame -b 64 $z@ARGV[0].wav temp/$z@ARGV[0]";
	$z++;
}