File: loadcacert.cgi

package info (click to toggle)
libapache-mod-ssl 2.8.22-1sarge1
  • links: PTS
  • area: main
  • in suites: sarge
  • size: 3,208 kB
  • ctags: 1,649
  • sloc: ansic: 13,070; sh: 3,304; lex: 190; makefile: 99; yacc: 97; perl: 11
file content (21 lines) | stat: -rwxr-xr-x 395 bytes parent folder | download | duplicates (2) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
 
#!/usr/bin/perl -Tw
##
##  loadcacert.cgi -- Load a CA certificate into Communicator
##  Copyright (c) 1998-2001 Ralf S. Engelschall, All Rights Reserved. 
##

use strict;

$|++;

open(FP, "<ca.crt");
my $cert = '';
$cert .= $_ while (<FP>);
close(FP);
my $len = length($cert);

print "Content-type: application/x-x509-ca-cert\r\n";
print "Content-length: $len\r\n";
print "\r\n";
print $cert;