equal
deleted
inserted
replaced
7 use File::Temp; |
7 use File::Temp; |
8 use Getopt::Long; |
8 use Getopt::Long; |
9 use Pod::Usage; |
9 use Pod::Usage; |
10 use File::Basename; |
10 use File::Basename; |
11 use if $ENV{DEBUG} => "Smart::Comments"; |
11 use if $ENV{DEBUG} => "Smart::Comments"; |
12 use dnstools::Config qw(get_config); |
12 use DNStools::Config qw(get_config); |
13 |
13 |
14 my $ME = basename $0; |
14 my $ME = basename $0; |
15 |
15 |
16 sub read_conf(@); |
16 sub read_conf(@); |
17 sub read_argv($); |
17 sub read_argv($); |