Programming Guides › Programming Guide for Perl › Policy Management Operations › Save Changes to Objects

Save Changes to Objects

When you make changes to an instance of the following objects, you must call the object's Save() method to save the changes. Call Save() once after making any changes to these objects:

• PolicyMgtAffiliate
• PolicyMgtAuthScheme
• PolicyMgtPwdPolicy
• PolicyMgtSAMLAffiliation
• PolicyMgtSAMLServiceProvider
• PolicyMgtSharedSecretPolicy

The following example changes properties for an authentication scheme object:

use Netegrity::PolicyMgtAPI;

$policyapi = Netegrity::PolicyMgtAPI‑>New();
$session = $policyapi‑>CreateSession("adminid", "adminpwd");
$authscheme=$session‑>GetAuthScheme("HTML Authentication");

#Specify the attribute list
$attrList="AL=PASSWORD,SSN,age,zipcode;";
#Specify the new credentials collector
$target="http://my.server.com/siteminderagent/forms/customlogin.fcc";

#Make the changes and save them
$authscheme‑>ProtectionLevel(10);
$authscheme‑>CustomParam($attrList.$target);
$authscheme‑>Save();