ChatGPT解决这个技术问题 Extra ChatGPT

如何使用 sed 仅替换文件中的第一个匹配项?

我想在任何现有的#includes 之前使用额外的include 指令更新大量C++ 源文件。对于这类任务,我通常使用带有 sed 的小型 bash 脚本来重写文件。

如何让 sed 仅替换文件中第一次出现的字符串,而不是替换每次出现的字符串?

如果我使用

sed s/#include/#include "newfile.h"\n#include/

它取代了所有#includes。

也欢迎实现相同目标的替代建议。


r
rogerdpack

仅将第一次出现的“Apple”替换为“Banana”的 sed 脚本

例子

     Input:      Output:

     Apple       Banana
     Apple       Apple
     Orange      Orange
     Apple       Apple

这是简单的脚本:编者注:仅适用于 GNU sed

sed '0,/Apple/{s/Apple/Banana/}' input_filename

前两个参数 0/Apple/ 是范围说明符。 s/Apple/Banana/ 是在该范围内执行的内容。因此,在这种情况下,“在开始 (0) 到 Apple 的第一个实例的范围内,将 Apple 替换为 Banana。只有第一个 Apple 将被替换。

背景:在传统的 sed 中,范围说明符是 also“从这里开始”和“从这里结束”(包括)。然而,最低的“开始”是第一行(第 1 行),如果“这里的结束”是一个正则表达式,那么它只会尝试匹配“开始”之后的下一行,所以最早可能的结束是行2.因此,由于范围包括在内,最小可能范围是“2 行”,最小起始范围是第 1 行和第 2 行(即,如果第 1 行出现,第 2 行的出现也将改变,在这种情况下不需要)。 GNU sed 添加了它自己的扩展,允许将 start 指定为“伪”line 0,以便范围的结尾可以是 line 1,如果正则表达式与第一个匹配,则允许它的范围为“仅第一行”线。

