我有一个脚本将新字段附加到现有CSV,但是^M字符出现在旧行的末尾,因此新字段最终会出现在新行而不是同一行.如何^M使用Perl从CSV文件中删除字符？
我知道如何使用sed带grep,但在Perl中下面的失败.如何sed在Perl程序中工作？
chomp (my @lineNumbers=`grep -n "textToFind" $fileToProcess | sed -n 's/^\([0-9]*\)[:].*/\1/p'`)
我必须在工作的Windows环境中使用Perl,并且我需要能够找出大型csv文件包含的行数(大约1.4Gb).知道如何以最少的资源浪费做到这一点吗？
谢谢
PS这必须在Perl脚本中完成,我们不允许在系统上安装任何新模块.
在Unix中,我需要能够将日志文件存档到每月文件夹中,并相应地标记.我如何在Perl中执行此操作？
使用gtar将额外文件添加到现有存档时,循环会过早终止或挂起.它也会在创建初始tar.gz文件后终止.
但是,如果我从循环中删除了gtar调用并将print语句放在它们的位置,则循环按预期执行.有人知道为什么吗？下面是循环中包含的代码.
if (-e "flex_$yearA"."_"."$monthA.tar.gz")
{ print"accessing Flex tar \n";
exec "gtar --append --file=flex_$yearA"."_"."$monthA.tar.gz $FILE";
}
else
{ print "creating Flex Tar \n ";
exec "gtar -cvsf flex_$yearA"."_"."$monthA.tar.gz $FILE";
}
有没有人知道一系列unix命令允许某人将某些文本附加到文件中特定行的末尾？
例如
第1行
第2行
第3行
第4行
我希望将文本",额外信息"附加到第3行,以便文件现在看起来像这样:
第1行
第2行
第3行,额外信息
第4行