my $reqpage= param('reqpage');

unless ($reqpage > 1) {$reqpage = "1";}
 
my  $pagesize = "5"; 
my $firstresult = (($reqpage - 1) * $pagesize) + 1;
my $lastresult = $firstresult + $pagesize - 1;
if ($lastresult > $result_count) {
$lastresult = $result_count;
}

my $offset = (($reqpage-1) * $pagesize); 


my $limit = "5";
my $result;
my @result;


my $LastName=param('LastName');

        my $n="3";
        my $LastName= substr($LastName,0,$n);
        my $query="$LastName%";

my $sql = "Select AccountID,LastName,FirstName,Location,Specialty,Introduction,View from members WHERE (Location = 'Phoenix, AZ USA' and LastName LIKE ?) Limit $offset,$limit";
my $sth=$dbh->prepare("$sql"); 
$sth->execute($query)  or die "Connection Error: $DBI::errstr\n";