如何使用Perl一次阅读段落？
要使用Perl一次阅读段落，您可以使用Perl的文本处理功能，例如正则表达式和文本处理模块。以下是一个简单的示例，演示如何使用Perl脚本一次阅读段落：
#!/usr/bin/perl
use strict;
use warnings;
# 输入段落
my $paragraph = "这是一个示例段落。在这个段落中，我们将演示如何使用Perl一次阅读段落。";
# 使用正则表达式分割段落
my @sentences = split /。/, $paragraph;
# 遍历句子并输出
foreach my $sentence (@sentences) {
print "$sentence\n";
}在这个示例中，我们使用了Perl的split函数和正则表达式来分割段落。然后，我们遍历分割后的句子并将它们输出。这样，我们就可以一次阅读段落中的每个句子。
请注意，这个示例仅适用于包含中文句号的段落。如果您要处理包含其他标点符号的段落，您需要相应地修改正则表达式。
相关·内容
我试图理解以下Perl命令“删除所有连续的空行，只留下一行”：
perl -00 -pe ''
来自
首先，它没有任何代码，-e是空的。接下来，它有一个愚蠢的命令行选项。此命令行选项打开“段”模式。段落是两个换行符之间的文本。其他所有的新线路都被忽略了。该段落被放入"$_“中，"-p”选项将其打印出来。
我不听这个解释。也许用词不准确。
所以"A paragraph is text between two newlines."，但是每一行都是两个换行符之间的文本。
"All the other newlines get ignor
浏览 2提问于2017-12-27得票数 1
3回答
我在输入文件中有以下内容
#Start para
0 hello dq
1 world dq
2 welcomes dq
3 you dq
#Start para
0 how tq
1 are tq
2 you tq
#Start para
0 say dq
1 hello dq
2 to dq
3 the dq
4 world dq
我想把这个指向另一个像这样的文件
#Start para
3 you dq
2 welcomes dq
1 world dq
0 hello dq
#Start para
2 you tq
1 are tq
0 how tq
#Start para
4 worl
浏览 0提问于2015-03-11得票数 3
让我们说，有一个文件"abc.txt“包含一个段落/行：
Hello, how are you doing sir?
when are you going to arrive at the SBAHN platform to catch the train?
如何从“如何”到“捕获”中提取文件中的所有字符？
浏览 0提问于2014-09-21得票数 2
我想给你发短信
运行标记化、停止词、删除、引理和其他分析。
然后打印符合某些标准/分数的段落
但是，上面的步骤删除了信息/令牌。如何保留对原始文本的引用，以便知道这些元素最初显示在何处，以便引用正确的段落？
浏览 7提问于2017-02-05得票数 0
回答已采纳
2回答
假设我有一个div，里面嵌套了一堆段落，我想选择第二、第四和第七个段落元素。
我知道你可以使用nth-child来选择一个嵌套的元素，但只适用于一个。这不会起作用；
nth-child(2,4,7)
如何选择多个特定元素。这个是可能的吗？
谢谢,
浏览 0提问于2012-08-20得票数 0
我有一系列想要使用正则表达式解析的段落，但不幸的是，段落在句子之间出现了许多空格，有时还会出现单词。我希望能够删除所有多余的空白，但我不确定如何...有谁有什么想法吗？我不想删除所有的空格，这是我到目前为止发现的唯一一件事，但要保持常规的段落格式，就像在每个单词之后有一个空格，在每个punctuation+word之后有一个空格一样。我正在用Perl编写代码。
任何帮助都将不胜感激！
浏览 0提问于2011-01-31得票数 6
回答已采纳
3回答
我在这个模板上有一个文本：
In 1935 he was asked to document the principal dancers and productions and
George newly .
he continued to shoot fashion
Bergdorf Goodman and Saks Fifth
started a series of photographs .
并希望将每个段落转换为由"\n“分隔的一行，即输出将为：
In 1935 he was asked to document the principal dancers and prod
浏览 0提问于2012-01-31得票数 1
回答已采纳
3回答
我有一个文本文件，其中包含连接的段落。我需要用空白行分隔每一段。每个段落都应该以>FP0模式开头，但是由于段落是相互连接的，所以在当前文件行的开头找不到这个模式。我尝试过一个sed命令，但是它根据包含>FP0模式的行将它们分隔开，但是它在新段落的开头没有这样做。
段落示例
>FP004340TTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTT>FP00598AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
浏览 0提问于2022-04-21得票数 0
回答已采纳
我有多个文本字段，每个字段都是文本段落，我想使用正则表达式搜索这些字段的特定模式，例如：
my $text1 =~/(my pattern)/ig;
my $text2 =~/(my pattern)/ig;
...
my $textn=~/(my pattern)/ig;
我想知道是否有一种有效的方法可以在perl上用相同的正则表达式搜索多个文本，或者我应该使用上面的格式？
浏览 1提问于2011-12-03得票数 3
回答已采纳
2回答
我有一个文件，其中包含段落中的文本(用一个或多个空行分隔文本的行)。我想颠倒段落的顺序(即最后一段将成为第一段，.)，最好使用sed。
我正在寻找一个sed命令，它将对一个段落文件执行，就像tac对一个行文件所做的那样。
浏览 0提问于2014-02-16得票数 9
回答已采纳
我想从从DB检索的文本变量中提取段落。
为了从文件处理程序中提取pargaphs，我使用了以下代码：
local $/ = undef;
@paragarphs =<STDIN>
使用perl从文本变量中提取段落的最佳选择是什么?如果cpan上有执行此类任务的模块的话？
浏览 2提问于2012-09-24得票数 2
回答已采纳
4回答
我有非常大的HTML文档，有大量的副翼。对于标题，在段落中使用大写文本。
如何找到包含大写文本的所有段落并将样式应用于这些段落？
在大多数段落中，文本之间也有大量的额外间隔。现有标题样本：
<p> </p>
<p> USU EA EUISMOD HONESTATIS DETERRUISSET.</p>
<p>Qualisque mnesarchum no nam, usu cu fastidii
浏览 11提问于2016-07-21得票数 0
回答已采纳
1回答
我有一个包含多个段落的文本文件。每个段落都有带有空格的标题。我希望将[和:之间的文本空格替换为_。以下是我正在讨论的文件的文本摘录
[Candidatus Protochlamydia amoebophila UWE25: NC_005861]
MNQRTGILLVNLGTPKTPRPKDVYRYLNEFLTDGRVIDLPWLKRQLLVRC
IIVPFRYKQSSMLYQKLWTAEGSPLLVHGIAVQTKLQMILGESFQVELAM
[Gluconobacter oxydans 621H: NC_006677]
MAFLHKTPRIAPPPEGRTGILLINLGTPDDTGY
浏览 0提问于2020-01-24得票数 0
1回答
我需要删除字符串中的Unicode换行符。
这些字符可以是回车返回\U000D、换行符\U000A、行分隔符或段落分隔符。
我可以使用以下方法删除回车和换行符。
gsub("\\s", "", x)
就像我说的，这对于那些Unicode字符很好，但是我不能删除行分隔符\U2028或段落分隔符\U2029字符。
还有别的办法吗？
浏览 4提问于2014-08-23得票数 5
回答已采纳
我想让一些写作任务自动化。我需要使用诸如CREATE段落和附加段落之类的方法使用.odt编写oo:doc创建一个文档。问题是，附加段落和创建段落不允许文本从页中或某一列开始。
Name Surname Address
当我解压缩我想要创建的“主”文档时，当我检查content.xml文件时，我看到
" <text:p text:style-name="Text_20_body"><text:s text:c="115"/><text:span text:style-name=
浏览 2提问于2011-08-17得票数 2
我有一个.txt文件，包含两种类型的段落：
一些语句和数字(02)以及随后的返回
有了更多的东西，然后有两个回报
然后是一行段落，后面跟着两个返回
以及一些更多的双行文本返回。
再发些短信。
我想从文本文件中删除所有单行段落。因此，结果是：
一些语句和数字(02)以及随后的返回
有了更多的东西，然后有两个回报
以及一些更多的双行文本返回。
更多的文本
我一直试图用sed和awk来完成这个任务，但是我总是遇到一些问题，我会想出一个正则表达式来查找换行符，后面跟着一些字符并以两个连续的换行符\n\n结尾。
不管怎么说，用一个一行行来完成这个任务，还是我要写一个脚本来逐行阅读，确定段
浏览 0提问于2012-04-11得票数 0
回答已采纳
我想从一个文件中搜索以下段落，然后从段落中显示一个特定的单词。例如：
"Documentation can be done using
MS excel and an eg. of such a file is sample.xls"
我想从文件example.log中搜索上面的段落，然后只显示单词"sample.xls“。
有可能吗？？
浏览 5提问于2015-02-26得票数 0
回答已采纳
1回答
Pdftotext不使段落中断
、、、、
pdftotext可以工作，但它不尊重段落的中断。我曾经尝试过-pagebrk、-eol mac或-eol unix，但是段落划分的问题似乎总是存在。这是典型的问题吗？
浏览 0提问于2019-08-20得票数 1
我有一个文件，有数百个段落，每15行左右。我需要搜索一个模式，比如说出现: 1.如果在段落中找到这个模式，我需要打印整个段落。请注意，段落由两个新的行字符分隔。
我已经尝试了下面的代码行，这显然会打印出文件中的第一次出现。不知何故，我无法使用循环并打印所有此类事件。
sed -n '1,/Occurrence: 1/p' ystdef.txt | tail -9 > ystalarm.txt
我可以使用g (全局)标志和sed来实现这个功能吗？如果是，怎么做？
请注意，我知道grep -A/B/C命令，但它们不会在我的Cygwin终端上工作。
浏览 0提问于2014-06-09得票数 12
我使用Perl的和函数输出一些文本。
所需经费如下：
使用Perl format.Maximum 80字符打印一篇文章(长度未知)。如果没有足够的空格，应将最后一个单词包装到下一行。需要保留段落之间的空行。
我现在遇到的问题是段落之间的空行不能显示。我检查了一下，这似乎是由于使用了"~~“。
格式定义如下。
format FULL_TEXT =
Full Story:
^<<<<<<<<<<<<<<<<<<<<<<<<<<<&
浏览 0提问于2011-04-09得票数 0
回答已采纳
1回答
我试图使用grep搜索一个大的文本文件，并返回包含几个关键字的段落。我还想在结果中返回周围的行。例如，我要搜索以下单词:蓝色、绿色、黄色。如果我想在名为“code s.txt”的文件中找到包含所有3个单词的段落，我尝试了以下代码：
grep blue colors.txt | grep green | grep yellow
不过，这只给了我黄色的列表，而没有给出段落中黄色、绿色和蓝色的清单。
然后我想展示周围的单词，所以用了一些类似的东西
grep -B 5 blue colors.txt | grep green colors.txt等
总之，我有一个大的文本文件，我想找到包含三种颜色的部
浏览 0提问于2016-04-30得票数 0
2回答
我想知道如何删除这本书中段落中的换行符，以及其他在kindle中使用的字符。所期望的效果是，将由空行分隔的每个块转换为连续的文本行。我用一系列复杂的vim替代命令完成了这本书的工作，但我更愿意为将来找到更好的方法来完成这一任务。
我希望得到一个vim、perl、sed或awk脚本，我可以使用这些脚本，但我愿意接受你们的任何想法。
已经找到了解决方案，但下面是将来谷歌用户的输入输出示例。
用换行符输入：
Letter 1
_To Mrs. Saville, England._
St. Petersburgh, Dec. 11th, 17—.
You will rejoice to he
浏览 0提问于2023-05-01得票数 2
回答已采纳
1回答
我正在尝试匹配段落模式，但遇到了问题。
模式是：
[image.gif]
some words, usually a few lines
name
emailaddress<mailto:theemailaddress@mail.com>
我尝试匹配gif image和<mailto:之间的所有内容，但这种情况在文件中发生了多次，这意味着我得到了一个糟糕的结果。
我用这个试过
(?<=\[image.gif\].*?(\[image.gif\])).*?(?=<mailto:)
有没有办法使用正则表达式来匹配段落的总体布局？
浏览 0提问于2016-07-01得票数 0
1回答
我想使用sed处理一个段落。我只想提取奇数个单词的句子。然后以相反的顺序打印单词。例如:输入是'Hello world，hello world‘和输出所需的‘and world hello’
浏览 1提问于2011-09-11得票数 0
回答已采纳
3回答
我试图用突出显示的搜索字符串打印整个文件的内容。
对于记录等于一行的简单文件，我可以使用以下方法轻松完成：
grep --color=auto "myseacrchpattern" inputfile
在这里，我的记录是段落形式，而不是一行。示例：
CREATE TABLE mytable ( id SERIAL,
name varchar(20),
cost int );
CREATE TABLE notmytable ( id SERIAL,
name varchar(20),
cost int );
如果我确实使用grep关键字："notmytable"
浏览 7提问于2017-03-03得票数 1
回答已采纳
我有一些段落在一行末尾有返回。我不想在行的末尾返回，我会让布局程序来处理这个问题。我想删除返回，并将它们替换为空格。
问题是，我确实希望在两段之间返回。因此，如果一行中有多个返回(2、3等)，我想保留两个返回。
这将允许有段落，其间有一个空行，但所有其他格式的行都将被删除。这样，布局程序就可以担心换行符，而不是像现在这样由一定数量的字符所决定的断线。
我想使用Perl来完成这一更改，但我愿意使用其他方法。
示例案文：
This is a test.
This is just a test.
This too is a test.
This too is just a test.
将成为：
T
浏览 5提问于2014-06-20得票数 1
回答已采纳
4回答
假设我有一个文件，包含多个段落，类似于
Lorem ipsum dolor sit amet. Velit et ornare feugiat ve fringilla adipiscing, non
augue risus, eleifend. Laoreet a, taciti porttitor mus. Erat leo metus
venenatis. Natoque eni, nunc quis elit est. Nec enim dui. Sem parturient lectus,
sed, egestas. Amet nascetur quisque, nonummy am
浏览 6提问于2013-10-21得票数 2
回答已采纳
使用Win32::OLE我能够阅读word文档中的表格和段落。但是我想从word文档中读取图片/图像，有没有获取图片的功能？
下面是阅读表格和段落的代码。
$Word = Win32::OLE->GetActiveObject('Word.Application') || Win32::OLE->new('Word.Application');
$Word->{'Visible'} = 0;
$Word->{DisplayAlerts} = 0;
my $document = $Word->Document
浏览 4提问于2013-05-02得票数 0
回答已采纳
2回答
下面有一个示例文件：
# This is a test file. This is a test file. This is a test file
This is a test file. This is a test file. This is a test file.
This is a test file.
# Need to output just this paragraph.Need to output just this paragraph.
Need to output just this paragraph TOO. Need to output just t
浏览 0提问于2016-09-23得票数 0
我有一个相当普通的文档，其中我看到不同段落之间有不同的间距(有些段落被额外的空格分隔，而有些段落则没有)。我不知道这是在哪里设置的。我尝试了以下几点：
选择相邻段落，右键单击鼠标，选择“行距”--无论是否有额外的段落间距，始终是single。
format -> paragraph -> indent & spacing：段落下方和上面的间距为空，行距为单行。
我的问题是:如何使我的所有段落保持相同的风格(即，我希望整个文件中有统一的段落间空间)。
浏览 0提问于2013-10-13得票数 0
1回答
awk段不工作
、、、
我已经从KingBase下载了这里 Lite 2018年更新3文件。现在我想从单个事件中提取数据，比如"FIDE候选人2018年“：我想得到包含这个文本的所有段落和下面的段落，所以我有每个游戏的整个pgn。
为了首先得到包含文本的段落，我遵循了这些建议。
但是，当我尝试awk -v RS='' -v ORS='\n\n' '/FIDE Candidates 2018/' KingBaseLite2018-03.pgn时，它只打印整个文件。当我搜索一个不存在的单词时，它不会打印任何东西。因此，我假设它正确地进行了搜索，但是它在新的行中并没有
浏览 0提问于2018-06-06得票数 2
回答已采纳
10回答
编辑:我最近了解了一个名为CommonMark的项目，它正确地识别和处理了原始Markdown规范中的歧义。 --它有很好的C#库支持。
您可以找到语法。
下载后的源代码是用编写的，我无意对此表示尊敬。它充满了正则表达式，并且依赖于散列来转义某些字符。只是有点不对劲！
我要为编写一个解析器。这方面有什么经验？
如果您对Markdown的实际解析没有任何有意义的说明，请给我时间。(这听起来可能很刺耳，但是的，我是在寻找洞察力，而不是解决方案，即第三方图书馆)。
为了对答案有一点帮助，正则表达式意味着识别模式！而不是解析整个语法。人们认为这样做是错误的。
如果您考虑一下Markdown
浏览 1提问于2009-03-03得票数 131
回答已采纳
我的问题是通过Python中的regex从文件中提取特定段落(例如，通常是中间段落)。
示例文件如下：
poem = """The time will come
when, with elation,
you will greet yourself arriving
at your own door, in your own mirror,
and each will smile at the other's welcome,
and say, sit here. Eat.
You will love again the stranger who was you
浏览 4提问于2017-10-04得票数 0
回答已采纳
我最近开始使用stanford-nlp API，对于给定的输入(段落)，它会对其进行解构并给出结果。
我的问题是如何使用它来比较两个不同的段落？
互联网上有没有我可以参考的有效算法？
任何关于如何实现这一点的建议都将不胜感激。
谢谢!
浏览 3提问于2016-01-19得票数 0
因此，我正在编写一个函数，其中包括，应该只保留文本中每个段落的第一个句子，并保留段落结构(即每个句子都在自己的行中)。以下是我到目前为止拥有的代码： text_shortener <- function(input_text) {
lapply(input_text, function(x)str_split(x, "\\.", simplify = T)[1])
first.sentences <- unlist(lapply(input_text, function(x)str_split(x, "\\.", simplify =
浏览 7提问于2021-11-06得票数 0
2回答
我想在列表中grep一个段落--使用2个bash变量中的2个regexp的文件，下面是我输入的内容：
$ startRegExp=function.toto
$ endRegExp=^}
$ set -x
$ perl -ne "print '\$ARGV:\$_' if /$startRegExp/ ... /$endRegExp/" .bash_functions*
但我得到的是：
+ perl -ne 'print '\''$ARGV:$_'\'' if /function.locate/ ... /
浏览 0提问于2019-05-24得票数 0
回答已采纳
2回答
我正在编写一个工具，让用户能够总结网页上的文本内容，通过突出他们希望得到摘要的文本。
到目前为止，我已经收到了一些结果，我可以使用这些结果来进一步优化算法，但只适用于单个段落。当选择多个段落时，摘要并不十分成功，因为它通常侧重于所选文本输入的某个主要部分，而忽略了摘要中也应该提到的其他部分。这是因为整个算法的功能是确定一个段落中最重要的句子(或者在这种情况下，多个段落合并在一个大的“段落”中)，然后确定其他哪些句子与这个“核心句”相关/重要。该算法采用抽取自动文摘(关于维基百科的解释)。
由于单个段落通常处理一个主要主题，这种算法在这种情况下运行良好，但是当一个包含多个段落(因此通常是多个主要
浏览 0提问于2017-04-02得票数 1
我的perl文件名为perl.pl。我希望这个文件使用crontab运行并输出新文件中的内容？
我不知道怎么做?有人能用截图解释我吗？
浏览 2提问于2016-10-21得票数 0
回答已采纳
我在Eclipse Galileo上安装了E-P-I-C。当我运行Perl脚本时，什么也没有发生，因为我不相信Eclipse与Perl SDK之间有任何连接(这是正确的术语吗？我不知道它是否不同，因为它是Perl)。
我很确定这和C:\Perl\bin有关
如果单击Perl E-P-I-C项目，然后单击属性，则可以看到Perl include Path。我已经添加了上面的内容，但它没有改变任何东西。
归根结底是:如何在Eclipse Galileo中为Perl设置构建路径？
浏览 0提问于2011-07-23得票数 1
回答已采纳
1回答
我有一个程序，它将创建一个具有输出的文本文件，如下所示：
...
AF
Aug 05 16:27:01.310 [notice] Tor 0.3.5.8 running on Linux with Libevent 2.1.8-stable, OpenSSL 1.1.1c, Zlib 1.2.11, Liblzma 5.2.4, and Libzstd 1.3.8.
Aug 05 16:27:01.310 [notice] Tor can't help you if you use it wrong! Learn how to be safe at https://www.torpro
浏览 0提问于2019-08-05得票数 0
回答已采纳
我在段落末尾使用“阅读更多”只是为了提醒用户，就像P.T.O一样
为什么它会有问题？
浏览 1提问于2010-03-05得票数 5
回答已采纳
假设我想在段落中更改单个单词的颜色。
我的选择似乎是:外部、Internal or Inline CSS、<font>或<span>。
正确的方法是什么？
浏览 1提问于2014-12-11得票数 0
回答已采纳
寻找一种快速后端语言来运行具有大量循环和正则表达式( regex )的算法。应用程序正在运行php (Zend )，希望将核心功能进一步向后移动，以获得更好的内存使用和速度。到目前为止，考虑到perl (在googling之后)，希望确保这是最好的选择。
谢谢你的帮忙
浏览 0提问于2011-11-13得票数 0
从数字1开始，如何在段落的每一行前面加上相同的数字和空格，第2段和下一段相同。段落用空白行隔开，文本文件中约有50段，每段有2至30行。
这里的一些文字
更多的数字和文本
这里有更多的文本
下面是更多的文本
数字文本
1这里有一些文本
1多一个数字和文本
2更多文本在这里
这是更多的文本
2数字文本
浏览 4提问于2016-01-01得票数 1
回答已采纳
我正在试着为我们在课堂上翻译的一篇希腊文列出词汇表。我想用段落标记替换每个空格或制表符，以便每个单词都显示在自己的行上。有人能给我sed命令，解释一下我在做什么吗？我还在试着弄清楚sed。
浏览 3提问于2009-12-06得票数 71
回答已采纳
我想使用perl reg ex one行匹配段落标记的内容。这一段类似于这样：
<p style="font-family: Calibri,Helvetica,serif;">Text I want to extract</p>
所以我一直在使用这样的东西：
perl -nle 'm/<p>($.)<\/p>/ig; print $1' file.html
有什么好点子吗？
谢谢
浏览 3提问于2011-02-17得票数 0
回答已采纳
2回答
我使用(\N+\n\N+\n\N+\n)来捕获段落的前3行。如果我想要捕获前10行，我需要重复10次吗？有没有更短的方法来做这件事？ 以下面的文本文件为例： Lorem ipsum fuga quisquam occaecati officiis eaque pariatur.
Sunt in ea harum optio ducimus.
Iusto est sunt fugiat voluptas aliquid.
MY HEADER LINE
Dolores provident non sapiente rerum quasi voluptatem repudiandae debiti
浏览 42提问于2021-06-17得票数 0
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
实时音视频
即时通信 IM活动推荐
腾讯云开发者
