perl6 – 如何基于逗号分割字符串,但不是基于双引号中的逗号

原文

我想基于逗号拆分此字符串,但不是基于双引号中的逗号“： 
my $str = '1,2,3,"4,5,6"';
.say for $str.split(/','/) # Or use comb?

输出应该是：

1
2
3
"4,6"

解决方法

用梳子快速解决问题,除了“
或者带引号的字符串 
my $str = '1,6",7,8';
.say for $str.comb: / <-[",]>+ | <["]> ~ <["]>  <-["]>+ / ;

perl6 – 如何基于逗号分割字符串,但不是基于双引号中的逗号的更多相关文章

  1. android – 在TextView中的文本中转义“”

    我有一个textView,我正在粘贴s字符串作为文本,我有一些“双引号字符”如何逃避这些字符.解决方法反斜杠双引号在XML布局中不起作用.您应该使用HTML代码,如下所示：上面的代码将显示一个TextView,其中包含：Heregoesmy“escaped”text!

  2. javascript单引号和双引号的区别和处理

    这篇文章主要介绍了javascript单引号和双引号的区别和处理,希望对大家有所帮助

  3. PHP中单双号与变量

    这篇文章主要介绍了PHP中单双号与变量的相关资料，本文实例代码结合文字说明，给大家介绍的非常详细，需要的朋友参考下

  4. 基于php双引号中访问数组元素报错的解决方法

    下面小编就为大家分享一篇基于php双引号中访问数组元素报错的解决方法，具有很好的参考价值，希望对大家有所帮助。一起跟随小编过来看看吧

  5. 替换php字符串中的单引号为双引号的方法

    下面小编就为大家带来一篇替换php字符串中的单引号为双引号的方法。小编觉得挺不错的，现在就分享给大家，也给大家做个参考。一起跟随小编过来看看吧

  6. 再谈PHP中单双引号的区别详解

    单引号和双引号到底有啥区别呢？很多朋友都不太清楚，下面通过本文给大家介绍PHP中单双引号的区别详解，感兴趣的朋友一起学习吧

  7. php 输出双引号"与单引号'的方法

    单引号中间的字面里面的变量不会执行，双引号中间的变量可以执行，所以在没有变量的情况下，用单引号输出字符效率要比用双引号高很多。

  8. 如何处理json中不带双引号的key的问题

    这篇文章主要介绍了如何处理json中不带双引号的key的问题，具有很好的参考价值，希望对大家有所帮助。如有错误或未考虑完全的地方，望不吝赐教

  9. 简单概括PHP的字符串中单引号与双引号的区别

    这篇文章主要介绍了PHP的字符串中单引号与双引号的区别,是PHP入门学习中的基础知识,需要的朋友可以参考下

  10. 如何用python将单引号替换为双引号

    这篇文章主要介绍了如何用python将单引号替换为双引号，具有很好的参考价值，希望对大家有所帮助。如有错误或未考虑完全的地方，望不吝赐教

随机推荐

  1. 数组 – Perl中有什么神奇的数组？

    在Perldocumentationforreverse中,我发现：“请注意,将数组反转到自身(如@a=reverse@a)将尽可能保留不存在的元素;即对于非魔法数组或具有EXISTS和DELETE方法的绑定数组.什么属性区分神奇和非魔法阵列？解决方法一个神奇的阵列是一个执行它的操作不仅仅是改变内容.只有内置的魔术阵列是@ISA,而且这是非常不明显的.正如句子所暗示的,魔术阵列主要是一个绑定的阵列

  2. perl – 使用“isa”方法的最佳方式？

    什么是“最好的”使用方式“isa()”可靠？解决方法Scalar::Util实现明确更好.它避免了eval{}的开销,它总是导致设置一个附加变量.Scalar::Util实现更容易阅读.如果eval也失败了,我相信发生的是你在树之前向后走到eval之前的状态–这是如何实现复位状态.这带来了额外的故障开销.基准根本不是一个对象对象传递isa检查对象出现故障现象检查测试代码：我使用这是为i486-linux-gnu-thread-multi建立的perl,v5.10.1(*),以及Scalar::Util,1

  3. 在CORE :: GLOBAL中哪些Perl内置函数不能被覆盖？

    解决方法toke.c中任何值为负的值都可以被覆盖;所有其他人可能不会.你可以看源码here.例如,我们来看看第10,396行的waitpid：由于waitpid为负数,因此可能会被覆盖.grep怎么样？这是积极的,所以不能被覆盖.这意味着以下关键字不能被覆盖：chop,defined,delete,do,dump,each,else,elsif,eval,exists,for,foreach,format,glob,goto,grep,if,keys,last,local,m,map,my,next,no

  4. 如何在Perl中打印由换行符分隔的列表元素？

    什么是最简单的打印所有列表的元素以Perl中的换行符分隔的元素？解决方法在Perl5.10中：其他方式：或：或者怎么样？

  5. 使用Perl如何获取文件大小(以兆字节为单位)？

    我想以磁盘的形式获取磁盘上的文件大小.使用-s运算符给出了以字节为单位的大小,但是我将假设,然后将其除以魔术数字是一个坏主意：我应该使用只读变量来定义1024,还是有一种编程方式来获取一千字节的字节数？

  6. perl – 如何测试/分类CPAN模块的utf8正确性

    例如：File::Slurp,如果你将读取该文件您将根据命令行开关获得不同的结果,并且perl-CSDA将无法正常工作.伤心.(是的,我知道比Encode::decode(“utf8”,read_file($file,binmode=>’：raw’));将帮助,但是SAD.我的问题：>在这里任何首选方式,如何测试/分类什么CPAN模块是utf8安全/准备/正确？>这里是像Perl::Criticforutf8这样的东西–什么将检查模块源可能的utf8不正确？总结以上是DEVMAX为你收集整理的perl–如

  7. 如何删除Perl字符串中的空格？

    如果我声明一个值为’3’的变量$myString.是否有任何功能来删除返回值的空格.有点像SomeFun然后返回’3′.输出：你可以注意到’vid’=>‘0’,上面的代码从theanswer.我正在研究它.总结以上是DEVMAX为你收集整理的如何删除Perl字符串中的空格？如果觉得DEVMAX网站内容还不错，欢迎将DEVMAX网站推荐给好友。

  8. 如何在mod_perl2下运行Devel :: Cover？

    Unfortunately,Devel::Coverdoesnotyetworkwiththreads.它也不适用于prefork.在startup.pl中使用,Devel::Cover问题perl5.8.9,Apache2.2.13.我的操作系统是FreeBSD,如果重要.同样的问题是reportedforwin32.更新：PerlTrace全部输出解决方法邪恶之源似乎是Apache::DBI.

  9. 如何使用Perl中的C类？

    我有一套用C写的课.从Perl脚本中调用它们的最佳方法是什么？

  10. perl – 在Emacs中以双模式更好的缩进

    我正在使用Emacs来修改Perl和Verilog交织的代码.我正在使用two-mode-mode在两者之间切换,这样可以预期.问题是perl代码与//一行一行地表示;如下图所示：而双模式则认识到它是Perl,它是逐行的,所以缩进等在线上无意义.我想做的是使Perl代码像往常一样格式化,但忽略//;字符.有什么想法吗？我刚刚开始偷看模式文件,它们是可以理解的复杂的,所以任何提示都不会感激！

返回
顶部