open(INP, '<:utf8',$ARGV[0]) or die...