Discussion :

[SkyDev]

Bonjour à tous,

J'aimerais bien comprendre la signification de l'expression régulière:

Code perl :

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

 my $resultat_dns_name = $1 if ($sysname =~ /.+ (.[^ ]+)_.+/);

$1 et $sysname étant une variable, donc en clair on extrait la première mot avant point et on retourne vers la variable $resultat_dns_name ?

Exemple= $syname = "hostname.sub_domain.domain_network.com" ==> $resultat_dns_name = "hostname"

Si je me trompe, merci de corriger.

bien à vous.

[MarneusCalgarXP]

Tu te trompes

La regexp va commencer par ignorer au moins 1 caractère, voir plusieurs, jusqu'à trouver un espace suivi d'une série de "caractères autre que des espaces" immédiatement suivi d'un underscore.

Autrement dit, si ta chaine est "hostname.sub_domain.domain_network.com", rien ne sera extrait, vu qu'il n'y a pas d'espace.

En revanche, si ta chaine est du genre "hostname sub_domain.domain_network.com", là ca te renverra "sub_domain.domain"
(la regexp va rechercher au plus large, donc s'arrêter au dernier underscore)

[SkyDev]

Ah merci pour cette information, comment doit-on faire pour pouvoir extraire le hostname seulement et non sub_domain.domain_network.com ?

Merci de votre aide...

[MarneusCalgarXP]

Peux-tu donner une vraie ligne de fichier pour vérifier un truc ?

Sinon, basiquement:

Code :

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

1
2
3
 
# récupération des caractères à partir du début de la ligne jusqu'au premier point rencontré
my $resultat_dns_name = $1, if ($sysname =~ m/^(.+?)\./ );

[SkyDev]

MErci pour cet info, ca marche