Как я могу разрешить буквальную точку в регулярном выражении Perl?

Question

Я использую это условие, чтобы проверить, является ли значение буквенно-цифровым значением:

$value =~ /^[a-zA-Z0-9]+$/

Как я могу изменить это регулярное выражение, чтобы учесть возможную точку . в значении, не принимая другие специальные символы?

Answer 1

$value =~ /^[a-zA-Z0-9.]+$/

Answer 2

Использование alnum класса символов Posix , на один символ короче:)

value =~ /^[[:alnum:].]+$/; 

Answer 3

Не забудьте опцию /i и класс символов \d.

$value =~ /^[a-z\d.]+$/i

Answer 4

Если вы не хотите разрешать какие-либо символы, кроме тех, которые разрешены в классе символов, вы не должны использовать привязку конца строки $, поскольку это допускает завершающий перевод новой строки. Вместо этого используйте абсолютную привязку конца строки \z:

 $value =~ /^[a-z0-9.]+\z/i;

Answer 5

Посмотрите на perl регулярные выражения

\w  Match "word" character (alphanumeric plus "_")


$value =~ /^[\w+.]\.*$/;