#!/usr/bin/env perl
# Decode HTML entities (e.g. < becomes <)
use HTML::Entities;
while(<>) {print decode_entities($_);}