open IN, '<', 'subdirectories.txt' or die "Can't open file 'subdirectories.txt': $!";
@subdirs = <IN>;
chomp @subdirs;