From dce2a1ac813ea63c03ffaba4b9ebfdb928332be2 Mon Sep 17 00:00:00 2001 From: deespe Date: Sun, 26 Nov 2017 04:49:47 +0000 Subject: [PATCH] 98_FileLogConvert: allow dots in regex' for devicenames and readings git-svn-id: https://svn.fhem.de/fhem/trunk@15500 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/contrib/98_FileLogConvert.pm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/fhem/contrib/98_FileLogConvert.pm b/fhem/contrib/98_FileLogConvert.pm index a827aaa57..f099f05e4 100644 --- a/fhem/contrib/98_FileLogConvert.pm +++ b/fhem/contrib/98_FileLogConvert.pm @@ -216,8 +216,8 @@ sub FileLogConvert_FileRead($) $line =~ s/\s{2,}/ /g; if ($cmd eq "fileEvents") { - next unless ($line =~ /^(\d{4}-\d{2}-\d{2})_(\d{2}:\d{2}:\d{2})\s([A-Za-z0-9._]+)\s([A-Za-z0-9_-]+):\s(\S+)(\s.*)?$/ - || $line =~ /^(\d{4}-\d{2}-\d{2})_(\d{2}:\d{2}:\d{2})\s([A-Za-z0-9._]+)\s([A-Za-z0-9_-]+)$/); + next unless ($line =~ /^(\d{4}-\d{2}-\d{2})_(\d{2}:\d{2}:\d{2})\s([A-Za-z0-9\.\-_]+)\s([A-Za-z0-9\.\-_]+):\s(\S+)(\s.*)?$/ + || $line =~ /^(\d{4}-\d{2}-\d{2})_(\d{2}:\d{2}:\d{2})\s([A-Za-z0-9\.\-_]+)\s([A-Za-z0-9\.\-_]+)$/); push @events,$4 if (!grep(/^$4$/,@events)); } else @@ -230,7 +230,7 @@ sub FileLogConvert_FileRead($) my $i_event; my $i_value; my $i_unit = ""; - if ($line =~ /^(\d{4}-\d{2}-\d{2})_(\d{2}:\d{2}:\d{2})\s([A-Za-z0-9._]+)\s([A-Za-z0-9_-]+):\s(\S+)(\s.*)?$/) + if ($line =~ /^(\d{4}-\d{2}-\d{2})_(\d{2}:\d{2}:\d{2})\s([A-Za-z0-9\.\-_]+)\s([A-Za-z0-9\.\-_]+):\s(\S+)(\s.*)?$/) { $i_date = $1; $i_time = $2; @@ -245,7 +245,7 @@ sub FileLogConvert_FileRead($) $i_event = "$i_reading: $i_value"; $i_event .= " $rest" if ($rest); } - elsif ($line =~ /^(\d{4}-\d{2}-\d{2})_(\d{2}:\d{2}:\d{2})\s([A-Za-z0-9._]+)\s([A-Za-z0-9_-]+)$/) + elsif ($line =~ /^(\d{4}-\d{2}-\d{2})_(\d{2}:\d{2}:\d{2})\s([A-Za-z0-9\.\-_]+)\s([A-Za-z0-9\.\-_]+)$/) { $i_date = $1; $i_time = $2;