Help for this page

Select Code to Download


  1. or download this
    use warnings;
use strict;
...
$samlRequest = decode_base64($samlRequest);
rawinflate \$samlRequest => $AuthnRequestXML or return "Error decompre
+ssing data: $RawInflateError\n";
print "SAML AuthnRequest XML:\n$AuthnRequestXML\n";
  2. or download this
    use XML::Tidy;
XML::Tidy->new('xml'=>$AuthnRequestXML)->tidy()->toString();