blob: 688b102ecf3fe562cf146b9a122b691cea3495f2 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
#!/usr/bin/env perl
use Env;
print "Content-Type: text/html\n";
print "\n";
#my $ssl_protocol = $ENV{'SSL_TLS_SNI'};
print <<EOF
<html><body>
<h2>Hello World!</h2>
</body></html>
EOF
|