#!/usr/bin/env perl -l

use strict;
use warnings;

my $host = 'localhost';

BEGIN {
    print 'Host: ', $host;
}