perl -e 'use Data::Dumper; print $f[5][4][3]; print Dumper(\@f);'
$VAR1 = [
          undef,
          undef,
          undef,
          undef,
          undef,
          [
            undef,
            undef,
            undef,
            undef,
            []
          ]
        ];