Merge pull request #1828 from UrBnW/nlparam
Allow newline character in parameters
This commit is contained in:
commit
112424e611
|
@ -59,7 +59,7 @@ sub GetOptions {
|
||||||
my $search_str = ',' . join(',', keys %opts) . ',';
|
my $search_str = ',' . join(',', keys %opts) . ',';
|
||||||
my $num_args = scalar(@ARGV);
|
my $num_args = scalar(@ARGV);
|
||||||
for (my $i = 0; $i < $num_args;) {
|
for (my $i = 0; $i < $num_args;) {
|
||||||
if (defined($ARGV[$i]) && $ARGV[$i] =~ /^--(.*?)(?:=|$)(.*)/) {
|
if (defined($ARGV[$i]) && $ARGV[$i] =~ /^--(.*?)(?:=|$)((?s).*)/) {
|
||||||
my ($option, $value) = ($1, $2);
|
my ($option, $value) = ($1, $2);
|
||||||
|
|
||||||
# find type of option
|
# find type of option
|
||||||
|
|
Loading…
Reference in New Issue