<% my $bilder = $value[4] ? qq() : ""; $bilder; %>
<% $value[120] ? qq(

$value[120]

) : "" %> <% $value[121] ? qq(

$value[121]

) : "" %> <% $value[122] ? qq(

$value[122]

) : "" %>

Inhalte

<% my $output; for ( $i = 1; $i < 11; $i++ ) { $i1 = $i*10+1; $i2 = $i*10+2; $i3 = $i*10+3; $i4 = $i*10+4; $i5 = $i*10+5; $i6 = $i*10+6; $output .= qq(
$value[$i3]
) if $value[$i3]; } return $output; %>

<% my $output; for ( $i = 1; $i < 11; $i++ ) { $i1 = $i*10+1; $i2 = $i*10+2; $i3 = $i*10+3; $i4 = $i*10+4; $i5 = $i*10+5; $i6 = $i*10+6; $i7 = $i*10+7; $x1 = $i*3+130+1; $x2 = $i*3+130+2; $x3 = $i*3+130+3; my %farbe = ( "#85BAFC" => "blau", "#976EE0" => "blauviolett", "#72CCDC" => "hellblau", "#4348A2" => "dunkelblau", "#F8E072" => "gelb", "#BCE3AA" => "gruen", "#F39150" => "orange", "#CC3917" => "rot", "#D75CBC" => "rotviolett", ); my $lnk; if ($value[$i6]) { $lnk = qq( | mehr Info); } elsif ($value[$i5]) { $lnk = qq( | mehr Info); } my $xbild1 = qq() if $value[$x1]; my $xbild2 = qq() if $value[$x2]; my $xbild3 = qq() if $value[$x3]; my $img = qq() if $value[$i1]; my $hintergrund_bild = qq(http://$ENV{HTTP_HOST}/gfx/newsletter/slogan/$farbe{$value[$i7]}/$value[$i2]); $output .= qq(

$img $value[$i3]

$value[$i4]

$lnk

$xbild1 $xbild2 $xbild3
) if ($value[$i3] ne ""); } return $output; %>