Removed trailing whitespaces

15 files changed, 60 insertions, 60 deletions

diff --git a/TAO/orbsvcs/examples/CosEC/TypedSimple/Country.idl b/TAO/orbsvcs/examples/CosEC/TypedSimple/Country.idl
index 00424bfa608..e4895d84c90 100644
--- a/TAO/orbsvcs/examples/CosEC/TypedSimple/Country.idl
+++ b/TAO/orbsvcs/examples/CosEC/TypedSimple/Country.idl
@@ -7,7 +7,7 @@
 
 #include "orbsvcs/CosTypedEventComm.idl"
 
-interface Country : ::CosTypedEventComm::TypedPushConsumer 
+interface Country : ::CosTypedEventComm::TypedPushConsumer
 {
   void update_population (in string country,
                           in long population);
diff --git a/TAO/orbsvcs/examples/CosEC/TypedSimple/run_test.pl b/TAO/orbsvcs/examples/CosEC/TypedSimple/run_test.pl
index 3fe92494b75..021d13e345b 100755
--- a/TAO/orbsvcs/examples/CosEC/TypedSimple/run_test.pl
+++ b/TAO/orbsvcs/examples/CosEC/TypedSimple/run_test.pl
@@ -52,9 +52,9 @@ $ces->DeleteFile ($cesiorfile);
 $con->DeleteFile ($coniorfile);
 
 
-$IFR = $ifr->CreateProcess ($ENV{"TAO_ROOT"}."/orbsvcs/IFR_Service/IFR_Service", 
+$IFR = $ifr->CreateProcess ($ENV{"TAO_ROOT"}."/orbsvcs/IFR_Service/IFR_Service",
                             " -o $ifr_ifriorfile");
-$TI = $ti->CreateProcess ($ENV{"ACE_ROOT"}."/bin/tao_ifr", 
+$TI = $ti->CreateProcess ($ENV{"ACE_ROOT"}."/bin/tao_ifr",
                           " -ORBInitRef InterfaceRepository=file://$ti_ifriorfile ".
                           "-I".$ENV{"TAO_ROOT"}."/orbsvcs $ti_idl");
 $NS = $ns->CreateProcess ($ENV{"TAO_ROOT"}."/orbsvcs/Naming_Service/Naming_Service",
@@ -64,7 +64,7 @@ $CES = $ces->CreateProcess ($ENV{"TAO_ROOT"}."/orbsvcs/CosEvent_Service/CosEvent
                           "-ORBInitRef InterfaceRepository=file://$ces_ifriorfile ".
                           "-ORBInitRef NameService=file://$ces_nsiorfile ");
 $CON = $con->CreateProcess ("Consumer",
-                          "-o $con_coniorfile ".    
+                          "-o $con_coniorfile ".
                           "-ORBInitRef NameService=file://$con_nsiorfile ");
 $SUP = $sup->CreateProcess ("Supplier",
                           "-ORBInitRef NameService=file://$sup_nsiorfile ");
diff --git a/TAO/orbsvcs/examples/ImR/Combined_Service/run_test.pl b/TAO/orbsvcs/examples/ImR/Combined_Service/run_test.pl
index a9285c15e19..52eca0765a0 100755
--- a/TAO/orbsvcs/examples/ImR/Combined_Service/run_test.pl
+++ b/TAO/orbsvcs/examples/ImR/Combined_Service/run_test.pl
@@ -92,8 +92,8 @@ sub cleanup
         if (m/ImR Activator: Successfully started/) {
             chomp $_;
             my @words = split (/=/, $_);
-            push(@pids, $words[1]); 
-            ++ $i;         
+            push(@pids, $words[1]);
+            ++ $i;
         }
     }
     close (TEST_OUTPUT);
@@ -183,7 +183,7 @@ sub do_test
         print "ERROR : Shutting down test server.\n";
         return $ret;
     }
-       
+
     # Both TestObject1 and TestObject2 should now show up as "not running"
     $IMRUTIL->Arguments ("-ORBLogFile $output_files[$id_imru_log] $imr_initref list -v");
     $ret = $IMRUTIL->SpawnWaitKill ($test->ProcessStartWaitInterval());
diff --git a/TAO/orbsvcs/examples/LoadBalancing/Test.idl b/TAO/orbsvcs/examples/LoadBalancing/Test.idl
index c9f270a36a3..ea0cb943d44 100644
--- a/TAO/orbsvcs/examples/LoadBalancing/Test.idl
+++ b/TAO/orbsvcs/examples/LoadBalancing/Test.idl
@@ -22,7 +22,7 @@ module Test
       raises (Invalid_Stock_Symbol);
 
     oneway void shutdown ();
-    
+
   };
 
   interface Stock
diff --git a/TAO/orbsvcs/examples/LoadBalancing/run_test.pl b/TAO/orbsvcs/examples/LoadBalancing/run_test.pl
index ae728b8f090..8ad2ff3a670 100755
--- a/TAO/orbsvcs/examples/LoadBalancing/run_test.pl
+++ b/TAO/orbsvcs/examples/LoadBalancing/run_test.pl
@@ -53,29 +53,29 @@ $cl->DeleteFile ($srviorfile);
 $sr->DeleteFile ($srviorfile);
 $cr->DeleteFile ($srviorfile);
 
-$LM = $lm->CreateProcess ("$ENV{TAO_ROOT}/orbsvcs/LoadBalancer/LoadManager", 
+$LM = $lm->CreateProcess ("$ENV{TAO_ROOT}/orbsvcs/LoadBalancer/LoadManager",
                           " -o $lm_lmiorfile");
-$NS = $ns->CreateProcess ("$ENV{TAO_ROOT}/orbsvcs/Naming_Service/Naming_Service", 
+$NS = $ns->CreateProcess ("$ENV{TAO_ROOT}/orbsvcs/Naming_Service/Naming_Service",
                           " -o $ns_nsiorfile");
-$SV = $sv->CreateProcess ("server", 
+$SV = $sv->CreateProcess ("server",
                           "-o $sv_srviorfile ".
                           " -ORBInitRef LoadManager=file://$sv_lmiorfile ".
                           " -n 1 ".
                           "-ORBInitRef NameService=file://$sv_nsiorfile ".
                           " -s LeastLoaded ".
                           " -r 9000 -c 10300 -d 0.1 ");
-$SR = $sr->CreateProcess ("server", 
+$SR = $sr->CreateProcess ("server",
                           "-o $sr_srviorfile ".
                           "-ORBInitRef LoadManager=file://$sr_lmiorfile ".
                           " -n 2 ".
                           "-ORBInitRef NameService=file://sr_nsiorfile ".
                           " -s LeastLoaded ".
                           "-r 9000 -c 10300 -d 0.1 ");
-$CL = $cl->CreateProcess ("client", 
+$CL = $cl->CreateProcess ("client",
                           "-k file://$cl_srviorfile ".
                           " -i 5 -n 1 ".
                           "-ORBInitRef NameService=file://cl_nsiorfile ");
-$CR = $cr->CreateProcess ("client", 
+$CR = $cr->CreateProcess ("client",
                           "-k file://$cr_srviorfile ".
                           "-i 5 -n 2 ".
                           "-ORBInitRef NameService=file://cr_nsiorfile ");
diff --git a/TAO/orbsvcs/examples/Log/Basic/run_test.pl b/TAO/orbsvcs/examples/Log/Basic/run_test.pl
index 7b49ee1b3d6..aec7369794e 100755
--- a/TAO/orbsvcs/examples/Log/Basic/run_test.pl
+++ b/TAO/orbsvcs/examples/Log/Basic/run_test.pl
@@ -1,7 +1,7 @@
 eval '(exit $?0)' && eval 'exec perl -S $0 ${1+"$@"}'
     & eval 'exec perl -S $0 $argv:q'
-    if 0;  
- 
+    if 0;
+
 # $Id$
 # -*- perl -*-
 
@@ -31,11 +31,11 @@ $ls->DeleteFile ($nsiorfile);
 $cli->DeleteFile ($nsiorfile);
 
 
-$NS = $ns->CreateProcess ("$ENV{TAO_ROOT}/orbsvcs/Naming_Service/Naming_Service", 
+$NS = $ns->CreateProcess ("$ENV{TAO_ROOT}/orbsvcs/Naming_Service/Naming_Service",
                           " -o $ns_nsiorfile");
-$LS = $ls->CreateProcess ("$ENV{TAO_ROOT}/orbsvcs/Logging_Service/Basic_Logging_Service/Basic_Logging_Service", 
+$LS = $ls->CreateProcess ("$ENV{TAO_ROOT}/orbsvcs/Logging_Service/Basic_Logging_Service/Basic_Logging_Service",
                           " -ORBInitRef NameService=file://$ls_nsiorfile");
-$CLI = $cli->CreateProcess ("client", 
+$CLI = $cli->CreateProcess ("client",
                             "-ORBInitRef NameService=file://$cli_nsiorfile");
 
 print STDERR "Starting Naming Service\n";
@@ -80,7 +80,7 @@ if ($LS_status != 0) {
     exit 1;
 }
 
-# Give time for logging service to initialize and install its object 
+# Give time for logging service to initialize and install its object
 # reference in the nameing service.
 sleep (5);
 
diff --git a/TAO/orbsvcs/examples/Log/Event/run_test.pl b/TAO/orbsvcs/examples/Log/Event/run_test.pl
index ccc55677401..ac163fe6edd 100755
--- a/TAO/orbsvcs/examples/Log/Event/run_test.pl
+++ b/TAO/orbsvcs/examples/Log/Event/run_test.pl
@@ -1,7 +1,7 @@
 eval '(exit $?0)' && eval 'exec perl -S $0 ${1+"$@"}'
     & eval 'exec perl -S $0 $argv:q'
-    if 0;  
- 
+    if 0;
+
 # $Id$
 # -*- perl -*-
 
@@ -33,13 +33,13 @@ $ls->DeleteFile ($nsiorfile);
 $con->DeleteFile ($nsiorfile);
 $sup->DeleteFile ($nsiorfile);
 
-$NS = $ns->CreateProcess ("$ENV{TAO_ROOT}/orbsvcs/Naming_Service/Naming_Service", 
+$NS = $ns->CreateProcess ("$ENV{TAO_ROOT}/orbsvcs/Naming_Service/Naming_Service",
                           " -o $ns_nsiorfile");
-$LS = $ls->CreateProcess ("$ENV{TAO_ROOT}/orbsvcs/Logging_Service/Event_Logging_Service/Event_Logging_Service", 
+$LS = $ls->CreateProcess ("$ENV{TAO_ROOT}/orbsvcs/Logging_Service/Event_Logging_Service/Event_Logging_Service",
                           " -ORBInitRef NameService=file://$ls_nsiorfile");
-$CON = $con->CreateProcess ("Event_Consumer", 
+$CON = $con->CreateProcess ("Event_Consumer",
                             "-ORBInitRef NameService=file://$con_nsiorfile");
-$SUP = $sup->CreateProcess ("Event_Supplier", 
+$SUP = $sup->CreateProcess ("Event_Supplier",
                             "-ORBInitRef NameService=file://$sup_nsiorfile");
 
 print STDERR "Starting Naming Service\n";
@@ -88,7 +88,7 @@ if ($LS_status != 0) {
     exit 1;
 }
 
-# Give time for logging service to initialize and install its object 
+# Give time for logging service to initialize and install its object
 # reference in the naming service.
 sleep (5);
 
diff --git a/TAO/orbsvcs/examples/Log/Notify/run_test.pl b/TAO/orbsvcs/examples/Log/Notify/run_test.pl
index 693467fbb40..5141e25fdc1 100755
--- a/TAO/orbsvcs/examples/Log/Notify/run_test.pl
+++ b/TAO/orbsvcs/examples/Log/Notify/run_test.pl
@@ -1,7 +1,7 @@
 eval '(exit $?0)' && eval 'exec perl -S $0 ${1+"$@"}'
     & eval 'exec perl -S $0 $argv:q'
-    if 0;  
- 
+    if 0;
+
 # $Id$
 # -*- perl -*-
 
@@ -33,13 +33,13 @@ $ls->DeleteFile ($nsiorfile);
 $con->DeleteFile ($nsiorfile);
 $sup->DeleteFile ($nsiorfile);
 
-$NS = $ns->CreateProcess ("$ENV{TAO_ROOT}/orbsvcs/Naming_Service/Naming_Service", 
+$NS = $ns->CreateProcess ("$ENV{TAO_ROOT}/orbsvcs/Naming_Service/Naming_Service",
                           " -o $ns_nsiorfile");
-$LS = $ls->CreateProcess ("$ENV{TAO_ROOT}/orbsvcs/Logging_Service/Notify_Logging_Service/Notify_Logging_Service", 
+$LS = $ls->CreateProcess ("$ENV{TAO_ROOT}/orbsvcs/Logging_Service/Notify_Logging_Service/Notify_Logging_Service",
                           " -ORBInitRef NameService=file://$ls_nsiorfile");
-$CON = $con->CreateProcess ("Notify_Consumer", 
+$CON = $con->CreateProcess ("Notify_Consumer",
                             "-ORBInitRef NameService=file://$con_nsiorfile");
-$SUP = $sup->CreateProcess ("Notify_Supplier", 
+$SUP = $sup->CreateProcess ("Notify_Supplier",
                             "-ORBInitRef NameService=file://$sup_nsiorfile");
 
 print STDERR "Starting Naming Service\n";
@@ -88,7 +88,7 @@ if ($LS_status != 0) {
     exit 1;
 }
 
-# Give time for logging service to initialize and install its object 
+# Give time for logging service to initialize and install its object
 # reference in the naming service.
 sleep (5);
 
diff --git a/TAO/orbsvcs/examples/Log/RTEvent/run_test.pl b/TAO/orbsvcs/examples/Log/RTEvent/run_test.pl
index 10e1252164c..2ae7d1b6b06 100755
--- a/TAO/orbsvcs/examples/Log/RTEvent/run_test.pl
+++ b/TAO/orbsvcs/examples/Log/RTEvent/run_test.pl
@@ -1,7 +1,7 @@
 eval '(exit $?0)' && eval 'exec perl -S $0 ${1+"$@"}'
     & eval 'exec perl -S $0 $argv:q'
-    if 0;  
- 
+    if 0;
+
 # $Id$
 # -*- perl -*-
 
@@ -33,13 +33,13 @@ $ls->DeleteFile ($nsiorfile);
 $con->DeleteFile ($nsiorfile);
 $sup->DeleteFile ($nsiorfile);
 
-$NS = $ns->CreateProcess ("$ENV{TAO_ROOT}/orbsvcs/Naming_Service/Naming_Service", 
+$NS = $ns->CreateProcess ("$ENV{TAO_ROOT}/orbsvcs/Naming_Service/Naming_Service",
                           " -o $ns_nsiorfile");
-$LS = $ls->CreateProcess ("$ENV{TAO_ROOT}/orbsvcs/Logging_Service/RTEvent_Logging_Service/RTEvent_Logging_Service", 
+$LS = $ls->CreateProcess ("$ENV{TAO_ROOT}/orbsvcs/Logging_Service/RTEvent_Logging_Service/RTEvent_Logging_Service",
                           " -ORBInitRef NameService=file://$ls_nsiorfile");
-$CON = $con->CreateProcess ("RTEvent_Consumer", 
+$CON = $con->CreateProcess ("RTEvent_Consumer",
                             "-ORBInitRef NameService=file://$con_nsiorfile");
-$SUP = $sup->CreateProcess ("RTEvent_Supplier", 
+$SUP = $sup->CreateProcess ("RTEvent_Supplier",
                             "-ORBInitRef NameService=file://$sup_nsiorfile");
 
 print STDERR "Starting Naming Service\n";
@@ -88,7 +88,7 @@ if ($LS_status != 0) {
     exit 1;
 }
 
-# Give time for logging service to initialize and install its object 
+# Give time for logging service to initialize and install its object
 # reference in the naming service.
 sleep (5);
 
diff --git a/TAO/orbsvcs/examples/Notify/Filter/run_test.pl b/TAO/orbsvcs/examples/Notify/Filter/run_test.pl
index 36f7c0ae45d..65c729bd492 100755
--- a/TAO/orbsvcs/examples/Notify/Filter/run_test.pl
+++ b/TAO/orbsvcs/examples/Notify/Filter/run_test.pl
@@ -35,14 +35,14 @@ $nfs->DeleteFile ($nsiorfile);
 $flt->DeleteFile ($nsiorfile);
 $nfs->DeleteFile ($nfsiorfile);
 
-$NS = $ns->CreateProcess ("$ENV{TAO_ROOT}/orbsvcs/Naming_Service/Naming_Service", 
+$NS = $ns->CreateProcess ("$ENV{TAO_ROOT}/orbsvcs/Naming_Service/Naming_Service",
                           " -o $ns_nsiorfile");
 
-$NFS = $nfs->CreateProcess ("$ENV{TAO_ROOT}/orbsvcs/Notify_Service/Notify_Service", 
+$NFS = $nfs->CreateProcess ("$ENV{TAO_ROOT}/orbsvcs/Notify_Service/Notify_Service",
                           " -o $ns_nsiorfile");
 $Notify_Args = "-ORBInitRef NameService=file://$nfs_nsiorfile -IORoutput $nfs_nfsiorfile ";
 
-$FLT = $flt->CreateProcess ("Filter", 
+$FLT = $flt->CreateProcess ("Filter",
                           " -o $ns_nsiorfile");
 $Filter_Args = "-ORBInitRef NameService=file://$flt_nsiorfile -ORBDebugLevel $debug_level";
 
diff --git a/TAO/orbsvcs/examples/Notify/Lanes/run_test.pl b/TAO/orbsvcs/examples/Notify/Lanes/run_test.pl
index e87cc47f979..ce75dd5530a 100755
--- a/TAO/orbsvcs/examples/Notify/Lanes/run_test.pl
+++ b/TAO/orbsvcs/examples/Notify/Lanes/run_test.pl
@@ -57,7 +57,7 @@ $nfs->DeleteFile ($nfsiorfile);
 $sup->DeleteFile ($supiorfile);
 
 
-$NS = $ns->CreateProcess ("$ENV{TAO_ROOT}/orbsvcs/Naming_Service/Naming_Service", 
+$NS = $ns->CreateProcess ("$ENV{TAO_ROOT}/orbsvcs/Naming_Service/Naming_Service",
                           " -o $ns_nsiorfile");
 
 $NFS = $nfs->CreateProcess ("$ENV{TAO_ROOT}/orbsvcs/Notify_Service/Notify_Service");
diff --git a/TAO/orbsvcs/examples/Notify/Subscribe/run_test.pl b/TAO/orbsvcs/examples/Notify/Subscribe/run_test.pl
index 28f694b5206..9dc4a12037d 100755
--- a/TAO/orbsvcs/examples/Notify/Subscribe/run_test.pl
+++ b/TAO/orbsvcs/examples/Notify/Subscribe/run_test.pl
@@ -38,13 +38,13 @@ $nfs->DeleteFile ($nsiorfile);
 $sub->DeleteFile ($nsiorfile);
 $nfs->DeleteFile ($nfsiorfile);
 
-$NS = $ns->CreateProcess ("$ENV{TAO_ROOT}/orbsvcs/Naming_Service/Naming_Service", 
+$NS = $ns->CreateProcess ("$ENV{TAO_ROOT}/orbsvcs/Naming_Service/Naming_Service",
                           " -o $ns_nsiorfile");
 
 $NFS = $nfs->CreateProcess ("$ENV{TAO_ROOT}/orbsvcs/Notify_Service/Notify_Service");
 $Notify_Args = "-ORBInitRef NameService=file://$nfs_nsiorfile -IORoutput $nfs_nfsiorfile ";
 
-$SUB = $sub->CreateProcess ("Subscribe"); 
+$SUB = $sub->CreateProcess ("Subscribe");
 $Subscribe_Args = "-ORBInitRef NameService=file://$sub_nsiorfile -ORBDebugLevel $debug_level";
 
 $NS_status = $NS->Spawn ();
diff --git a/TAO/orbsvcs/examples/Notify/ThreadPool/run_test.pl b/TAO/orbsvcs/examples/Notify/ThreadPool/run_test.pl
index 61f862dab37..0d6d069a962 100755
--- a/TAO/orbsvcs/examples/Notify/ThreadPool/run_test.pl
+++ b/TAO/orbsvcs/examples/Notify/ThreadPool/run_test.pl
@@ -63,7 +63,7 @@ $nfs->DeleteFile ($nfsiorfile);
 $sup->DeleteFile ($supiorfile);
 
 
-$NS = $ns->CreateProcess ("$ENV{TAO_ROOT}/orbsvcs/Naming_Service/Naming_Service", 
+$NS = $ns->CreateProcess ("$ENV{TAO_ROOT}/orbsvcs/Naming_Service/Naming_Service",
                           " -o $ns_nsiorfile");
 
 $NFS = $nfs->CreateProcess ("$ENV{TAO_ROOT}/orbsvcs/Notify_Service/Notify_Service");
diff --git a/TAO/orbsvcs/examples/RtEC/IIOPGateway/consumerec_crash.pl b/TAO/orbsvcs/examples/RtEC/IIOPGateway/consumerec_crash.pl
index a34cba2cb9e..c5c8b9ffa01 100755
--- a/TAO/orbsvcs/examples/RtEC/IIOPGateway/consumerec_crash.pl
+++ b/TAO/orbsvcs/examples/RtEC/IIOPGateway/consumerec_crash.pl
@@ -44,31 +44,31 @@ $g->DeleteFile ($nsiorfile);
 $c->DeleteFile ($nsiorfile);
 $s->DeleteFile ($nsiorfile);
 
-$NS = $ns->CreateProcess ("$ENV{TAO_ROOT}/orbsvcs/Naming_Service/Naming_Service", 
+$NS = $ns->CreateProcess ("$ENV{TAO_ROOT}/orbsvcs/Naming_Service/Naming_Service",
                           " -o $ns_nsiorfile");
 
-$T1 = $t1->CreateProcess ("EC", 
+$T1 = $t1->CreateProcess ("EC",
                           " -ORBInitRef NameService=file://$t1_nsiorfile ".
                           "-ORBsvcconf $t1_conffile ".
                           "-e channel1");
 
-$T2 = $t2->CreateProcess ("EC", 
+$T2 = $t2->CreateProcess ("EC",
                           " -ORBInitRef NameService=file://$t2_nsiorfile ".
                           "-ORBsvcconf $t2_conffile ".
                           "-e channel2");
 
-$G = $g->CreateProcess ("Gateway", 
+$G = $g->CreateProcess ("Gateway",
                         " -ORBInitRef NameService=file://$g_nsiorfile ".
                         "-ORBSvcconf $g_gconffile ".
                         "-c channel2 ".
                         "-s channel1");
 
-$C = $c->CreateProcess ("Consumer", 
+$C = $c->CreateProcess ("Consumer",
                         " -ORBInitRef NameService=file://$c_nsiorfile ".
                         "-ORBDebugLevel $debug_level ".
                         "-e channel2");
 
-$S = $s->CreateProcess ("Supplier", 
+$S = $s->CreateProcess ("Supplier",
                         " -ORBInitRef NameService=file://$s_nsiorfile ".
                         "-e channel1");
 
diff --git a/TAO/orbsvcs/examples/RtEC/IIOPGateway/run_test.pl b/TAO/orbsvcs/examples/RtEC/IIOPGateway/run_test.pl
index 4a6868692c2..c49eabe8d0c 100755
--- a/TAO/orbsvcs/examples/RtEC/IIOPGateway/run_test.pl
+++ b/TAO/orbsvcs/examples/RtEC/IIOPGateway/run_test.pl
@@ -44,31 +44,31 @@ $g->DeleteFile ($nsiorfile);
 $c->DeleteFile ($nsiorfile);
 $s->DeleteFile ($nsiorfile);
 
-$NS = $ns->CreateProcess ("$ENV{TAO_ROOT}/orbsvcs/Naming_Service/Naming_Service", 
+$NS = $ns->CreateProcess ("$ENV{TAO_ROOT}/orbsvcs/Naming_Service/Naming_Service",
                           " -o $ns_nsiorfile");
 
-$T1 = $t1->CreateProcess ("EC", 
+$T1 = $t1->CreateProcess ("EC",
                           " -ORBInitRef NameService=file://$t1_nsiorfile ".
                           "-ORBsvcconf $t1_conffile ".
                           "-e channel1");
 
-$T2 = $t2->CreateProcess ("EC", 
+$T2 = $t2->CreateProcess ("EC",
                           " -ORBInitRef NameService=file://$t2_nsiorfile ".
                           "-ORBsvcconf $t2_conffile ".
                           "-e channel2");
 
-$G = $g->CreateProcess ("Gateway", 
+$G = $g->CreateProcess ("Gateway",
                         " -ORBInitRef NameService=file://$g_nsiorfile ".
                         "-ORBSvcconf $g_gconffile ".
                         "-c channel2 ".
                         "-s channel1");
 
-$C = $c->CreateProcess ("Consumer", 
+$C = $c->CreateProcess ("Consumer",
                         " -ORBInitRef NameService=file://$c_nsiorfile ".
                         "-ORBDebugLevel $debug_level ".
                         "-e channel2");
 
-$S = $s->CreateProcess ("Supplier", 
+$S = $s->CreateProcess ("Supplier",
                         " -ORBInitRef NameService=file://$s_nsiorfile ".
                         "-e channel1");