谁能把这个PERL脚本转为VBS的

各位高手帮助小弟下吧。从来没写过脚本，可是出来了个这么个任务，谁能把这个PERL脚本编译成VBS。不是很长。那位高手能帮帮小弟。
编译完成请发我邮箱。或者回帖附件：510448059@qq。com。小弟先在这里谢谢各位大侠了
他的后缀是pl。我把它改为TXT了。