$docdir = C4::Context->config('intranetdir') . '/docs';
}
if ( open( my $file, "<", "$docdir" . "/history.txt" ) ) {
if ( open( my $file, "<:encoding(UTF-8)", "$docdir" . "/history.txt" ) ) {
my $i = 0;
-