#!/usr/bin/env perl -l

use strict;
use warnings;

my $host;
BEGIN {
    $host = 'localhost';
}
BEGIN {
    print 'Host: ', $host;
}