ReSQL.ru
     
powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / PHP, Perl, Python [игнор отключен] [закрыт для гостей] / Переменная в шаблоне поиска
5 сообщений из 5, страница 1 из 1
Переменная в шаблоне поиска
    #32305211
Фотография Cat2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Cat2
Участник
Мне нужно заменить значения из списка "a" соответствующими значениями из списка "b". В списке "a" могут быть любые значения, в том числе и содержащие специальные символы.

[SRC]
@a = split /,/,'$0),$1),$2)';
@b = split /,/,'f0,f1,f2' ;

$ta = '$0)bla-bla-bla-bla-bla-bla-bla-$0)';

# Это не работает
for ($i=0;$i<$a;$i++) {
$ta=~s/@a[$i]/@b[$i]/ig;
}
print $ta;
...
Рейтинг: 0 / 0
25.10.2003, 21:26
| Ответить | Цитировать | Написать  
Переменная в шаблоне поиска
    #32305345
Макс М.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Макс М.
Участник
символы скобок и знак доллара в решулярных выражениях имеют особый смысл. Поэтому в твоей их надо экранировать. Ну и с массивом ты неправильно работаешь:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
@a = split /,/,'\$0\),\$1\),\$2\)'; 
@b = split /,/,'f0,f1,f2'; 

$ta = '$0)bla-bla-bla-bla-bla-bla-bla-$0)'; 

# Это работает :)
for ($i= 0 ;$i<$#a;$i++) { 
$ta=~s/$a[$i]/$b[$i]/ig; 
} 
print $ta;
...
Рейтинг: 0 / 0
26.10.2003, 12:27
| Ответить | Цитировать | Написать  
Переменная в шаблоне поиска
    #32305441
Фотография Cat2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Cat2
Участник
Ну, про цикл, я просто описался при переписке реального кода
Про специальные выражения я в курсе.
Я не могу менять значения в строке а, они приходят из файла.

Сейчас выкрутился так. Но мне это не нравится. :(
Пока могут присутствовать только $ и ), но кто знает, что будет дальше…
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
$a = '$0),$1),$>:<';
$a=~s'\$'\$'gi;
$a=~s'\)'\)'gi;

@a = split /,/,$a;
@b = split /,/,'f0,f1,f2';

$ta = '$0)$>:<bla-bla-bla-$1)bla-bla-bla-bla-$0)    @a[$i]';

for ($i= 0 ;$i<=$#a;$i++) {
$ta=~s(@a[$i])(@b[$i])ig;
}
print $ta;
...
Рейтинг: 0 / 0
26.10.2003, 18:17
| Ответить | Цитировать | Написать  
Переменная в шаблоне поиска
    #32305969
Макс М.
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Макс М.
Участник
а вот так :
Код: plaintext
$ta=~s/\Q$a[$i]\E/$b[$i]/ig;

или так
Код: plaintext
1.
$a[$i] = quotemeta($a[$i]);
$ta=~s/$a[$i]/$b[$i]/ig;
...
Рейтинг: 0 / 0
27.10.2003, 12:47
| Ответить | Цитировать | Написать  
Переменная в шаблоне поиска
    #32306795
Фотография Cat2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Cat2
Участник
Спасибо. Вариант с quotemeta сработал.
На вариант с \Q … \E – ругается – ошибка синтаксиса.
...
Рейтинг: 0 / 0
27.10.2003, 21:33
| Ответить | Цитировать | Написать  
5 сообщений из 5, страница 1 из 1
Форумы / PHP, Perl, Python [игнор отключен] [закрыт для гостей] / Переменная в шаблоне поиска
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]