#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++;
}