--- /dev/null
+#!perl -T
+
+use strict;
+use warnings;
+
+use Test::More tests => 6 * 3 * 274;
+
+use lib 't/lib';
+use autovivification::TestCases;
+
+while (<DATA>) {
+ 1 while chomp;
+ next unless /#/;
+ testcase_ok($_, '@');
+}
+
+__DATA__
+
+--- fetch ---
+
+$x # $x->[0] # '', undef, [ ]
+$x # $x->[0] # '', undef, undef #
+$x # $x->[0] # '', undef, undef # +fetch
+$x # $x->[0] # '', undef, [ ] # +exists
+$x # $x->[0] # '', undef, [ ] # +delete
+$x # $x->[0] # '', undef, [ ] # +store
+
+$x # $x->[0] # '', undef, [ ] # -fetch
+$x # $x->[0] # '', undef, [ ] # +fetch -fetch
+$x # $x->[0] # '', undef, undef # -fetch +fetch
+$x # $x->[0] # '', undef, undef # +fetch -exists
+
+$x # $x->[0] # qr/^Reference vivification forbidden/, undef, undef # +strict +fetch
+$x # $x->[0] # '', undef, [ ] # +strict +exists
+$x # $x->[0] # '', undef, [ ] # +strict +delete
+$x # $x->[0] # '', undef, [ ] # +strict +store
+
+$x # $x->[0]->[1] # '', undef, [ [ ] ]
+$x # $x->[0]->[1] # '', undef, undef #
+$x # $x->[0]->[1] # '', undef, undef # +fetch
+$x # $x->[0]->[1] # '', undef, [ [ ] ] # +exists
+$x # $x->[0]->[1] # '', undef, [ [ ] ] # +delete
+$x # $x->[0]->[1] # '', undef, [ [ ] ] # +store
+
+$x # $x->[0]->[1] # qr/^Reference vivification forbidden/, undef, undef # +strict +fetch
+$x # $x->[0]->[1] # '', undef, [ [ ] ] # +strict +exists
+$x # $x->[0]->[1] # '', undef, [ [ ] ] # +strict +delete
+$x # $x->[0]->[1] # '', undef, [ [ ] ] # +strict +store
+
+$x->[0] = 1 # $x->[0] # '', 1, [ 1 ] # +fetch
+$x->[0] = 1 # $x->[1] # '', undef, [ 1 ] # +fetch
+$x->[0] = 1 # $x->[0] # '', 1, [ 1 ] # +exists
+$x->[0] = 1 # $x->[1] # '', undef, [ 1 ] # +exists
+$x->[0] = 1 # $x->[0] # '', 1, [ 1 ] # +delete
+$x->[0] = 1 # $x->[1] # '', undef, [ 1 ] # +delete
+$x->[0] = 1 # $x->[0] # '', 1, [ 1 ] # +store
+$x->[0] = 1 # $x->[1] # '', undef, [ 1 ] # +store
+
+$x->[0] = 1 # $x->[0] # '', 1, [ 1 ] # +strict +fetch
+$x->[0] = 1 # $x->[1] # '', undef, [ 1 ] # +strict +fetch
+$x->[0] = 1 # $x->[0] # '', 1, [ 1 ] # +strict +exists
+$x->[0] = 1 # $x->[1] # '', undef, [ 1 ] # +strict +exists
+$x->[0] = 1 # $x->[0] # '', 1, [ 1 ] # +strict +delete
+$x->[0] = 1 # $x->[1] # '', undef, [ 1 ] # +strict +delete
+$x->[0] = 1 # $x->[0] # '', 1, [ 1 ] # +strict +store
+$x->[0] = 1 # $x->[1] # '', undef, [ 1 ] # +strict +store
+
+$x->[0]->[1] = 1 # $x->[0]->[1] # '', 1, [ [ undef, 1 ] ] # +fetch
+$x->[0]->[1] = 1 # $x->[0]->[3] # '', undef, [ [ undef, 1 ] ] # +fetch
+$x->[0]->[1] = 1 # $x->[2]->[3] # '', undef, [ [ undef, 1 ] ] # +fetch
+$x->[0]->[1] = 1 # $x->[0]->[1] # '', 1, [ [ undef, 1 ] ] # +exists
+$x->[0]->[1] = 1 # $x->[0]->[3] # '', undef, [ [ undef, 1 ] ] # +exists
+$x->[0]->[1] = 1 # $x->[2]->[3] # '', undef, [ [ undef, 1 ], undef, [ ] ] # +exists
+$x->[0]->[1] = 1 # $x->[0]->[1] # '', 1, [ [ undef, 1 ] ] # +delete
+$x->[0]->[1] = 1 # $x->[0]->[3] # '', undef, [ [ undef, 1 ] ] # +delete
+$x->[0]->[1] = 1 # $x->[2]->[3] # '', undef, [ [ undef, 1 ], undef, [ ] ] # +delete
+$x->[0]->[1] = 1 # $x->[0]->[1] # '', 1, [ [ undef, 1 ] ] # +store
+$x->[0]->[1] = 1 # $x->[0]->[3] # '', undef, [ [ undef, 1 ] ] # +store
+$x->[0]->[1] = 1 # $x->[2]->[3] # '', undef, [ [ undef, 1 ], undef, [ ] ] # +store
+
+$x->[0]->[1] = 1 # $x->[0]->[1] # '', 1, [ [ undef, 1 ] ] # +strict +fetch
+$x->[0]->[1] = 1 # $x->[0]->[3] # '', undef, [ [ undef, 1 ] ] # +strict +fetch
+$x->[0]->[1] = 1 # $x->[2]->[3] # qr/^Reference vivification forbidden/, undef, [ [ undef, 1 ] ] # +strict +fetch
+$x->[0]->[1] = 1 # $x->[0]->[1] # '', 1, [ [ undef, 1 ] ] # +strict +exists
+$x->[0]->[1] = 1 # $x->[0]->[3] # '', undef, [ [ undef, 1 ] ] # +strict +exists
+$x->[0]->[1] = 1 # $x->[2]->[3] # '', undef, [ [ undef, 1 ], undef, [ ] ] # +strict +exists
+$x->[0]->[1] = 1 # $x->[0]->[1] # '', 1, [ [ undef, 1 ] ] # +strict +delete
+$x->[0]->[1] = 1 # $x->[0]->[3] # '', undef, [ [ undef, 1 ] ] # +strict +delete
+$x->[0]->[1] = 1 # $x->[2]->[3] # '', undef, [ [ undef, 1 ], undef, [ ] ] # +strict +delete
+$x->[0]->[1] = 1 # $x->[0]->[1] # '', 1, [ [ undef, 1 ] ] # +strict +store
+$x->[0]->[1] = 1 # $x->[0]->[3] # '', undef, [ [ undef, 1 ] ] # +strict +store
+$x->[0]->[1] = 1 # $x->[2]->[3] # '', undef, [ [ undef, 1 ], undef, [ ] ] # +strict +store
+
+--- aliasing ---
+
+$x # 1 for $x->[0]; () # '', undef, [ undef ]
+$x # 1 for $x->[0]; () # '', undef, [ undef ] #
+$x # 1 for $x->[0]; () # '', undef, [ undef ] # +fetch
+$x # 1 for $x->[0]; () # '', undef, [ undef ] # +exists
+$x # 1 for $x->[0]; () # '', undef, [ undef ] # +delete
+$x # 1 for $x->[0]; () # qr/^Can't vivify reference/, undef, undef # +store
+
+$x # $_ = 1 for $x->[0]; () # '', undef, [ 1 ]
+$x # $_ = 1 for $x->[0]; () # '', undef, [ 1 ] #
+$x # $_ = 1 for $x->[0]; () # '', undef, [ 1 ] # +fetch
+$x # $_ = 1 for $x->[0]; () # '', undef, [ 1 ] # +exists
+$x # $_ = 1 for $x->[0]; () # '', undef, [ 1 ] # +delete
+$x # $_ = 1 for $x->[0]; () # qr/^Can't vivify reference/, undef, undef # +store
+
+$x->[0] = 1 # 1 for $x->[0]; () # '', undef, [ 1 ] # +fetch
+$x->[0] = 1 # 1 for $x->[1]; () # '', undef, [ 1, undef ] # +fetch
+$x->[0] = 1 # 1 for $x->[0]; () # '', undef, [ 1 ] # +exists
+$x->[0] = 1 # 1 for $x->[1]; () # '', undef, [ 1, undef ] # +exists
+$x->[0] = 1 # 1 for $x->[0]; () # '', undef, [ 1 ] # +delete
+$x->[0] = 1 # 1 for $x->[1]; () # '', undef, [ 1, undef ] # +delete
+$x->[0] = 1 # 1 for $x->[0]; () # '', undef, [ 1 ] # +store
+$x->[0] = 1 # 1 for $x->[1]; () # '', undef, [ 1, undef ] # +store
+
+--- dereferencing ---
+
+$x # no warnings 'uninitialized'; my @a = @$x; () # ($strict ? qr/^Can't use an undefined value as an ARRAY reference/ : ''), undef, undef
+$x # no warnings 'uninitialized'; my @a = @$x; () # ($strict ? qr/^Can't use an undefined value as an ARRAY reference/ : ''), undef, undef #
+$x # no warnings 'uninitialized'; my @a = @$x; () # ($strict ? qr/^Can't use an undefined value as an ARRAY reference/ : ''), undef, undef # +fetch
+$x # no warnings 'uninitialized'; my @a = @$x; () # ($strict ? qr/^Can't use an undefined value as an ARRAY reference/ : ''), undef, undef # +exists
+$x # no warnings 'uninitialized'; my @a = @$x; () # ($strict ? qr/^Can't use an undefined value as an ARRAY reference/ : ''), undef, undef # +delete
+$x # no warnings 'uninitialized'; my @a = @$x; () # ($strict ? qr/^Can't use an undefined value as an ARRAY reference/ : ''), undef, undef # +store
+
+$x->[0] = 1 # my @a = @$x; () # '', undef, [ 1 ] # +fetch
+$x->[0] = 1 # my @a = @$x; () # '', undef, [ 1 ] # +exists
+$x->[0] = 1 # my @a = @$x; () # '', undef, [ 1 ] # +delete
+$x->[0] = 1 # my @a = @$x; () # '', undef, [ 1 ] # +store
+
+--- exists ---
+
+$x # exists $x->[0] # '', '', [ ]
+$x # exists $x->[0] # '', '', undef #
+$x # exists $x->[0] # '', '', [ ] # +fetch
+$x # exists $x->[0] # '', '', undef # +exists
+$x # exists $x->[0] # '', '', [ ] # +delete
+$x # exists $x->[0] # '', '', [ ] # +store
+
+$x # exists $x->[0] # '', '', [ ] # +strict +fetch
+$x # exists $x->[0] # qr/^Reference vivification forbidden/, undef, undef # +strict +exists
+$x # exists $x->[0] # '', '', [ ] # +strict +delete
+$x # exists $x->[0] # '', '', [ ] # +strict +store
+
+$x # exists $x->[0]->[1] # '', '', [ [ ] ]
+$x # exists $x->[0]->[1] # '', '', undef #
+$x # exists $x->[0]->[1] # '', '', [ [ ] ] # +fetch
+$x # exists $x->[0]->[1] # '', '', undef # +exists
+$x # exists $x->[0]->[1] # '', '', [ [ ] ] # +delete
+$x # exists $x->[0]->[1] # '', '', [ [ ] ] # +store
+
+$x # exists $x->[0]->[1] # '', '', [ [ ] ] # +strict +fetch
+$x # exists $x->[0]->[1] # qr/^Reference vivification forbidden/, undef, undef # +strict +exists
+$x # exists $x->[0]->[1] # '', '', [ [ ] ] # +strict +delete
+$x # exists $x->[0]->[1] # '', '', [ [ ] ] # +strict +store
+
+$x->[0] = 1 # exists $x->[0] # '', 1, [ 1 ] # +fetch
+$x->[0] = 1 # exists $x->[1] # '', '', [ 1 ] # +fetch
+$x->[0] = 1 # exists $x->[0] # '', 1, [ 1 ] # +exists
+$x->[0] = 1 # exists $x->[1] # '', '', [ 1 ] # +exists
+$x->[0] = 1 # exists $x->[0] # '', 1, [ 1 ] # +delete
+$x->[0] = 1 # exists $x->[1] # '', '', [ 1 ] # +delete
+$x->[0] = 1 # exists $x->[0] # '', 1, [ 1 ] # +store
+$x->[0] = 1 # exists $x->[1] # '', '', [ 1 ] # +store
+
+$x->[0] = 1 # exists $x->[0] # '', 1, [ 1 ] # +strict +fetch
+$x->[0] = 1 # exists $x->[1] # '', '', [ 1 ] # +strict +fetch
+$x->[0] = 1 # exists $x->[0] # '', 1, [ 1 ] # +strict +exists
+$x->[0] = 1 # exists $x->[1] # '', '', [ 1 ] # +strict +exists
+$x->[0] = 1 # exists $x->[0] # '', 1, [ 1 ] # +strict +delete
+$x->[0] = 1 # exists $x->[1] # '', '', [ 1 ] # +strict +delete
+$x->[0] = 1 # exists $x->[0] # '', 1, [ 1 ] # +strict +store
+$x->[0] = 1 # exists $x->[1] # '', '', [ 1 ] # +strict +store
+
+$x->[0]->[1] = 1 # exists $x->[0]->[1] # '', 1, [ [ undef, 1 ] ] # +fetch
+$x->[0]->[1] = 1 # exists $x->[0]->[3] # '', '', [ [ undef, 1 ] ] # +fetch
+$x->[0]->[1] = 1 # exists $x->[2]->[3] # '', '', [ [ undef, 1 ], undef, [ ] ] # +fetch
+$x->[0]->[1] = 1 # exists $x->[0]->[1] # '', 1, [ [ undef, 1 ] ] # +exists
+$x->[0]->[1] = 1 # exists $x->[0]->[3] # '', '', [ [ undef, 1 ] ] # +exists
+$x->[0]->[1] = 1 # exists $x->[2]->[3] # '', '', [ [ undef, 1 ] ] # +exists
+$x->[0]->[1] = 1 # exists $x->[0]->[1] # '', 1, [ [ undef, 1 ] ] # +delete
+$x->[0]->[1] = 1 # exists $x->[0]->[3] # '', '', [ [ undef, 1 ] ] # +delete
+$x->[0]->[1] = 1 # exists $x->[2]->[3] # '', '', [ [ undef, 1 ], undef, [ ] ] # +delete
+$x->[0]->[1] = 1 # exists $x->[0]->[1] # '', 1, [ [ undef, 1 ] ] # +store
+$x->[0]->[1] = 1 # exists $x->[0]->[3] # '', '', [ [ undef, 1 ] ] # +store
+$x->[0]->[1] = 1 # exists $x->[2]->[3] # '', '', [ [ undef, 1 ], undef, [ ] ] # +store
+
+$x->[0]->[1] = 1 # exists $x->[0]->[1] # '', 1, [ [ undef, 1 ] ] # +strict +fetch
+$x->[0]->[1] = 1 # exists $x->[0]->[3] # '', '', [ [ undef, 1 ] ] # +strict +fetch
+$x->[0]->[1] = 1 # exists $x->[2]->[3] # '', '', [ [ undef, 1 ], undef, [ ] ] # +strict +fetch
+$x->[0]->[1] = 1 # exists $x->[0]->[1] # '', 1, [ [ undef, 1 ] ] # +strict +exists
+$x->[0]->[1] = 1 # exists $x->[0]->[3] # '', '', [ [ undef, 1 ] ] # +strict +exists
+$x->[0]->[1] = 1 # exists $x->[2]->[3] # qr/^Reference vivification forbidden/, undef, [ [ undef, 1 ] ] # +strict +exists
+$x->[0]->[1] = 1 # exists $x->[0]->[1] # '', 1, [ [ undef, 1 ] ] # +strict +delete
+$x->[0]->[1] = 1 # exists $x->[0]->[3] # '', '', [ [ undef, 1 ] ] # +strict +delete
+$x->[0]->[1] = 1 # exists $x->[2]->[3] # '', '', [ [ undef, 1 ], undef, [ ] ] # +strict +delete
+$x->[0]->[1] = 1 # exists $x->[0]->[1] # '', 1, [ [ undef, 1 ] ] # +strict +store
+$x->[0]->[1] = 1 # exists $x->[0]->[3] # '', '', [ [ undef, 1 ] ] # +strict +store
+$x->[0]->[1] = 1 # exists $x->[2]->[3] # '', '', [ [ undef, 1 ], undef, [ ] ] # +strict +store
+
+--- delete ---
+
+$x # delete $x->[0] # '', undef, [ ]
+$x # delete $x->[0] # '', undef, undef #
+$x # delete $x->[0] # '', undef, [ ] # +fetch
+$x # delete $x->[0] # '', undef, [ ] # +exists
+$x # delete $x->[0] # '', undef, undef # +delete
+$x # delete $x->[0] # '', undef, [ ] # +store
+
+$x # delete $x->[0] # '', undef, [ ] # +strict +fetch
+$x # delete $x->[0] # '', undef, [ ] # +strict +exists
+$x # delete $x->[0] # qr/^Reference vivification forbidden/, undef, undef # +strict +delete
+$x # delete $x->[0] # '', undef, [ ] # +strict +store
+
+$x # delete $x->[0]->[1] # '', undef, [ [ ] ]
+$x # delete $x->[0]->[1] # '', undef, undef #
+$x # delete $x->[0]->[1] # '', undef, [ [ ] ] # +fetch
+$x # delete $x->[0]->[1] # '', undef, [ [ ] ] # +exists
+$x # delete $x->[0]->[1] # '', undef, undef # +delete
+$x # delete $x->[0]->[1] # '', undef, [ [ ] ] # +store
+
+$x # delete $x->[0]->[1] # '', undef, [ [ ] ] # +strict +fetch
+$x # delete $x->[0]->[1] # '', undef, [ [ ] ] # +strict +exists
+$x # delete $x->[0]->[1] # qr/^Reference vivification forbidden/, undef, undef # +strict +delete
+$x # delete $x->[0]->[1] # '', undef, [ [ ] ] # +strict +store
+
+$x->[0] = 1 # delete $x->[0] # '', 1, [ ] # +fetch
+$x->[0] = 1 # delete $x->[1] # '', undef, [ 1 ] # +fetch
+$x->[0] = 1 # delete $x->[0] # '', 1, [ ] # +exists
+$x->[0] = 1 # delete $x->[1] # '', undef, [ 1 ] # +exists
+$x->[0] = 1 # delete $x->[0] # '', 1, [ ] # +delete
+$x->[0] = 1 # delete $x->[1] # '', undef, [ 1 ] # +delete
+$x->[0] = 1 # delete $x->[0] # '', 1, [ ] # +store
+$x->[0] = 1 # delete $x->[1] # '', undef, [ 1 ] # +store
+
+$x->[0] = 1 # delete $x->[0] # '', 1, [ ] # +strict +fetch
+$x->[0] = 1 # delete $x->[1] # '', undef, [ 1 ] # +strict +fetch
+$x->[0] = 1 # delete $x->[0] # '', 1, [ ] # +strict +exists
+$x->[0] = 1 # delete $x->[1] # '', undef, [ 1 ] # +strict +exists
+$x->[0] = 1 # delete $x->[0] # '', 1, [ ] # +strict +delete
+$x->[0] = 1 # delete $x->[1] # '', undef, [ 1 ] # +strict +delete
+$x->[0] = 1 # delete $x->[0] # '', 1, [ ] # +strict +store
+$x->[0] = 1 # delete $x->[1] # '', undef, [ 1 ] # +strict +store
+
+$x->[0]->[1] = 1 # delete $x->[0]->[1] # '', 1, [ [ ] ] # +fetch
+$x->[0]->[1] = 1 # delete $x->[0]->[3] # '', undef, [ [ undef, 1 ] ]# +fetch
+$x->[0]->[1] = 1 # delete $x->[2]->[3] # '', undef, [ [ undef, 1 ], undef, [ ] ] # +fetch
+$x->[0]->[1] = 1 # delete $x->[0]->[1] # '', 1, [ [ ] ] # +exists
+$x->[0]->[1] = 1 # delete $x->[0]->[3] # '', undef, [ [ undef, 1 ] ]# +exists
+$x->[0]->[1] = 1 # delete $x->[2]->[3] # '', undef, [ [ undef, 1 ], undef, [ ] ] # +exists
+$x->[0]->[1] = 1 # delete $x->[0]->[1] # '', 1, [ [ ] ] # +delete
+$x->[0]->[1] = 1 # delete $x->[0]->[3] # '', undef, [ [ undef, 1 ] ]# +delete
+$x->[0]->[1] = 1 # delete $x->[2]->[3] # '', undef, [ [ undef, 1 ] ]# +delete
+$x->[0]->[1] = 1 # delete $x->[0]->[1] # '', 1, [ [ ] ] # +store
+$x->[0]->[1] = 1 # delete $x->[0]->[3] # '', undef, [ [ undef, 1 ] ]# +store
+$x->[0]->[1] = 1 # delete $x->[2]->[3] # '', undef, [ [ undef, 1 ], undef, [ ] ] # +store
+
+$x->[0]->[1] = 1 # delete $x->[0]->[1] # '', 1, [ [ ] ] # +strict +fetch
+$x->[0]->[1] = 1 # delete $x->[0]->[3] # '', undef, [ [ undef, 1 ] ] # +strict +fetch
+$x->[0]->[1] = 1 # delete $x->[2]->[3] # '', undef, [ [ undef, 1 ], undef, [ ] ]# +strict +fetch
+$x->[0]->[1] = 1 # delete $x->[0]->[1] # '', 1, [ [ ] ] # +strict +exists
+$x->[0]->[1] = 1 # delete $x->[0]->[3] # '', undef, [ [ undef, 1 ] ] # +strict +exists
+$x->[0]->[1] = 1 # delete $x->[2]->[3] # '', undef, [ [ undef, 1 ], undef, [ ] ]# +strict +exists
+$x->[0]->[1] = 1 # delete $x->[0]->[1] # '', 1, [ [ ] ] # +strict +delete
+$x->[0]->[1] = 1 # delete $x->[0]->[3] # '', undef, [ [ undef, 1 ] ] # +strict +delete
+$x->[0]->[1] = 1 # delete $x->[2]->[3] # qr/^Reference vivification forbidden/, undef, [ [ undef, 1 ] ] # +strict +delete
+$x->[0]->[1] = 1 # delete $x->[0]->[1] # '', 1, [ [ ] ] # +strict +store
+$x->[0]->[1] = 1 # delete $x->[0]->[3] # '', undef, [ [ undef, 1 ] ] # +strict +store
+$x->[0]->[1] = 1 # delete $x->[2]->[3] # '', undef, [ [ undef, 1 ], undef, [ ] ]# +strict +store
+
+--- store ---
+
+$x # $x->[0] = 1 # '', 1, [ 1 ]
+$x # $x->[0] = 1 # '', 1, [ 1 ] #
+$x # $x->[0] = 1 # '', 1, [ 1 ] # +fetch
+$x # $x->[0] = 1 # '', 1, [ 1 ] # +exists
+$x # $x->[0] = 1 # '', 1, [ 1 ] # +delete
+$x # $x->[0] = 1 # qr/^Can't vivify reference/, undef, undef # +store
+
+$x # $x->[0] = 1 # '', 1, [ 1 ] # +strict +fetch
+$x # $x->[0] = 1 # '', 1, [ 1 ] # +strict +exists
+$x # $x->[0] = 1 # '', 1, [ 1 ] # +strict +delete
+$x # $x->[0] = 1 # qr/^Reference vivification forbidden/, undef, undef # +strict +store
+
+$x # $x->[0]->[1] = 1 # '', 1, [ [ undef, 1 ] ]
+$x # $x->[0]->[1] = 1 # '', 1, [ [ undef, 1 ] ] #
+$x # $x->[0]->[1] = 1 # '', 1, [ [ undef, 1 ] ] # +fetch
+$x # $x->[0]->[1] = 1 # '', 1, [ [ undef, 1 ] ] # +exists
+$x # $x->[0]->[1] = 1 # '', 1, [ [ undef, 1 ] ] # +delete
+$x # $x->[0]->[1] = 1 # qr/^Can't vivify reference/, undef, undef # +store
+
+$x # $x->[0]->[1] = 1 # '', 1, [ [ undef, 1 ] ] # +strict +fetch
+$x # $x->[0]->[1] = 1 # '', 1, [ [ undef, 1 ] ] # +strict +exists
+$x # $x->[0]->[1] = 1 # '', 1, [ [ undef, 1 ] ] # +strict +delete
+$x # $x->[0]->[1] = 1 # qr/^Reference vivification forbidden/, undef, undef # +strict +store
+
+$x->[0] = 1 # $x->[0] = 2 # '', 2, [ 2 ] # +fetch
+$x->[0] = 1 # $x->[1] = 2 # '', 2, [ 1, 2 ] # +fetch
+$x->[0] = 1 # $x->[0] = 2 # '', 2, [ 2 ] # +exists
+$x->[0] = 1 # $x->[1] = 2 # '', 2, [ 1, 2 ] # +exists
+$x->[0] = 1 # $x->[0] = 2 # '', 2, [ 2 ] # +delete
+$x->[0] = 1 # $x->[1] = 2 # '', 2, [ 1, 2 ] # +delete
+$x->[0] = 1 # $x->[0] = 2 # '', 2, [ 2 ] # +store
+$x->[0] = 1 # $x->[1] = 2 # '', 2, [ 1, 2 ] # +store
+
+$x->[0] = 1 # $x->[0] = 2 # '', 2, [ 2 ] # +strict +fetch
+$x->[0] = 1 # $x->[1] = 2 # '', 2, [ 1, 2 ] # +strict +fetch
+$x->[0] = 1 # $x->[0] = 2 # '', 2, [ 2 ] # +strict +exists
+$x->[0] = 1 # $x->[1] = 2 # '', 2, [ 1, 2 ] # +strict +exists
+$x->[0] = 1 # $x->[0] = 2 # '', 2, [ 2 ] # +strict +delete
+$x->[0] = 1 # $x->[1] = 2 # '', 2, [ 1, 2 ] # +strict +delete
+$x->[0] = 1 # $x->[0] = 2 # '', 2, [ 2 ] # +strict +store
+$x->[0] = 1 # $x->[1] = 2 # '', 2, [ 1, 2 ] # +strict +store
+
+$x->[0]->[1] = 1 # $x->[0]->[1] = 2 # '', 2, [ [ undef, 2 ] ] # +fetch
+$x->[0]->[1] = 1 # $x->[0]->[3] = 2 # '', 2, [ [ undef, 1, undef, 2 ] ] # +fetch
+$x->[0]->[1] = 1 # $x->[2]->[3] = 2 # '', 2, [ [ undef, 1 ], undef, [ undef, undef, undef, 2 ] ] # +fetch
+$x->[0]->[1] = 1 # $x->[0]->[1] = 2 # '', 2, [ [ undef, 2 ] ] # +exists
+$x->[0]->[1] = 1 # $x->[0]->[3] = 2 # '', 2, [ [ undef, 1, undef, 2 ] ] # +exists
+$x->[0]->[1] = 1 # $x->[2]->[3] = 2 # '', 2, [ [ undef, 1 ], undef, [ undef, undef, undef, 2 ] ] # +exists
+$x->[0]->[1] = 1 # $x->[0]->[1] = 2 # '', 2, [ [ undef, 2 ] ] # +delete
+$x->[0]->[1] = 1 # $x->[0]->[3] = 2 # '', 2, [ [ undef, 1, undef, 2 ] ] # +delete
+$x->[0]->[1] = 1 # $x->[2]->[3] = 2 # '', 2, [ [ undef, 1 ], undef, [ undef, undef, undef, 2 ] ] # +delete
+$x->[0]->[1] = 1 # $x->[0]->[1] = 2 # '', 2, [ [ undef, 2 ] ] # +store
+$x->[0]->[1] = 1 # $x->[0]->[3] = 2 # '', 2, [ [ undef, 1, undef, 2 ] ] # +store
+$x->[0]->[1] = 1 # $x->[2]->[3] = 2 # qr/^Can't vivify reference/, undef, [ [ undef, 1 ] ] # +store
+
+$x->[0]->[1] = 1 # $x->[0]->[1] = 2 # '', 2, [ [ undef, 2 ] ] # +strict +fetch
+$x->[0]->[1] = 1 # $x->[0]->[3] = 2 # '', 2, [ [ undef, 1, undef, 2 ] ] # +strict +fetch
+$x->[0]->[1] = 1 # $x->[2]->[3] = 2 # '', 2, [ [ undef, 1 ], undef, [ undef, undef, undef, 2 ] ] # +strict +fetch
+$x->[0]->[1] = 1 # $x->[0]->[1] = 2 # '', 2, [ [ undef, 2 ] ] # +strict +exists
+$x->[0]->[1] = 1 # $x->[0]->[3] = 2 # '', 2, [ [ undef, 1, undef, 2 ] ] # +strict +exists
+$x->[0]->[1] = 1 # $x->[2]->[3] = 2 # '', 2, [ [ undef, 1 ], undef, [ undef, undef, undef, 2 ] ] # +strict +exists
+$x->[0]->[1] = 1 # $x->[0]->[1] = 2 # '', 2, [ [ undef, 2 ] ] # +strict +delete
+$x->[0]->[1] = 1 # $x->[0]->[3] = 2 # '', 2, [ [ undef, 1, undef, 2 ] ] # +strict +delete
+$x->[0]->[1] = 1 # $x->[2]->[3] = 2 # '', 2, [ [ undef, 1 ], undef, [ undef, undef, undef, 2 ] ] # +strict +delete
+$x->[0]->[1] = 1 # $x->[0]->[1] = 2 # '', 2, [ [ undef, 2 ] ] # +strict +store
+$x->[0]->[1] = 1 # $x->[0]->[3] = 2 # '', 2, [ [ undef, 1, undef, 2 ] ] # +strict +store
+$x->[0]->[1] = 1 # $x->[2]->[3] = 2 # qr/^Reference vivification forbidden/, undef, [ [ undef, 1 ] ] # +strict +store
projects / perl / modules / autovivification.git / blobdiff