open IN, ':<encoding(UTF-8)', $file or die $!;

# your code here