Révision 17f78427
Whitespace cleanup
- remove trailing whitespace
- remove empty lines at the end of files
| plugins/http/multi_http_responsetime | ||
|---|---|---|
| 1 | 1 |
#! /usr/bin/perl |
| 2 | 2 |
# This plugin based on http_responestime designed by Anders Nordby |
| 3 | 3 |
# |
| 4 |
# It is written to control the quality of an internet conneting by
|
|
| 4 |
# It is written to control the quality of an internet conneting by |
|
| 5 | 5 |
# downloading a favicon.ico file from a lot - unlimited - count of |
| 6 | 6 |
# domains. |
| 7 | 7 |
# |
| ... | ... | |
| 100 | 100 |
$vhost =~ s@^\w+://(.+?)/.*@\1@; |
| 101 | 101 |
$proto =~ s@^(\w+)://.*@\1@; |
| 102 | 102 |
|
| 103 |
# If url_array[] is a domain, vhost will be contain the the strinf "http://"
|
|
| 103 |
# If url_array[] is a domain, vhost will be contain the the strinf "http://" |
|
| 104 | 104 |
if($vhost =~ /http/) {
|
| 105 | 105 |
print "timespent$i.label $vhost\n"; |
| 106 | 106 |
} else {
|
| 107 |
print "timespent$i.label $proto://$vhost\n";
|
|
| 107 |
print "timespent$i.label $proto://$vhost\n"; |
|
| 108 | 108 |
} |
| 109 | 109 |
|
| 110 | 110 |
print "timespent$i.info Ladezeit von $url_array[$i]/favicon.ico\n"; |
Formats disponibles : Unified diff