1 files changed, 2 insertions, 2 deletions
diff --git a/CGI.pl b/CGI.pl
index 138e52414..efcf0c2ac 100644
--- a/CGI.pl
+++ b/CGI.pl
@@ -910,8 +910,8 @@ Content-type: text/html
         }
         if (!defined $nexturl || $nexturl eq "") {
 	    # Sets nexturl to be argv0, stripping everything up to and
-	    # including the last slash.
-	    $0 =~ m:[^/]*$:;
+	    # including the last slash (or backslash on Windows).
+	    $0 =~ m:[^/\\]*$:;
 	    $nexturl = $&;
         }
         my $method = "POST";