Source

perl/keyring/kdewallet / README

Diff from to
             $password = <somehow interactively prompt for password>;
 
             # securely save password for future use
-            $keyring->set_password($username, "blahblah.com");
+            $keyring->set_password($username, $password, "blahblah.com");
         }
 
         login_somewhere_using($username, $password);