2016-07-25 09:47:24 +02:00
|
|
|
#!/usr/bin/env perl
|
|
|
|
|
|
|
|
use strict;
|
|
|
|
use Test::More tests => 1;
|
|
|
|
|
2020-01-13 23:50:14 +01:00
|
|
|
printf "\n%s\n", "Testing whether CA certificates are newer than \"~/etc/ca_hashes.txt\" ...";
|
2016-07-25 09:47:24 +02:00
|
|
|
my $newer_bundles=`find etc/*.pem -newer etc/ca_hashes.txt`;
|
2020-01-13 23:50:14 +01:00
|
|
|
is($newer_bundles,"","List of CA bundles newer then etc/ca_hashes.txt should be empty. If not run utils/create_ca_hashes.sh");
|
|
|
|
done_testing;
|