t/01-const.t

   1 #!perl -T
   2
   3 use Test::More tests => 1;
   4 use Netio230B;
   5
   6 my $foo = Netio230B->new(device => "192.168.1.22",
   7                              username => "admin",
   8                              password => "admin");
   9
  10 ok();