#!/usr/bin/perl use strict; use warnings; use Data::Dumper; use lib '/home/user/Desktop/Net-SNTP-Server-0.01/lib/'; # note here use Net::SNTP::Server qw ( basicSNTPSetup ); my %hashInput = ( -ip => "127.0.0.1", -port => 12345, ); my ( $error , $hashRefOutput ) = basicSNTPSetup( %hashInput ); print Dumper $hashRefOutput; print "Error: $error\n" if ($error);