diff --git a/lib/HTTPServer.pm b/lib/HTTPServer.pm
index 862320f..340b0b8 100644
--- a/lib/HTTPServer.pm
+++ b/lib/HTTPServer.pm
@@ -85,7 +85,7 @@ sub handle_request {
 		$target =~ s/\.\.\///;
 		$target =~ s/^\///;
 		$target =~ s/\/$//;
-		last unless $cur ne length $target;
+		last unless $cur ne length($target);
 	}
 	$target = $target_cgi = "/$target";