さじろーどっとねっと
<@ret = access( "select $ext .... ",@rec)>

検索条件に従って配列からデータを抽出します。 関数連結対応に対応しています。
引数
$ext
抽出データ用の拡張パラメタです。多数の組み合わせを行うことができます。
→$extを参照
@rec
配列を指定します。
@ret
抽出したデータを返します

Sample Program

require "sajidb.pl"; ## データベースファイルの宣言
$sdb = new sajidb(); ## データベースの初期化

## 4番目の項目が"101"のレコードを @data から読み込みます。
@dat=$sdb->access("selecct 4 eq 101", @data);

## 4番目の項目が"101"以上のレコードを @data から読み込みます。
@dat=$sdb->access("select 4 >= 101", @data);

## 4番目の項目に"101"が含まれるレコードを @data から読み込みます。
@dat=$sdb->access("select 4 in 101", @data);

## 4番目の項目に"101"以上、"200"未満のレコードを @data から読み込みます。
@dat=$sdb->access("select 4 >= 101 ∧ 4 < 200", @data);

## 4番目の項目に"101"未満又は"200"以上のレコードを @data から読み込みます。
@dat=$sdb->access("select 4 < 101 ∨ 4 >= 200", @data);

ブックマークに追加する