$hostname = `/bin/hostname`;

##</code><code>##

sub getHostname {
   return `/bin/hostname`;
}

my $hostname = getHostname;
print "hostname: $hostname\n";