##
push @array, "$value";
####
#!/usr/bin/perl
use strict;
use warnings;
my (@array, $value);
@array = ("foo");
$value = [];
push(@array, $value);
$array[-1][0] = "bar";
print $array[-1][0], "\n";
@array = ("foo");
$value = [];
push @array, "$value";
$array[-1][0] = "bar";
print $array[-1][0], "\n";
__END__
bar
Can't use string ("ARRAY(0x818427c)") as an ARRAY ref while "strict refs" in use