can't use string ("0") as an ARRAY ref while "strict refs" in use at line 119. Only hard reference allowed by "strict refs". 

##</code><code>##

for my $dataratio(@full_data){
for my $six ( 3 .. $columns ){
        for my $tre ( 3 .. $rows ){
            for my $tri ( 3 .. $rows ){
}
}
}


##</code><code>##

can't use string ("M11") as an ARRAY ref while "strict refs" in use at line 119. Only hard reference allowed by "strict refs". 


##</code><code>##

  1+$six, 1+$tri, 1+$tre,
                    $tri, $six,
                    $tre, $six,
                    ;;;
                $ratio[ $six ][ $tri ][ $tre ] = $$d_h[ $tri ][ $six ] / $$d_h[ $tre ][ $six ] ;