在从Perl中的配置文件中读取时,可能存在一行无效且不需要添加到我的有效行数组的情况.由于我在这里使用for循环,即使是无效行也会创建一个undef条目.我怎样才能将它们全部删除？
谢谢!
我在Perl中有一个字符串:'CCCCCCCC^hC^iC^*C^"C^8A'.
我想使用正则表达式拆分此字符串:"^[any_character]C".换句话说,我想用实际字符分隔它^,然后是任何字符,后跟一个特定的字母(在这种情况下C,但它可以是A,或任何其他字符).
我试过看其他问题/帖子,最后提出了我的问题@split_str = split(/\^(\.)C/, $letters),但这似乎没有用.
我确定我做错了什么,但我不知道是什么.
我想用行号来说一句话.使用命令grep -n或在shell中很容易实现sed.Perl中是否有可用的等价物？我检查了grep函数,但是我无法找到我需要的东西.
我试图弄清楚如何计算字符串中的任何和所有非空白字符，以便在下面的示例中我会得到 4 的输出。
my $str = 'A b C $';
my $cnt =~ /\S/g;
print "Char Count: $cnt\n";
这是否有一个Perl的快捷方式来计算的字符串匹配的数量？不回答我的问题。
perl -e 'my $str = "A b C"; my $cnt = () = $str =~ /\./gi; print "Chs: $cnt\n";'
Chs: 0
有人一直想说这个问题是这个问题的重复：是否有 Perl 快捷方式来计算字符串中的匹配数？
但是，另一个问题涉及如何匹配特定字符，在他们的情况下，我认为它是一个点。我查看了许多其他寻求匹配特定字符的示例，但无法让它们匹配除空格之外的所有字符。
这不能回答我的问题。
$string = "ThisXlineXhasXsomeXx'sXinXit";
$count = ($string =~ tr/X//);
print "There are $count X characters in the string";
这个问题：\S、\W、\D 在正则表达式中代表什么？仅定义了各种 Perl 通配符运算符——其中一个（\S 运算符）我试图在我的原始问题中使用但无济于事。然而，它没有演示如何实际使用这些运算符之一来获取字符串中所有非空白字符的计数。