Schrift
[thread]9210[/thread]

Ganz simples User management? (Seite 3)

Leser: 3


<< |< 1 2 3 4 >| >> 38 Einträge, 4 Seiten
renee
 2007-07-20 14:34
#78701 #78701
User since
2003-08-04
14371 Artikel
ModeratorIn
[Homepage] [default_avatar]
Mach mal aus:
Code (perl): (dl )
    my ($login, $password) = shift;


das hier:
Code (perl): (dl )
    my ($login, $password) = @_;


shift holt nur das erste Element, man braucht aber sowohl den Usernamen als auch das Passwort. Die Spaltennamen im SQL musst Du wahrscheinlich auch noch anpassen...
OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/
renee
 2007-07-20 14:35
#78702 #78702
User since
2003-08-04
14371 Artikel
ModeratorIn
[Homepage] [default_avatar]
Und an das Ende von der sub auth fehlt noch ein return $return...
OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/
renee
 2007-07-20 14:36
#78703 #78703
User since
2003-08-04
14371 Artikel
ModeratorIn
[Homepage] [default_avatar]
Es wäre übrigens schöner wenn Du subs und anderen Code nicht so mischen würdest...
OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/
RPerl
 2007-07-20 14:47
#78704 #78704
User since
2006-11-26
384 Artikel
BenutzerIn

user image
Code (perl): (dl )
 die "irgendwas ganz komisches ist passiert"


ersetzen mit

Code (perl): (dl )
 die "irgendwas ganz komisches ist passiert";


.. und wie renee bereits sagte: Spaltenname anpassen. Und countusers() anpassen -> return'en die entsprechenden Werte.
bieber
 2007-07-20 14:49
#78705 #78705
User since
2007-06-18
148 Artikel
BenutzerIn
[default_avatar]
*weiter kritisieren*

Informationen der Datenbank sollten in ne config-Datei
so musst du wenn sich mal was ändert nicht direkt in deinen Quellcode

PS ist das beabsichtigt das dein Datenbanknutzer und sein Passwort hier gepostet wurden?! (wäre dir mit ner config gar net passiert ;) )
Es gibt immer Leute die meinen, sie seien schlauer als ich. Das Schlimmste ist, sie sind es auch.
RPerl
 2007-07-20 14:50
#78706 #78706
User since
2006-11-26
384 Artikel
BenutzerIn

user image
[quote=bieber,20.07.2007, 12:49]*weiter kritisieren*

Informationen der Datenbank sollten in ne config-Datei
so musst du wenn sich mal was ändert nicht direkt in deinen Quellcode

PS ist das beabsichtigt das dein Datenbanknutzer und sein Passwort hier gepostet wurden?! (wäre dir mit ner config gar net passiert ;) )[/quote]
100% ack
FlorianL
 2007-07-20 15:01
#78707 #78707
User since
2007-05-18
142 Artikel
BenutzerIn
[default_avatar]
ist nicht so wild, der sql server ist von aussen nicht zu erreichen und das pass wird geändert sobald ich nicht mehr auf eure hilfe angewiesen bin *g*

desweiteren hat der user auch quasi nur die lese/schreib berechtigung für seine db, also selbst wenn jemand lokal drauf kommt (unwarscheinlich) wird nich viel passieren können... und selbst wenn, ich hab im moment einen table mit 2 einträgen drin ;)

so zurück zu den problemen, ich bekomme wenn ich einen user hinzufügen möchte die folgende fehlermeldung:

Quote
DBI::db=HASH(0x81f1124)->disconnect invalidates 1 active statement handle (either destroy statement handles or call finish on them before disconnecting) at ./slashem.pl line 21, <STDIN> line 5.
1You enter the World of SlashEm... Currently there are 1 Users registered

Can't call method "main" without a package or object reference at ./slashem.pl line 90, <STDIN> line 5.
mindfucked:/home/mindfuck/scripts#


die im script angegebenen db-values sind korrekt, ich hab echt kaum ahnung von sql, aber die fehlermeldung ist ziemlich nichts-sagend bzw ich kann nicht auf den fehler schliessen, weiss auch nciht warum er sich über die nicht-geschlossene session aufregt, eigendlich sollte die geschlossen sein...

code liegt hier: http://mindfucked.org/slashem.txt
(will nich schon wieder alles hier reinspammen :))

edit: der rest funzt, also nologin und loginokay, nur useradden halt nich, denke isn sql statement error maybe?\n\n

<!--EDIT|FlorianL|1184929423-->
renee
 2007-07-20 15:05
#78708 #78708
User since
2003-08-04
14371 Artikel
ModeratorIn
[Homepage] [default_avatar]
[quote=RPerl,20.07.2007, 12:47]
Code (perl): (dl )
 die "irgendwas ganz komisches ist passiert"


ersetzen mit

Code (perl): (dl )
 die "irgendwas ganz komisches ist passiert";
[/quote]
Ist schöner, ja... Muss man aber nicht, da es die letzte Anweisung in einem Block ist. Da kann man das Semikolon weglassen.

90%ACK zu der Config. Ne Config ist eigentlich überflüssig, wenn es nur um ein kleines Skript geht. Da kann man so etwas auch in einem Bereich am Anfang des Skript schreiben. Sobald es mehr als ein Skript/Modul wird, würde ich es auch auslagern.
Aber das ist wie mit sehr vielen Dingen: auch eine Sache der persönlichen Vorliebe ;)
OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/
renee
 2007-07-20 15:06
#78709 #78709
User since
2003-08-04
14371 Artikel
ModeratorIn
[Homepage] [default_avatar]
Nimm das $dbh->disconnect; bei countusers raus!

Edit: Und füge noch ein $sth->finish; in auth nach dem fetchrow_array; ein...\n\n

<!--EDIT|renee|1184929669-->
OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/
FlorianL
 2007-07-20 15:35
#78710 #78710
User since
2007-05-18
142 Artikel
BenutzerIn
[default_avatar]
fehler is nun weg, danke ;)

aber er speichert nicht in die db, ist diese zeile korrekt?

Code: (dl )
my $stmt = q~INSERT INTO users(username, password) VALUES($login, $password)~;


Ansonsten geht das schon, beim connect mit meiner valid u/p combo wird das game gestartet, bin also nurnoch nen klitzekleines stück vom ziel entfernt ;)
<< |< 1 2 3 4 >| >> 38 Einträge, 4 Seiten



View all threads created 2007-07-20 11:06.