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

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