Select Code to Download

my %fh; # key: path, value: filehandle
...
    }
    print {$fh{$path}} $text;
}

my %paths = (
    LOG => '/path/to/log.txt',
...
   }
   print {$fh{$token}} $text;
}