sogaoh/mailmask.sh

## mailmask.sh
#!/bin/sh
while read LINE ;do
i=0
for inline in $LINE ;do
case $inline in
*'@'*) echo $inline \
| gawk '{a=substr($0,1,match($0,"@")-1);\
c=gensub(/[a-z]|[0-9]|[A-Z]/,"*","g",a);\
b=substr($0,match($0,"@"));printf"%s%s",c,b}' ;;
*) echo -n "$inline ";;
esac
done
echo
done < "$1"
	#!/bin/sh
	while read LINE ;do
	i=0
	for inline in $LINE ;do
	case $inline in
	'@') echo $inline \
	\| gawk '{a=substr($0,1,match($0,"@")-1);\
	c=gensub(/[a-z]\|[0-9]\|[A-Z]/,"*","g",a);\
	b=substr($0,match($0,"@"));printf"%s%s",c,b}' ;;
	*) echo -n "$inline ";;
	esac
	done
	echo
	done < "$1"