More folder-related debugging

torrentMonitored.pl

@@ -13,11 +13,11 @@ my @done      = ();
 
 # Media path(s)
 {
-	my $path = `~/bin/video/mediaPath`;
+	my $path = `~/bin/video/mediaPath` . '/TV';
 	if (-d $path) {
 		push(@BASE_DIRS, $path);
 	}
-	$path = dirname($path) . '/Downloads';
+	$path .= '/Downloads';
 	if (-d $path) {
 		push(@BASE_DIRS, $path);
 	}

transmission.pl

@@ -27,7 +27,7 @@ sub runAndCheck(@);
 
 # Parameters
 my $maxAge        = 2.5 * 86400;
-my $tvDir         = `~/bin/video/mediaPath`;
+my $tvDir         = `~/bin/video/mediaPath` . '/TV';
 my $monitoredExec = '/Users/profplump/bin/video/torrentMonitored.pl';
 my $host          = 'http://localhost:9091';
 my $url           = $host . '/transmission/rpc';