Added arg option for arguments of a script to be restarted. Sergey.

diff --git a/plugins/restart.pl b/plugins/restart.pl
index 80b25081d7dcc3392c7e1db0ce3f2839770d3b94..b792709590959ed332220fa89b147ff69be8d945 100755 (executable)
--- a/plugins/restart.pl
+++ b/plugins/restart.pl
@@ -11,8 +11,8 @@ use warnings;
 use Getopt::Std;
 use File::Basename;
 
-our ($opt_s, $opt_r, $opt_k, $opt_h);
-getopts('hs:p:kr');
+our ($opt_s, $opt_r, $opt_k, $opt_a, $opt_h);
+getopts('hs:a:kr');
 
 if($opt_h){
     &showHelp();
@@ -24,7 +24,7 @@ if($opt_h){
 #--- on these PCs the script should be restarted:
 my @PCList = ('lxg0429','lxg0433','lxg0435','lxg0437','lxg0439','lxg0440','lxg0441','lxg0442','lxg0443','lxg0444','lxg0445','lxg0446','lxg0447','lxg0448','lxg0452','lxg0453','lxg0454','lxg0455');
 #my @PCList = ('lxg0429');
-my $args = "-d";    #- arguments of script to be restarted
+my $args = $opt_a;    #- arguments of script to be restarted
 
 &main();
 
@@ -70,7 +70,7 @@ sub main
 sub checkArgs
 {
     if( !defined($opt_s) ){
-       print "You must provide -s option with arguments!\n";
+       print "You must provide -s option with an argument!\n";
        print "Read help: restart.pl -h\n";
        exit(0);
     }
@@ -86,10 +86,10 @@ sub printMessage
        print "kill $prog_name on $PC ...\n";
     }
     elsif($opt_r){
-       print "restart $prog_name on $PC ...\n";
+       print "restart $prog_name $args on $PC ...\n";
     }
     else{
-       print "start $prog_name on $PC ...\n";
+       print "start $prog_name $args on $PC ...\n";
     }
 }
 
@@ -105,10 +105,11 @@ sub showHelp
       to remote PCs, thus, you must set up private/public keys!
       The remote script will be restarted under your 'user name'. 
 
-    Usage: restart.pl -s <name> [-k] [-h]
+    Usage: restart.pl -s <name> [-a] [-k] [-h]
 
       -s <name> : Name of script to be restarted. Name must 
                   contain a path to a script on remote PC!
+      -a <args> : Arguments for a script to be (re)started.
       -r        : Kill a running script before restarting.
       -k        : Kill a running script without restarting.
       -h        : Print this help.