Try this:

Code:

alias htmlfree {
  var %x = $regsubex($1-,/^[^<]*(?:\'?[^\']*\')*[^<]*>|<[^>]*(?:\'[^\']*\')*[^<]*>|(<[^>]*(\'[^\']*\'?)*[^<]*$)/g,)
  return %x
}


-genius_at_work