minor code cleaning

client/saml-init

@@ -26,9 +26,6 @@ use Term::ReadKey;
 use Term::ReadLine;
 use MIME::Base64 qw( encode_base64 );
 
-# Just for debugging:
-use Data::Dumper;
-
 # Handle <Ctrl>+C to reset the terminal to non-bold text
 $SIG{INT} = \&resetTerm;
 
@@ -44,7 +41,6 @@ my $headers='';
 # DEFAULTS
 my $idpname = 'Test KIT IdP';
 my $idplisturl = 'http://saml-delegation.data.kit.edu/sd/idplist.txt';
-#my $idpurl = 'https://idptest.scc.kit.edu/idp/profile/SAML2/SOAP/ECP';
 my $idpurl = '';
 my $idpuser = '';
 my $idppass = '';
@@ -239,8 +235,7 @@ if ($response->is_success) {
             warn("Error: No valid IdP URL specified\n");
             exit 1;
         }
-        # Finally create the session cookie... (the lengthy code is in the
-        # subroutine
+        # Create the session cookie... (the lengthy code is in the subroutine)
         create_valid_session_via_idp($idpurl, $idpuser, $idppass, $ua);
 
         # Reset the cookie to prevent CSRF