issuer => \@ca,
purpose => 'server',
subject => { CN => 'server.local' },
- subjectAltNames => [
+ subjectAltNames => [
[ DNS => 'bar.server.local' ],
- [ DNS => 'www*.server.local'],
- [ DNS => '*.www.server.local'],
+ [ DNS => 'www*.server.local'],
+ [ DNS => '*.www.server.local'],
[ DNS => 'foo.server.local' ],
[ DNS => 'server.local' ],
]
issuer => \@ca,
purpose => 'server',
subject => { CN => 'server.local' },
- subjectAltNames => [
+ subjectAltNames => [
[ DNS => 'bar.server.local' ],
- [ DNS => '*.www.server.local'],
+ [ DNS => '*.www.server.local'],
[ DNS => 'foo.server.local' ],
[ DNS => 'server.local' ],
]
issuer => \@subcaR,
purpose => 'server',
subject => { CN => 'server.subca.local' },
- subjectAltNames => [
+ subjectAltNames => [
[ DNS => 'server.subca.local' ],
]
);
}
return $result;
}
-
+
sub out {
my $file = shift;
open(my $fh,'>',"$file") or die "failed to create $file: $!";