或者简化版本(像 // 这样的空 RE 表示重复使用之前指定的 RE,所以这是等效的):

sed '0,/Apple/{s//Banana/}' input_filename

s 命令的花括号是 optional,所以这也是等价的:

sed '0,/Apple/s//Banana/' input_filename

所有这些都只在 GNU sed 上工作。

您还可以使用自制软件 brew install gnu-sed 在 OS X 上安装 GNU sed。


翻译成人类语言:从第 0 行开始,继续直到匹配“Apple”,在大括号中执行替换。 cfr:grymoire.com/Unix/Sed.html#uh-29
在 OS X 上,我得到 sed: 1: "…": bad flag in substitute command: '}'
@ELLIOTTCABLE 在 OS X 上,使用 sed -e '1s/Apple/Banana/;t' -e '1,/Apple/s//Banana/'。从@MikhailVS 的答案(目前)在下面。
也可以不使用括号:sed '0,/foo/s/foo/bar/'
我得到sed: -e expression #1, char 3: unexpected ,'`
t
tedder42
 # sed script to change "foo" to "bar" only on the first occurrence
 1{x;s/^/first/;x;}
 1,/foo/{x;/first/s///;x;s/foo/bar/;}
 #---end of script---

或者,如果您愿意:编者注:仅适用于 GNU sed

sed '0,/foo/s//bar/' file 

Source


我想我更喜欢“或者如果你愿意”的解决方案。解释答案也是很好的——让答案直接解决问题,然后概括,而不是仅仅概括。但很好的答案。
仅供 Mac 用户参考,您必须将 0 替换为 1,因此:sed '1,/RE/s//to_that/' 文件
有人可以解释一下“或者如果你更喜欢”的解决方案吗?我不知道在哪里放置“来自”模式。
@Jean-LucNacifCoelho:使用 s// - 即 empty 正则表达式 - 意味着最近应用的正则表达式被隐式重用;在这种情况下,RE。这个方便的快捷方式意味着您不必在 s 调用中复制范围结束正则表达式。
完整示例:echo "abc\nabc" | sed '0,/^abc/s//ab/'
H
HoldOffHunger

许多有用的现有答案的概述,并附有解释:

此处的示例使用简化的用例:仅在第一个匹配行中将单词“foo”替换为“bar”。
由于使用 ANSI C-quoted strings ($'...') 来提供示例输入行,bashkshzsh 被假定为 shell。

GNU 仅限 sed

Ben Hoffstein's anwswer 向我们展示了 GNU 为 POSIX specification for sed 提供了一个扩展,它允许以下 2-address form0,/re/re 在这里表示任意正则表达式)。

0,/re/ 允许正则表达式在第一行也匹配 。换句话说:这样的地址将创建从第一行到匹配 re 的行(包括)的范围 - 无论 re 出现在第一行还是任何后续行。

将此与符合 POSIX 的表格 1,/re/ 进行对比,后者创建了一个范围,从第一行匹配到并包括在后续行中匹配 re 的行;换句话说:如果重新匹配恰好发生在第一行,这将不会检测到第一次出现的重新匹配,并且还会阻止使用速记 // 重用最近使用的正则表达式(见下一点)。1

如果您将 0,/re/ 地址与使用 same 正则表达式的 s/.../.../(替换)调用组合,您的命令将仅在 first 行上有效地执行替换匹配 re
sed 提供了一个方便的快捷方式来重用最近应用的正则表达式:一个 empty 分隔符对,//

$ sed '0,/foo/ s//bar/' <<<$'1st foo\nUnrelated\n2nd foo\n3rd foo' 
1st bar         # only 1st match of 'foo' replaced
Unrelated
2nd foo
3rd foo

仅限 POSIX 功能的sed,例如 BSD (macOS) sed(也可与 GNU sed 一起使用):

由于不能使用 0,/re/,并且如果 re 恰好出现在第一行(见上文),表单 1,/re/ 将无法检测到它,因此需要对第一行进行特殊处理

MikhailVS's answer 提到了这项技术,这里举一个具体的例子:

$ sed -e '1 s/foo/bar/; t' -e '1,// s//bar/' <<<$'1st foo\nUnrelated\n2nd foo\n3rd foo'
1st bar         # only 1st match of 'foo' replaced
Unrelated
2nd foo
3rd foo

笔记:

空的正则表达式 // 快捷方式在这里使用了两次:一次用于范围的端点,一次用于 s 调用;在这两种情况下,正则表达式 foo 都被隐式重用,使我们不必复制它,这使得代码更短且更易于维护。

POSIX sed 在某些函数之后需要实际的换行符,例如在标签的名称之后,甚至在它的省略之后,就像这里的 t 一样;策略性地将脚本拆分为多个 -e 选项是使用实际换行符的替代方法:在通常需要换行符的地方结束每个 -e 脚本块。

1 s/foo/bar/ 仅替换第一行的 foo(如果在那里找到)。如果是这样,t 会跳转到脚本的末尾(跳过该行中的剩余命令)。 (仅当最近的 s 调用执行了实际替换时,t 函数才分支到标签;在没有标签的情况下,就像这里的情况一样,脚本的结尾被分支到)。

发生这种情况时,范围地址 1,//(通常会从第 2 行开始找到第一个匹配项)将匹配,并且范围将 被处理,因为在当前行已经是 2 时评估地址。

相反,如果第一行没有匹配项,则输入 1,// ,并找到真正的第一个匹配项。

最终效果与 GNU sed0,/re/ 相同:仅替换第一次出现,无论它出现在第一行还是其他任何地方。

非范围方法

potong's answer 演示 循环 技术绕过对范围的需求;因为他使用 GNU sed 语法,所以这里是 POSIX 兼容的等价物

循环技术 1:在第一次匹配时,执行替换,然后进入一个简单地按原样打印剩余行的循环:

$ sed -e '/foo/ {s//bar/; ' -e ':a' -e '$!{n;ba' -e '};}' <<<$'1st foo\nUnrelated\n2nd foo\n3rd foo'
1st bar
Unrelated
2nd foo
3rd foo

循环技术 2,仅适用于小文件:将整个输入读入内存,然后对其执行一次替换。

$ sed -e ':a' -e '$!{N;ba' -e '}; s/foo/bar/' <<<$'1st foo\nUnrelated\n2nd foo\n3rd foo'
1st bar
Unrelated
2nd foo
3rd foo

1 1.61803 提供了使用 1,/re/ 发生的情况的示例,有和没有后续的 s//

sed '1,/foo/ s/foo/bar/' <<<$'1foo\n2foo' 产生 $'1bar\n2bar';即,两行都已更新,因为第 1 行与第一行匹配,并且正则表达式 /foo/ - 范围的结尾 - 然后仅从下一行开始查找。因此,在这种情况下,两条线都被选中,并且对它们都执行了 s/foo/bar/ 替换。

sed '1,/foo/ s//bar/' <<<$'1foo\n2foo\n3foo' 失败:使用 sed:第一个 RE 可能不为空(BSD/macOS)和 sed:-e 表达式 #1,字符0:没有以前的正则表达式 (GNU),因为在处理第一行时(由于第 1 行开始范围),还没有应用正则表达式,所以 // 没有引用任何内容。除了 GNU sed 的特殊 0,/re/ 语法外,任何以行号开头的范围都有效地排除了使用 //。


r
rogerdpack
sed '0,/pattern/s/pattern/replacement/' filename

这对我有用。

例子

sed '0,/<Menu>/s/<Menu>/<Menu><Menu>Sub menu<\/Menu>/' try.txt > abc.txt

编者注:两者都只适用于 GNU sed


@Landys 这仍然会替换其他行中的实例;不只是第一个实例
@sarat 是的,你是对的。 sed '1,/pattern/s/pattern/replacement/' filename 仅在 Mac 上“模式不会出现在第一行”时才有效。我会删除我之前的评论,因为它不准确。可在此处找到详细信息 (linuxtopia.org/online_books/linux_tool_guides/the_sed_faq/…)。 Andy 的答案仅适用于 GNU sed,但不适用于 Mac。
最简单的答案!恭喜。
r
richq

您可以使用 awk 做类似的事情..

awk '/#include/ && !done { print "#include \"newfile.h\""; done=1;}; 1;' file.c

解释:

/#include/ && !done

当行匹配“#include”并且我们尚未处理它时,在 {} 之间运行操作语句。

{print "#include \"newfile.h\""; done=1;}

这会打印 #include "newfile.h",我们需要转义引号。然后我们将 done 变量设置为 1,因此我们不会添加更多包含。

1;

这意味着“打印出一行” - 一个空操作默认打印出 $0,它会打印出整行。一个比 sed IMO 更容易理解的衬里 :-)


这个答案比依赖 gnu sed 等的 sed 解决方案更便携。(例如,OS-X 中的 sed 糟透了!)
这确实更容易理解,但对我来说,它添加了一行而不是替换它;使用的命令:awk '/version/ && !done {print " \"version\": \"'${NEWVERSION}'\""; done=1;}; 1;' package.json
同样在这里,最容易理解的命令,但它在找到的字符串上方添加一行而不是替换它
答案非常可读。这是我替换字符串而不是添加新行的版本。 awk '/#include/ && !done { gsub(/#include/, "include \"newfile.h\""); done=1}; 1' file.c
r
rogerdpack

linuxtopia sed FAQ 上相当全面的答案集合。它还强调了人们提供的某些答案不适用于非 GNU 版本的 sed,例如

sed '0,/RE/s//to_that/' file

在非 GNU 版本中必须是

sed -e '1s/RE/to_that/;t' -e '1,/RE/s//to_that/'

但是,此版本不适用于 gnu sed。

这是一个适用于两者的版本:

-e '/RE/{s//to_that/;:a' -e '$!N;$!ba' -e '}'

前任:

sed -e '/Apple/{s//Banana/;:a' -e '$!N;$!ba' -e '}' filename

事实上,在 Ubuntu Linux v16 和 FreeBSD v10.2 上进行了测试。谢谢。
C
Chris Jester-Young
#!/bin/sed -f
1,/^#include/ {
    /^#include/i\
#include "newfile.h"
}

