<% my $inkl = qq(inkl. Frühstück) if $VERMIETER{inklusive_verpflegung} eq "uf"; $inkl = qq(inkl. Halbpens.) if $VERMIETER{inklusive_verpflegung} eq "hp"; $inkl = qq(inkl. Vollpens.) if $VERMIETER{inklusive_verpflegung} eq "vp"; $inkl = qq() if $VERMIETER{inklusive_verpflegung} eq ""; my $preis = $VERMIETER{preis}; $preis =~ s/\./,/g; my $personen; $p = $in{filter_personen} >= 1 ? $in{filter_personen} : $VERMIETER{zimmer_minpers}; $personen = qq(für $p Personen) if $p > 1; $personen = qq(für 1 Person) if $p == 1; $VERMIETER{preis} > 0 ? qq() : qq() %>
<% $TRAVEL{zimmertypen}->{$VERMIETER{zimmer_typ}} %> <% $VERMIETER{zimmer_name} %> <% $VERMIETER{zimmer_minpers} == $VERMIETER{zimmer_maxpers} ? $VERMIETER{zimmer_maxpers} == 1 ? qq(1 Person) : qq($VERMIETER{zimmer_maxpers} Personen) : qq($VERMIETER{zimmer_minpers}-$VERMIETER{zimmer_maxpers} Personen) %>ab $preis € $personen $inkl