#!/bin/rc
# mgrep: "miqra grep"
rfork e

f=$home/lib/miqra

# unicode 5d0-5ea | tr -cd \x5d0-\x5ea
heb=אבבגדהוווזחטיייךכלםמןנסעףףפפץצקרשת
lat=abvgdhouwcHTeijKklMmNnSyFPfpZzqrst

fn usage{
	echo usage: mgrep pattern ... >[1=2]
	exit usage
}

if(~ $#* 0) usage

pat=`{echo $* | tr $lat $heb}

echo pat'='$"pat

test -e $f || miqra -o >$f

for(i in `{grep $"pat $f | awk '{ print $1 }'}){
	echo $i
	miqra `{echo $i | tr . ' '}
}