Discussion :

[Krispy]

Hello. voilà, j'ai un process quoi tourne, spamassassin.

Dans un programme, j'aimerais vérifier qu'il marche bien, et sinon, faire un

Code :

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

/etc/init.d/spamassassin restart

est ce que vous voyez un moyen de le faire ?

j'ai pensé faire un

Code :

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

ps -aux | grep spamd

et vérifier que le process est bien là.. mais je ne vois pas comment rentrer ça dans un script perl.

merci

[2Eurocents]

Le module Proc::ProcessTable::Process peut peut-être aider ...

Cependant, je ne suis pas certain qu'il soit d'une fiabilité absolue car un autre module, qui fait exactement ce que tu veux faire, s'appuie dessus et n'est fiable que sur Solaris, et surtout pas sous Linux : Watchdog::Process

[Jedai]

Watchdog::Process ne fonctionne pas super sous Linux, mais uniquement parce que sous cet OS on n'obtient pas forcément l'attribut "cmndline" de l'objet, qui correspond à la ligne de commande complète utilisé pour lancer le process. Sinon Proc::ProcessTable fonctionne bien sous Linux comme indiqué dans le readme.linux. Donc un truc comme ça devrait fonctionner :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
#! /usr/bin/perl
use strict; use warnings;
 
use List::Util;
use Proc::ProcessTable;
 
my $p = new Proc::ProcessTable();
my $table = $p->table;
 
system '/etc/init.d/spamassassin restart' 
  unless first {$_->exec =~ m/spamd/} @$table;

D'un autre côté, s'il est vraiment sûr d'être sous Linux...

Code :

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

1
2
3
4
5
6
7
8
 
#! /usr/bin/perl
use strict; use warnings;
 
my @spamd_count = `ps -aux | grep spamd`;
 
system '/etc/init.d/spamassassin restart' 
  if @spamd_count < 2;

--
Jedaï

[Krispy]

Ah c'est meme du Unix pur et dur.

( Un bo serveur HP )

donc merci pour votre aide, c'est parfait