Network Perl

  1. Home
  2. Perl
  3. Network
  4. Get system host name
#!/usr/bin/perl -w
use Sys::Hostname;
$host = hostname();
print "Network host name is: $host\n";