perlでの検索画面についての質問です。

質問

CSVのデータを検索システムで、
例えば、
賃料　[30000]～[50000]
と入力し検索した場合に
[35000]～[52000]というデータも引っかかるようにしたいんですがどのようにすればいいんでしょうか？
現在はこのようになってます。

if($param{'query_price2'} and $param{'query_price1'}){
if($param{'query_price1'} >= $datas[21]){ next; }
if($param{'query_price2'} <= $datas[22]){ next; }
}
elsif($param{'query_price2'} or $param{'query_price1'}){
if(!$param{'query_price2'}){ if($param{'query_price1'} >= $datas[21]){ next; } }
if(!$param{'query_tsubo1'}){ if($param{'query_price2'} <= $datas[22]){ next; } }

$datas[21]、[22]は賃料のデータが入っている要素数です。
query_tsubo1、2は検索画面で入力したものです。
賃料：[30000(query_price1)] ～　[50000(query_price2)]

回答No.1

Tacosan · ベストアンサー

その「データが引っ掛かる」というのは, 何を見てそう思えばいいんでしょうか?
例えば
$param{query_price2} <= $datas[21] || $datas[22] <= $param{query_price1}
でもいい?
ちなみに「data」は複数形だったりします. 単数形は datum だけど, あんまり使われない.