|
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 |
- |
|
|