CGI::Session::CookBook - #6102 (Perl/CGI)

Tom

2005-12-05 22:09

User since
2003-09-20
470 Artikel
BenutzerIn

Hallo,

Im diesem CookBook ist beschrieben wie man eine Members Area erstellt, wollte das mal testen, klappt aber nicht ganz.

Was macht denn dieser Teil genau?

Code: (dl )

while ( <PROFILES> ) {
            /^(\n|#)/ and next;
            chomp;
            my ($n, $p, $e) = split "\s+";

split teilt den String ab mindestens einem Leerzeichen in die Variablen $n, $p, $e.
Aber was macht der Code davor?

Und muss das <PROFILES> nicht <PROFILE> heißen denn davor wird es ja in PROFILE geladen.

Code: (dl )

        local $/ = "\n";
        unless (sysopen(PROFILE, "profiles.txt", O_RDONLY) ) {
            die "Couldn't open profiles.txt: $!");
        }

Wenn ich <PROFILE> schreibe macht das Programm weiter, aber die Split-Funktion funktioniert nicht wie gewünscht.

Tom

Computerprobleme??? -> http://www.weber-computerhilfe.de

Fordere keine Anerkennung!
Zeige was und man wird Dich kennen