#! /usr/local/bin/perl

use File::Copy;

$rep="c:/data.txt";
#Copier et coller le répertoire dans un