use strict;
use warnings;
use Data::Dumper qw/Dumper/;

my $array_ref = [];
$array_ref->[0]->[1]->[2] = 'inhalt';

print Dumper $array_ref;