my ( $dbh,$cgi,$session ) = @_; my $sessiondata=$session->data; $sessiondata->{style}='default' unless $sessiondata->{style}; $sessiondata->{abta}=0 unless $sessiondata->{abta}; my $zp=$cgi->param("z_pagecount") || 1; if ( $zp == -1 ) { $sessiondata->{pagecount}=0; } $session->data($sessiondata); use VB::Featured; my $search=new VB::Featured($dbh,$cgi,$session); $search->london; $search->country; my $sessiontemp=$session->temp; my @rv = (); return join "\n",@rv; <perl> my @rv=(); if ( $ENV{REQUEST_URI} =~ m/international/i ) { push @rv, qq{theregister.net - International Hotel Guide}; } else { push @rv,qq{theregister.net - Trade Guide to UK hotels}; } return join '',@rv; </perl>

The Hotel Register - Free Phone 0800 007 5600

Trade Guide to UK Hotels

South East England , South West England , Midlands England , North of England , Wales, North Scotland , Central Scotland, Southern Scotland, Ireland, Channel Islands


Search
Town / City
Name of Hotel
Name of Group
my ( $dbh,$cgi,$session ) = @_; my $sessiondata=$session->data; my $sessiontemp=$session->temp; my @rv = (); my $hotel=$sessiontemp->{londonhotel}; my $url="hoteldetail.html?hotel=".md5_hex($hotel->{refID}).".xml"; my $image='hotelimages/'.$hotel->{image0}->{filename}; my $hotelname=$hotel->{hotelname}; my $text=substr($hotel->{amadeouslocationdescription},0,255); push @rv,qq{
$text
}; my $trackurl='../syzygy.xp/H='.$hotel->{refID} if $hotel->{refID}; push @rv, qq{}; push @rv, qq{
}; return join "\n",@rv;
my ( $dbh,$cgi,$session ) = @_; my $sessiondata=$session->data; my $sessiontemp=$session->temp; my @rv = (); my $hotel=$sessiontemp->{countryhotel}; my $url="hoteldetail.html?hotel=".md5_hex($hotel->{refID}).".xml"; my $image='hotelimages/'.$hotel->{image0}->{filename}; my $hotelname=$hotel->{hotelname}; my $text=substr($hotel->{amadeouslocationdescription},0,255); push @rv,qq{
$text
}; my $trackurl='../syzygy.xp/H='.$hotel->{refID} if $hotel->{refID}; push @rv, qq{}; push @rv, qq{
}; return join "\n",@rv;
Quick City Search
Central London
Birmingham
Liverpool
Cambridge
Dublin
Edinburgh
Greater London
Manchester
Newcastle
Oxford
Belfast
Glasgow