#!/bin/ksh
# Shell version of grep
#
vflag= xflag= cflag= lflag= nflag= arg=$1
set -f
while true
do
case $arg in
-v*) vflag=1;;
-x*) xflag=1;;
-c*) cflag=1;;
-l*) lflag=1;;
-n*) nflag=1;;
-e*) shift; expr=$1"; arg=;; -e*) shift; expr=“$1”; arg=;;
-f*) shift; expr=(< $1); arg=;;
-*) print -u2 - $0: 'unknown flag'; exit 1;;
*)
if test "expr" = ''
then expr="1"; shift
fi
test "$xflag" expr="*${expr}*"
break;;
esac
arg=${arg#-?}
case arg in
"") shift; arg=$1;;
*) arg=-$arg;;
esac

noprint=$vflag$cflag$lflag
integer n=0 c=0 tc=0 nargs=$#
for i in "$@"
do if ((nargs<=1))
then fname=''
else fname="i"
fi
test "$i" && exec 0< $i
while read -r line
do let n=n+1
case "$line" in
expr)
if test "$noprint" = ""
then print -r "$fname${nflag:+$n:}$line"
fi
let c=c+1 ;;
*)
if test "vflag"
then print -r "$fname${nflag:+$n:}$line"
fi ;;
esac
done
if test "lflag" (c)
then print $i
fi
let tc=tc+c n=0 c=0
done

if test "$cflag"
then print $tc
fi
let tc

you're supposed to tell us.

Probably it doesn't work as expected
Please use CODE-tags when posting source code, it makes the code much more readable.

or perhaps the expectations are incorrect

Why do you think something's wrong with it?