Select Code to Download

     my $linux_path = '/usr/bin/perl';

     my $win_path   = 'c:\scripts\my.log';

     my $old_macos  = 'Hard Drive:My Folder:My Document';  #dunno

$path = File::Spec->catfile( @directories, $filename );