use strict;
use warnings;
-use Test::More tests => 3;
+use Test::More tests => 2;
use Data::Dump qw(dump);
use lib 'lib';
-use_ok 'APKPM::EasyGateway';
+use_ok 'H1::EasyGateway';
-ok my $o = APKPM::EasyGateway->new, 'new';
-
-ok my $r = $o->info( 'job', $ARGV[0] || '10.16.4.239' ), 'info';
+ok my $r = H1::EasyGateway->info( $ARGV[0] || '10.16.4.239' ), 'info';
diag dump($r);