this();

sub this {
    my $p = shift;

    $p->{hostname} = $p->{hostname} || "0.pool.ntp.org";
    $p->{port} = $p->{port} || 123;
}