如何使用perl的正则表达式获得一个字符串的第x个字符？

bluealbum

请问各位高手：
如何使用perl的正则表达式获得一个字符串的第x个字符？
例如：获取“1234567890”的第6个字符或第7个字符。
谢谢!

churchmice

perldoc -f substr
no need to use regex

bluealbum

谢谢!这位仁兄。
原来是这样。用特定函数？
我想多问一句
如果只用正则表达式实现，应该如何写呢？

Osment

正则？ 貌似想不到规则。。

longbow0

如果一定要用 正则的话

1. 
   
2. # 找第 7 位的数字
   
3. $str = '1234567890';
   
4. 
   
5. $str =~ /.{6}(.)/;
   
6. 
   
7. print $1;
   
8. 
   

复制代码

不过还是用 substr 吧。

wxlfh

我很奇怪，明明可以用一个内置函数解决的事情，为什么要用正则？

bluealbum

谢谢您！高手，真的很强！