Bonjour
je veux récupérer la liste des processus actif sur le système et les enregistrer sur un fichier texte
est-ce possible ?
les fonctions a utiliser si c'est possible
Merci d'avance
Bonjour
je veux récupérer la liste des processus actif sur le système et les enregistrer sur un fichier texte
est-ce possible ?
les fonctions a utiliser si c'est possible
Merci d'avance
Tu travailles sous quel OS ?
Sous Win32 : Win32::Process::List
Sous Linux/Unix : Proc::ProcessTable
- Les meilleurs cours et tutoriels Perl et Perl 6 pour vous former ;
- FAQ Perl, Perl 6 et Perl/Tk d'entraide ;
- Les news sur la rubrique Perl ;
- S'abonner au compte Twitter de la rubrique Perl ;
- Mes tutoriels developpez.com.
Pas de questions technique par messagerie privée (lisez les règles du forum Perl) et pour les nouveaux !
Merci beaucoup pour la réponse
Je travail sous centOS 5.5 mais je voudrais faire un script qui marche sur les 2 plateforme
Dans ce cas, dans ton programme, tu testes si tu es sous Windows ou Linux et en fonction du cas, tu fais un require du module à utiliser.
- Les meilleurs cours et tutoriels Perl et Perl 6 pour vous former ;
- FAQ Perl, Perl 6 et Perl/Tk d'entraide ;
- Les news sur la rubrique Perl ;
- S'abonner au compte Twitter de la rubrique Perl ;
- Mes tutoriels developpez.com.
Pas de questions technique par messagerie privée (lisez les règles du forum Perl) et pour les nouveaux !
Bonsoir
je voudrais afficher les processus dans la liste box mais j'ai des erreurs
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 use Proc::ProcessTable; $FORMAT = "%-6s %-10s %-8s %-24s %s\n"; $t = new Proc::ProcessTable; $lb->insert('end' , $FORMAT, "PID", "TTY", "STAT", "START", "COMMAND" ); foreach $p ( @{$t->table} ){ printf($FORMAT, $p->pid, $p->ttydev, $p->state, scalar(localtime($p->start)), $p->cmndline); }
les erreurs
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 Global symbol "$FORMAT" requires explicit package name at projet.pl line 86. Global symbol "$t" requires explicit package name at projet.pl line 87. Global symbol "$FORMAT" requires explicit package name at projet.pl line 89. Global symbol "$p" requires explicit package name at projet.pl line 90. Global symbol "$t" requires explicit package name at projet.pl line 90. Global symbol "$FORMAT" requires explicit package name at projet.pl line 91. Global symbol "$p" requires explicit package name at projet.pl line 92. Global symbol "$p" requires explicit package name at projet.pl line 93. Global symbol "$p" requires explicit package name at projet.pl line 94. Global symbol "$p" requires explicit package name at projet.pl line 95. Global symbol "$p" requires explicit package name at projet.pl line 96. Global symbol "$FORMAT" requires explicit package name at projet.pl line 99.
C'est tout à fait normal, tu ne déclare pas proprement tes variables avec my !
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 use Proc::ProcessTable; my $FORMAT = "%-6s %-10s %-8s %-24s %s\n"; my $t = new Proc::ProcessTable; $lb->insert('end' , $FORMAT, "PID", "TTY", "STAT", "START", "COMMAND" ); foreach my $p ( @{$t->table} ) { printf( $FORMAT, $p->pid, $p->ttydev, $p->state, scalar(localtime($p->start)), $p->cmndline ); }
- Les meilleurs cours et tutoriels Perl et Perl 6 pour vous former ;
- FAQ Perl, Perl 6 et Perl/Tk d'entraide ;
- Les news sur la rubrique Perl ;
- S'abonner au compte Twitter de la rubrique Perl ;
- Mes tutoriels developpez.com.
Pas de questions technique par messagerie privée (lisez les règles du forum Perl) et pour les nouveaux !
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.
Partager