Hostname: Difference between revisions

Rename Perl 6 -> Raku, alphabetize, minor clean-up
(Frink)
(Rename Perl 6 -> Raku, alphabetize, minor clean-up)
Line 15:
Put_Line (GNAT.Sockets.Host_Name);
end Demo;</lang>
 
=={{header|Aikido}}==
<lang aikido>
println (System.hostname)
</lang>
 
=={{header|ALGOL 68}}==
Line 25 ⟶ 30:
get(read OF execve child pipe("/bin/hostname","hostname",""), hostname);
print(("hostname: ", hostname, new line))</lang>
 
=={{header|Aikido}}==
<lang aikido>
println (System.hostname)
</lang>
 
=={{header|AppleScript}}==
Line 35:
host name of (system info)
</lang>
 
=={{header|Arc}}==
<lang Arc>(system "hostname -f")</lang>
 
=={{header|AutoHotkey}}==
Line 42 ⟶ 45:
<lang AutoHotkey>for objItem in ComObjGet("winmgmts:\\.\root\CIMV2").ExecQuery("SELECT * FROM Win32_ComputerSystem")
MsgBox, % "Hostname:`t" objItem.Name</lang>
 
=={{header|Arc}}==
<lang Arc>(system "hostname -f")</lang>
 
=={{header|AWK}}==
Line 180:
=={{header|Emacs Lisp}}==
<lang Lisp>(system-name)</lang>
 
=={{header|Erlang}}==
<lang Erlang>Host = net_adm:localhost().</lang>
 
=={{header|F_Sharp|F#}}==
Line 193 ⟶ 196:
 
hostname type</lang>
 
=={{header|Erlang}}==
<lang Erlang>Host = net_adm:localhost().</lang>
 
=={{header|friendly interactive shell}}==
{{trans|UNIX Shell}}
 
<lang fishshell>hostname</lang>
or
<lang fishshell>uname -n</lang>
 
=={{header|Fortran}}==
Line 271 ⟶ 264:
Print "Press any key to quit"
Sleep</lang>
 
=={{header|friendly interactive shell}}==
{{trans|UNIX Shell}}
 
<lang fishshell>hostname</lang>
or
<lang fishshell>uname -n</lang>
 
=={{header|Frink}}==
Line 604:
Host: localhost.localdomain
</pre>
=={{header|Objective-C}}==
 
Cocoa / Cocoa Touch / GNUstep:
 
<lang objc>
NSLog(@"%@", [[NSProcessInfo processInfo] hostName]);
</lang>
 
Example Output:
 
<lang objc>
2010-09-16 16:20:00.000 Playground[1319:a0f] sierra117.local // Hostname is sierra117.local.
</lang>
 
=={{header|Objeck}}==
Line 629 ⟶ 616:
}
}
</lang>
 
=={{header|Objective-C}}==
 
Cocoa / Cocoa Touch / GNUstep:
 
<lang objc>
NSLog(@"%@", [[NSProcessInfo processInfo] hostName]);
</lang>
 
Example Output:
 
<lang objc>
2010-09-16 16:20:00.000 Playground[1319:a0f] sierra117.local // Hostname is sierra117.local.
</lang>
 
Line 719 ⟶ 720:
 
$name = hostname;</lang>
=={{header|Perl 6}}==
<lang perl6>my $host = qx[hostname];</lang>
 
=={{header|Phix}}==
Line 806 ⟶ 805:
(gethostname)
</lang>
 
=={{header|Perl 6Raku}}==
(formerly Perl 6)
<lang perl6>my $host = qx[hostname];</lang>
 
=={{header|REBOL}}==
Line 900 ⟶ 903:
=={{header|Slate}}==
<lang slate>Platform current nodeName</lang>
 
=={{header|Smalltalk}}==
{{works with|Smalltalk/X}}
<lang Smalltalk>OperatingSystem getHostName</lang>
 
=={{header|SNOBOL4}}==
Line 905 ⟶ 912:
output = host(4,"HOSTNAME")
end</lang>
 
=={{header|Standard ML}}==
<lang sml>NetHostDB.getHostName ()</lang>
 
=={{header|Smalltalk}}==
{{works with|Smalltalk/X}}
<lang Smalltalk>OperatingSystem getHostName</lang>
 
=={{header|SQL}}==
Line 933:
 
</pre>
 
=={{header|Standard ML}}==
<lang sml>NetHostDB.getHostName ()</lang>
 
=={{header|Swift}}==
Line 948 ⟶ 951:
foo 1024 gethostname
foo type</lang>
 
=={{header|TUSCRIPT}}==
<lang tuscript>
10,333

edits