Question

perl语言中遇到的情况

Answer 1

/^d+$/ 是正则表达式

^和$用来匹配位置:^表示行首,$表示行尾

d表示数字,即0-9

+表示重复1次以上

综合起来,/^d+$/ 这个正则表达式就是匹配一整行1个以上的数字

/^d+$/ 就相当于 $_=~/^d+$/

就是对默认变量$_进行匹配,匹配成功就返回'真',否则就返回'假'

!/^d+$/ 就是对~/^d+$/返回的布尔值取反