diff options
author | Joey Hess <joey@kodama.kitenet.net> | 2008-03-21 13:56:31 -0400 |
---|---|---|
committer | Joey Hess <joey@kodama.kitenet.net> | 2008-03-21 13:56:31 -0400 |
commit | f9aa09e2f6e35c7466aca374dc0a1299ca9cf283 (patch) | |
tree | 0a0469a709d5e21a3209e1dc226c0fd4c2ce0226 | |
parent | fbe5e9b144afb04fa8e53c8b33eb72bef31dcb33 (diff) |
moved to a tip
-rw-r--r-- | doc/index/discussion.mdwn | 36 |
1 files changed, 0 insertions, 36 deletions
diff --git a/doc/index/discussion.mdwn b/doc/index/discussion.mdwn index df4e57aba..3d17ddb2a 100644 --- a/doc/index/discussion.mdwn +++ b/doc/index/discussion.mdwn @@ -337,42 +337,6 @@ Clicking on an old "?" or going to a create link but new Markdown content exists ---- -# User database tools? - -Any tool to view user database? - -Any tool to edit the user database? - -> No, but it's fairly easy to write such tools in perl. For example, to -> list all users in the user database: - - joey@kodama:~/src/joeywiki/.ikiwiki>perl -le 'use Storable; my $userinfo=Storable::retrieve("userdb"); print $_ foreach keys %$userinfo' - http://joey.kitenet.net/ - foo - -> To list each user's email address: - - joey@kodama:~/src/joeywiki/.ikiwiki>perl -le 'use Storable; my $userinfo=Storable::retrieve("userdb"); print $userinfo->{$_}->{email} foreach keys %$userinfo' - - joey@kitenet.net - -> Editing is simply a matter of changing values and calling Storable::store(). -> I've not written actual utilities to do this yet because I've only needed -> to do it rarely, and the data I've wanted has been different each time. -> --[[Joey]] - ->> Thanks for these examples -- I have been using them. I don't know the ->> Storable yet. Can someone share an example of removing a user? (I now ->> setup account\_creation\_password and I have some spammer with different ->> login names that I have banned that I might as well remove from the ->> userdb.) - ->>> Let's see, you could do something like this: ->>> perl -le 'use Storable; my $userinfo=Storable::retrieve("userdb"); delete $$userinfo{"joey"}; Storable::lock_store($userinfo, "userdb")' ->>> I suppose I should stop being lame and create a command line tool wrapping up these operations.. --[[Joey]] - ----- - # Spaces in WikiLinks? Hello Joey, |