Thread Problem mit Scrollscript: Zeigt nur letzten Eintrag an (12 answers)
Opened by Tom at 2004-01-11 20:58

[E|B]
 2004-01-11 21:42
#847 #847
User since
2003-08-08
2561 Artikel
HausmeisterIn
[Homepage] [default_avatar]
Na den Code kannst du aber schöner schreiben! :D
Wenn du in der if-Bedingung in der Schleife den Wert von $a auf "Ja" setzt und danach prüfst, ob die Variable auch den Wert "Nein" hat, kann das natürlich nicht gehen!
Hier mal ein etwas schönerer Code:

Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
if(-e("$filetoopen")){
          open(FILE, "$filetoopen");
          my @events = <FILE>;
          close(FILE);
# ..
# ..
# ..

          print "Content-type: text/html\n\n";
          print "here's all the HTML stuff; 

          my $id = -1;
          foreach (sort{ $a <=> $b } @events) {
                    ($beginn, $name, $veranstalter, $titel, $ort, $location, $am, $art, $mail, $url, $sonstiges) = split(/\|/, $_);
                    $id++;
                    if($a eq nein){
                              print "here's HTML stuff, too";
                              # $a = ja;
                              # Wenn du hier auf "ja" setzt wird der HTML Code nicht mehr ausgegeben!
                    }
          }
}

exit;
Gruß, Erik!

s))91\&\/\^z->sub{}\(\@new\)=>69\&\/\^z->sub{}\(\@new\)=>124\&\/\^z->sub{}\(\@new\)=>);
$_.=qq~66\&\/\^z->sub{}\(\@new\)=>93~;for(@_=split(/\&\/\^z->sub{}\(\@new\)=>/)){print chr;}

It's not a bug, it's a feature! - [CGI-World.de]

View full thread Problem mit Scrollscript: Zeigt nur letzten Eintrag an