你如何在Perl中标记/标记/拆分分隔的字符串？
在Perl中，可以使用正则表达式和split函数来标记、分割字符串。
标记字符串：
在Perl中，可以使用正则表达式来标记字符串。例如，如果要标记所有以大写字母开头的单词，可以使用以下代码：
my $string = "This is a Test String";
my @words = $string =~ /(\b[A-Z]\w+\b)/g;
print join(", ", @words);输出：
Test分割字符串：
在Perl中，可以使用split函数来分割字符串。例如，如果要将字符串按照逗号分割，可以使用以下代码：
my $string = "This,is,a,Test,String";
my @words = split(/,/, $string);
print join(", ", @words);输出：
This, is, a, Test, String推荐的腾讯云相关产品：
- 云服务器（CVM）：提供高性能、稳定可靠的云服务器，支持自定义配置和灵活扩展。
- 对象存储（COS）：提供可靠的数据存储服务，支持多种存储类型和文件访问方式。
- 数据库（TencentDB）：提供可靠的数据库服务，支持多种数据库类型和高可用性。
- 内容分发网络（CDN）：提供高速、稳定的内容分发服务，支持多种协议和加速方式。
- 移动应用与游戏解决方案：提供一站式移动应用和游戏开发解决方案，支持多种平台和开发语言。
- 人工智能与大数据：提供一站式人工智能和大数据解决方案，支持多种数据处理和分析方法。
产品介绍链接地址：
相关·内容
1回答
我希望将多行字符串解析为不同的行。我搜索这些解决方案已经很长时间了，但是我发现的所有代码在 Sybase 中都不能很好地工作(我认为这是因为Sybase不支持作为表返回？)
例如，我有一张这样的桌子：
id | text
------------------------------------
1 | Stackoverflow.is.awesome
2 | Sybase.never.sleeps
理想的结果应该是：
id | text
-----------------------------------
1 | Stac
浏览 0提问于2012-03-20得票数 1
我有一个文本文件作为输入，如下所示:假设它是xyz.txt
TIME SR No TYPE DATA
2.046103 1 1 Tx d 8 01 01 01 99 9A 9B 9C 9D
2.046163 3 1 Rx d 8 01 01 01 99 9A 9B 9C 9D
2.046361 2 1 Rx d 8 01 01 01 99 9A 9B 9C 9D
2.046916 1 3 Tx d 8 01 01 01 9B
浏览 0提问于2012-03-06得票数 1
回答已采纳
3回答
如果特定列包含值>0，则打印行。
、、、、
我有一个以这种格式以制表符分隔的.txt文件，包含许多符号、数字和字母：
MUT 124 GET 288478 0 * = 288478 0
MUT 15 GET 514675 0 75MH = 514637 -113
MUT 124 GET 514637 0 75MH = 514675 113
我希望标识第9列中包含>0值的所有行(即仅提取上面的第3行)，然后从任何匹配的行中打印列4+9。
所需输出(两个列选项卡分隔为.txt文件)：
514637 113
在终端/命令行中是否有一种快速的方法来做到这一点？如果是这样的
浏览 6提问于2015-11-11得票数 0
回答已采纳
3回答
我正在编写一个C/CGI web应用程序。是否有库可以将查询字符串解析为类似GHashTable的内容？我可以写我自己的，但看起来肯定不值得重新发明轮子的努力。
浏览 3提问于2011-01-03得票数 5
回答已采纳
2回答
可能重复：
在Ruby中，当我用与字符串开头匹配的分隔符拆分字符串时，它在数组的初始位置提供一个空字符串：
"abc".split(/a/) # => ["", "bc"]
但是，当我使用与字符串末尾匹配的分隔符执行类似的操作时，它不会给出空字符串：
"abc".split(/c/) # => ["ab"]
在我看来这不一致。这样的规范有什么理由吗？
编辑如果要与Perl的规范兼容，就像在muu中一样，那么问题仍然是一样的:为什么在Perl中是这样的呢？由于这个原因，现在它也成为了一个关于Pe
浏览 2提问于2012-11-07得票数 8
回答已采纳
3回答
我想在某个点上拆分一个字符串，但要保留拆分的字符。例如：
Input:
a:b
Output:
a
:
b
有没有什么方法可以让我在Java的split()方法中使用它呢？谢谢:)
浏览 0提问于2014-03-11得票数 1
1回答
我需要做的是找出某个字符串的位置，然后只保存后面的内容。
伪代码：
string1 = "CDSDC::walrus"
string2 = "::"
string3 = (substr( string1, strfind(string1, string2) + 2 )) // +2 being the len of str2
// at this point I want string3 == "walrus"
浏览 0提问于2012-06-01得票数 5
回答已采纳
我有一个字段类型，它有一个简单的WhitespaceTokenizer，后面跟着一个WordDelimiterGraphFilter。这应该允许使用“电子邮件”这样的短语查询来查找“电子邮件”和“电子邮件”的内容。然而，在某些情况下，这是行不通的。
这可以用一组由不同数目的连字符分隔的玩具数据集来再现：
1 2 3 4
一二三四
一二三四
一二三四
等等..。
这个问题的旧版本使用了6个单字术语--.
总共有8个组合(用于连字符的三个可能位置)。这意味着搜索上述任何一个项目都会找到所有的8个。
但是，将找不到一些短语查询的组合。例如，对“一二三四”的搜索可以
浏览 1提问于2019-07-02得票数 1
2回答
我循环遍历一个对象数组，然后尝试拆分其中一个元素，在本例中，我想拆分空间上的邮政编码。即。“AB1 1AB”应仅为“AB1”。
{% for result in resultset %}
{{ result.postcode|split(' ') }}
{% endfor %}
抛出一个“array to string error”
只是尝试：
{{ result.postcode[0] }}
抛出“不可能访问字符串变量上的键”错误。
并且只是在做：
{{ result.postcode }}
没有任何错误，邮政编码显示为'AB1
浏览 0提问于2014-02-26得票数 2
回答已采纳
我正在尝试读取一个文本文件(使用perl)，其中每一行都有几条记录，如下所示：
r1c1 & r1c2 & r1c3 \\
r2c1 & r2c2 & r2c3 \\
因此，&是记录分隔符。
Perl帮助是这样说的：
$ perl -h
-0[octal] specify record separator (\0, if no argument)
我不明白你为什么要用八进制数。但是046是分隔符&的八进制ASCII码，所以我尝试这样做：
perl -046 -ane 'print join ",", @F
浏览 0提问于2011-04-04得票数 1
回答已采纳
2回答
我有一个输入文本文件，格式如下：
1月份2月份3月份APR年5月份
9.1916 9.8 1998 12.1 2012年16.9 1992年15.7 2011年8.7 2007年8.9 2008年11.9 1938 15.2 2007年16.8 2008年9.0 1916 9.8 1998年12.1 2012年16.9 1992 15.7 2011年8.7 2007年8.9 2008 1938 15.2 2007年16.8 2008 9.0 1916 91998年8月12.1 2012年16.9 1992年15.7 2011年8.7 2008年8.9 2008 11.9 1938 15.2 2
浏览 4提问于2016-02-18得票数 0
3回答
我有一根看起来像这样的绳子：
$string =“标签:甜，甜，巧克力，黑”
我想在Mysql表中插入这些标记。
，那么我如何从字符串中删除标记？，以及如何在Mysql表中添加foreach $string？。
浏览 13提问于2011-03-15得票数 0
我正在使用java中的StringTokenizer来标记字符串，如下所示
import java.util.StringTokenizer;
public class Test {
public static void main(String[] args) {
String str = "key1@@@@@val1#####key2@@@@@val2#####key3@@@@@val3#####key4@@@@@val4###val4###val4#####key5@@@@@val5";
StringTokenizer st =
浏览 5提问于2015-03-10得票数 0
回答已采纳
2回答
我有string s=A8GCB5913L6。我想把壳分成三部分。第一部分是全部字母数字字符，最多4个连续数字，第二个部分是4个连续数字，第三个部分是在4个连续数字之后。
上面的字符串示例：
A8GCB
5913
L6
我尝试过echo $s | grep -P '(?<!\d)\d{4}(?!\d)'，但我能够标记4位数字的字符串，不能复制。
浏览 0提问于2018-08-31得票数 2
回答已采纳
2回答
我正在开发一个在python中的应用程序，该应用程序根据上传的简历提供工作推荐。在进一步处理之前，我正在尝试对简历进行标记。我想对一组单词进行标记化。例如，数据科学是一个关键字，当我标记化时，我将分别获得数据和科学。如何克服这种情况。有没有在python中做这些提取的库？
浏览 35提问于2018-07-14得票数 1
回答已采纳
我有一个字符串，我想在perl中用分隔符将其拆分，但要在特定的位置。$Str = d2a_orx_lego_clk我想要的输出是d2a_orx，即只在第二个下划线后拆分。我尝试的代码将字符串分成两部分，但在第一部分下划线，而不是在第二部分。
#!/bin/perl
$str = d2a_orx_lego_clk;
#print join('_', split(/_/, $str )), "\n";
my ($k, $v) = split(/_/, $str, 2);
print "$k\n";
print "$v\n";
谢谢
浏览 5提问于2017-06-19得票数 0
回答已采纳
1回答
我需要在一个pug文件中插入一个包含一些pug格式代码的字符串。
我测试的内容：
- var text = "i.home.icon"
div= text
div !{text}
div #{text}
div ${${text}}
div {{text}}
div {text}
div \#{text}
div \{text}
div ${text}
div
#{text}
我想要的：
<div><i class="home icon"><i></div>
浏览 1提问于2018-12-29得票数 3
在我的javascript文件中，我有以下内容：
<script type="text/javascript" src="https://ajax.googleapis.com/ajax/libs/jquery/1.4.4/jquery.min.js"></script>
<script type="text/javascript">
$.ajax({
type: 'post',
url: 'script.php',
data: '',
浏览 0提问于2011-01-23得票数 3
回答已采纳
我有一个父文件夹(Abep)，其中包含几个子文件夹(1，2，3.25)，输出文件位于其中，其中-所有都是同名(opt.out)。在这个文件中有一个不可预测的输出。这是一个我需要过滤的行的例子：
A\HF=-1378.9118397\RMSD=4.560e-09\RMSF=1.758e-05\Dipole=0.2110167,0.39
或
978,3.8529967641,3.6669041122\Version=ES64L-G09RevD.01\State=1-A\HF=-
所以问题是我有兴趣把所有的东西都放在\HF=和till之间。
但是他们可能在不同的线路上，甚至HF可能在不同的线路上，所
浏览 0提问于2014-05-26得票数 1
回答已采纳
4回答
我有一个类似这样的文件：
A
B
C
D
E
F
G
H
I
J
K
L
我想让它像这样
A,B,C,D
E,F,G,H
我假设我会使用sed，但实际上我甚至不确定这是否是最好的工具。我对使用Linux系统上常见的任何东西都持开放态度。
在perl中，我是这样做的。它可以工作，但它很脏，而且后面有一个逗号。希望有更简单的东西：
$ perl -ne 'if (/^(\w)\R/) {print "$1,";} else {print "\n";}' test
A,B,C,D,
E,F,G,H,
I,J,K,L,
浏览 0提问于2018-02-23得票数 2
3回答
如果我有：
$foo= "12."bar bar bar"|three";
如何在文本中插入"..“在变量中的文本12之后？
浏览 0提问于2009-03-15得票数 5
回答已采纳
1回答
我是Perl的新手。如何读取与Perl中的输入位于同一行的两个整数？例如：
$n=<>;$k=<>;
print $n + ";" + $k
输入为：
2 3
输出结果如下：
2
请帮帮忙。
浏览 10提问于2017-03-11得票数 0
3回答
我试着用像@这样的特殊符号来获得搜索结果。每次我尝试这样做，我都不会得到任何的点击，当我尝试没有特殊的符号，一切都很好。这是我提出的要求。
search?q=(or(prefix+field%3Demail+%27email@email%27)(term+field%3Demail+%27email@email%27))&q.parser=structured&return=user
浏览 7提问于2015-12-15得票数 2
回答已采纳
2回答
由于某些原因，无论我尝试strchr还是strrchr，我都会得到相同的返回值。我不知道为什么。
下面是给我带来麻烦的那段代码：
printf("Enter a data point (-1 to stop input):\n");
fgets(input, 50, stdin);
char *name = strrchr(input, ',');
if(name)
{
printf("%s", name);
}
输入为Jane Austen, 6，我尝试将
浏览 28提问于2019-11-26得票数 0
回答已采纳
使用java：
File file = new File("C:/Users/Administrator/Desktop/es.txt");
List<String> lines = FileUtils.readLines(file, "utf-8");
for (String line : lines) {
String[] arr = line.split("\\u007C\\u001C");
System.out.println(arr.length);
Syste
浏览 5提问于2015-10-28得票数 3
回答已采纳
对于你们大多数人来说，这可能是一个简单的问题，但答案在很大程度上回避了我。我正在编写一个程序，从最低到最高对三个数字进行排序，并且在命令提示符下，输入必须都在一行上。我让程序正常工作，但由于某种原因，我无法将输入显示在一行上。取而代之的是，我得到了如下内容：
Please enter three numbers: 1
2
3
Sorted numbers are: 1, 2, 3
它应该显示在哪里
Please enter three numbers: 1 2 3
Sorted numbers are: 1, 2, 3
我的代码：
import java.util.Scanner;
p
浏览 0提问于2013-10-25得票数 1
1回答
我希望将一些电视脚本分成两个变量的数据帧：(1)口语对话和(2)演讲者。
以下是示例数据：
通过以下方式加载到R：
require(rvest)
url <- 'http://www.buffyworld.com/buffy/transcripts/127_tran.html')
url <- read_html(url)
all <- url %>% html_text()
[1] "Selfless - Buffy Episode 7x5 'Selfless' (#127) Transcript\n\nBuffy Epi
浏览 19提问于2018-01-05得票数 3
回答已采纳
1回答
我正在寻找像下面这样的东西。如果我们有办法的话，请告诉我。
Scenario Outline : Verify
Examples :
| name | rollno | marks |
| raj | 110 | |science | maths | test | |
| 95 | 20 | finaltest |
| 100 | 20 | midterm |
浏览 0提问于2017-04-06得票数 0
4回答
从bash脚本替换文件中的字符串
、、、、
我需要在一个小bash脚本中替换一个文件中的字符串，但是...我得到了奇怪的结果。
假设我想替换：
<tag><![CDATA[text]]></tag>
通过以下方式：
<tag><![CDATA[replaced_text]]></tag>
我应该使用sed吗？我认为由于/和[ ]，我得到了奇怪的结果…
解决这个问题的最好方法是什么？
浏览 0提问于2012-04-09得票数 1
2回答
我正在尝试获取数组( string)元素的长度，但每次得到一个。
这是我的密码
while (my $line =<$file>) {
chomp $line;
my @words = split('', $line);
foreach my $element (@words)
{
print length($element);
}
Length总是返回1，但是对于其他变量，它工作得很好。
请帮忙找出问题。
浏览 4提问于2015-03-09得票数 1
回答已采纳
我有一个json数据保存在我的sqlite数据库中。我从一个数组(MoodsDataArray)中从数据库中获取数据，这个数组看起来如下-
{
data = "(\n
{\n c1 = 8847FF;\n c2 = EA8CFF;\n c3 = D1FFB0;\n c4 = FF63FC;\n c5 = 6B6B6B;\n description = mood;\n \"font_color\" = 000000;\n \
浏览 3提问于2016-05-16得票数 0
回答已采纳
据我所知，所有unix文本处理实用程序都是一次读取一行，并在这一行上执行一个操作。
我有一个包含一行文本的大型文件，其中包含几个涉及到的令牌。
您可以将文件的内容看作如下所示：
我希望得到(A和B)和(B和C)之间的两个字符串，对于每个出现的A*B*C，在这个示例中，我想要的输出如下：
Z zxxxxzz
我该怎么做？
编辑:对不起，我没说清楚。A，B和C是长字符串，只能用正则表达式来识别。
浏览 0提问于2010-12-12得票数 5
回答已采纳
2回答
当指定子匹配的索引为-1时，sregex_token_iterator几乎完全可以作为标记器工作。但不幸的是，它不能很好地处理以分隔符开头的字符串，例如：
#include <string>
#include <regex>
#include <iostream>
using namespace std;
int main()
{
string s("--aa---b-c--d--");
regex r("-+");
for (sregex_token_iterator it = sregex_to
浏览 3提问于2012-03-21得票数 2
1回答
使用sed命令更改日志文件日期？
、、、、
我在日志文件中多次使用下面的行和其他数据。我喜欢先将json部分导入mongodb，然后运行选中的查询来分析这些数据。
DEBUG 2015-04-18 23:13:23,374 [TEXT] (Class.java:19) - {"a":"1", "b":"2", ...}
要修改数据，只需获得我使用的json部分：
cat mylog.log | sed "s/DEBUG.*19) - //g" > mylog.json
这里的主要问题是，也要添加日期和时间部分，并作为一个额外的json值来获得如下内容：
浏览 0提问于2015-04-28得票数 0
回答已采纳
我试图在大型(30G) 单行文件上使用sed执行简单的文字搜索/替换。
我希望这需要一些时间，但是当我运行它时，它会在几秒钟后返回，当我查看生成的文件时，它的长度为零。
输入文件有30G
$ ls -lha全文-标记-单-Line.txt-rw-rw-rw-r-1 ubuntu ubuntu 30G 6月9日19:51全文-标记-单-莱内.Text
运行以下命令：
$ sed /g‘全文-标记-单-Line.txt>全文-标记-单行-No-unks.txt
输出文件的长度为零！
$ ls -lha全文-标记-单行-No-unks.txt-rw-rw-r-1 ubuntu ub
浏览 0提问于2017-06-09得票数 7
回答已采纳
我有以下问题。我正在解释一个输入文件，现在我遇到了这个问题:我需要将%%BLANKx转换为x空间。
所以，在输入文件中，例如%%BLANK8，我需要用8空格替换%%BLANK8，用10空格替换%%BLANK10，等等。
浏览 0提问于2011-04-01得票数 1
3回答
我试图弄清楚如何从一个包含一个十进制数的文件中读取一个时间戳，但是我似乎无法得到我想要的输出，任何帮助都是很棒的！提前谢谢。
示例：
[Time since reference or first frame: 691.933275000 seconds]
[Time since reference or first frame: 691.953127000 seconds]
[Time since reference or first frame: 691.992275000 seconds]
[Time since reference or first frame: 691.99759000
浏览 0提问于2015-09-20得票数 0
回答已采纳
4回答
我需要一些关于如何提取行的特定字符串的帮助。
我有一个包含数千行代码的文件，如下所示：
Eukaryota; Alveolata; Ciliophora; Intramacronucleata; Paramecium#
Eukaryota; Viridiplantae; Streptophyta; Embryophyta#
Bacteria; Cyanobacteria; Synechococcales; Acaryochloridaceae; Acaryochloris#
Eukaryota; Viridiplantae#
Bacteria; Proteobacteria; Alphapr
浏览 3提问于2017-07-26得票数 3
2回答
我是，perl到python转换器的作者，我正在尝试翻译包含反斜杠的string模式的perl拆分语句，我需要一些帮助来理解这种行为。下面是基于我试图翻译的源代码的示例：
$s = 'a|b|c';
@a = split '\|', $s;
print scalar(@a) . "\n";
print "@a\n";
产出如下：
3
a b c
现在，如果我只打印'\|'，它就会打印\|，所以我不知道为什么在字符串模式中忽略反斜杠。除了' '特例之外，文档中没有太多关于字符串作为模式使用的内容。将&
浏览 10提问于2022-11-06得票数 2
如果运行fdisk -l，将得到如下输出：
Disk /dev/sda: 120.0 GB, 120034123776 bytes
255 heads, 63 sectors/track, 14593 cylinders
Units = cylinders of 16065 * 512 = 8225280 bytes
Disk identifier: 0x0003ad9d
Device Boot Start End Blocks Id System
/dev/sda1 1 1306 1049041
浏览 0提问于2010-02-15得票数 2
回答已采纳
ls | perl -anle 'print $F[0]' -> file1\nfile2\nfile3\n ...
这将打印ls的所有文件。但是是不应该的。我想访问ar @F，而ls给出了以空格分隔的文件，因此每个文件都应该是@F的一个元素，根据以下所示：
-a turns on autosplit mode when used with a -n or -p. An implicit
split command to the @F array is done as the first thing inside the
浏览 1提问于2020-01-11得票数 0
回答已采纳
编辑:拆分现在起作用了，我正在用C#而不是arduino转换十六进制(但是如果有人知道arduino侧的转换，我想知道在arduino上将十六进制转换为string的解决方案)
我在arduino串行监视器上获取十六进制数据，现在我想将它转换回String(如何做到这一点？)我在C#中为串行客户端编写了一个代码，在这里我正在接收通过COM端口发送的数据&我只想从我从电话发送的数据中找到字符串，但是无法从固件版本中分离出来，找到一些东西！文本(因为它们也会出现在COM端口上)，我想显示RichTextBox中的所有内容(这是有效的)，但是如何只显示我们得到的用于其他目的的字符串呢？串行客
浏览 3提问于2014-03-30得票数 0
回答已采纳
我使用fgets在char name[20]中接受用户输入，如下所示：
fgets(name,20,stdin);
用户输入两个由空格分隔的字符串，如John Smith。如果我想在两个字符串中使用John和Smith，比如char name[20]、char surname[20]，或者只是使用strcmp比较John和Smith，该怎么办呢
我尝试了很多，但我没有找到任何方法来做到这一点。
解决这类问题的一些方法是什么？
浏览 1提问于2013-12-28得票数 0
为什么下面的代码返回false？
Scanner sc = new Scanner("-v ");
sc.useDelimiter("-[a-zA-Z]\\s+");
System.out.println(sc.hasNext());
奇怪的是-[a-zA-Z]//s+会返回true。
我也不明白为什么会返回true：
Scanner sc = new Scanner(" -v");
sc.useDelimiter("-[a-zA-Z]\\s+");
System.out.println(sc.hasNext());
浏览 0提问于2013-03-19得票数 2
回答已采纳
这符合我的预期(put -当column2更改值时)：
$ (echo 'a,,b';echo 'b,,a';echo 'c,a,b') |
perl -a '-F,' -pe 'BEGIN{$last="---\n";}{local$_=$F[1];if(($last)ne$_){print"---\n";$last=$_;}}'
---
a,,b
b,,a
---
c,a,b
这并不意味着：
$ (echo 'a b';echo 'b a
浏览 0提问于2020-12-07得票数 0
回答已采纳
希望在perl中准备一个字符串，以便在bash中评估它，如下所示：
str="$( perl -E '$sq=chr(047);say qq{var1=${sq}hello world${sq}}' )" #this just for demo - the real perl scirpt is ofcourse real complex script ...
echo "got for eval: [[$str]]"
eval "$str"
echo "var1 : [[$var1]]"
它打印：
浏览 4提问于2017-03-18得票数 2
回答已采纳
2回答
我刚刚在String#split中发现了以下奇怪的行为
"a\tb c\nd".split
=> ["a", "b", "c", "d"]
"a\tb c\nd".split(' ')
=> ["a", "b", "c", "d"]
"a\tb c\nd".split(/ /)
=> ["a\tb", "c\nd"]
(来自2.0.0的string.
浏览 3提问于2013-04-30得票数 6
回答已采纳
我试图从csv文件的第31列中删除第一个值。列以引号表示，并以逗号分隔，如下所示。
"first_name","last_name","home_address"
"Frank",Russel","123 Hampton road"
第31列是图像列，图像用逗号分隔。
"http://ddd.com/124dfr3f.jpg,http://ddd.com/hjasgx37trg.jpg"
第一个图像和尾随逗号必须从第31列中删除。
添加了-下面是一个示例。
"one",
浏览 0提问于2018-06-16得票数 2
回答已采纳
我对正则表达式很陌生，我试图用它来解析由"("，")“和空白分隔的标记。这是我的尝试：
String str = "(test (_bit1 _bit2 |bit3::&92;test#4|))";
String[] tokens = str.split("[\\s*[()]]");
for(int i = 0; i < tokens.length; i++)
System.out.println(i + " : " + tokens[i]);
我期望得到以下输出：
0:测试
1：_bit1
2：_b
浏览 8提问于2014-04-10得票数 1
回答已采纳
6回答
如何获取输入CSV文件中每一行的第一列并将其输出到新文件？我在考虑使用awk，但不确定如何使用。
浏览 6提问于2012-07-26得票数 41
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
腾讯会议
实时音视频活动推荐
腾讯云开发者
