t/NCIPServer.t

   1 #!/usr/bin/perl
   2
   3 use strict;
   4 use warnings;
   5
   6 use Test::More tests => 2;
   7 BEGIN { use_ok('NCIPServer') };
   8
   9 ok(my $server = NCIPServer->new({config_dir => '../t/config_sample'}));
  10 use Data::Dumper;
  11
  12 print Dumper $server;
  13 $server->run();
  14
  15 print Dumper $server;