此脚本的工作原理:对于 1 和第一个 #include 之间的行(第 1 行之后),如果该行以 #include 开头,则添加指定的行。

但是,如果第一个 #include 位于第 1 行,则第 1 行和下一个后续 #include 都会将该行放在前面。如果您使用的是 GNU sed,它有一个扩展,其中 0,/^#include/(而不是 1,)会做正确的事情。


u
unexist

只需在末尾添加出现次数:

sed s/#include/#include "newfile.h"\n#include/1

不幸的是,这不起作用。它替换文件每一行的第一次出现,而不是文件中的第一次出现。
此外,它是 GNU sed 扩展,而不是标准 sed 功能。
嗯……时间过去了。 sed 的 POSIX 2008/2013 指定替换命令为:[2addr]s/BRE/replacement/flags 并指出“标志的值应为零或多个:n 替换仅在模式空间中找到的第 n 次 BRE 出现。”因此,至少在 POSIX 2008 中,结尾的 1 不是 GNU sed 扩展。事实上,即使在 SUS/POSIX 1997 标准中,也支持这一点,所以我在 2008 年就严重脱节了。
S
Socowi

使用 GNU sed 的 -z 选项,您可以处理整个文件,就好像它只有一行一样。这样,s/…/…/ 只会替换整个文件中的第一个匹配项。请记住:s/…/…/ 仅替换每行中的第一个匹配项,但使用 -z 选项 sed 将整个文件视为单行。

