perl -p -e 's/<[^>]*>//g'