my ( $dbh,$cgi,$session ) = @_; my $sessiondata=$session->data; my @rv = (); push @rv,qq{ } if $sessiondata->{style} && $sessiondata->{style} eq 'default'; push @rv,qq{} if $sessiondata->{style} && $sessiondata->{style} eq 'amadeus'; return join "\n",@rv;

The Wedding Register - Free Phone 0800 007 5600

Email my ( $dbh,$cgi,$session ) = @_; my $hotelname=$cgi->param("hotelname") || ""; return $hotelname;

Name
Company
Address
Telephone
Your Email address
Name of Venue or Area
E.g. Leicestershire or West Midlands
Brief Description