大家有perl脚本报错或者无输出都可以提出来看看，大家一起解决

貌似上传不了文件，所以脚本和输入输出，如果小的话可以截图文字补充，大的话可以发我邮箱或者QQ，我到时候再在这里补充
[email protected]

先贴一个localtime的问题。
作者专门留的小东西，这个比较简单，没什么好讲，删掉或者注释即可

文件行数问题
看下图21行的说明，大致就是脚本是想读取输入的第一行表头，但是实际上又跳过了输入的前几行（空文件或者！开头的行），导致实际的表头行数并不是在1（个人感觉就是原脚本写错了），而获取不到表头内容
21行的内容注释掉或者删掉，然后新增红色框的内容就应该可以了

更新一下源码提取的方法。如果还是不行的话我也没有办法了。貌似最新的脚步都是被加密了已经
https://tieba.baidu.com/p/7217924097?share=9105&fr=sharewise&share_from=post&sfc=copy&client_type=2&client_version=12.19.1.0&st=1653368690&is_video=false&unique=FD365B07D6AB722D879A5283D22CA257