|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Alexander A. Kaluzhny 2:5020/400 17 Dec 2001 15:38:23 To : All Subject : [q] Regexp to func --------------------------------------------------------------------------------
Hello All.
У меня вопрос следующий:
Можно ли организовать передачу регулярного выражения в качестве параметра
функции. Hапример так, как это организовано в split().
Вообще, я попробова л следующий вариант:
sub my_func {
my $regexp = shift;
....
if ($my_str =~ /$regexp/)
{
.....
}
}
Это все работает великолепно, если вызывать следующим образом:
my_func('^dummy_value$');
Hо я бы хотел немного большего, а именно, например так:
my_func(s/^dummy/foo/g);
но так, чтобы при вызове не резался $_. Если кто может что-нибудь
подсказать, буду весьма благодарен.
Спасибо за внимание.
--
Sincerely,
Alexander Kaluzhny.
--- ifmail v.2.15dev5
* Origin: NTUU "KPI" (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/12933c02a5b33.html, оценка из 5, голосов 10
|