$email =~ s/&#([0-9]+);/chr $1/gem;