http://www.perlmonks.org?node_id=1241

Sys::Hostname

See the current Perl documentation for Sys::Hostname.

Here is our local, out-dated (pre-5.6) version:

Sys::Hostname - Try every conceivable way to get hostname

---

    use Sys::Hostname;
    $host = hostname;

---

Attempts several methods of getting the system hostname and then caches the result. It tries syscall, `hostname`, `uname -n`, and the file /com/host. If all that fails it perlgutss.

All nulls, returns, and newlines are removed from the result.

---

AUTHOR

David Sundstrom <sunds@asictest.sc.ti.com>

Texas Instruments

---