作者gecer (gecer)
看板Perl
标题[问题] 请问如何比对第几个字元前面的文字
时间Fri May 2 21:09:16 2014
譬如要判断字串第8个字元前面的文字不为a 要怎麽写
谢谢
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 111.255.233.239
※ 文章网址: http://webptt.com/cn.aspx?n=bbs/Perl/M.1399036159.A.EB1.html
1F：→ xatier:那不就是前7个不能为 a XD 05/02 21:12
2F：→ xatier:print if /^[^a]{7}/ 05/02 21:14
不是 我的意思是第8个前面的几个字元不为a(并非从开头开始)
※ 编辑: gecer (111.255.233.239), 05/03/2014 08:42:08
3F：→ scwg:那跟判断第七个字元不为 a 有何不同? 05/03 10:50
4F：→ scwg:print if "a" ne substr $str, 6, 1; 05/03 10:52
5F：嘘 abliou:还真的看不懂在问甚麽 语气还很差 刚好让我测试2有没有坏 05/03 11:46
6F：推 flamerecca:我想是问 前面七个字元 里面不包含a 怎麽写 05/03 11:54
7F：→ AntaresStar:写个输入输出范例吧 这样问不确定性太多了 05/03 15:01
假设要
123456 abc 第七个字元为" " 输出
若是
1234567abc 第七个字元不为" "则不输出
※ 编辑: gecer (111.255.233.239), 05/03/2014 17:20:58
8F：→ xatier:还是看不懂你要啥阿... 05/04 01:25
9F：→ CindyLinz:我看懂咧 XD 他是说第八个字元前面的那一个,也就是第七 05/04 04:09
10F：→ CindyLinz:用 /^.{6}[^ ]./ 吧 05/04 04:10
11F：→ xatier:因为我的理解 "第8个字元前面的文字" -> 不就是前7个 XDD 05/04 11:07
12F：→ xatier:我的意思是第8个前面的几个字元不为a(并非从开头开始) 05/04 11:07
13F：→ xatier:不从头不然要从哪里开始 XD 所以这边我混淆惹 XD 05/04 11:07
14F：→ AntaresStar:该不会是说"第几个字"这件事需要是一个变数吧? 05/04 23:36
15F：→ AntaresStar:类似这样 $n=8-2; /^.{$n}[^ ]./; 05/04 23:37
16F：→ scwg: ....... 显然本版只爱 re, 嫌弃 substr-based solution 05/05 06:22
17F：→ CindyLinz:楼上误会了, 是因为根据 perl 精神 TIMTOWTDI, 你已经提 05/05 13:56
18F：→ CindyLinz:出来 substr 解法, 我们只好提别的.... XD 05/05 13:56
19F：→ xatier:误会大惹，可是写 re 看起来好像就比较潮(误 05/06 22:37
20F：嘘 hhs66317:问题问的不清不楚。。看完之後会产生误解 06/01 09:48