use -> for the array ref
This commit is contained in:
parent
352d0b7402
commit
890f6be36b
@ -58,9 +58,9 @@ sub generate_output_table ($ts) {
|
||||
|
||||
foreach my $row ( $ts->rows ) {
|
||||
foreach my $cell ($row) {
|
||||
my $machine = @$cell[0];
|
||||
my $days = @$cell[4] =~ s/\s//gr;
|
||||
my $ghz_days = @$cell[6] =~ s/\s//gr;
|
||||
my $machine = $cell->[0];
|
||||
my $days = $cell->[4] =~ s/\s//gr;
|
||||
my $ghz_days = $cell->[6] =~ s/\s//gr;
|
||||
|
||||
if ( $days > 0 ) {
|
||||
my $perf = $ghz_days / $days;
|
||||
|
Loading…
Reference in New Issue
Block a user