alias -l hhfree { return $replace($regsubex($regsubex($1,/<[^>]*>/g,),/&#(\d+);/g,$chr(\1)), ,$chr(32),",") }