Lines 394-400
elsif ( $step && $step == 3 ) {
Link Here
|
394 |
system($cmd ); |
394 |
system($cmd ); |
395 |
|
395 |
|
396 |
my $fh; |
396 |
my $fh; |
397 |
open( $fh, "<", $logfilepath ) |
397 |
open( $fh, "<:encoding(utf-8)", $logfilepath ) |
398 |
or die "Cannot open log file $logfilepath: $!"; |
398 |
or die "Cannot open log file $logfilepath: $!"; |
399 |
my @report = <$fh>; |
399 |
my @report = <$fh>; |
400 |
close $fh; |
400 |
close $fh; |
Lines 407-413
elsif ( $step && $step == 3 ) {
Link Here
|
407 |
else { |
407 |
else { |
408 |
eval { `rm $logfilepath` }; |
408 |
eval { `rm $logfilepath` }; |
409 |
} |
409 |
} |
410 |
open( $fh, "<", $logfilepath_errors ) |
410 |
open( $fh, "<:encoding(utf-8)", $logfilepath_errors ) |
411 |
or die "Cannot open log file $logfilepath_errors: $!"; |
411 |
or die "Cannot open log file $logfilepath_errors: $!"; |
412 |
@report = <$fh>; |
412 |
@report = <$fh>; |
413 |
close $fh; |
413 |
close $fh; |
414 |
- |
|
|