alias mfilter {
if (!$4) { echo 2 -a * $!mfilter: insufficient parameters | return }
var %a = $3
%a = $regsubex(%a,/([ $+ $4])/g,\\1)
%a = $regsubex(%a,$remove(/([*?&])/g, [ $regsubex($4,/(.)(?!$)/g,\1$chr(44)) ] ),$replace(\1,&,\S+,*,.*,?,.))
!filter $+(-,$iif($prop = c,c),$iif($left($1,1) = @,w,f),$iif($left($2,1) = @,w,f),g) $1 $2 %a
}