1 files changed, 1 insertions, 1 deletions
diff --git a/CGI.pl b/CGI.pl
index 93ed0fa26..b7a513f2a 100644
--- a/CGI.pl
+++ b/CGI.pl
@@ -191,7 +191,7 @@ sub ProcessMultipartFormFields {
 
         # If the current input line is a boundary line, save the previous
         # form value and reset the storage variables.
-        if ($_ =~ m/^-*$boundary/) {
+        if ($_ =~ m/^-*\Q$boundary\E/) {
             if ( $fieldname ) {
                 chomp($fieldvalue);
                 $fieldvalue =~ s/\r$//;