perl脚本打开乱码，使用cmd运行无结果

perl脚本不能使用perl打开，使用txt格式打开最后面有一堆乱码

问题相关代码，请勿粘贴截图

运行没有读取指定TXT文件，结果有标题，无内容

之前朋友运行没有问题，但他是使用UItraEdit保存的，我使用txt保存，想知道是否有影响

perl可以使用cmd正常运行