push $array_ref, $weiterer_index;

Type of arg 1 to push must be array (not private variable) at arrref.pl line 9, near ""foobar";"
Execution of arrref.pl aborted due to compilation errors.

#/usr/bin/perl

use strict;
use warnings 'all';

my @array = ();
my $arref = \@array;

push $arref, "foobar";

#/usr/bin/perl

use strict;
use warnings 'all';
use Data::Dumper;

my $array0 = [];
my @array1 = qw(foo bar beckstein stinkt);

my $arr2ref = \@array1;

push @$array0, $arr2ref;
print Dumper $array0;

#!/usr/bin/perl

use strict;
use warnings;

$| = 1;
$\ = "\n";


my $foo = { a => [1,2,3,4,5] };

push @{$foo->{a}}, 6,7,8,9;
print @{$foo->{a}}