sed -z 's/#include/#include "newfile.h"\n#include'

在一般情况下,您必须重写您的 sed 表达式,因为模式空间现在包含整个文件而不是一行。一些例子:

s/text.*// 可以重写为 s/text[^\n]*//。 [^\n] 匹配除换行符之外的所有内容。 [^\n]* 将匹配文本之后的所有符号,直到到达换行符。

s/^text// 可以重写为 s/(^|\n)text//。

s/text$// 可以重写为 s/text(\n|$)//。


m
mitchnull

一个可能的解决方案:

    /#include/!{p;d;}
    i\
    #include "newfile.h"
    :a
    n
    ba

解释:

读取行直到我们找到#include,打印这些行然后开始新的循环

插入新的包含行

进入一个只读取行的循环(默认情况下 sed 也会打印这些行),我们不会从这里回到脚本的第一部分


sed: file me4.sed line 4: ":" lacks a label
显然,在最近的 sed 版本中发生了一些变化,并且不再允许使用空标签。更新了答案
r
rogerdpack

我知道这是一篇旧帖子,但我有一个曾经使用过的解决方案:

grep -E -m 1 -n 'old' file | sed 's/:.*$//' - | sed 's/$/s\/old\/new\//' - | sed -f - file

基本上使用 grep 打印第一次出现并停在那里。另外打印行号,即5:line。将其导入 sed 并删除 : 以及之后的任何内容,因此您只剩下一个行号。将其通过管道传输到 sed 中,将 s/.*/replace 添加到末尾编号,这会产生一个 1 行脚本,该脚本将通过管道传输到最后一个 sed 以作为文件上的脚本运行。

因此,如果 regex = #include 和 replace = blah 并且 grep 发现的第一次出现在第 5 行,那么通过管道传输到最后一个 sed 的数据将是 5s/.*/blah/

即使第一次出现在第一行也有效。


我完全讨厌多行 sed 脚本或 sed 命令,除了 s 和行号之外的任何内容,所以我支持这种方法。这是我用于我的用例的内容(与 bash 一起使用): filepath=/etc/hosts ;帕特='^\(127\.0\.0\.1.*\)' ; repl='\1 newhostalias' ; sed $( IFS=: linearray=($(grep -E -m 1 -n "$patt" "$filepath")) && echo ${linearray[0]})s/"$patt"/"$repl" / "$文件路径"
有用。虽然只有足够聪明的 sed 可以接受 sed -f - 而有些不是,但您可以解决它:)
w
wakingrufus

我会用一个 awk 脚本来做到这一点:

BEGIN {i=0}
(i==0) && /#include/ {print "#include \"newfile.h\""; i=1}
{print $0}    
END {}

然后用 awk 运行它:

awk -f awkscript headerfile.h > headerfilenew.h

可能很草率,我是新手。


t
timo

作为替代建议,您可能需要查看 ed 命令。

man 1 ed

teststr='
#include <stdio.h>
#include <stdlib.h>
#include <inttypes.h>
'

# for in-place file editing use "ed -s file" and replace ",p" with "w"
# cf. http://wiki.bash-hackers.org/howto/edit-ed
cat <<-'EOF' | sed -e 's/^ *//' -e 's/ *$//' | ed -s <(echo "$teststr")
   H
   /# *include/i
   #include "newfile.h"
   .
   ,p
   q
EOF

R
Rob W

我终于让它在一个 Bash 脚本中工作,该脚本用于在 RSS 提要的每个项目中插入一个唯一的时间戳:

        sed "1,/====RSSpermalink====/s/====RSSpermalink====/${nowms}/" \
            production-feed2.xml.tmp2 > production-feed2.xml.tmp.$counter

