Можно использовать urxvt-perls для включения ярлыков клавиатур для копии и вставки в urxvt.
Поместите необходимые сценарии в /usr/lib/urxvt/perl/
и добавьте эти строки к Вашему .X{resources,defaults}
:
URxvt.perl-ext-common: ...,keyboard-select
URxvt.keysym.M-Escape: perl:keyboard-select:activate
Попытайтесь использовать это:
sed 's@__esct(\(.*)\)@$this->escape($this->translate(\1)@' file.txt
sed -e 's/__esct(\(.*\))/$this->escape($this->translate(\1))/'
Должен получить Вас длинный путь. Это перестанет работать, если Вы будете иметь foo(__esct('Some text'))
sed -e 's/__esct(\([^(]*\))/$this->escape($this->translate(\1))/'
Этот будет работать на тех, но перестанет работать для __esct(foo('Some text'))
Perl имеет хорошие расширения, чтобы сделать что-то как этот:
perl -pi -e 's;__esct\(\'([a-zA-Z ]*)\'\);\$this->escape\(\$this->translate\(\'\1\'));g' list of the files to mangle
Это оставит оригиналы как <файл> .bak. Это - просто глобальная замена на каждой строке, так же, как Вы записали бы это в vi (1). В Perl, () и такой метасимволы, для соответствия им Вам нужно \(\).
[Я не на 100% уверен в обработке', должен проверить то, что Ваша конкретная оболочка делает в таком случае.]
)
– Dennis Kaarsemaker 17.01.2013, 22:52)
появиться :) Я думаю, что Вы имеете в виду(\(.*\))
как в моем ответе. – Dennis Kaarsemaker 17.01.2013, 22:56(
, 2 закрытия)
– Gilles Quenot 17.01.2013, 23:02