Re: lug-bg: Perl system() or exec()
- Subject: Re: lug-bg: Perl system() or exec()
- From: Sava Chankov <sava@xxxxxxxxxxxxx>
- Date: Mon, 07 Mar 2005 13:16:53 +0200
Peter Pentchev wrote:
On Mon, Mar 07, 2005 at 11:37:17AM +0200, Sava Chankov wrote:
Peter Pentchev wrote:
Проблемът не е толкова в генерирането им, колкото в подаването им
през шела към... към......
Че какъв е проблема за подаването на аргументи към едноредовия скрипт? Вярно, че не става през масива @ARGV, но за тази цел може да се ползва хеша %ENV. Примерно:
SOMETHING="life";SOMETHINGELSE="something else";perl -pi -e's/$ENV{SOMETHING}/$ENV{SOMETHINGELSE}/og'
А ако изчисляването на $something и $somethingelse не е нещо
тривиално, а има смисъл да бъде направено само веднъж, тогава...
perl -pi -e 'BEGIN { $something="blah"; $somethinglese="furrfu"; }
s/^$something.*\$/$somethingelse/g'
може би искаш да кажеш
perl -pi -e '$something="blah"; $somethinglese="furrfu"; s/^$something.*\$/$somethingelse/og'
/o - compile the regexp only once
--
Sava Chankov Сава Чанков
research and development проучване и развой
http://www.blueboard.biz блуборд оод
============================================================================
A mail-list of Linux Users Group - Bulgaria (bulgarian linuxers).
http://www.linux-bulgaria.org - Hosted by Internet Group Ltd. - Stara Zagora
To unsubscribe: http://www.linux-bulgaria.org/public/mail_list.html
============================================================================
|