找回密码
 注册
搜索
[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
楼主: lj670

[文本处理] [已解决]求助批处理删除TXT文本 书名号之外的内容

[复制链接]
发表于 2024-10-28 12:46:07 | 显示全部楼层
回复 15# hfxiang

如源文件中每行包含多个《...》字段,用15楼代码匹配最后一个《...》字段,用12楼代码则匹配所有《...》字段,因实况自取吧...
 楼主| 发表于 2024-10-28 19:23:35 | 显示全部楼层
回复 15# hfxiang 可以可以,测试完美,这个最简化,厉害!大神能否再写一个,还是这个文本,只删除《左书名号之前的内容,其他的保留,
谢谢!
例如:
162《远方的人》长短
20《曾经来过》保留
运行删除后:
《远方的人》长短
《曾经来过》保留
 楼主| 发表于 2024-10-28 19:32:49 | 显示全部楼层
回复 14# qixiaobin0715 完美可用,分没有了,明天再给加分!大神能否再写一个,还是这个文本,只删除《左书名号之前的内容,其他的保留,
谢谢!
例如:
162《远方的人》长短
20《曾经来过》保留
运行删除后:
《远方的人》长短
《曾经来过》保留
 楼主| 发表于 2024-10-28 19:34:54 | 显示全部楼层
回复 16# aloha20200628
谢谢,受教了!
发表于 2024-10-29 08:39:38 | 显示全部楼层
本帖最后由 qixiaobin0715 于 2024-10-29 08:57 编辑

回复 18# lj670
加不加分倒是无所谓,积分又没什么用处, 解决问题才是关键:
  1. @echo off
  2. (for /f "tokens=1* delims=《" %%a in (00.txt) do (
  3.     if "%%b"=="" (
  4.         echo,《%%a
  5.     ) else (
  6.         echo,《%%b
  7.     )
  8. ))>temp
  9. del 00.txt
  10. ren temp 00.txt
  11. pause
复制代码
未经测试。
上面代码只能处理每行都存在书名号的文本,如果存在不含书名号的行,此行的结果可能会有误差,代码就需要修改。

评分

参与人数 1技术 +1 收起 理由
lj670 + 1 完美可用

查看全部评分

发表于 2024-10-29 10:48:34 | 显示全部楼层
本帖最后由 aloha20200628 于 2024-10-29 11:29 编辑


假设源文件 00.txt 中包含 1-n 对《...》

一。以下代码删除第一个《 字符之前的内容,覆写源文件...
  1. sed -i "s/[^《》]*《/《/" 00.txt
复制代码
二。以下代码删除最后一个 》字符之后的内容,覆写源文件...
  1. sed -i "s/》[^《》]*$/》/" 00.txt
复制代码
三。以下代码删除每对《...》以外的所有内容,覆写源文件...
  1. sed -i -r "s/[^《》]*《([^《》]+)》[^《》]*/《\1》/g" 00.txt
复制代码

评分

参与人数 1技术 +1 收起 理由
lj670 + 1 完美全面

查看全部评分

发表于 2024-10-29 19:30:04 | 显示全部楼层
回复 17# lj670

呵呵,可以的

  1. sed -i -r "s/^.*(《.*).*$/\1/" 00.txt
复制代码

评分

参与人数 1技术 +1 收起 理由
lj670 + 1 完美可用

查看全部评分

 楼主| 发表于 2024-10-31 15:30:59 | 显示全部楼层
回复 20# qixiaobin0715

感谢,运行完美!
 楼主| 发表于 2024-10-31 15:32:28 | 显示全部楼层
回复 21# aloha20200628

这个太全面了,都完美运行,感谢感谢!
 楼主| 发表于 2024-10-31 15:34:21 | 显示全部楼层
回复 22# hfxiang

完美可用,感谢感谢!分加完了,改天在加。
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|批处理之家 ( 渝ICP备10000708号 )

GMT+8, 2026-3-17 18:42 , Processed in 0.019485 second(s), 7 queries , File On.

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

快速回复 返回顶部 返回列表