foreach $table(keys %tableNum){
     	my $sth = $dbh->prepare($sqlbyTabs{"$table"}) || die("Unable to perpare statement");
		$sth->execute() || die("Database execute Error: $DBI::errstr");
		@results = @{ $sth->fetchall_arrayref };
		for ($row = 0; $row <= $#results; $row++) {
		   $h = @{$results[$row]}[0];
		   map{$Data{$h}{$tableFts{$table}[$_]} = @{$results[$row]}[$_]}1..$#results->[$row]; <br>
	     }
	}