PERL 脚本需要将 xml 文件从 1 个 FTP 服务器传输到另一个，分割成小文件
我对 PERL 完全陌生，需要一些有价值的帮助
这是我的问题
我需要从 ftp 服务器 A 复制一个文件并将该文件放入 ftp 服务器 B 执行此操作时，我需要读取该文件内容并通过匹配开始和结束标签组合的模式来拆分该大文件，并创建单独的小文件并将它们放置在目标 ftp 服务器 B 中。
例如，如果文件名是 20100921.xml 且如果示例具有以下格式
<?xml version="1.0" encoding="utf-8" ?>
<parent>
<child>
<code></code>
<text></text>
</child>
<child>
<code></code>
<text></text>
</child>
</parent>
在原始 XML 中有很多子标签实例；我需要制作单独的文件，其内容将是标签之间的内容。 在这种情况下，将创建 2 个新文件。 单个文件名可以类似于 20100921_1.xml
每天只有 1 个文件，并且文件名将包含当前日期。
任何人都可以帮助我使用 PERL 来完成上述任务。 多谢。
I am a complete stranger to PERL and need some valuable help
Here is my problem
I need to copy a file from ftp server A and place the file into ftp server B
When doing this i need to read that file contents and split that big file by matching the pattern of open and ending tags combination and create individual small files and place them in destination ftp server B.
For example if the file name is 20100921.xml and if sample has below format
<?xml version="1.0" encoding="utf-8" ?>
<parent>
<child>
<code></code>
<text></text>
</child>
<child>
<code></code>
<text></text>
</child>
</parent>
In the original XML there are lot of child tags instances; i will need to make separate files whose contents will be the ones between tags.
In this case there will be 2 new files to be created.
Individual file names could be like 20100921_1.xml
Everyday there will be only 1 file and the file name will have current date.
Can anyone help me with PERL that can do the above.
Thanks a lot.
如果你对这篇内容有疑问，欢迎到本站社区发帖提问 参与讨论，获取更多帮助，或者扫码二维码加入 Web 技术交流群。
绑定邮箱获取回复消息
由于您还没有绑定你的真实邮箱，如果其他用户或者作者回复了您的评论，将不能在第一时间通知您！
发布评论
评论（1）
您可以使用 xml_split 来实现此目的，可能类似于
xml_split -l 1 -b 20100921 big.xml。xml_split 带有 XML::Twig ，所以它确实是在 Perl 中，但它不是真的很重要，除非您想从工具中提取相关代码并将其包含在您的代码中。
You can use xml_split for this, probably something like
xml_split -l 1 -b 20100921 big.xml.xml_split comes with XML::Twig, so it is indeed in Perl, which doesn't really matter, unless you want to extract the relevant code from the tool and include in yours.