allow multiple values with the same name

mojolicious · May 27, 2017 · 9e15b0d · 9e15b0d
1 parent 07ec508
commit 9e15b0d
Showing 1 changed file with 3 additions and 1 deletion.
diff --git a/lib/Mojolicious/Command/get.pm b/lib/Mojolicious/Command/get.pm
@@ -36,7 +36,9 @@ sub run {
   my %headers = map { /^\s*([^:]+)\s*:\s*(.*+)$/ ? ($1, $2) : () } @headers;
 
   # Build form
-  my %form = map { $_->[0] => $_->[1] =~ /^\@(.+)$/ ? {file => $1} : $_->[1] }
+  my %form;
+  push @{$form{$_->[0]}}, $_->[1]
+    for map { [$_->[0], $_->[1] =~ /^\@(.+)$/ ? {file => $1} : $_->[1]] }
     map { [split('=', $_, 2)] } @form;
 
   # Detect proxy for absolute URLs