Forum Discussion
Anesh
Feb 28, 2018Cirrostratus
Try the below code:
set parts [ split $dn {,} ]
set country [lindex $parts 0]
set x [string range $country 2 end]
HTTP::header insert "SSL_CLIENT_I_DN_C" $x
set org [lindex $parts 1]
set y [string range $org 2 end]
HTTP::header insert "SSL_CLIENT_I_DN_O" $y
set unit [lindex $parts 2]
set z [string range $unit 3 end]
HTTP::header insert "SSL_CLIENT_I_DN_OU" $z
set cname [lindex $parts 3]
set a [string range $cname 3 end]
HTTP::header insert "SSL_CLIENT_I_DN_CN" $a
HTTP::header insert "SSL_CLIENT_I_DN" $dn