Discussion :

[HRS]

j'ai utilisé le script suivant

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
use strict;
use File::Find;
my @rep4 = 'M:\bccapi32';
 
sub fremove {
	my $nm = $File::Find::name;
	if (-d $nm) {rmdir $nm} else {unlink $nm}
}
 
finddepth (\&fremove, @rep4);

Tout ce qui était sous le répertoire a été supprimé mais pas le repertoire lui-même

[djibril]

Sinon pour supprimer un répertoire, il y a le module File:ath plus adapté et la méthode rmtree.