blob: 56d05830f594f76f8877247d7a039e5ce48475f6 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
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/tao_svcconf.pl
s/^ *dynamic *([A-Za-z_]+) [^\"]+(\"[^\"]+\").*/static $1 $2/;
|
