equal
deleted
inserted
replaced
2 |
2 |
3 use strict; |
3 use strict; |
4 use warnings; |
4 use warnings; |
5 use Test::More qw(no_plan); |
5 use Test::More qw(no_plan); |
6 |
6 |
7 BEGIN { use_ok('Nagios::Check::DNS::check_tlsa_record') }; |
7 BEGIN { use_ok 'Nagios::Check::DNS::check_tlsa_record' }; |
8 |
|
9 require_ok('Nagios::Check::DNS::check_tlsa_record'); |
|
10 |
8 |
11 #@TODO write tests |
9 #@TODO write tests |
12 #my $return = Nagios::Check::DNS::check_tlsa_record::main(($domain, $port)); |
10 #my $return = Nagios::Check::DNS::check_tlsa_record::main(($domain, $port)); |
13 #say $return; |
11 #say $return; |
14 |
12 |