From: Martin Mares <mj@ucw.cz>
Date: Mon, 15 Aug 2011 11:27:50 +0000 (+0200)
Subject: UCW::CGI: "; boundary=..." is also valid syntax
X-Git-Tag: v5.0~113
X-Git-Url: http://mj.ucw.cz/gitweb/?a=commitdiff_plain;h=06a563e3a33a8687f1ce75a7545dd9d88ea30f69;p=libucw.git

UCW::CGI: "; boundary=..." is also valid syntax
---

diff --git a/ucw/perl/UCW/CGI.pm b/ucw/perl/UCW/CGI.pm
index ff06a15a..a4c5812d 100644
--- a/ucw/perl/UCW/CGI.pm
+++ b/ucw/perl/UCW/CGI.pm
@@ -333,7 +333,7 @@ sub parse_mp_header() {
 sub parse_multipart_form_data() {
 	# First of all, find the boundary string
 	my $ct = rfc822_prepare($ENV{"CONTENT_TYPE"});
-	if (!(($boundary) = ($ct =~ /^.*;boundary=([^; ]+)/))) {
+	if (!(($boundary) = ($ct =~ /^.*;\s*boundary=([^; ]+)/))) {
 		die "Multipart content with no boundary string received";
 	}
 	$boundary = rfc822_deescape($boundary);