fix parsing regex

This commit is contained in:
Marko Oldenburg 2020-11-05 05:58:20 +01:00
parent cbca8d4337
commit da3582fb1e
2 changed files with 3 additions and 3 deletions

View File

@ -179,7 +179,7 @@ sub backupToStorage_Initialize {
],
"release_status": "devepolment",
"license": "GPL_2",
"version": "v1.2.1",
"version": "v1.2.2",
"author": [
"Marko Oldenburg <fhemsupport@cooltux.net>"
],

View File

@ -497,11 +497,11 @@ sub FileUpload {
if ( $subprocess->{loglevel} > 4 );
if ( $returnString =~ /100\s[0-9].*\s100\s[0-9].*/m
if ( $returnString =~ /100\s\s?[0-9].*\s100\s\s?[0-9].*/m
and $returnString =~ /\s\s<o:hint xmlns:o="o:">(.*)<\/o:hint>/m ) {
$response->{ncUpload} = $1;
}
elsif ( $returnString =~ /100\s[0-9].*\s100\s[0-9].*/m ) {
elsif ( $returnString =~ /100\s\s?[0-9].*\s100\s\s?[0-9].*/m ) {
$response->{ncUpload} = 'upload successfully';
}
elsif ( $returnString =~ /(curl:\s.*)/ ){