#!/usr/bin/perl use strict; use CGI; use CGI::Carp; #create CGI query object to get the SSO from URL my $query = CGI->new; my $sso = $query->param("sso"); $sso = shift; print "Content-type:text/html\r\n\r\n"; print ""; print "