[SOLVED] [PERL] How to pass "+" character to perl?

[maulin sheth]

Hello All,

How to pass + character through command line in perl?
e.g.
perl temp.pl -ComndOpts=+vcs -full64.
Now, I have to pass +vcs and -full64 both using single command line option "ComndOpts". as There is not any limit for "ComndOpts" as it may have 2 arguments/ 3 arguments/4 arguments or whatever(maximum 7-8).
So how I can pass these arguments to script temp.pl?

Thanks in advance.

-Maulin Sheth

 

[vijayR15]

Hi maulin sheth,
Have you tried with ARGV command. This will retrive the command line value

printf "$ARGV[0]\n";
printf "$ARGV[1]\n";

If u add the above command in temp.pl it will print -ComndOpts=+vcs and -full64. $ARGV[0] will have -ComndOpts=+vcs $ARGV[1] will have -full64.

 

[maulin sheth]

Hello,
Thanks for help.
But I want to do it using GetOptions only. So How can I do that?
perl temp.pl -ComndOpts +vcs -full64.
I want to use like : ComndOpts variable which is equal to "+vcs -full64". So I want to pass this varialbe through command line and using GetOptions only.
So please can anyone help me to solve this?

Thanks in advance.

-Maulin Sheth

 

[vijayR15]

Hi maulin sheth,

For ur requirement Is there any possibity to send with "" while passing. If u can then its easier use the below code.

perl try2.pl -ComndOpts="+vcs -full64"

use Getopt::Long;
GetOptions("ComndOpts:s" => \$ComndOpts);
print $ComndOpts;

 

[maulin sheth]

Hello,
Thanks.
I have solved this by using following code :
perl try2.pl -ComndOpts "+vcs -full64"
code :

use Getopt::Long;
GetOptions("ComndOpts=s" => \$ComndOpts);
print $ComndOpts;

In this code, change is just : ComndOpts:s to ComndOpts=s.

-Maulin Sheth