From 9d6fc3fd2ae9dda276c889f9a4c8b9b773e3fe77 Mon Sep 17 00:00:00 2001 From: Dobrica Pavlinusic Date: Tue, 12 Jul 2011 10:57:25 +0200 Subject: [PATCH] try to select from database if there is no redis row --- web_ui.pl | 9 ++++++++- 1 file changed, 8 insertions(+), 1 deletion(-) diff --git a/web_ui.pl b/web_ui.pl index 4ee747c..9b046b8 100755 --- a/web_ui.pl +++ b/web_ui.pl @@ -82,16 +82,23 @@ get '/table/:table' => sub { my $username = $self->param('username'); my $limit = $self->param('limit') || 1; + warn "/table/$table $username $limit"; + my $sql = "select * from $table"; $sql .= " where username = '$username'" if $username; $sql .= " limit $limit"; my $ret; if ( $limit == 1 ) { + my $redis = Redis->new; $ret = $redis->get( "table.$table.$username" ); - } else { + warn "redis hit table.$table.$username"; + } + if ( ! $ret ) { $ret = $gearman->req( 'SUBMIT_JOB', 'Store_sql', '', $sql ); + warn "gearman $sql"; } + warn ">>> $ret"; _render_jsonp( $self, $ret ); }; -- 2.20.1