它仅更改第一次出现。

${nowms} 是由 Perl 脚本设置的时间(以毫秒为单位),$counter 是用于脚本内循环控制的计数器,\ 允许在下一行继续执行命令。

读入文件并将标准输出重定向到工作文件。

我理解它的方式,1,/====RSSpermalink====/ 通过设置范围限制告诉 sed 何时停止,然后 s/====RSSpermalink====/${nowms}/ 是熟悉的 sed 命令,用第二个字符串替换第一个字符串。

就我而言,我将命令放在双引号中,因为我在带有变量的 Bash 脚本中使用它。


n
nazq

使用 FreeBSD ed 并在要处理的文件中没有 include 语句的情况下避免 ed 的“不匹配”错误:

teststr='
#include <stdio.h>
#include <stdlib.h>
#include <inttypes.h>
'

# using FreeBSD ed
# to avoid ed's "no match" error, see
# *emphasized text*http://codesnippets.joyent.com/posts/show/11917 
cat <<-'EOF' | sed -e 's/^ *//' -e 's/ *$//' | ed -s <(echo "$teststr")
   H
   ,g/# *include/u\
   u\
   i\
   #include "newfile.h"\
   .
   ,p
   q
EOF

这与 timoanswer 非常相似,但在一年多后被添加。
p
potong

这可能对您有用(GNU sed):

sed -si '/#include/{s//& "newfile.h\n&/;:a;$!{n;ba}}' file1 file2 file....

或者如果内存不是问题:

sed -si ':a;$!{N;ba};s/#include/& "newfile.h\n&/' file1 file2 file...

F
FatihSarigol

如果有人来这里替换所有行中第一次出现的字符(比如我自己),请使用以下命令:

sed '/old/s/old/new/1' file

-bash-4.2$ cat file
123a456a789a
12a34a56
a12
-bash-4.2$ sed '/a/s/a/b/1' file
123b456a789a
12b34a56
b12

例如,通过将 1 更改为 2,您可以只替换所有第二个 a。


您不需要执行所有这些操作,'s/a/b/' 表示 match a,而 do just first match for every matching line
我和萨姆文在一起。这也不能回答这里提出的问题。我建议删除这个答案。
问题是“文件中的第一次出现”而不是“一行中的第一次出现”
s
sastorsl

用例可能是您的事件分布在整个文件中,但您知道您唯一关心的是前 10、20 或 100 行。

然后简单地解决这些问题就可以解决问题——即使 OP 的措辞只考虑到第一。

sed '1,10s/#include/#include "newfile.h"\n#include/'

A
Andreas Panagiotidis

以下命令删除文件中第一次出现的字符串。它也删除了空行。它显示在 xml 文件中,但它适用于任何文件。

如果您使用 xml 文件并且想要删除标签,这很有用。在此示例中,它删除了第一次出现的“isTag”标签。

命令:

