diff options
author | nanbor <nanbor@ae88bc3d-4319-0410-8dbf-d08b4c9d3795> | 1999-04-01 09:30:56 +0000 |
---|---|---|
committer | nanbor <nanbor@ae88bc3d-4319-0410-8dbf-d08b4c9d3795> | 1999-04-01 09:30:56 +0000 |
commit | cb7d0d259069d360aa7409d48e1bdc916b977e12 (patch) | |
tree | 1999bfec29c1f86d9d5cef25dfe84062f04f3295 /bin/tao_svcconf.pl | |
parent | 6557896786d95975235d8af6ccc69c3850e86983 (diff) | |
download | ATCD-cb7d0d259069d360aa7409d48e1bdc916b977e12.tar.gz |
*** empty log message ***
Diffstat (limited to 'bin/tao_svcconf.pl')
-rwxr-xr-x | bin/tao_svcconf.pl | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/bin/tao_svcconf.pl b/bin/tao_svcconf.pl new file mode 100755 index 00000000000..b5f9fc29c7f --- /dev/null +++ b/bin/tao_svcconf.pl @@ -0,0 +1,15 @@ +eval '(exit $?0)' && eval 'exec perl -pi -S $0 ${1+"$@"}' + & eval 'exec perl -pi -S $0 $argv:q' + if 0; + +# $Id$ +# +# This script can help you convert TAO svc.conf using dynamic services +# to use static services. +# +# You may want to run the "find" command with this script, which maybe +# something like this: +# +# find . -name svc.conf -print | xargs $ACE_ROOT/bin/svcconf.pl + +s/^ *dynamic *([A-Za-z_]+) [^\"]+(\"[^\"]+\").*/static $1 $2/; |