delete users

titanic_fanataic has asked for the wisdom of the Perl Monks concerning the following question:

Replies are listed 'Best First'.
Re: delete users by DaWolf (Curate) on Dec 06, 2004 at 12:18 UTC
Hi. This looks as a flat text file to me, so I don't know if I exactly understood your question, but I really wanna help you, so let's start. If you were just representing a database, this would be easy, just do a simple SQL query: `DELETE FROM your_table_name WHERE USERNAME = 'desired_user';` If I was right at the first time and you just use a flat text file, take a look at Deleting a line out of text file for a start. That sould guide you fine. For your second question the answer is a little bit longer: Since your developing a system that has a web interface, a problem arise: What if the user just close the browser (by pressing ALT F4 or just clicking on that dreaded top right 'X' ;))? Since it's a hard thing to trigger an event when the user does this (I won't expand too much here since this is more a JavaScript thing) the user session (assuming that there is one) would remain opened and this is a security breach. So, the solution I've found out (and IMHO is the most used out there) is to do the following: When the user logs in store his session id and the current date and time on the database (or flat file). Each and every page entered by the user should do a check if the user data exists and update the database updating the date and time. Run a cron job that checks every XX minutes if the date and time of the user session is active and if is not (his date and time are over the XX minutes interval) delete his data from the db. So, the next page will see that the user data doesn't exist anymore and will redirect the user to (probably) the login page, so he starts the process all over again. Your logout routine (for the logout link) should just destroy the user session and delete his data from the database. There are a lot of issues on this question, but I hope I helped a little. Feel free to contact me if you have any questions. Best regards, Er Galvão Abbott www.galvao.eti.br Porto Alegre Perl Mongers	[reply] [d/l]
Re^2: delete users by bradcathey (Prior) on Dec 06, 2004 at 13:13 UTC
Another way to handle the logging in and out is by setting a cookie: When the user logs in, use CGI to write a cookie containing their user name, possibly a code for their priviledges, and then an expire time. Each time you return to a server-side script, check the cookie. If it has expired, route them to the log in screen. If it has not expired, reset it and send them on their way. When they voluntarily log out, set the cookie's expire time to zero and return them to the log-in screen. It boils down to what you are most comfortable with, though the DB method has the advantage of allowing you to know who is logged on at any one time. —Brad "Don't ever take a fence down until you know the reason it was put up." G. K. Chesterton	[reply]
Re^3: delete users by DaWolf (Curate) on Dec 06, 2004 at 13:21 UTC
True, bradcathey, but don't forget that the user can disable cookies and then this guy will have a problem =:c) Regards, Er Galvão Abbott www.galvao.eti.br Porto Alegre Perl Mongers	[reply]
Re^4: delete users by bradcathey (Prior) on Dec 06, 2004 at 17:10 UTC
Re^5: delete users by DaWolf (Curate) on Dec 10, 2004 at 02:46 UTC
Re: delete users by b10m (Vicar) on Dec 06, 2004 at 11:58 UTC
There are several ways you can approach this. The easiest way is to use a module: Text::CSV Text::CSV_XS DBD::CSV (hi jZed) Tie::Handle::CSV ... As for the log out feature; that involves quite a bit of changes to your existing code (I believe) and I'd advise some way of session handling there (CGI::Session, Apache::Session ...) -- b10m All code is usually tested, but rarely trusted.	[reply]
Re^2: delete users by xorl (Deacon) on Dec 06, 2004 at 14:28 UTC
Actually I think Text::xSV might be more useful since it can hand delmiters other than the comma.	[reply]
Re: delete users by titanic_fanataic (Acolyte) on Dec 07, 2004 at 01:34 UTC
I want to appologize for my innexperience with perl, I'm still trying to learn, but this is the best way to learn with hands on. I've included a link to a zip file HERE containing my current files, this should help make it easier to understand what I'm trying to acheive. I'm still not sure how to implement any of this code into my script. If someone would be willing to aid me by looking through my code and possibly even telling me where I need to make improvements on my code. Thanks for all of your help, Tylor skatemaster@shaw.ca	[reply]
Re^2: delete users by xorl (Deacon) on Dec 08, 2004 at 13:44 UTC
I only glanced at the code... You'll need to open the adminpasswd.db or passwd.db file, find the line with the user and delete them. Here's one node, How do I delete/modify one line from test file ?, and I'm sure you can find others on the site. Frankly I'd follow the advice of the others on this thread and stuff it into a real database (MySQL or PostgreSQL are both good). Doing that will make your life a lot easier in the long run.	[reply]


Come for the quick hacks, stay for the epiphanies.
	PerlMonks