Программирование > Регулярные выражения

[Perl] обнаружить конструкцию: (не число и не текст)переменная(не число и не текст)

<< < (2/3) > >>

Green Kakadu:
отрицание в твоем случае [^\\w\\d]

my $str=\'Прокуратура\';
my $line = \'Прокуратура возбудила уголовное дело. Прокуратура прокуратураter и набор слов) была на высоте.\';
my $count = 0;
$count++ while $line=~/$str/ig;
print "Count=$count";

xmolex:
Народ помогите. Не стал заводить новую ветку, чтобы не захламлять.
Имеется строка $local_file=\'  Хы, работает.    Хы, работает.  \';

Там где знак (_) значит могут быть пробелы, а могут и не быть.
Нужно найти строки: что-то

$temp = "

arto:
while ($a =~ m#(.+?)#g) { print "$1: $2\\n"; }
text: Хы, работает.
text: Хы, работает.

xmolex:
Хм. Может пояснишь почему при ".+?" заработало, а при ".*" работало не правильно?
.* - любой символ повторяется 0 или большее число раз.
.+? - любой символ 1 и более число раз.
Или я что-то не понимаю?

arto:
perldoc perlre
смотреть на тему greedy

Навигация

[0] Главная страница сообщений

[#] Следующая страница

[*] Предыдущая страница

Sitemap 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 
Перейти к полной версии