New parser for traces
This commit is contained in:
parent
1de1b9a221
commit
15f89a5e39
3 changed files with 238 additions and 133 deletions
|
|
@ -133,7 +133,7 @@ sub grades_generate
|
|||
|
||||
if (-f "$basedir/$tr_file")
|
||||
{
|
||||
open my $xmltrace, "<", "$basedir/$tr_file" or croak "$tr_file: $!";
|
||||
open my $xmltrace, "<", "$basedir/$tr_file" or die "$tr_file: $!";
|
||||
binmode $xmltrace;
|
||||
my $trace = Trace->new($xmltrace);
|
||||
close $xmltrace;
|
||||
|
|
|
|||
Reference in a new issue