NAMEPasswd::Keyring::KDEWallet-PasswordstorageimplementationbasedonKDEWallet.VERSIONVersion0.2006SYNOPSISKDEWalletbasedimplementationofPasswd::Keyring.usePasswd::Keyring::KDEWallet;my$keyring=Passwd::Keyring::KDEWallet->new(app=>"blahblah scraper",group=>"Johnny web scrapers",);my$username="John";# or get from .ini, or from .argv...my$password=$keyring->get_password($username,"blahblah.com");unless($password){$password=<somehowinteractivelypromptforpassword>;# securely save password for future use$keyring->set_password($username,"blahblah.com");}login_somewhere_using($username,$password);if(password_was_wrong){$keyring->clear_password($username,"blahblah.com");}Note:seePasswd::Keyring::Auto::KeyringAPIfordetailedcommentsonkeyringmethodsemantics(thisdocumentisinstalledwith`Passwd::Keyring::Auto' package).SUBROUTINES/METHODS new(app=>'appname', group=>'passwordsfolder')Initializestheprocessing.Croaksifkwallet(ord-bus,oranythingneeded)doesnotseemtobeavailable.Handlednamedparameters:-app-symbolicapplicationname(usedin"Application .... is asking to open the wallet"KDEWalletprompt)-group-nameforthepasswordgroup(usedasKDEWalletfoldername)set_password(username,password,realm)Sets(stores)passwordidentifiedbygivenrealmforgivenuserget_password($user_name,$realm)Readspreviouslystoredpasswordforgivenuseringivenapp.Ifsuchpasswordcannotbefound,returnsundef.clear_password($user_name,$realm)Removesgivenpassword(ifpresent)is_persistentReturnsinfo,whetherthiskeyringactuallysavespasswordspersistently.(trueinthiscase)AUTHORMarcinKasperskiApproachinspiredbyhttp://www.perlmonks.org/?node_id=869620.BUGSPleasereportanybugsorfeaturerequeststoissuetrackerathttps://bitbucket.org/Mekk/perl-keyring-kdewallet.SUPPORTYoucanfinddocumentationforthismodulewiththeperldoccommand.perldocPasswd::Keyring::KDEWalletYoucanalsolookforinformationat:http://search.cpan.org/~mekk/Passwd-Keyring-KDEWallet/Sourcecodeistrackedat:https://bitbucket.org/Mekk/perl-keyring-kdewalletLICENSEANDCOPYRIGHTCopyright2012MarcinKasperski.Thisprogramisfreesoftware;youcanredistributeitand/ormodifyitunderthetermsofeither:theGNUGeneralPublicLicenseaspublishedbytheFreeSoftwareFoundation;ortheArtisticLicense.Seehttp://dev.perl.org/licenses/formoreinformation.