From 256a69d3059ed98dafda9a55e7968da20f0eefd8 Mon Sep 17 00:00:00 2001 From: Jan Willamowius Date: Wed, 14 Sep 2005 10:21:10 +0000 Subject: [PATCH] remove trailing _spaces_ --- src/lib/Spong/Network/plugins/check_http | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/lib/Spong/Network/plugins/check_http b/src/lib/Spong/Network/plugins/check_http index 7db7d4d..b6e4a72 100755 --- a/src/lib/Spong/Network/plugins/check_http +++ b/src/lib/Spong/Network/plugins/check_http @@ -30,7 +30,7 @@ sub check_http { # Parse the URL into it's components $url =~ s|^([A-Z]+ )?http://||; # Remove the protocol id if present $method = $1 || "HEAD"; - $method =~ s/\w$//; # remove trailing spaces + $method =~ s/\s$//; # remove trailing spaces my($hpart,$urlpath) = ( $url =~ m|^([^/]+)(/.*)| ); my($hname,$port) = split(/:/,$hpart); $port = 80 if ! $port; -- 2.30.2