From 0cfcf2ccbf2c54362cca60e1076de4e2371becb3 Mon Sep 17 00:00:00 2001 From: Romain MAZIERE Date: Wed, 22 Apr 2020 18:09:17 +0200 Subject: [PATCH] Fix geowebcache-bandwidth --- plugins/geowebcache/geowebcache-bandwidth | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/plugins/geowebcache/geowebcache-bandwidth b/plugins/geowebcache/geowebcache-bandwidth index 3863510b..f5c90cf1 100755 --- a/plugins/geowebcache/geowebcache-bandwidth +++ b/plugins/geowebcache/geowebcache-bandwidth @@ -1,10 +1,10 @@ #!/usr/bin/perl # -*- perl -*- -# Author Rodolphe Quiédeville +# Author Rodolphe Quiédeville # Licence : GPLv2 # Code based on tomcat_volume plugin by -# Rune Nordbøe Skillingstad +# Rune Nordbøe Skillingstad =head1 NAME @@ -41,7 +41,7 @@ HTTP port numbers =head1 AUTHOR -Rodolphe Quiédeville +Rodolphe Quiédeville =head1 USAGE @@ -111,11 +111,11 @@ if(exists $ARGV[0] and $ARGV[0] eq "config") { my $ua = LWP::UserAgent->new(timeout => $TIMEOUT); my $response = $ua->request(HTTP::Request->new('GET',$url)); -if ($response->content =~ '60 seconds\d+\d+.\d+ /s\d+(\d+\.\d+) ([km]?)bps') { +if ($response->content =~ '60 seconds\d+\d+.\d+ /s\d+(\d+\.\d+) ([km]?)bps') { my $value = $1; $value = $value * 1024 if ($2 eq 'k'); $value = $value * 1024 * 1024 if ($2 eq 'm'); - print "bandw.value " . $value; + print "bandw.value " . $value . "\n"; } else { print "bandw.value U\n"; }