mirror of
https://github.com/duncs/clusterssh.git
synced 2025-04-21 17:09:06 +00:00
21 lines
345 B
Perl
21 lines
345 B
Perl
use strict;
|
|
use warnings;
|
|
|
|
use FindBin qw($Bin $Script);
|
|
use lib "$Bin/../lib";
|
|
|
|
use Test::More;
|
|
use Test::Trap;
|
|
use File::Which qw(which);
|
|
|
|
use Readonly;
|
|
|
|
BEGIN { use_ok("App::ClusterSSH") }
|
|
|
|
my $app;
|
|
|
|
$app = App::ClusterSSH->new();
|
|
isa_ok( $app, 'App::ClusterSSH' );
|
|
isa_ok( $app->config, 'App::ClusterSSH::Config' );
|
|
|
|
done_testing();
|