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