C#. Как программно предоставить в виде сервиса Пользовательский Вход в систему

Забудьте мое предыдущее сообщение, я получил лучшее представление.

sub match_positions {
    my ($regex, $string) = @_;
    return if not $string =~ /$regex/;
    return ($-[0], $+[0]);
}
sub match_all_positions {
    my ($regex, $string) = @_;
    my @ret;
    while ($string =~ /$regex/g) {
        push @ret, [ $-[0], $+[0] ];
    }
    return @ret
}

Эта техника не изменяет regex всегда.

Отредактированный для добавления: заключить в кавычки из perlvar на 1$.. 9$. "Эти переменные все только для чтения и динамично ограниченные по объему к текущему БЛОКУ". Другими словами, если Вы хотите использовать 1$.. 9$, Вы не можете использовать подпрограмму, чтобы сделать соответствие.