Bonjour
Je ne comprends pas ce qui cloche dans ce script
Je n'arrive pas a avoir de résultat.

Voici le contenu de la variable @TST
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
\\pc-franck\c$\temp\stan DUTRFRNET\stan:(OI)(CI)F 
                         BUILTIN\Administrateurs:(OI)(CI)F 
                         AUTORITE NT\SYSTEM:(OI)(CI)F 
                         DUTRFRNET\franck.dutriaux:F 
                         CREATEUR PROPRIETAIRE:(OI)(CI)(IO)F 
                         BUILTIN\Utilisateurs:(OI)(CI)R 
                         BUILTIN\Utilisateurs:(CI)(accŠs sp‚cialÿ:)
 
                                                  FILE_APPEND_DATA
 
                         BUILTIN\Utilisateurs:(CI)(accŠs sp‚cialÿ:)
 
                                                  FILE_WRITE_DATA
et voici le code
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
$TEMP = 'DUTRFRNET\\stan';
 
@TST = `cacls \\\\pc-franck\\c\$\\temp\\stan`;
 
foreach (@TST)
 {
    chomp ;
   print "$_\n";
    print "TROUVE : $_\n" if (/$TEMP/);
 }
J'ai une variante en subtitution des \ par des / et j'ai bien un retour.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
$TEMP = 'DUTRFRNET/stan';

@TST = `cacls \\\\pc-franck\\c\$\\temp\\stan`;

foreach (@TST)
 {
    chomp ;
   print "$_\n";
   s/\\/\//g;
    print "TROUVE : $_\n" if (/$TEMP/);
 }
Le problème je pense viens du \.
Merci pour votre aide