perl脚本

各位大神，请教个问题，我想用perl语言写genesis脚本，电脑win7系统，perl版本ActivePerl-5.22.4.2205，genesis版本e97，我参照https://blog.csdn.net/zxianyong/article/details/6018110这篇帖子配置环境，里面说的前六步每步都做了，然后输入use Genesis;$f = new Genesis;
在执行new的时候提示“connect: 由于目标计算机积极拒绝，无法连接。 at ../e97/all/perl/Genesis.pl line 114”。猜测是没有开端口为56753的socket服务（查询所有端口确实找不到56753端口），因为我用perl连接别的已经开的端口可以连上。请问大家遇到这种情况吗，怎么解决？