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/18 08:19:43
xoK@!J僞g@&- `BIdEiGdM]fvQoi%=q}wGyF`^#bq/0͆aH
Tr1 k1$⚭4EVf]4ᎌKH ˭,%":3OMLώ{ X\==U:h2)!<n aqZ*)swyOQ
G1:f
z
c
n7 (=:{w8"7?kOP$KgZ\
1'h3;'fkj):,(nBZ*7$ۢd;
/aέJmSߛ!Cg'_t-0,(@'s7N_"3