perl语言中:^-?\d+$ 为什么是匹配十进制数字?我是菜鸟.检验数字表示合法性 if ($number /^-?\d+$|^-?0[xX][\da-fa-F]+$/) { print ("$number is a legal integer.\n"); } else { print ("$number is not a legal integer.\n");
来源:学生作业帮助网 编辑:六六作业网 时间:2024/11/17 16:40:36
perl语言中:^-?\d+$ 为什么是匹配十进制数字?我是菜鸟.检验数字表示合法性 if ($number /^-?\d+$|^-?0[xX][\da-fa-F]+$/) { print ("$number is a legal integer.\n"); } else { print ("$number is not a legal integer.\n");
perl语言中:^-?\d+$ 为什么是匹配十进制数字?我是菜鸟.
检验数字表示合法性
if ($number /^-?\d+$|^-?0[xX][\da-fa-F]+$/) {
print ("$number is a legal integer.\n");
} else {
print ("$number is not a legal integer.\n");
}
其中 ^-?\d+$ 匹配十进制数字,^-?0[xX][\da-fa-F]+$ 匹配十六进制数字.
关键是-?是什么用法
perl语言中:^-?\d+$ 为什么是匹配十进制数字?我是菜鸟.检验数字表示合法性 if ($number /^-?\d+$|^-?0[xX][\da-fa-F]+$/) { print ("$number is a legal integer.\n"); } else { print ("$number is not a legal integer.\n");
learning perl(5th)的111页中有介绍,表示其前面的模式出现或者不出现,你的代码中指'-'(引号里面的字符)可以出现,也可以不出现.