#!perl -p
$/=_;s##<>#ge;s/_//g