perl -lne 's/<.*>/<new text>/g; print'