|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Ivan Frolcov 2:5020/175.2 20 Dec 2001 01:29:51 To : Alexander A. Kaluzhny Subject : Re: [q] Regexp to func --------------------------------------------------------------------------------
AAK> Так вот интересует вот эта вот специальность. И именно как она
AAK> реализована? Ведь работает же split(), значит можно же сделать?
split вообще-то оператор, не забывай.
Вот тебе пища для размышлений (может, так устроит?):
sub create_subst($$){
my ($re, $subst) = @_;
return sub { local $_=shift; s/$re/$subst/; return $_};
}
$sb=create_subst("lala", "dodo");
print &$sb(" lala ");
Кстати, в относительно новых перлах есть такая штучка, как qr.
--- ifmail v.2.15
* Origin: FidoNet Online - http://www.fido-online.com (2:5020/175.2)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/33000841b3e8.html, оценка из 5, голосов 10
|