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 Tr1k1$⚭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