Bonjour,

J'utilise le module SipSak qui vient avec smokeping afin d'essayer de monitorer ma gateway SIP.

Voici le script perl avec lequel j'ai un problème :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
 
    $host = $vars->{user}.'@'.$host if $vars->{user};
    $host = $host . ':' . $vars->{port} if $vars->{port};
    my @extra_opts = ();
    @extra_opts = split /\s/, $vars->{params} if $vars->{params};
    open (my $sak,'-|',$self->{properties}{binary},'-vv','-A',$pingcount,'-s','sip:'.$host,@extra_opts)

Après quelques tests et debug, la variable host est égale à : "nobody@hostip:5060"

Si je compare à ce qui est lancé en bash, on obtient :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
/usr/local/bin/sipsak -vv -A 20 -s sip nobody hostip 5060
Le problème est que le @ et le : inclus dans la variable "$host" ne sont pas passés en argument, ils sont tout bonnement supprimés.

J'ai également essayé d'utiliser les quotes inversées ` ` pour lancer le script bash, même problème..

Je suis sous Centos 6.3 // perl5.10.1 // Bash 4.1.2

Merci d'avance.

Nicolas