cgi.pm

[Christoph Schnauß]

hallo,

ich würde gerne wissen wie ich bei befehlen wie table() newlines für alle neuen tags erzeugen kann.

Du schreibst einfach einen Zeilenumbruch dahinter. Beispiel:

  
   foreach $main_line (@main) {  
      if ($main_line =~ /<!-- start -->/) {  
         print MAIN $cgi->comment('start')."\n".  
                    $cgi->start_table({-border =>'0', -cellspacing =>'8', -cellpadding =>'5', -width =>'100%'})."\n".  
                    $cgi->Tr($cgi->td({-bgcolor =>'#FFFFFF', -style  =>'border:1px solid #0C0C0C'}, "\n".  
                              $cgi->ol($cgi->a({-href =>$basisurl.'/'.$archivdir.'/'.$num.'.htm'},$thema).  
                              ' von '.$cgi->b($name).', '. $datum.' Uhr'."\n".  
                              $cgi->comment('antwort: '.$num)."\n")."\n")).  
                    $cgi->end_table()."\n\n";  
      } else { print MAIN "$main_line" }  
  

Grüße aus Berlin

Christoph S.