регулярное выражение

Какие нафик квалификаторы жадности. s/ab// или s/aaabbb/aabb/ в зависимости от того, что ты хочешь конкретно. Хотя возможно я твоё желание не угадал, объяснил ты не чётко.

а если вырезать строку как она есть в виде AAABBB, а потом взять подстроку начиная со 2го элемента ?

Если я правильно тебя понял, у тебя повторяющаяся последовательность одного символа, за которым следует повторяющаяся последовательность другого символа, и тебе нужно вырезать то, что посередине, там где меняется символ?

Если так, то регексп может быть таким: "(.)\1*\1(.)\2*", а строка замены "\1\2". При этом предполагается, что первая последовательность должна иметь не менее 2-х символов.

можно разбить строку на 3 части (2 по краям которые нужны, 1в центре нет)

$str = "aaabbb";

if($str =~ /(aa)(\S+)(bb)/) {
print "$1$3\n";
} else {
print "Not found\n";
}

Сорри забыл сказать - между любым из указанных выше символом может быть любое количество других(не 'a' и 'b') символов

Типа "a*a*a*b*b*b" где * - любое количество любых (но не 'a' и не 'b') символов нужно вырезать именно центральный кусок a*b

из "a*a*a*b*b*b" получается вырезать либо все (если жадность у регекспа включить) либо "a*a*a*b" если жадность выключить, а нужно "a*b"...

второй день бъюсь, ничерта не вы ходит, помогите плиз !

s/a.*?b//o;

не... это что-то не то...

echo adfadgadgha123bdgbsgbsdfgbzxcv|sed -e "s/.*\(a[^b]*b\).*/\1/"

?

> Типа "a*a*a*b*b*b" где * - любое количество любых (но не 'a' и не 'b') символов нужно вырезать именно центральный кусок a*b

s/(a[^ab]*a[^ab]*)(a[^ab]*b)([^ab]*b[^ab]*b[^ab]*)/$1$3/

Хотя опять не гарантирую, что правильно нателепатил твои потребности. В частности, если под "любым количеством" понимается всё же ненулевое количество символов, отличных от a и b, то * везде заменить на +.

s/(.*)a.*?b(.*)/$1$2/;

на поставленный вопрос существует единственный ответ: /.*(ab).*/

> на поставленный вопрос существует единственный ответ: /.*(ab).*/

Ну-ну. Проверил бы хоть:

$ echo adfadgadgha123bdgbsgbsdfgbzxcv|sed -e "s/.*\(ab\).*/\1/"
adfadgadgha123bdgbsgbsdfgbzxcv

двоечник. :-) у тебя не хватает [^b]* между a и b. Я же уже написал ответ: sed -e "s/.*\(a[^b]*b\).*/\1/" и привёл пример, как проверить:

$ echo adfadgadgha123bdgbsgbsdfgbzxcv|sed -e "s/.*\(a[^b]*b\).*/\1/"
a123b

#!/usr/bin/perl
$Line='acdanmaaaefbklbbbpqb';
$Line=~s/.*(a.*?b).*/\1/;
print "$Line\n";

%./test.pl
aefb

> $Line=~s/.*(a.*?b).*/\1/;

вариант с [^b]* универсальнее. этот в sed не работает, к примеру...

але, чемодан с гвоздями, был задан вопрос:

> Есть строка типа "aaabbb"

На эту подстроку существует однозначный ответ.

еслиб ему хотелось увековечить строки aaaab#$%aaBaabAAAAqwweaba тогда был бы другой разговор, но ведь аффтар нам сообщил о строке "ааааbbbb", ну и досвидания...

%cat test0.sh
#!/bin/sh
echo 'acdanmaaaefbklbbbpqb'|sed -e "s/.*(a[^b]*b).*/$1/"
%./test0.sh
acdanmaaaefbklbbbpqb
%uname -s
FreeBSD
%

Ы?..

Лучше, сначала, дочитать до конца. Цитата:

**
*Типа "a*a*a*b*b*b" где * - любое количество любых (но не 'a' и не 'b') *символов нужно вырезать именно центральный кусок a*b
*
*anonymous (*) (28.01.2007 21:56:17)
**

В общем, было уточнение. :-)

> %cat test0.sh
> #!/bin/sh
> echo 'acdanmaaaefbklbbbpqb'|sed -e "s/.*(a[^b]*b).*/$1/"

> Ы?..

Ы-гы. $1 - это у тебя первый параметр для test0.sh (хотя sh не пользуюсь, точно не скажу). У sed результат от () не $n, а \n, это раз.
А два - перед "(" и ")" поставь \. Я же написал:

s/.*\(a[^b]*b\).*/\1/

$ cat qqwwee
#!/bin/sh
echo 'acdanmaaaefbklbbbpqb'|sed -e "s/.*\(a[^b]*b\).*/\1/"
$ ./qqwwee
aefb

Хотя, может, это FreeBSD такая странная ? ;-) Впрочем, сомневаюсь, что в ней дело.

Да, так всё работает.

а если слегка изменить условия задачи ? пусть 'b' это не один символ а последовательность скажем 'bzx' ? ведь [^b] в этом случае работать не будет...

Выражение [^b]* по логике означает, что между пограничными 'a' и 'b' может находиться неопределённое количество символов, исключая 'b', и на последовательность, 'b' или 'bzx' будет далее в скобках, не повлияет.

%cat test.pl
#!/usr/bin/perl
$Line='acdanmaaaefbzxklbbbpqb';
$Line=~s/.*(a.[^b]*bzx).*/\1/;
print "$Line\n";

%./test.pl
aefbzx

> Выражение [^b]* по логике означает, что между пограничными 'a' и 'b' может находиться
> неопределённое количество символов, исключая 'b'

Именно так. А "a" исключатся за счёт .*a, то есть, их тоже не будет.

> и на последовательность, 'b' или 'bzx' будет далее в скобках, не повлияет.

ТАк по условию "между последней a и первой b". А если ограничителем хочется сделать bzx, но включить b, то надо zx просто за скобку вынести:


s/.*(a.[^b]*b)zx.*/\1/