perl -MHTML::Entities -le 'print encode_entities(shift)' '"><'
&quot;&gt;&lt;