%%% Bereich( $TRAVEL{matches}, $TRAVEL{matches}, "Betrieb entspricht","Betriebe entsprechen") %%% Ihren Anforderungen.

<% qq(

Es wurden keine Gastgeber gefunden, welche Ihre Anfrage beantworten könnten. Bitte überprüfen Sie Ihre Suchanfrage und verändern Sie Ihre Anforderungen.

) if $TRAVEL{matches} == 0; %> <% qq(

Es wurden nur $TRAVEL{matches} Gastgeber ermittelt, welche Ihre Anfrage beantworten können. Es wäre möglich dass Sie wenige oder sogar gar keine Angebote erhalten. Bitte überprüfen Sie Ihre Suchanfrage und verändern Sie Ihre Anforderungen.

) if $TRAVEL{matches} > 0 && $TRAVEL{matches} < 10; %>

Ihre Suchanfrage lautet:

%%% $TRAVEL{suchanfrage} %%%

<% $in{mitteilung} =~ s/[\n\r\t\s]+/ /g; $in{mitteilung} =~ s/["]//g; return $in{mitteilung}; %>

Möchten Sie Ihre Angaben noch einmal ändern? Anfrage ändern

<% return "" unless $TRAVEL{matches}; require SE::Lib::GUI; require SE::Community::Laender; my $gui = SE::Lib::GUI->new(); my $html_land = $gui->genWidget( typ => "select", name => "land", width => 330, data => [ getLaender( format => 'ARRAY' ) ], value => "de", ); my @data; foreach ( 1 .. $TRAVEL{matches} ) { push @data, ( $_ => Bereich( $_, $_, "Angebot", "Angebote" ) ); } my $anzahl = $gui->genWidget( typ => "select", name => "anzahl", data => \@data, value => 10, ); my $antispam = &create_antispam(); qq(

Ihre Anschrift

); %>

$LANG{Anrede}*	$LANG{Vorname}*	$LANG{Name}*

$LANG{Strasse} / Hausnummer

$LANG{PLZ}	$LANG{Ort}

$LANG{Land}
$html_land
$LANG{Telefon}

$LANG{Fax}

$LANG{Email}* $LANG{Email_wiederholen}
Weitere Wünsche Bitte unterbreiten Sie mir ein Angebot für: Anzahl Erwachsene: $in{anzahl_erwachsene} Anzahl Kinder: $in{anzahl_kinder} Alter Kinder: $in{alter_kinder} $in{mitteilung}
Wieviele Angebote wollen Sie maximal erhalten ? $anzahl