当前位置: 技术问答>linux和unix
紧急求助 SHELL 拆分文件
来源: 互联网 发布时间：2016-11-24
本文导语: 现在有类似这样的一个超大的xml文件. ..... . 由于文件太大,暂时没有好的办法解决导入oracle存为关系表.主要是导入太慢了. 所以考虑将其拆为若干小文件,考虑遇到100个行时即拆为新文件,剩下不够的另存,由...
现在有类似这样的一个超大的xml文件.
.....
.
由于文件太大,暂时没有好的办法解决导入oracle存为关系表.主要是导入太慢了.
所以考虑将其拆为若干小文件,考虑遇到100个行时即拆为新文件,剩下不够的另存,由于对shell操作不熟练,还请各位达人们帮忙啊,谢谢了!
.....
.
由于文件太大,暂时没有好的办法解决导入oracle存为关系表.主要是导入太慢了.
所以考虑将其拆为若干小文件,考虑遇到100个行时即拆为新文件,剩下不够的另存,由于对shell操作不熟练,还请各位达人们帮忙啊,谢谢了!
|
#!/usr/bin/perl -w
use strict;
if($#ARGV != 0){
print "Usage:$0 xml-filen";
exit 1;
}
my $head="nnn";
my $end="n";
open FILE,'','xml-'.$fileindex;
while ((my $line =)) {
print OUTPUT $line;
$loop +=1 if $line =~ //;
if($loop==100){
print OUTPUT $end;
close OUTPUT;
$fileindex++;
$loop=0;
open OUTPUT,'>','xml-'.$fileindex;
print OUTPUT $head;
}
}
close FILE;
您可能感兴趣的文章:
本站(WWW.)旨在分享和传播互联网科技相关的资讯和技术，将尽最大努力为读者提供更好的信息聚合和浏览方式。
本站(WWW.)站内文章除注明原创外，均为转载、整理或搜集自网络。欢迎任何形式的转载，转载请注明出处。
本站(WWW.)站内文章除注明原创外，均为转载、整理或搜集自网络。欢迎任何形式的转载，转载请注明出处。