求助Perl脚本问题

570312653 · 发表于 2022-10-17 17:15:41

您需要登录才可以下载或查看，没有账号？注册

x

怎样用Perl脚本实现:删除文档中没有用的行，剩下的每行进行一个缩进

gtfei · 发表于 2022-10-18 15:12:57

1、open file
2、foreach遍历
3、if判断有用或者没用行
4、新数组存下有用行，并添加\t缩进
5、print有用行
难点在于，你如何判断这行有用还是没用，大概率用到正则表达式

levinweb · 发表于 2022-10-19 08:34:53

你得给一个例子描述

note30933 · 发表于 2022-10-19 09:38:57

顶一下

570312653 · 发表于 2022-10-19 11:02:28

gtfei 发表于 2022-10-18 15:12
1、open file
2、foreach遍历
3、if判断有用或者没用行

您好，我问下，如果我要打开的文件比较大，用while循环要怎么解决，我自己写了一下但是报了这种错误

570312653 · 发表于 2022-10-19 11:05:07

levinweb 发表于 2022-10-19 08:34
你得给一个例子描述

您好，我想要实现的功能是从文档中找到格式符合的句子，然后每行缩进，我自己写了一下但很多错误

五角大楼 · 发表于 2022-10-19 11:21:14

=~是不是写成了= ~？

570312653 · 发表于 2022-10-19 11:39:32

五角大楼发表于 2022-10-19 11:21
=~是不是写成了= ~？

谢谢您，是这个问题，中间多了一个空格。
我再问下如果这个文档本事的内容每行开头没有对齐，我应该怎么让它每一行相对上一行缩进
9QX9DK(TX8)2VVM5@8EAUIK.png

kangkang005 · 发表于 2022-10-19 15:42:33

如果每一行都相对上一行缩进，那不就是每行都跟第一行对齐了？

570312653 · 发表于 2022-10-19 16:32:05

kangkang005 发表于 2022-10-19 15:42
如果每一行都相对上一行缩进，那不就是每行都跟第一行对齐了？

文档里需要保留的行本身不是相对上一行缩进，有些是对齐的，有些已经缩进了

[求助] 求助Perl脚本问题