I think that you can use DBI method fetchall_arrayref() for fetching all records set in one time as array reference on array references rows:

sub getHallDetails() {
  my ($hall_id, $dbh) = @_;

  my $sth=$dbh->prepare("select hall_name, upload_date, uploaded_by, p
+hoto_id from hall_details
                         where hall_id='$hall_id' limit 1;");
  $sth->execute();
  my $res_arr = $sth->fetchall_arrayref();
  $sth->finish; 
  my $hall_details={ $hall_id => $res_arr };  
  return $hall_details;
}
[download]

      
--------------------------------
SV* sv_bless(SV* sv, HV* stash);