#!/usr/bin/perl

BEGIN { unshift @INC, "/home/neil/perl5/lib/perl5" }
BEGIN { unshift @INC, "/home/neil/perl5/lib/perl5/x86_64-linux-thread-multi" }

use strict;
use warnings;
use Socket qw ( getnameinfo getaddrinfo );