Hostname

my $host = qx[hostname];