$text =~ s!<[^>]+?>!!g;