我想替换路径
(setq myFile "/some/path")
在一个文件里。我试着用sed:
find ./_build/html -type f -name '*.html' | while read myFile; do
MyFile=`readlink -f "$myFile"`
sed -i "s/setq myFile [)]*/setq myFile \"$MyFile\"/" sphinx_nowrap.el
# and then some actions on file
我正在从文本文件中创建CSV文件。非常新的Regex和我需要完成CSV文件。
我需要做的是删除每一行新的文本,并将它们放在一行中。
例如,这些数据:
ABC Company INC
123 Some Street
Winchester, KY
需要采用这种格式:
ABC Company INC;123 Some Street;Winchester, KY
+,在我的档案里.它有几个条目,每隔一家公司就有一行中断。
就像这样:
ABC Company
123 Street
Winchester, KY
DEF Company
456 Street
Winchester, KY
把它做成这样:
我有一个perl程序,如
$var= "hello world";
$var = -s $var;
print $var;
当我们打印$var的值时,它会显示一个错误,例如
Use of uninitialized value $var in print at line 3.
有人能解释一下这是怎么回事吗。-s是做什么的?是一种功能吗?我在perldoc里找不到对此嗤之以鼻的东西。
我有以下脚本,它与文档中概要段落中的示例几乎相同。
use strict;
use warnings;
use Term::ReadLine;
my $term = Term::ReadLine->new('My shell');
print $term, "\n";
my $prompt = "-> ";
while ( defined ($_ = $term->readline($prompt)) ) {
print $_, "\n";
$term->addhistory($_);
}
我想在linux中的一个大型txt文件(187GB)中找到一个位置。
txt-文件中的每个条目都受到$$$$的限制,我想在文件中找到3396条目。所以我需要计算$$$$,然后当它到达3396时。
我怎么能解决呢?
格列茨
好的,我举个例子
TEXT
TEXT
TEXT
TEXT
<TAG>TEXT>
<TAG>
TEXT
TEXT
</TEXT>
$$$$
所以我的条目在文件里看上去很像。之间可能会有任何人物。在$$$$之后,换行符中的下一个netry开始。
现在我又问了一遍。我要检测入口限制器的3396-计数的行号。
编辑:
我有解决办法:
g
假设我跑了10公里,现在我用MM::SS的形式分裂了10公里。我想要一种简单的方法,将任意数目的拆分次数加起来,并将它们平均起来。例如,也许我想看看最后5公里与前5公里相比有多快(或更慢)。
我可以自己解析时间,将它们划分为秒,然后将它们转换回MM::SS。计算并不难,但我想知道CPAN上是否有什么东西已经以简单的方式完成了。我的第一次尝试是使用DateTime,但由于闰秒,它不能从秒转换到分钟。
要明确的是,在这种情况下,我不关心闰秒,但我想知道库是否存在。举个例子,这是我尝试过的。
#!/usr/bin/env perl
use strict;
use warnings;
use fea
我有一个如下所示的文件:
I,like
blah...
我只想将第一行替换为'i,am‘,以获取:
i,am
blah...
这些都是大文件,所以这是我所做的():
open(FH, "+< input.txt") or die "FAIL!";
my $header = <FH>;
chop($header);
$header =~ s/I,like/i,am/g;
seek FH, 0, 0; # go back to start of file
printf FH $header;
close FH;
但是,当我运行它时会得到这样