Hello,
pour le background de l'affaire, il faut savoir que je ne suis pas un
programmeur, et encore moins en perl :-) J'ai trouv� un petit script
perl qui me permet de rebooter � distance des t�l�phones IP que
j'utilise. Ce script ne fonctionnait pas, et j'ai fini par isoler la
portion du code qui ne fait pas ce qu'elle doit :
if ( $testline =~ m{\s+(.*?)\/.*$_[0].*}i ) {
$extension = $1;
Ce bout de code est dans une proc�dure qui prend l'adresse ip du
t�l�phone en argument, et les "testline" sont du format suivant :
poly1/poly1 192.168.50.31 D 255.255.255.255 5060
Unmonitored
Dans cet exemple, le param�tre pass� � la proc�dure est 192.168.50.31,
et extension en sortie doit valoir poly1.
Visiblement la condition if n'est jamais valid�e (j'ai plac� un print
dedans qui ne passe jamais), mais je n'ai pas la moindre id�e de ce que
repr�sente ce patern, et encore moins de comment aborder ce truc.
Quelqu'un peut m'aider ou me mettre dans la bonne direction ?
Merci,
--
R�mi
_______________________________________________________
Linux Mailing List - http://www.unixtech.be
Subscribe/Unsubscribe: http://www.unixtech.be/mailman/listinfo/linux
Archives: http://www.mail-archive.com/[email protected]
IRC: chat.unixtech.be:6667 - #unixtech
NNTP: news.gname.org - gmane.org.user-groups.linux.unixtech
