sub BILD_GALERIE
{

foreach my $opt1(@Liste1){
$text .=  "$opt1";

@Liste=split (/ | /, $BILD_GALERIE);
foreach my $opt(@Liste){
$opt =~ s/^\s//;

$a_options .= "<tr><td><A HREF=\"javascript:popUp('http://immo1001.de/baseportal.pl?htx=/immo1001.de/immo1001/baustein/format_immo_02&Id==$_id&bild=$opt&text=$text&bildwert=$bildwert')\">  <IMG SRC=\"http://www.icg.de/icgi/$opt\.jpg\" WIDTH=\"30\" HEIGHT=\"30\" BORDER=\"1\"></td></tr><tr><td>$opt1 </td></tr></a>";
$b_options .= "<b>$opt / </b>";
$c_options .= "$opt<br>";
$d_options .= "<A HREF=\"javascript:popUp('http://immo1001.de/baseportal.pl?htx=/immo1001.de/immo1001/baustein/format_immo_02&Id==$_id&bild=$opt&text=$text&bildwert=$bildwert')\">$opt - $opt1 // $text<br></a>";
}
}