Select Code to Download

use strict;
use warnings;
use Sys::Hostname;

print "I am running on:". hostname .", thank you and goodnight\n";

use strict;
use warnings;
...

my $host = hostname;
print "I am running on: $host, thank you and goodnight\n";