#!/usr/bin/perl use utf8; $finaltext=""; open(FILE, "trans.html"); while(<FILE>) { utf8::encode($_); $finaltext.=$_; } print "$finaltext";