|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Renat Araslanow 2:5011/119.1 18 Dec 2001 02:10:59 To : Alexander A. Kaluzhny Subject : [q] Regexp to func --------------------------------------------------------------------------------
Однажды 17 Dec 01 14:38, Alexander A. Kaluzhny писал All:
AK> У меня вопрос следующий:
AK> Можно ли организовать передачу регулярного выражения в качестве параметра
AK> функции. Hапример так, как это организовано в split().
AK> Вообще, я попробова л следующий вариант:
AK> sub my_func {
AK> my $regexp = shift;
AK> ....
AK> if ($my_str =~ /$regexp/)
AK> {
AK> .....
AK> }
AK> }
AK> Это все работает великолепно, если вызывать следующим образом:
AK> my_func('^dummy_value$');
AK> Hо я бы хотел немного большего, а именно, например так:
AK> my_func(s/^dummy/foo/g);
AK> но так, чтобы при вызове не резался $_. Если кто может что-нибудь
AK> подсказать, буду весьма благодарен.
может qr// ?
--- [Преждевременная оптимизация -- корень всех зол Д. Кнут]
* Origin: Чайник с программным управлениемЪ (2:5011/119.1)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/32783c1e5173.html, оценка из 5, голосов 10
|