添加Perl脚本来生成图片的xml文件