要使用Perl正則表達式匹配數字，可以使用以下方法：
my $string = "12345";
if ($string =~ /\d+/) {
print "匹配成功\n";
} else {
print "匹配失敗\n";
}
my $string = "12345";
if ($string =~ /[0-9]+/) {
print "匹配成功\n";
} else {
print "匹配失敗\n";
}
my $string = "3";
if ($string =~ /[1-5]/) {
print "匹配成功\n";
} else {
print "匹配失敗\n";
}
my $string = "12345";
if ($string =~ /\b\d+\b/) {
print "匹配成功\n";
} else {
print "匹配失敗\n";
}
需要注意的是，以上示例中的正則表達式都是基于Perl的默認模式進行匹配。如果需要使用其他模式，可以在正則表達式前加上相應的修飾符，如/i表示忽略大小寫，/s表示將.匹配包括換行符在內的任意字符等。
