正則表達式只從1

Question

向上至32和64欲在其中我想向上32個從1開始和上至64從1

我試圖用以下驗證值 一個正則表達式： ^1|2|64$但它不工作，並且^1|2|32$ 但未能找到正確的答案。請幫助。

Answer 1

正則表達式可能不是一個很好的解決此問題的方法。爲什麼不把它解析爲一個整數，然後做一些簡單的「> 0 & & < 33」檢查類型？

但是，既然你問，這裏是我的回答： 爲1-32：

^(?:(?:3[0-2])|(?:[1-2]\d)|[1-9])$ 

（在行動：http://rubular.com/r/oVKeR28T98）

爲1-64：

^(?:(?:6[0-4])|(?:[1-5]\d)|[1-9])$ 

（在行動：http://rubular.com/r/Zu5Kk3zuDh）

我可能使那些r egexes比他們可能有點醜陋，但正如我所說，這幾乎肯定不是你應該尋找的答案！

Answer 2

正則表達式：

^([1-9]|[12][0-9]|3[012])$ 

將爲1-32工作，

^([1-9]|[1-5][0-9]|6[0-4])$ 

將爲1-64工作。

說明可以在這裏找到：

• 32
• 64

這麼說，我不認爲你應該在這種情況下使用正則表達式。一個簡單的檢查，如果num >= 1和num <= 32（或num <= 64）應該工作。

Answer 3

下面是用正則表達式爲1〜32有線我的Perl的測試程序（修改不匹配爲零，感謝TimLord）

use warnings; 
use strict; 

my $r=qr/^([123456789]|[123][012]?|[12]\d)$/; 

for my $n (1..32) { 
    die $n unless($n =~ /$r/); 
} 
for my $n (33..64) { 
    die $n if ($n =~ /$r/); 
} 

for my $n(65..99) { 

    die $n if ($n =~ /$r/); 
} 

而且這裏有一個1到64，略更好的測試

use warnings; 
use strict; 

my $r=qr/^([123456789]|[12345]\d|6[])$/; 

for my $n(-32..0) { 
    die $n if ($n =~ /$r/); 
} 
for my $n (1..32) { 
    die $n unless($n =~ /$r/); 
} 
for my $n (33..64) { 
    die $n unless ($n =~ /$r/); 
} 

for my $n(65..1000) { 
    die $n if ($n =~ /$r/); 
}