Differences

This shows you the differences between two versions of the page.

--- addons:remrrds [2020/01/28 11:27] – created wnelis
+++ addons:remrrds [2023/07/06 18:54] (current) – [Source] wnelis
@@ Line 1: / Line 1: @@
 ====== REMove_RRD_Spikes ======
-^ Author | [[ wim.nelis@ziggo.nl | Wim Nelis ]] |
+^ Author         | [[wim.nelis@ziggo.nl| Wim Nelis ]]  |
-^ Compatibility | Xymon 4.2 |
+^ Compatibility  | Xymon 4.2                           |
-^ Requirements | Perl |
+^ Requirements   | Perl                                |
-^ Download | None |
+^ Download       | None                                |
-^ Last Update | 2020-01-28 |
+^ Last Update    | 2023-07-06                          |
 ===== Description =====
@@ Line 276: / Line 276: @@
       unless ( $modif ) {
 	$i= -1 ;				# Preset data set index
-	foreach my $val ( m/\b(?:NaN|-?\d\.\d{9}e[+-]\d+)\b/g ) {
+	foreach my $val ( m/(?<=>)(?:NaN|-?\d\.\d{9}e[+-]\d+)\b/g ) {
   # See if this value (data set) needs to be checked.
 	  $i++ ;
@@ Line 379: / Line 379: @@
     unless ( $modif ) {
       $i= -1 ;					# Preset data set index
-      foreach my $val ( m/\b(?:NaN|-?\d\.\d{9}e[+-]\d+)\b/g ) {
+      foreach my $val ( m/(?<=>)(?:NaN|-?\d\.\d{9}e[+-]\d+)\b/g ) {
   # See if this value (data set) needs to be checked.
 	$i++ ;
@@ Line 473: / Line 473: @@
   * **2020-01-28**
     * Initial release
+  * **2023-07-06**
+    * Negative numbers are not recognized. Use a 'positive lookbehind assertion' in stead of a word boundary to find the beginning  of a (negative) number.