TROPICANA

Address:
2831 Boardwalk
Downtown, 08401
800-THE-TROP

Description:
The Quarter has made this locale top notch.

Reservations: 1-800-895-7244

Arrival Date:	Nights:	Rooms:	Adults:	Children:

EDITORIAL REVIEW

The Tropicana is the Rocky Balboa of casinos. It’s taken some shots that would floor any other casino, but it’s still on its feet and fighting. Here’s the plot in a nutshell: new owners came in and ran the place into the ground. Tales of bedbugs, garbage-filled hallways and demoralized staff abound. (Tropicana hits the mat.) Trop looses its gaming license and is now run by a trustee. (Trop gets a glove on the rope and starts to pull itself up.) Ownership is still uncertain, but the operations are back to normal. (Trop stands up just in time to beat the ten-count). The ongoing ownership issues are transparent if you visit the Trop these days. The staff is happier and the casino is humming. If you visit the Quarter on the weekends, you’ll see packed restaurants and clubs, happy people and smiling faces. In time, the Trop will end up walking away with a black eye and a good story. After all, the Trop will always be one of the better casinos in town - it just has too much going for it. The casino is supported by the Old Havana-themed Quarter, a great shopping and dining complex that has restaurants such as Cuba Libre, Carmine’s, P.F. Chang’s and Red Square. You can also find a bunch of great nightlife spots including Ri Ra Irish Pub, Planet Rose karaoke bar, the Comedy Stop, 32 Degree Lounge and the Providence dance club, which is quickly making waves in Atlantic City’s nightlife scene. On the boardwalk level you’ll find the Marketplace with restaurants like Hooters, Corky’s BBQ and the Firewaters bar. Table players are sure to find their fun as well with everything from traditional games like Blackjack, Craps, Roulette and Baccarat, to the newest trends like 3 Card Poker and Boston 5. Adding to the gambling excitement are the Tango Gaming Pit and Jade Palace, featuring all your favorite Asian-inspired games. The casino's Poker Room is notable, as a specially designed photo identification system is used to ensure that players receive the "comps" due them. Round it all out with Tropicana's Turf Club boasting more than 100 monitors showing races from every major track around the country. If you get stressed out going through all the options, you can relax at the bluemercury spa.

NEWS FROM THE TROPICANA

% # Output channel items % my @headlines=@{$rss->{'items'}}; % for (my $i =0; $i < 5; $i++){ % my $item=$headlines[$i]; % next unless defined($item->{'title'}) && defined($item->{'link'}); % }
<%args> <%once> use XML::RSS; use LWP::Simple; use Bender::TokenLang::Ops; use DateTime::Format::Mail; <%init> my $rss = new XML::RSS; my $src ="http://www.tropicana.net/press/TropPress.rss"; my $content = $m->cache->get($src); # my $content = $m->cache(action=>'retrieve', key=>$src); # This syntax didn't work for me, but $m->cache->get($src) did. if (! defined $content) { $content = get($src); die "Could not retrieve $src" unless $content; $m->cache->set($src => $content, '24 hours'); # $m->cache(action=>'store', key=>$src, expire_in=>'1 hour', value=>$content); # Similar to above - I don't know if this is an older/different interface to the cache or what... } $rss->parse($content); <%doc> * WHAT A 'portlet' like component for fetching and displaying RSS syndicated content. * VERSION .01 - First release. * FEATURES - Easy to incorporate into any Mason server. - Low dependancies. Only needs XML::RSS and LWP::Simple. - Uses Mason caching to avoid overloading RSS servers. * HOW - Drop rss component into - Define a 'template' to wrap the portlet. A template is a Mason component with 'top' and 'bottom' methods. These methods should describe a nice table for the content. 'top' method should take a title as first arg. Alternatively, you can put the wrapper HTML in the rss component. - Call rss in your autohandler or HTML page like so <& '/portlets/rss', src=>'http://search.cpan.org/recent.rdf' &> Assumes rss component is in "portlets" directory. - Note that XML::RSS (and all other modules build on XML::Parse) are incompatible with the standard expat built in to Apache. You'll need to compile Apache without expat in order to have this work. If you try to use this and get segfaults from Apache, that's probably the cause. * CREDITS Jonathan Swartz made HTML::Mason. Jonathan Eisenzopf made the XML::RSS package and rss2html.pl upon which the rss component is based. "Dennis Watson" combined the two into this package. Rick Ford made some minor edits & comments * COPYRIGHT The rss component is free software. It is distributable under the same terms as HTML::Mason itself.

<% $item->{'title'}%>

USER REVIEWS OF TROPICANA

% if ($comments->[0]){ % for my $c(@{$comments}){

<% $c->{commentsubject} %> <% $c->{commentrating} %> Stars

<% $c->{commenttext} %>

Reviewer: <% $c->{commentauthor} %>, <% $c->{commentauthorlocation} %>
Date Submitted: <% $c->{fmt_commenttimestamp} %>

% } ##end for % } ##end if % else{

Share your opinion. Submit your user review!

%} ##end else <%init> $bigdbh = DBI->connect("DBI:Pg:dbname=bigdb;host='63.169.139.4'") or warn "$!\n"; #my $travel_id='4476'; #my $domain='travelape.com'; my $cache_key="$ARGS{commentrefid}-$ARGS{domain}"; my $cache_time='24 hours'; my $comments=$m->cache->get($cache_key); if (!defined($comments)) { # print "retrieving LIVE
\n"; $comments=$m->comp ("/lib/data/travelcomments.mas", bigdbh=>$bigdbh, commentrefid=>$ARGS{commentrefid}, domain=>$ARGS{domain}, commentreftablename=>$ARGS{commentreftablename}, ); $m->cache->set($cache_key,$comments,$cache_time); } ##end if else{ #print "retrieving from CACHE
\n"; } $bigdbh->disconnect;
Add Your Own Review

WEATHER

Todays Weather

	Fri-03/27 High:41°F Low:34°F
Intermittant Clouds

CASINO SHOWS

%for my $p(@{$performances}){ %for my $pl(@{$p->{performance_list}}){ %} ##end for %} ##end for <%init> use Bender::Events::ProviderTickets; use DBI; use Data::Dumper; my $bigdbh=DBI->connect('DBI:Pg:dbname=bigdb;host=63.169.139.4'); my $provider_obj=Bender::Events::ProviderTickets->new(dbhandle=>$bigdbh); my $performances=$provider_obj->performanceMonthListing( provider_id =>1, city_standard_id =>16892, order_by =>'date,time,event_name', limit =>30, # having_performances =>1, # DBG =>1, ); $m->comp ('/lib/utils/not_found_fake.mas', error => "$@") unless $performances; #print Dumper $performances; #exit;

<% $pl->{month_word_abr} %> <% $pl->{day} %>

<% $pl->{event_name} %>