chomp(my $hostname = `/bin/hostname`);
# Note that the chomp is necessary to remove the trailing newline

##</code><code>##

my $cmd = '/bin/hostname';
open (IN, "$cmd|");
chomp(my $hostname = <IN>);