ifilt()
{
	while read line; do 
		nam=`echo $line | cut -d'<' -f2 | cut -d'>' -f 1`
		str=`echo $line | cut -d' ' -f2- | rot13`
		echo "<$nam%R13> $str"
	done
}

ofilt()
{
	while read line; do
		if expr "$line" : "^<[^>]*\%R13> " > /dev/null 2>&1; then
			nam=`echo $line | cut -d'<' -f2 | cut -d'>' -f 1`
			str=`echo $line | cut -d' ' -f2- | rot13`
			echo "<$nam> $str" 
		else
			echo "$line" 
		fi
	done
}

OFILTER=ofilt
IFILTER=ifilt
if [ $JOINNAME ]; then
	CMD_join $JOINNAME
fi