Bonjour,

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
use Win32::Process::Info;
 my $pi = Win32::Process::Info->new ();
 my @pids = $pi->ListPids ();      # Get all known PIDs
   foreach my $pr ( @pids ) {
                print $pr . "\n";
  }
 my @info = $pi->GetProcInfo ();   # Get the max
 foreach my $nn ( @info ) {
                print $nn . "\n";
 }
j'ai un problème d'affichage ce script

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
 my @pids = $pi->ListPids ();      # Get all known PIDs
   foreach my $pr ( @pids ) {
                print $pr . "\n";
  }
ça marche bien et voilà le resultat de PID
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
 
0
4
720
804
828
872
884
1036
1152
1276
1320
1484
1672
1828
1880
2016
312
1052
1748
244
1940
408
1904
516
268
784
1400
3976
3468
2708
3136
3264
1364
2412
2780
3152
mais le probleme d'affichage ne fonctionne pas
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
 my @info = $pi->GetProcInfo ();   # Get the max
 foreach my $nn ( @info ) {
                print $nn . "\n";
 }
et sa resultat
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
HASH(0x1accb10)
HASH(0x1accf18)
HASH(0x1acd734)
HASH(0x1ada5cc)
HASH(0x1adaa1c)
HASH(0x1adae90)
HASH(0x1adb304)
HASH(0x1ae0804)
HASH(0x1ae0c78)
HASH(0x1ae10c8)
HASH(0x1ae153c)
HASH(0x1ae69e8)
HASH(0x1ae6e38)
HASH(0x1ae72ac)
HASH(0x1aec6d4)
HASH(0x1aecb48)
HASH(0x1aecfbc)
HASH(0x1aed40c)
HASH(0x1af3318)
HASH(0x1af37a4)
HASH(0x1af3c18)
HASH(0x1af9220)
HASH(0x1af9694)
HASH(0x1af9b08)
HASH(0x1af9f7c)
HASH(0x1aff0ac)
HASH(0x1aff520)
HASH(0x1aff994)
HASH(0x1b05234)
HASH(0x1b056a8)
HASH(0x1b05b1c)
HASH(0x1b05f90)
HASH(0x1b0b5a0)
HASH(0x1b0ba14)
HASH(0x1b0be88)
HASH(0x1b0c2d8)
Merci de votre aide

cdt