二维数组查找

醒目

while (my [color=阿#0000ff]$hash_ref = $sth->fetchrow_hashref) {         $int_ip_start   =       $hash_ref->{'int_ip_start'};         $int_ip_end     =       $hash_ref->{'int_ip_end'};         $province_id    =       $hash_ref->{'province_id'};         $province_name  =       $hash_ref->{'province_name'};         @t_province_ip = ($int_ip_start,$int_ip_end,$province_id,$province_name);         $t_province_ip_list[$i++] = [@t_province_ip]; }

所有数据存入二维数组t_province_ip_list，

请教下如果这时有一个$ip_src(int型)，需要在二维数组里查找并返回$province_id  和 $province_name,如何处理好？

撒哈拉里的鱼

直接遍历啊。
my $newip = 'xxx';
foreach my $ip( @t_province_ip_list )
{
    if( $ip->[0] < $newip <$ip->[1] )
    {
         print ....
     }
}

醒目

谢谢，遍历太慢了。

我想问的应该是二维数组二分查找。

ly5066113

二分查找，是要排序的。
而且想问下，你的ip_start - ip_end这个区间应该都没有重叠吧？

醒目

原帖由 ly5066113 于 2009-1-7 09:28 发表
二分查找，是要排序的。
而且想问下，你的ip_start - ip_end这个区间应该都没有重叠吧？

恩,只要找到了就返回。

ly5066113

那就要对$t_province_ip_list[$i++] = [@t_province_ip]排序了。
$t_province_ip_list[0]中的$int_ip_start要是最小的
$t_province_ip_list[最后一个元素]中的$int_ip_start要是最大的

然后从@t_province_ip_list的中间开始找，比$int_ip_start小就向前面的中间找，比$int_ip_start大就向后面的中间找。