#!/usr/bin/perl -p
use HTML::Entities;
$_ = encode_entities($_);