sed -e 0,/'<isTag>false<\/isTag>'/{s/'<isTag>false<\/isTag>'//}  -e 's/ *$//' -e  '/^$/d'  source.txt > output.txt

源文件(source.txt)

<xml>
    <testdata>
        <canUseUpdate>true</canUseUpdate>
        <isTag>false</isTag>
        <moduleLocations>
            <module>esa_jee6</module>
            <isTag>false</isTag>
        </moduleLocations>
        <node>
            <isTag>false</isTag>
        </node>
    </testdata>
</xml>

结果文件 (output.txt)

<xml>
    <testdata>
        <canUseUpdate>true</canUseUpdate>
        <moduleLocations>
            <module>esa_jee6</module>
            <isTag>false</isTag>
        </moduleLocations>
        <node>
            <isTag>false</isTag>
        </node>
    </testdata>
</xml>

ps:它在 Solaris SunOS 5.10(相当旧)上对我不起作用,但它适用于 Linux 2.6,sed 版本 4.1.5


这看起来与许多先前答案的基本思想非常相似,但需要注意的是它仅适用于 GNU sed(因此它不适用于 Solaris)。你应该删除这个,拜托——它确实没有为你回答时已经有 4.5 年历史的问题提供独特的新信息。诚然,它确实有一个可行的例子,但是当问题的答案与这个问题一样多时,这是值得商榷的。
S
Stephen Niedzielski

没有什么新东西,但也许是更具体的答案:sed -rn '0,/foo(bar).*/ s%%\1%p'

示例:xwininfo -name unity-launcher 产生如下输出:

xwininfo: Window id: 0x2200003 "unity-launcher"

  Absolute upper-left X:  -2980
  Absolute upper-left Y:  -198
  Relative upper-left X:  0
  Relative upper-left Y:  0
  Width: 2880
  Height: 98
  Depth: 24
  Visual: 0x21
  Visual Class: TrueColor
  Border width: 0
  Class: InputOutput
  Colormap: 0x20 (installed)
  Bit Gravity State: ForgetGravity
  Window Gravity State: NorthWestGravity
  Backing Store State: NotUseful
  Save Under State: no
  Map State: IsViewable
  Override Redirect State: no
  Corners:  +-2980+-198  -2980+-198  -2980-1900  +-2980-1900
  -geometry 2880x98+-2980+-198

使用 xwininfo -name unity-launcher|sed -rn '0,/^xwininfo: Window id: (0x[0-9a-fA-F]+).*/ s%%\1%p' 提取窗口 ID 会产生:

0x2200003

佚名

POSIXly(在 sed 中也有效),只使用一个正则表达式,只需要一行内存(像往常一样):

sed '/\(#include\).*/!b;//{h;s//\1 "newfile.h"/;G};:1;n;b1'

解释:

sed '
/\(#include\).*/!b          # Only one regex used. On lines not matching
                            # the text  `#include` **yet**,
                            # branch to end, cause the default print. Re-start.
//{                         # On first line matching previous regex.
    h                       # hold the line.
    s//\1 "newfile.h"/      # append ` "newfile.h"` to the `#include` matched.
    G                       # append a newline.
  }                         # end of replacement.
:1                          # Once **one** replacement got done (the first match)
n                           # Loop continually reading a line each time
b1                          # and printing it by default.
'                           # end of sed script.

K
Kaz

这里一个可能的解决方案可能是告诉编译器包含标头而不在源文件中提及它。在 GCC 中有以下选项:

   -include file
       Process file as if "#include "file"" appeared as the first line of
       the primary source file.  However, the first directory searched for
       file is the preprocessor's working directory instead of the
       directory containing the main source file.  If not found there, it
       is searched for in the remainder of the "#include "..."" search
       chain as normal.

       If multiple -include options are given, the files are included in
       the order they appear on the command line.

   -imacros file
       Exactly like -include, except that any output produced by scanning
       file is thrown away.  Macros it defines remain defined.  This
       allows you to acquire all the macros from a header without also
       processing its declarations.

       All files specified by -imacros are processed before all files
       specified by -include.

Microsoft 的编译器有 /FI(强制包含)选项。

此功能对于一些常见的标头可能很方便,例如平台配置。 Linux 内核的 Makefile 为此使用 -include


w
warhansen
sed -e 's/pattern/REPLACEMENT/1' <INPUTFILE

c
chaytan

我将提出一个不完全是原始问题所要求的建议,但对于那些也想专门替换可能第二次出现的匹配或任何其他具体枚举的正则表达式匹配的人。使用 python 脚本和 for 循环,如果需要,从 bash 脚本中调用它。这对我来说是这样的,我正在替换包含字符串 --project 的特定行:

def replace_models(file_path, pixel_model, obj_model):
    # find your file --project matches
    pattern = re.compile(r'--project.*')
    new_file = ""
    with open(file_path, 'r') as f:
        match = 1
        for line in f:
            # Remove line ending before we do replacement
            line = line.strip()
            # replace first --project line match with pixel
            if match == 1:
                result = re.sub(pattern, "--project='" + pixel_model + "'", line)
            # replace second --project line match with object
            elif match == 2:
                result = re.sub(pattern, "--project='" + obj_model + "'", line)
            else:
                result = line
            # Check that a substitution was actually made
            if result is not line:
                # Add a backslash to the replaced line
                result += " \\"
                print("\nReplaced ", line, " with ", result)
                # Increment number of matches found
                match += 1
            # Add the potentially modified line to our new file
            new_file = new_file + result + "\n"
        # close file / save output
        f.close()
    fout = open(file_path, "w")
    fout.write(new_file)
    fout.close()