my $cookie = $cgi->cookie('session_token'); # $cookie is '9874354683216735468453121845168441'; if ( $cookie && $cookie =~ m/some match/ ) { my ($session_id) = $dbh->selectrow_array ("select id from sessions where token = ?", undef, $cookie ); }