VPF::Пропарсивание цифр - Форум программистов

kukich

Дата 8.12.2010, 12:23 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 69
Регистрация: 2.12.2009

Репутация: нет
Всего: нет

Привет
Нужно определить цифра ли введена - вот мой код:

Код

 
if ($dom!~m/[0-9]+/)
   {
     print "НЕ ЦИФРА"
   }
  else
   {
     print "ЦИФРА";
   }

Вот как работает программа:
Если $dom = 1212 - ЦИФРА
Если $dom = ваня - НЕ ЦИФРА
но если в имени присутствует цифра ,например $dom = ваня12, или $dom=12ваня то программа выдает ЦИФРА,хотя таковой не является.

как правильно пропарсить?

ginnie

Дата 8.12.2010, 12:31 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Комодератор
Сообщений: 1287
Регистрация: 6.1.2008
Где: Москва

Репутация: 38
Всего: 49

kukich, должен Вас огорчить - 1212 тоже не цифра, это число, а цифры 0-9.
Попробуйте такое условие $dom !~ /^\d+$/

--------------------

Написать код, понятный компьютеру, может каждый, но только хорошие программисты пишут код, понятный людям. (Мартин Фаулер. Рефакторинг)

kukich

Дата 8.12.2010, 12:44 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 69
Регистрация: 2.12.2009

Репутация: нет
Всего: нет

Цитата(ginnie @ 8.12.2010, 12:31)

kukich, должен Вас огорчить - 1212 тоже не цифра, это число, а цифры 0-9.
Попробуйте такое условие $dom !~ /^\d+$/

Спасибо,твой вариант работает.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Perl: Общие вопросы \| Следующая тема »