my $oggdir = shift || '/media/tmp';