Константин, Добрый день! Попробуйте уменьшить жадность квантификаторов добавив после знаков звездочки вопросительный знак.
s/^(.*?;).*?;.*?;.*?;.*?;.*?;(.*?;.*?;.*?;.*?;.*?;.*?;)$//g; Если не получится, я думаю было бы здорово если бы вы приложили пример исходных данных для этого регулярного выражения. воскресенье, 5 апреля 2015 г. пользователь Алексей Мышкин написал: > Есть подозрение что жадный квантификатор берёт всё что может, и строке за > скобками уже ничего не остаётся. > > 5 апреля 2015 г., 15:42 пользователь Кузьменко Константин <[email protected] > <javascript:_e(%7B%7D,'cvml','[email protected]');>> написал: > >> Добрый день Moscow.pm >> Не могу понять регулярки перл! >> >> #!/usr/bin/perl >> >> use strict; >> use warnings; >> use utf8; >> use open qw/ :encoding(utf8) :std /; >> #use open qw/ :encoding(cp1251) :std /; >> >> my @onfil = @ARGV; >> open(INFIL, "<:encoding(cp866)", $onfil[0]) >> or die "NO STANDART $!"; >> >> >> while (<INFIL>) { >> $_ =~ s/\h+//g; >> $_ =~ s/\|/;/g; >> $_ =~ s///g; >> $_ =~ s/^(.*;).*;.*;.*;.*;.*;(.*;.*;.*;.*;.*;.*;)$//g; # Не >> удаляется в скобках >> print; >> } >> >> close INFIL; >> >> __END__ >> >> Может что нибудь посоветуете >> зы: Z yjdbxjr d Зукл >> -- >> Специалист IT, GNU, FLOSS, Open Source >> Моб: +7 (951) 131 33 90 >> С уважением, >> Кузьменко Константин Викторович >> >> >> -- >> Moscow.pm mailing list >> [email protected] <javascript:_e(%7B%7D,'cvml','[email protected]');> | >> http://moscow.pm.org >> >> > > > -- > С уважением, > Мышкин Алексей. > -- С уважением, Миронов Иван! тел.: +7 (926) 206-90-39
-- Moscow.pm mailing list [email protected] | http://moscow.pm.org
