作业帮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/07/08 12:17:33
![perl语言中:^-?\d+$ 为什么是匹配十进制数字?我是菜鸟.检验数字表示合法性 if ($number /^-?\d+$|^-?0[xX][\da-fa-F]+$/) { print (](/uploads/image/z/12464139-3-9.jpg?t=perl%E8%AF%AD%E8%A8%80%E4%B8%AD%3A%5E-%3F%5Cd%2B%24+%E4%B8%BA%E4%BB%80%E4%B9%88%E6%98%AF%E5%8C%B9%E9%85%8D%E5%8D%81%E8%BF%9B%E5%88%B6%E6%95%B0%E5%AD%97%3F%E6%88%91%E6%98%AF%E8%8F%9C%E9%B8%9F.%E6%A3%80%E9%AA%8C%E6%95%B0%E5%AD%97%E8%A1%A8%E7%A4%BA%E5%90%88%E6%B3%95%E6%80%A7+++if+%28%24number+%2F%5E-%3F%5Cd%2B%24%7C%5E-%3F0%5BxX%5D%5B%5Cda-fa-F%5D%2B%24%2F%29+%7B+++++print+%28%22%24number+is+a+legal+integer.%5Cn%22%29%3B+++%7D+else+%7B+++++print+%28%22%24number+is+not+a+legal+integer.%5Cn%22%29%3B)
xoK@ !J僞g@ &- `BIdEiGdM]fvQoi%=q}w GyF`^#bq/0͆aH
Tr1 k1$⚭ 4EVf]4ᎌ KH ˭,% ":3OMLώ{ X\==U:h2)!<n aqZ*)sw yOQ
G1:f
z
c
n7 (=:{w8"7?kOP$ KgZ\
1'h3 ;' fkj):,(nBZ*7$ۢd;
/aέJmSߛ!Cg'_t-0,(@'s7N_"3
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页中有介绍,表示其前面的模式出现或者不出现,你的代码中指'-'（引号里面的字符）可以出现,也可以不出现.