Merge pull request #1828 from UrBnW/nlparam

Allow newline character in parameters
This commit is contained in:
qgarnier 2020-02-04 13:48:17 +01:00 committed by GitHub
commit 112424e611
1 changed files with 1 additions and 1 deletions

View File

@ -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