Select Code to Download

copy( "C:\\somename", C:\\some_path\\some_other_name" )

# this is a test example
my $name = 'doc.txt';
...
  return defined $names{$name} ? 0 : 1;
  # return -e $name ? 0 : 1;
}

sub get_unique_filename {
    my $name = shift;
...
    }
  return $name.$tries.$ext;
}