172 |
+ |
+ |
173 |
+ |
+ |
174 |
+our @ISA = qw(Exporter); |
+our @ISA = qw(Exporter); |
175 |
+our @EXPORT = qw( key_exists_good_size cert_exists_good_size ); |
+our @EXPORT = qw( key_exists_good_size cert_exists_good_size cert_is_cert key_is_key related_key_cert); |
176 |
+ |
+ |
177 |
+my $configdb = esmith::ConfigDB->open_ro or die "Could not open accounts db"; |
+my $configdb = esmith::ConfigDB->open_ro or die "Could not open accounts db"; |
178 |
+our $SystemName = $configdb->get('SystemName')->value; |
+our $SystemName = $configdb->get('SystemName')->value; |