Il n'existe aucun moyen standard de connaître le nom d'une machine sur le réseau. Pour résoudre ce problème, Perl livre un module qui va tenter plusieurs méthodes et placer le résultat dans un cache.
use Sys::Hostname; print hostname ."\n";
