Hostname: Difference between revisions
Content added Content deleted
(Add Jsish, assume POSIX) |
|||
| Line 715: | Line 715: | ||
=={{header|Perl 6}}== |
=={{header|Perl 6}}== |
||
<lang perl6>my $host = qx[hostname];</lang> |
<lang perl6>my $host = qx[hostname];</lang> |
||
=={{header|Phix}}== |
|||
<lang Phix>constant tmp = "hostname.txt", |
|||
cmd = iff(platform()=WINDOWS?"hostname":"uname -n") |
|||
{} = system_exec(sprintf("%s > %s",{cmd,tmp}),4) |
|||
string host = trim(get_text(tmp)) |
|||
{} = delete_file("hostname.txt") |
|||
?host</lang> |
|||
{{out}} |
|||
<pre> |
|||
"Pete-PC" |
|||
</pre> |
|||
=={{header|PHP}}== |
=={{header|PHP}}== |
||