Помогите с регулярным выражением

[Devider]

Есть строка типа #a1$bcd#ef5#gh, т.е. произвольные буквы-цифры и разделитель в виде # или $ . Каким выражением это разобрать, при условии что ПЕРВЫЙ разделитель не учитывается? Т.е нужно получить подстроки #a1 bcd ef5 gh , При этом первого # или $ может и не быть, т.е. может строка может быть вида a1$bcd#ef5# .

[alfss]

perl

print join(':', split(/\$|#/, '#a1$bcd#ef5#gh'));

[Devider]

perl

print join(':', split(/\$|#/, '#a1$bcd#ef5#gh'));

Спасибо. А.. на чем-нибудь более java-подобном как это может выглядить?

[alfss]

http://java.sun.com/j2se/1.4.2/docs/api/ja...va.lang.String)

[Devider]

Сорри, я не это имел ввиду.

print join(':', split(/\$|#/, '#a1$bcd#ef5#gh'));

Слеши на концах это типа кавычки? ТОгда что остается? $ - конец строки | или # - разделитель... а \ что значит? Я просто смысла этого не понимаю.

В перле ни разу не силен, но получаю

$ perl -e 'print join(':', split(/\$|#/, '#a1$bcd#ef5#gh'));'
syntax error at -e line 1, near "join(:"
Execution of -e aborted due to compilation errors.

[alfss]

split(/\$|#/, 'строка');
разделитель $ или #

\ - экранирование

[Devider]

Разобрался, спасибо. ПРишлось в файл запихнуть. Вот вывод.

perl sc.pl
:a1:bcd:ef5:gh

ПРоблема в том, что разделителями являются все # и $ кроме первого, т.е. вывод нужен такой:

#a1:bcd:ef5:gh

[sash-kan]

Код: Выделить всё

$ echo '#a1$bcd#ef5#gh' | sed 's/\(.\)[$#]/\1:/g'
#a1:bcd:ef5:gh

если встрачаются пустые поля (два идущих подряд разделителя), выражение, конечно, придётся усложнить.

upd. если можно несколько идущих подряд разделителей заменить на один символ «:», тогда так:

Код: Выделить всё

$ echo '#a1$bcd#$#ef5$#gh' | sed 's/\(.\)[$#]\+/\1:/g'
#a1:bcd:ef5:gh

upd2. если пустые поля надо учитывать, тогда вот эдак:

Код: Выделить всё

$ echo '#a1$bcd#$#ef5$#gh' | sed 's/\(\(^.\)\?[^$#]*\)[$#]/\1:/g'
#a1:bcd:::ef5::gh