Select Code to Download

my $path = "C:/temp/stuff";

open (PATH, "c:/logs/paths.txt"); 
my @directories = <PATH>; 
close (PATH);

foreach (@directories) { 
   if ($path eq $_) { 
      stuff 
   } 
}