PATH=/opt/SUNWspro/bin:/usr/local/bin:/opt/csw/bin:/usr/ccs/bin:/usr/bin:/usr/sbin Start 2012-04-19T12:09:30 ActivePerl-1205 CPAN-1.9402 Going to read '/export/home/fly1232/var/cpan/Metadata' Database was generated on Thu, 19 Apr 2012 15:43:03 GMT Running make for M/MS/MSCHWERN/perl5i-v2.9.1.tar.gz Checksum for /net/nas/data/cpan/authors/id/M/MS/MSCHWERN/perl5i-v2.9.1.tar.gz ok perl5i-v2.9.1 perl5i-v2.9.1/.perlcriticrc perl5i-v2.9.1/.perltidyrc perl5i-v2.9.1/Build.PL perl5i-v2.9.1/Changes perl5i-v2.9.1/file_notes.txt perl5i-v2.9.1/INSTALL.SKIP perl5i-v2.9.1/LICENSE perl5i-v2.9.1/MANIFEST perl5i-v2.9.1/MANIFEST.SKIP perl5i-v2.9.1/META.json perl5i-v2.9.1/META.yml perl5i-v2.9.1/PATCHING perl5i-v2.9.1/README perl5i-v2.9.1/SIGNATURE perl5i-v2.9.1/bin perl5i-v2.9.1/bin/perl5i.bat.PL perl5i-v2.9.1/bin/perl5i.c.PL perl5i-v2.9.1/bin/perl5i.plx perl5i-v2.9.1/inc perl5i-v2.9.1/inc/MyBuild.pm perl5i-v2.9.1/lib perl5i-v2.9.1/lib/perl5i.pm perl5i-v2.9.1/lib/perl5ifaq.pod perl5i-v2.9.1/lib/perl5i perl5i-v2.9.1/lib/perl5i/0.pm perl5i-v2.9.1/lib/perl5i/1.pm perl5i-v2.9.1/lib/perl5i/2.pm perl5i-v2.9.1/lib/perl5i/cmd.pm perl5i-v2.9.1/lib/perl5i/latest.pm perl5i-v2.9.1/lib/perl5i/Meta.pod perl5i-v2.9.1/lib/perl5i/Signature.pod perl5i-v2.9.1/lib/perl5i/VERSION.pm perl5i-v2.9.1/lib/perl5i/0 perl5i-v2.9.1/lib/perl5i/0/ARRAY.pm perl5i-v2.9.1/lib/perl5i/0/DateTime.pm perl5i-v2.9.1/lib/perl5i/0/DEFAULT.pm perl5i-v2.9.1/lib/perl5i/0/HASH.pm perl5i-v2.9.1/lib/perl5i/0/Meta.pm perl5i-v2.9.1/lib/perl5i/0/SCALAR.pm perl5i-v2.9.1/lib/perl5i/0/Meta perl5i-v2.9.1/lib/perl5i/0/Meta/Class.pm perl5i-v2.9.1/lib/perl5i/0/Meta/Instance.pm perl5i-v2.9.1/lib/perl5i/1 perl5i-v2.9.1/lib/perl5i/1/ARRAY.pm perl5i-v2.9.1/lib/perl5i/1/autobox.pm perl5i-v2.9.1/lib/perl5i/1/CODE.pm perl5i-v2.9.1/lib/perl5i/1/DateTime.pm perl5i-v2.9.1/lib/perl5i/1/HASH.pm perl5i-v2.9.1/lib/perl5i/1/Meta.pm perl5i-v2.9.1/lib/perl5i/1/SCALAR.pm perl5i-v2.9.1/lib/perl5i/1/UNIVERSAL.pm perl5i-v2.9.1/lib/perl5i/1/Meta perl5i-v2.9.1/lib/perl5i/1/Meta/Class.pm perl5i-v2.9.1/lib/perl5i/1/Meta/Instance.pm perl5i-v2.9.1/lib/perl5i/2 perl5i-v2.9.1/lib/perl5i/2/ARRAY.pm perl5i-v2.9.1/lib/perl5i/2/autobox.pm perl5i-v2.9.1/lib/perl5i/2/CODE.pm perl5i-v2.9.1/lib/perl5i/2/DateTime.pm perl5i-v2.9.1/lib/perl5i/2/equal.pm perl5i-v2.9.1/lib/perl5i/2/HASH.pm perl5i-v2.9.1/lib/perl5i/2/Meta.pm perl5i-v2.9.1/lib/perl5i/2/RequireMessage.pm perl5i-v2.9.1/lib/perl5i/2/SCALAR.pm perl5i-v2.9.1/lib/perl5i/2/Signature.pm perl5i-v2.9.1/lib/perl5i/2/Signatures.pm perl5i-v2.9.1/lib/perl5i/2/UNIVERSAL.pm perl5i-v2.9.1/lib/perl5i/2/Meta perl5i-v2.9.1/lib/perl5i/2/Meta/Class.pm perl5i-v2.9.1/lib/perl5i/2/Meta/Instance.pm perl5i-v2.9.1/lib/perl5i/2/Signature perl5i-v2.9.1/lib/perl5i/2/Signature/None.pm perl5i-v2.9.1/lib/perl5i/2/Signature/Real.pm perl5i-v2.9.1/lib/perl5i/2/Signature/Function perl5i-v2.9.1/lib/perl5i/2/Signature/Function/None.pm perl5i-v2.9.1/lib/perl5i/2/Signature/Method perl5i-v2.9.1/lib/perl5i/2/Signature/Method/None.pm perl5i-v2.9.1/t perl5i-v2.9.1/t/alias.t perl5i-v2.9.1/t/ARGV.t perl5i-v2.9.1/t/ARGV_twice.t perl5i-v2.9.1/t/autobox.t perl5i-v2.9.1/t/autodie.t perl5i-v2.9.1/t/autovivification.t perl5i-v2.9.1/t/caller.t perl5i-v2.9.1/t/can.t perl5i-v2.9.1/t/capture.t perl5i-v2.9.1/t/carp.t perl5i-v2.9.1/t/center.t perl5i-v2.9.1/t/chdir.t perl5i-v2.9.1/t/Child.t perl5i-v2.9.1/t/CLASS.t perl5i-v2.9.1/t/command_line_wrapper.t perl5i-v2.9.1/t/commify.t perl5i-v2.9.1/t/datetime.t perl5i-v2.9.1/t/die.t perl5i-v2.9.1/t/diff.t perl5i-v2.9.1/t/each.t perl5i-v2.9.1/t/English.t perl5i-v2.9.1/t/equal.t perl5i-v2.9.1/t/everything_is_an_object.t perl5i-v2.9.1/t/File-stat.t perl5i-v2.9.1/t/flip.t perl5i-v2.9.1/t/foreach.t perl5i-v2.9.1/t/github164.t perl5i-v2.9.1/t/grep.t perl5i-v2.9.1/t/hash-diff.t perl5i-v2.9.1/t/hash-intersect.t perl5i-v2.9.1/t/hash-merge.t perl5i-v2.9.1/t/intersect.t perl5i-v2.9.1/t/io-handle.t perl5i-v2.9.1/t/is_module_name.t perl5i-v2.9.1/t/lexical.t perl5i-v2.9.1/t/list-trim.t perl5i-v2.9.1/t/list.t perl5i-v2.9.1/t/load_together.t perl5i-v2.9.1/t/map.t perl5i-v2.9.1/t/method_leaking.t perl5i-v2.9.1/t/modern_perl.t perl5i-v2.9.1/t/module2path.t perl5i-v2.9.1/t/no_indirect.t perl5i-v2.9.1/t/number.t perl5i-v2.9.1/t/perl5i.t perl5i-v2.9.1/t/require.t perl5i-v2.9.1/t/require_message.t perl5i-v2.9.1/t/say.t perl5i-v2.9.1/t/scalar.t perl5i-v2.9.1/t/signature.t perl5i-v2.9.1/t/signatures.t perl5i-v2.9.1/t/taint.t perl5i-v2.9.1/t/time_compat.t perl5i-v2.9.1/t/true.t perl5i-v2.9.1/t/try-tiny.t perl5i-v2.9.1/t/uniq.t perl5i-v2.9.1/t/utf8.t perl5i-v2.9.1/t/vs_listmoreutils.t perl5i-v2.9.1/t/Want.t perl5i-v2.9.1/t/wrap.t perl5i-v2.9.1/t/y2038.t perl5i-v2.9.1/t/dump perl5i-v2.9.1/t/dump/array.t perl5i-v2.9.1/t/dump/code.t perl5i-v2.9.1/t/dump/hash.t perl5i-v2.9.1/t/dump/obj.t perl5i-v2.9.1/t/dump/scalar.t perl5i-v2.9.1/t/lib perl5i-v2.9.1/t/lib/ThisIsTrue.pm perl5i-v2.9.1/t/lib/Test perl5i-v2.9.1/t/lib/Test/perl5i.pm perl5i-v2.9.1/t/List-MoreUtils perl5i-v2.9.1/t/List-MoreUtils/all.t perl5i-v2.9.1/t/List-MoreUtils/any.t perl5i-v2.9.1/t/List-MoreUtils/false.t perl5i-v2.9.1/t/List-MoreUtils/mesh.t perl5i-v2.9.1/t/List-MoreUtils/minmax.t perl5i-v2.9.1/t/List-MoreUtils/none.t perl5i-v2.9.1/t/List-MoreUtils/true.t perl5i-v2.9.1/t/List-MoreUtils/uniq.t perl5i-v2.9.1/t/List-Util perl5i-v2.9.1/t/List-Util/first.t perl5i-v2.9.1/t/List-Util/max.t perl5i-v2.9.1/t/List-Util/maxstr.t perl5i-v2.9.1/t/List-Util/min.t perl5i-v2.9.1/t/List-Util/minstr.t perl5i-v2.9.1/t/List-Util/reduce.t perl5i-v2.9.1/t/List-Util/shuffle.t perl5i-v2.9.1/t/List-Util/sum.t perl5i-v2.9.1/t/Meta perl5i-v2.9.1/t/Meta/checksum.t perl5i-v2.9.1/t/Meta/class.t perl5i-v2.9.1/t/Meta/id.t perl5i-v2.9.1/t/Meta/is-equal.t perl5i-v2.9.1/t/Meta/ISA.t perl5i-v2.9.1/t/Meta/linear_isa.t perl5i-v2.9.1/t/Meta/methods.t perl5i-v2.9.1/t/Meta/reftype.t perl5i-v2.9.1/t/Meta/super.t perl5i-v2.9.1/t/Meta/symbol_table.t perl5i-v2.9.1/t/version_0 perl5i-v2.9.1/t/version_0/00_compile.t perl5i-v2.9.1/t/version_1 perl5i-v2.9.1/t/version_1/00_compile.t CPAN.pm: Going to build M/MS/MSCHWERN/perl5i-v2.9.1.tar.gz >>> /export/home/fly1232/bin/perl Build.PL Checking prerequisites... requires: ! CLASS is not installed ! autobox::Core is not installed ! autobox::List::Util is not installed ! autobox::dump is not installed ! autovivification is not installed ERRORS/WARNINGS FOUND IN PREREQUISITES. You may wish to install the versions of the modules indicated above before proceeding with this installation Version::Requirements is deprecated; replace with CPAN::Meta::Requirements at /export/home/fly1232/var/megalib/Version/Requirements.pm line 17. require Version/Requirements.pm called at /export/home/fly1232/var/megalib/CPAN/Meta/Prereqs.pm line 10 CPAN::Meta::Prereqs::BEGIN() called at /export/home/fly1232/var/megalib/Version/Requirements.pm line 0 eval {...} called at /export/home/fly1232/var/megalib/Version/Requirements.pm line 0 require CPAN/Meta/Prereqs.pm called at /export/home/fly1232/var/megalib/CPAN/Meta/Feature.pm line 7 CPAN::Meta::Feature::BEGIN() called at /export/home/fly1232/var/megalib/Version/Requirements.pm line 0 eval {...} called at /export/home/fly1232/var/megalib/Version/Requirements.pm line 0 require CPAN/Meta/Feature.pm called at /export/home/fly1232/var/megalib/CPAN/Meta.pm line 9 CPAN::Meta::BEGIN() called at /export/home/fly1232/var/megalib/Version/Requirements.pm line 0 eval {...} called at /export/home/fly1232/var/megalib/Version/Requirements.pm line 0 require CPAN/Meta.pm called at (eval 98) line 2 eval 'require CPAN::Meta ;' called at /export/home/fly1232/var/megalib/Module/Build/Base.pm line 1664 Module::Build::Base::try_require('MyBuild=HASH(0x1a2a30)', 'CPAN::Meta', 2.110420) called at /export/home/fly1232/var/megalib/Module/Build/Base.pm line 1897 Module::Build::Base::create_mymeta('MyBuild=HASH(0x1a2a30)') called at /export/home/fly1232/var/megalib/Module/Build/Base.pm line 1957 Module::Build::Base::create_build_script('MyBuild=HASH(0x1a2a30)') called at Build.PL line 102 Created MYMETA.yml and MYMETA.json Creating new 'Build' script for 'perl5i' version 'v2.9.1' ---- Unsatisfied dependencies detected during ---- ---- MSCHWERN/perl5i-v2.9.1.tar.gz ---- autobox::List::Util [requires] autovivification [requires] autobox::dump [requires] autobox::Core [requires] CLASS [requires] Running Build test Delayed until after prerequisites Running test for module 'autobox::List::Util' Running make for C/CO/COWENS/autobox-List-Util-20090629.tar.gz Checksum for /net/nas/data/cpan/authors/id/C/CO/COWENS/autobox-List-Util-20090629.tar.gz ok autobox-List-Util-20090629 autobox-List-Util-20090629/Build.PL autobox-List-Util-20090629/Changes autobox-List-Util-20090629/Makefile.PL autobox-List-Util-20090629/MANIFEST autobox-List-Util-20090629/MANIFEST.SKIP autobox-List-Util-20090629/META.yml autobox-List-Util-20090629/README autobox-List-Util-20090629/lib autobox-List-Util-20090629/lib/autobox autobox-List-Util-20090629/lib/autobox/List autobox-List-Util-20090629/lib/autobox/List/Util.pm autobox-List-Util-20090629/t autobox-List-Util-20090629/t/00-load.t autobox-List-Util-20090629/t/first.t autobox-List-Util-20090629/t/max.t autobox-List-Util-20090629/t/maxstr.t autobox-List-Util-20090629/t/min.t autobox-List-Util-20090629/t/minstr.t autobox-List-Util-20090629/t/reduce.t autobox-List-Util-20090629/t/shuffle.t autobox-List-Util-20090629/t/sum.t CPAN.pm: Going to build C/CO/COWENS/autobox-List-Util-20090629.tar.gz >>> /export/home/fly1232/bin/perl Makefile.PL Checking if your kit is complete... Looks good Version::Requirements is deprecated; replace with CPAN::Meta::Requirements at /export/home/fly1232/var/megalib/Version/Requirements.pm line 17. require Version/Requirements.pm called at /export/home/fly1232/var/megalib/CPAN/Meta/Prereqs.pm line 10 CPAN::Meta::Prereqs::BEGIN() called at /export/home/fly1232/var/megalib/Version/Requirements.pm line 0 eval {...} called at /export/home/fly1232/var/megalib/Version/Requirements.pm line 0 require CPAN/Meta/Prereqs.pm called at /export/home/fly1232/var/megalib/CPAN/Meta/Feature.pm line 7 CPAN::Meta::Feature::BEGIN() called at /export/home/fly1232/var/megalib/Version/Requirements.pm line 0 eval {...} called at /export/home/fly1232/var/megalib/Version/Requirements.pm line 0 require CPAN/Meta/Feature.pm called at /export/home/fly1232/var/megalib/CPAN/Meta.pm line 9 CPAN::Meta::BEGIN() called at /export/home/fly1232/var/megalib/Version/Requirements.pm line 0 eval {...} called at /export/home/fly1232/var/megalib/Version/Requirements.pm line 0 require CPAN/Meta.pm called at /export/home/fly1232/var/megalib/ExtUtils/MM_Any.pm line 733 eval {...} called at /export/home/fly1232/var/megalib/ExtUtils/MM_Any.pm line 732 ExtUtils::MM_Any::_has_cpan_meta() called at /export/home/fly1232/var/megalib/ExtUtils/MM_Any.pm line 753 ExtUtils::MM_Any::metafile_target('PACK001=HASH(0x2e38e8)') called at /export/home/fly1232/var/megalib/ExtUtils/MakeMaker.pm line 690 ExtUtils::MakeMaker::new('MM', 'PACK001=HASH(0x2e38e8)') called at /export/home/fly1232/var/megalib/ExtUtils/MakeMaker.pm line 60 ExtUtils::MakeMaker::WriteMakefile('NAME', 'autobox::List::Util', 'VERSION_FROM', 'lib/autobox/List/Util.pm', 'PREREQ_PM', 'HASH(0x17cec8)', 'INSTALLDIRS', 'site', 'EXE_FILES', ...) called at Makefile.PL line 3 Writing Makefile for autobox::List::Util Writing MYMETA.yml and MYMETA.json >>> make cp lib/autobox/List/Util.pm blib/lib/autobox/List/Util.pm Manifying blib/man3/autobox::List::Util.3 COWENS/autobox-List-Util-20090629.tar.gz make -- OK Running make test >>> make test TEST_VERBOSE=1 PERL_DL_NONLAZY=1 /export/home/fly1232/bin/perl "-MExtUtils::Command::MM" "-e" "test_harness(1, 'blib/lib', 'blib/arch')" t/*.t # Testing autobox::List::Util 20090629, Perl 5.012004, /export/home/fly1232/bin/perl t/00-load.t .. 1..1 ok 1 - use autobox::List::Util; ok t/first.t .... 1..13 ok 1 - one more than 8 ok 2 - none match ok 3 - no args ok 4 - reference args ok 5 - use of eval ok 6 - use of die ok 7 - wantarray ok 8 - return ok 9 - return from loop ok 10 - other package ok 11 - undef active sub ok 12 - redefine self ok 13 - from active sub ok t/max.t ...... 1..4 ok 1 - single arg ok 2 - 2-arg ordered ok 3 - 2-arg reverse ordered ok 4 - 20-arg random order ok t/maxstr.t ... 1..4 ok 1 - single arg ok 2 - 2-arg ordered ok 3 - 2-arg reverse ordered ok 4 - random ordered ok t/min.t ...... 1..4 ok 1 - single arg ok 2 - 2-arg ordered ok 3 - 2-arg reverse ordered ok 4 - 20-arg random order ok t/minstr.t ... 1..4 ok 1 - single arg ok 2 - 2-arg ordered ok 3 - 2-arg reverse ordered ok 4 - random ordered ok t/reduce.t ... 1..19 ok 1 - no args ok 2 - 4-arg divide ok 3 - one arg ok 4 - min ok 5 - concat ok 6 - call sub ok 7 - use eval{} ok 8 - die ok 9 - scalar context ok 10 - sub reference ok 11 - call sub ok 12 - eval string ok 13 - restore $a ok 14 - restore $b ok 15 - return ok 16 - return from loop ok 17 - undef active sub ok 18 - redefine self ok 19 - from active sub ok t/shuffle.t .. 1..13 ok 1 - no args ok 2 - 1 in 1 out ok 3 - one arg ok 4 - arg count ok 5 - result different to args ok 6 - values ok 7 - no args (ref) ok 8 - 1 in 1 out (ref) ok 9 - one arg (ref) ok 10 - arg count (ref) ok 11 - result different to args (ref) ok 12 - values (ref) ok 13 - can chain calls ok t/sum.t ...... 1..6 ok 1 - no args ok 2 - one arg ok 3 - 4 args ok 4 - one -1 ok 5 - variable arg ok 6 - real numbers ok All tests successful. Files=9, Tests=68, 1 wallclock secs ( 0.15 usr 0.05 sys + 1.39 cusr 0.20 csys = 1.79 CPU) Result: PASS COWENS/autobox-List-Util-20090629.tar.gz make test TEST_VERBOSE=1 -- OK Chas. J. Owens IV <chas.owens@gmail.com> bring the List::Util functions to autobox >>> (cd /export/home/fly1232/var/cpan/build/autobox-List-Util-20090629-GGdW7l && tar cvf - autobox-List-Util-20090629.ppd blib) | gzip -c >/export/home/fly1232/var/REPO/C/CO/COWENS/autobox-List-Util-20090629.tar.gz autobox-List-Util-20090629.ppd blib/ blib/lib/ blib/lib/autobox/ blib/lib/autobox/List/ blib/lib/autobox/List/Util.pm blib/man3/ blib/man3/autobox::List::Util.3 >>> mv /export/home/fly1232/var/cpan/build/autobox-List-Util-20090629-GGdW7l/autobox-List-Util-20090629.ppd /export/home/fly1232/var/REPO/C/CO/COWENS Running test for module 'autovivification' Running make for V/VP/VPIT/autovivification-0.10.tar.gz Prepending /export/home/fly1232/var/cpan/build/autobox-List-Util-20090629-GGdW7l/blib/arch /export/home/fly1232/var/cpan/build/autobox-List-Util-20090629-GGdW7l/blib/lib to PERL5LIB for 'get' Checksum for /net/nas/data/cpan/authors/id/V/VP/VPIT/autovivification-0.10.tar.gz ok autovivification-0.10/ autovivification-0.10/lib/ autovivification-0.10/lib/autovivification.pm autovivification-0.10/t/ autovivification-0.10/t/24-hash-numerous.t autovivification-0.10/t/34-array-numerous.t autovivification-0.10/t/23-hash-tied.t autovivification-0.10/t/lib/ autovivification-0.10/t/lib/Test/ autovivification-0.10/t/lib/Test/Leaner.pm autovivification-0.10/t/lib/autovivification/ autovivification-0.10/t/lib/autovivification/TestRequired6.pm autovivification-0.10/t/lib/autovivification/TestCases.pm autovivification-0.10/t/lib/autovivification/TestRequired1.pm autovivification-0.10/t/lib/autovivification/TestRequired2.pm autovivification-0.10/t/lib/autovivification/TestRequired5/ autovivification-0.10/t/lib/autovivification/TestRequired5/d0.pm autovivification-0.10/t/lib/autovivification/TestRequired5/a0.pm autovivification-0.10/t/lib/autovivification/TestRequired5/b0.pm autovivification-0.10/t/lib/autovivification/TestRequired5/c0.pm autovivification-0.10/t/lib/autovivification/TestRequired4/ autovivification-0.10/t/lib/autovivification/TestRequired4/a0.pm autovivification-0.10/t/lib/autovivification/TestRequired4/b0.pm autovivification-0.10/t/lib/autovivification/TestRequired4/c0.pm autovivification-0.10/t/41-padsv.t autovivification-0.10/t/99-kwalitee.t autovivification-0.10/t/40-scope.t autovivification-0.10/t/33-array-tied.t autovivification-0.10/t/42-deparse.t autovivification-0.10/t/00-load.t autovivification-0.10/t/43-peep.t autovivification-0.10/t/32-array-kv.t autovivification-0.10/t/95-portability-files.t autovivification-0.10/t/31-array-fast.t autovivification-0.10/t/22-hash-kv.t autovivification-0.10/t/92-pod-coverage.t autovivification-0.10/t/20-hash.t autovivification-0.10/t/51-threads-teardown.t autovivification-0.10/t/50-threads.t autovivification-0.10/t/30-array.t autovivification-0.10/t/91-pod.t autovivification-0.10/META.json autovivification-0.10/README autovivification-0.10/Changes autovivification-0.10/reap.h autovivification-0.10/autovivification.xs autovivification-0.10/ptable.h autovivification-0.10/MANIFEST autovivification-0.10/META.yml autovivification-0.10/Makefile.PL autovivification-0.10/samples/ autovivification-0.10/samples/hash2array.pl autovivification-0.10/samples/bench.pl Prepending /export/home/fly1232/var/cpan/build/autobox-List-Util-20090629-GGdW7l/blib/arch /export/home/fly1232/var/cpan/build/autobox-List-Util-20090629-GGdW7l/blib/lib to PERL5LIB for 'make' CPAN.pm: Going to build V/VP/VPIT/autovivification-0.10.tar.gz >>> /export/home/fly1232/bin/perl Makefile.PL Checking if this is gcc 3.4 on Windows trying to link against an import library... no Checking if your kit is complete... Looks good Version::Requirements is deprecated; replace with CPAN::Meta::Requirements at /export/home/fly1232/var/megalib/Version/Requirements.pm line 17. require Version/Requirements.pm called at /export/home/fly1232/var/megalib/CPAN/Meta/Prereqs.pm line 10 CPAN::Meta::Prereqs::BEGIN() called at /export/home/fly1232/var/megalib/Version/Requirements.pm line 0 eval {...} called at /export/home/fly1232/var/megalib/Version/Requirements.pm line 0 require CPAN/Meta/Prereqs.pm called at /export/home/fly1232/var/megalib/CPAN/Meta/Feature.pm line 7 CPAN::Meta::Feature::BEGIN() called at /export/home/fly1232/var/megalib/Version/Requirements.pm line 0 eval {...} called at /export/home/fly1232/var/megalib/Version/Requirements.pm line 0 require CPAN/Meta/Feature.pm called at /export/home/fly1232/var/megalib/CPAN/Meta.pm line 9 CPAN::Meta::BEGIN() called at /export/home/fly1232/var/megalib/Version/Requirements.pm line 0 eval {...} called at /export/home/fly1232/var/megalib/Version/Requirements.pm line 0 require CPAN/Meta.pm called at /export/home/fly1232/var/megalib/ExtUtils/MM_Any.pm line 733 eval {...} called at /export/home/fly1232/var/megalib/ExtUtils/MM_Any.pm line 732 ExtUtils::MM_Any::_has_cpan_meta() called at /export/home/fly1232/var/megalib/ExtUtils/MM_Any.pm line 753 ExtUtils::MM_Any::metafile_target('PACK001=HASH(0x2e4c58)') called at /export/home/fly1232/var/megalib/ExtUtils/MakeMaker.pm line 690 ExtUtils::MakeMaker::new('MM', 'PACK001=HASH(0x2e4c58)') called at /export/home/fly1232/var/megalib/ExtUtils/MakeMaker.pm line 60 ExtUtils::MakeMaker::WriteMakefile('NAME', 'autovivification', 'AUTHOR', 'Vincent Pit ', 'LICENSE', 'perl', 'VERSION_FROM', 'lib/autovivification.pm', 'ABSTRACT_FROM', ...) called at Makefile.PL line 78 Writing Makefile for autovivification Writing MYMETA.yml and MYMETA.json >>> make cp lib/autovivification.pm blib/lib/autovivification.pm /export/home/fly1232/bin/perl /export/home/fly1232/var/megalib/ExtUtils/xsubpp -typemap /export/home/fly1232/ap1205/lib/ExtUtils/typemap autovivification.xs > autovivification.xsc && mv autovivification.xsc autovivification.c cc -c -D_REENTRANT -DUSE_SITECUSTOMIZE -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -O -DVERSION=\"0.10\" -DXS_VERSION=\"0.10\" -KPIC "-I/export/home/fly1232/ap1205/lib/CORE" autovivification.c Running Mkbootstrap for autovivification () chmod 644 autovivification.bs rm -f blib/arch/auto/autovivification/autovivification.so cc -G -L/usr/lib -L/usr/ccs/lib -L/opt/SUNWspro/prod/lib/v8plus -L/opt/SUNWspro/prod/lib -L/lib autovivification.o -o blib/arch/auto/autovivification/autovivification.so \ \ chmod 755 blib/arch/auto/autovivification/autovivification.so cp autovivification.bs blib/arch/auto/autovivification/autovivification.bs chmod 644 blib/arch/auto/autovivification/autovivification.bs Manifying blib/man3/autovivification.3 VPIT/autovivification-0.10.tar.gz make -- OK Prepending /export/home/fly1232/var/cpan/build/autobox-List-Util-20090629-GGdW7l/blib/arch /export/home/fly1232/var/cpan/build/autobox-List-Util-20090629-GGdW7l/blib/lib to PERL5LIB for 'test' Running make test >>> make test TEST_VERBOSE=1 PERL_DL_NONLAZY=1 /export/home/fly1232/bin/perl "-MExtUtils::Command::MM" "-e" "test_harness(1, 'blib/lib', 'blib/arch')" t/*.t # Testing autovivification 0.10, Perl 5.012004, /export/home/fly1232/bin/perl t/00-load.t ............... 1..1 ok 1 - use autovivification; ok t/20-hash.t ............... 1..8154 ok 1 - my $x; $x->{a} [exception] ok 2 - my $x; $x->{a} [return] ok 3 - my $x; $x->{a} [variable] ok 4 - our $x; local $x; use strict; $x->{a} [exception] ok 5 - our $x; local $x; use strict; $x->{a} [return] ok 6 - our $x; local $x; use strict; $x->{a} [variable] ok 7 - our $x; local $x; no strict; $x->{a} [exception] ok 8 - our $x; local $x; no strict; $x->{a} [return] ok 9 - our $x; local $x; no strict; $x->{a} [variable] ok 10 - my $x; $$x{a} [exception] ok 11 - my $x; $$x{a} [return] ok 12 - my $x; $$x{a} [variable] ok 13 - our $x; local $x; use strict; $$x{a} [exception] ok 14 - our $x; local $x; use strict; $$x{a} [return] ok 15 - our $x; local $x; use strict; $$x{a} [variable] ok 16 - our $x; local $x; no strict; $$x{a} [exception] ok 17 - our $x; local $x; no strict; $$x{a} [return] ok 18 - our $x; local $x; no strict; $$x{a} [variable] ok 19 - my %x; $x{a} [exception] ok 20 - my %x; $x{a} [return] ok 21 - my %x; $x{a} [variable] ok 22 - our %x; local %x; use strict; $x{a} [exception] ok 23 - our %x; local %x; use strict; $x{a} [return] ok 24 - our %x; local %x; use strict; $x{a} [variable] ok 25 - our %x; local %x; no strict; $x{a} [exception] ok 26 - our %x; local %x; no strict; $x{a} [return] ok 27 - our %x; local %x; no strict; $x{a} [variable] ok 28 - my $x; $x->{a} [exception] ok 29 - my $x; $x->{a} [return] ok 30 - my $x; $x->{a} [variable] ok 31 - our $x; local $x; use strict; $x->{a} [exception] ok 32 - our $x; local $x; use strict; $x->{a} [return] ok 33 - our $x; local $x; use strict; $x->{a} [variable] ok 34 - our $x; local $x; no strict; $x->{a} [exception] ok 35 - our $x; local $x; no strict; $x->{a} [return] ok 36 - our $x; local $x; no strict; $x->{a} [variable] ok 37 - my $x; $$x{a} [exception] ok 38 - my $x; $$x{a} [return] ok 39 - my $x; $$x{a} [variable] ok 40 - our $x; local $x; use strict; $$x{a} [exception] ok 41 - our $x; local $x; use strict; $$x{a} [return] ok 42 - our $x; local $x; use strict; $$x{a} [variable] ok 43 - our $x; local $x; no strict; $$x{a} [exception] ok 44 - our $x; local $x; no strict; $$x{a} [return] ok 45 - our $x; local $x; no strict; $$x{a} [variable] ok 46 - my %x; $x{a} [exception] ok 47 - my %x; $x{a} [return] ok 48 - my %x; $x{a} [variable] ok 49 - our %x; local %x; use strict; $x{a} [exception] ok 50 - our %x; local %x; use strict; $x{a} [return] ok 51 - our %x; local %x; use strict; $x{a} [variable] ok 52 - our %x; local %x; no strict; $x{a} [exception] ok 53 - our %x; local %x; no strict; $x{a} [return] ok 54 - our %x; local %x; no strict; $x{a} [variable] ok 55 - my $x; $x->{a} <+fetch> [exception] ok 56 - my $x; $x->{a} <+fetch> [return] ok 57 - my $x; $x->{a} <+fetch> [variable] ok 58 - our $x; local $x; use strict; $x->{a} <+fetch> [exception] ok 59 - our $x; local $x; use strict; $x->{a} <+fetch> [return] ok 60 - our $x; local $x; use strict; $x->{a} <+fetch> [variable] ok 61 - our $x; local $x; no strict; $x->{a} <+fetch> [exception] ok 62 - our $x; local $x; no strict; $x->{a} <+fetch> [return] ok 63 - our $x; local $x; no strict; $x->{a} <+fetch> [variable] ok 64 - my $x; $$x{a} <+fetch> [exception] ok 65 - my $x; $$x{a} <+fetch> [return] ok 66 - my $x; $$x{a} <+fetch> [variable] ok 67 - our $x; local $x; use strict; $$x{a} <+fetch> [exception] ok 68 - our $x; local $x; use strict; $$x{a} <+fetch> [return] ok 69 - our $x; local $x; use strict; $$x{a} <+fetch> [variable] ok 70 - our $x; local $x; no strict; $$x{a} <+fetch> [exception] ok 71 - our $x; local $x; no strict; $$x{a} <+fetch> [return] ok 72 - our $x; local $x; no strict; $$x{a} <+fetch> [variable] ok 73 - my %x; $x{a} <+fetch> [exception] ok 74 - my %x; $x{a} <+fetch> [return] ok 75 - my %x; $x{a} <+fetch> [variable] ok 76 - our %x; local %x; use strict; $x{a} <+fetch> [exception] ok 77 - our %x; local %x; use strict; $x{a} <+fetch> [return] ok 78 - our %x; local %x; use strict; $x{a} <+fetch> [variable] ok 79 - our %x; local %x; no strict; $x{a} <+fetch> [exception] ok 80 - our %x; local %x; no strict; $x{a} <+fetch> [return] ok 81 - our %x; local %x; no strict; $x{a} <+fetch> [variable] ok 82 - my $x; $x->{a} <+exists> [exception] ok 83 - my $x; $x->{a} <+exists> [return] ok 84 - my $x; $x->{a} <+exists> [variable] ok 85 - our $x; local $x; use strict; $x->{a} <+exists> [exception] ok 86 - our $x; local $x; use strict; $x->{a} <+exists> [return] ok 87 - our $x; local $x; use strict; $x->{a} <+exists> [variable] ok 88 - our $x; local $x; no strict; $x->{a} <+exists> [exception] ok 89 - our $x; local $x; no strict; $x->{a} <+exists> [return] ok 90 - our $x; local $x; no strict; $x->{a} <+exists> [variable] ok 91 - my $x; $$x{a} <+exists> [exception] ok 92 - my $x; $$x{a} <+exists> [return] ok 93 - my $x; $$x{a} <+exists> [variable] ok 94 - our $x; local $x; use strict; $$x{a} <+exists> [exception] ok 95 - our $x; local $x; use strict; $$x{a} <+exists> [return] ok 96 - our $x; local $x; use strict; $$x{a} <+exists> [variable] ok 97 - our $x; local $x; no strict; $$x{a} <+exists> [exception] ok 98 - our $x; local $x; no strict; $$x{a} <+exists> [return] ok 99 - our $x; local $x; no strict; $$x{a} <+exists> [variable] ok 100 - my %x; $x{a} <+exists> [exception] ok 101 - my %x; $x{a} <+exists> [return] ok 102 - my %x; $x{a} <+exists> [variable] ok 103 - our %x; local %x; use strict; $x{a} <+exists> [exception] ok 104 - our %x; local %x; use strict; $x{a} <+exists> [return] ok 105 - our %x; local %x; use strict; $x{a} <+exists> [variable] ok 106 - our %x; local %x; no strict; $x{a} <+exists> [exception] ok 107 - our %x; local %x; no strict; $x{a} <+exists> [return] ok 108 - our %x; local %x; no strict; $x{a} <+exists> [variable] ok 109 - my $x; $x->{a} <+delete> [exception] ok 110 - my $x; $x->{a} <+delete> [return] ok 111 - my $x; $x->{a} <+delete> [variable] ok 112 - our $x; local $x; use strict; $x->{a} <+delete> [exception] ok 113 - our $x; local $x; use strict; $x->{a} <+delete> [return] ok 114 - our $x; local $x; use strict; $x->{a} <+delete> [variable] ok 115 - our $x; local $x; no strict; $x->{a} <+delete> [exception] ok 116 - our $x; local $x; no strict; $x->{a} <+delete> [return] ok 117 - our $x; local $x; no strict; $x->{a} <+delete> [variable] ok 118 - my $x; $$x{a} <+delete> [exception] ok 119 - my $x; $$x{a} <+delete> [return] ok 120 - my $x; $$x{a} <+delete> [variable] ok 121 - our $x; local $x; use strict; $$x{a} <+delete> [exception] ok 122 - our $x; local $x; use strict; $$x{a} <+delete> [return] ok 123 - our $x; local $x; use strict; $$x{a} <+delete> [variable] ok 124 - our $x; local $x; no strict; $$x{a} <+delete> [exception] ok 125 - our $x; local $x; no strict; $$x{a} <+delete> [return] ok 126 - our $x; local $x; no strict; $$x{a} <+delete> [variable] ok 127 - my %x; $x{a} <+delete> [exception] ok 128 - my %x; $x{a} <+delete> [return] ok 129 - my %x; $x{a} <+delete> [variable] ok 130 - our %x; local %x; use strict; $x{a} <+delete> [exception] ok 131 - our %x; local %x; use strict; $x{a} <+delete> [return] ok 132 - our %x; local %x; use strict; $x{a} <+delete> [variable] ok 133 - our %x; local %x; no strict; $x{a} <+delete> [exception] ok 134 - our %x; local %x; no strict; $x{a} <+delete> [return] ok 135 - our %x; local %x; no strict; $x{a} <+delete> [variable] ok 136 - my $x; $x->{a} <+store> [exception] ok 137 - my $x; $x->{a} <+store> [return] ok 138 - my $x; $x->{a} <+store> [variable] ok 139 - our $x; local $x; use strict; $x->{a} <+store> [exception] ok 140 - our $x; local $x; use strict; $x->{a} <+store> [return] ok 141 - our $x; local $x; use strict; $x->{a} <+store> [variable] ok 142 - our $x; local $x; no strict; $x->{a} <+store> [exception] ok 143 - our $x; local $x; no strict; $x->{a} <+store> [return] ok 144 - our $x; local $x; no strict; $x->{a} <+store> [variable] ok 145 - my $x; $$x{a} <+store> [exception] ok 146 - my $x; $$x{a} <+store> [return] ok 147 - my $x; $$x{a} <+store> [variable] ok 148 - our $x; local $x; use strict; $$x{a} <+store> [exception] ok 149 - our $x; local $x; use strict; $$x{a} <+store> [return] ok 150 - our $x; local $x; use strict; $$x{a} <+store> [variable] ok 151 - our $x; local $x; no strict; $$x{a} <+store> [exception] ok 152 - our $x; local $x; no strict; $$x{a} <+store> [return] ok 153 - our $x; local $x; no strict; $$x{a} <+store> [variable] ok 154 - my %x; $x{a} <+store> [exception] ok 155 - my %x; $x{a} <+store> [return] ok 156 - my %x; $x{a} <+store> [variable] ok 157 - our %x; local %x; use strict; $x{a} <+store> [exception] ok 158 - our %x; local %x; use strict; $x{a} <+store> [return] ok 159 - our %x; local %x; use strict; $x{a} <+store> [variable] ok 160 - our %x; local %x; no strict; $x{a} <+store> [exception] ok 161 - our %x; local %x; no strict; $x{a} <+store> [return] ok 162 - our %x; local %x; no strict; $x{a} <+store> [variable] ok 163 - my $x; $x->{a} <-fetch> [exception] ok 164 - my $x; $x->{a} <-fetch> [return] ok 165 - my $x; $x->{a} <-fetch> [variable] ok 166 - our $x; local $x; use strict; $x->{a} <-fetch> [exception] ok 167 - our $x; local $x; use strict; $x->{a} <-fetch> [return] ok 168 - our $x; local $x; use strict; $x->{a} <-fetch> [variable] ok 169 - our $x; local $x; no strict; $x->{a} <-fetch> [exception] ok 170 - our $x; local $x; no strict; $x->{a} <-fetch> [return] ok 171 - our $x; local $x; no strict; $x->{a} <-fetch> [variable] ok 172 - my $x; $$x{a} <-fetch> [exception] ok 173 - my $x; $$x{a} <-fetch> [return] ok 174 - my $x; $$x{a} <-fetch> [variable] ok 175 - our $x; local $x; use strict; $$x{a} <-fetch> [exception] ok 176 - our $x; local $x; use strict; $$x{a} <-fetch> [return] ok 177 - our $x; local $x; use strict; $$x{a} <-fetch> [variable] ok 178 - our $x; local $x; no strict; $$x{a} <-fetch> [exception] ok 179 - our $x; local $x; no strict; $$x{a} <-fetch> [return] ok 180 - our $x; local $x; no strict; $$x{a} <-fetch> [variable] ok 181 - my %x; $x{a} <-fetch> [exception] ok 182 - my %x; $x{a} <-fetch> [return] ok 183 - my %x; $x{a} <-fetch> [variable] ok 184 - our %x; local %x; use strict; $x{a} <-fetch> [exception] ok 185 - our %x; local %x; use strict; $x{a} <-fetch> [return] ok 186 - our %x; local %x; use strict; $x{a} <-fetch> [variable] ok 187 - our %x; local %x; no strict; $x{a} <-fetch> [exception] ok 188 - our %x; local %x; no strict; $x{a} <-fetch> [return] ok 189 - our %x; local %x; no strict; $x{a} <-fetch> [variable] ok 190 - my $x; $x->{a} <+fetch -fetch> [exception] ok 191 - my $x; $x->{a} <+fetch -fetch> [return] ok 192 - my $x; $x->{a} <+fetch -fetch> [variable] ok 193 - our $x; local $x; use strict; $x->{a} <+fetch -fetch> [exception] ok 194 - our $x; local $x; use strict; $x->{a} <+fetch -fetch> [return] ok 195 - our $x; local $x; use strict; $x->{a} <+fetch -fetch> [variable] ok 196 - our $x; local $x; no strict; $x->{a} <+fetch -fetch> [exception] ok 197 - our $x; local $x; no strict; $x->{a} <+fetch -fetch> [return] ok 198 - our $x; local $x; no strict; $x->{a} <+fetch -fetch> [variable] ok 199 - my $x; $$x{a} <+fetch -fetch> [exception] ok 200 - my $x; $$x{a} <+fetch -fetch> [return] ok 201 - my $x; $$x{a} <+fetch -fetch> [variable] ok 202 - our $x; local $x; use strict; $$x{a} <+fetch -fetch> [exception] ok 203 - our $x; local $x; use strict; $$x{a} <+fetch -fetch> [return] ok 204 - our $x; local $x; use strict; $$x{a} <+fetch -fetch> [variable] ok 205 - our $x; local $x; no strict; $$x{a} <+fetch -fetch> [exception] ok 206 - our $x; local $x; no strict; $$x{a} <+fetch -fetch> [return] ok 207 - our $x; local $x; no strict; $$x{a} <+fetch -fetch> [variable] ok 208 - my %x; $x{a} <+fetch -fetch> [exception] ok 209 - my %x; $x{a} <+fetch -fetch> [return] ok 210 - my %x; $x{a} <+fetch -fetch> [variable] ok 211 - our %x; local %x; use strict; $x{a} <+fetch -fetch> [exception] ok 212 - our %x; local %x; use strict; $x{a} <+fetch -fetch> [return] ok 213 - our %x; local %x; use strict; $x{a} <+fetch -fetch> [variable] ok 214 - our %x; local %x; no strict; $x{a} <+fetch -fetch> [exception] ok 215 - our %x; local %x; no strict; $x{a} <+fetch -fetch> [return] ok 216 - our %x; local %x; no strict; $x{a} <+fetch -fetch> [variable] ok 217 - my $x; $x->{a} <-fetch +fetch> [exception] ok 218 - my $x; $x->{a} <-fetch +fetch> [return] ok 219 - my $x; $x->{a} <-fetch +fetch> [variable] ok 220 - our $x; local $x; use strict; $x->{a} <-fetch +fetch> [exception] ok 221 - our $x; local $x; use strict; $x->{a} <-fetch +fetch> [return] ok 222 - our $x; local $x; use strict; $x->{a} <-fetch +fetch> [variable] ok 223 - our $x; local $x; no strict; $x->{a} <-fetch +fetch> [exception] ok 224 - our $x; local $x; no strict; $x->{a} <-fetch +fetch> [return] ok 225 - our $x; local $x; no strict; $x->{a} <-fetch +fetch> [variable] ok 226 - my $x; $$x{a} <-fetch +fetch> [exception] ok 227 - my $x; $$x{a} <-fetch +fetch> [return] ok 228 - my $x; $$x{a} <-fetch +fetch> [variable] ok 229 - our $x; local $x; use strict; $$x{a} <-fetch +fetch> [exception] ok 230 - our $x; local $x; use strict; $$x{a} <-fetch +fetch> [return] ok 231 - our $x; local $x; use strict; $$x{a} <-fetch +fetch> [variable] ok 232 - our $x; local $x; no strict; $$x{a} <-fetch +fetch> [exception] ok 233 - our $x; local $x; no strict; $$x{a} <-fetch +fetch> [return] ok 234 - our $x; local $x; no strict; $$x{a} <-fetch +fetch> [variable] ok 235 - my %x; $x{a} <-fetch +fetch> [exception] ok 236 - my %x; $x{a} <-fetch +fetch> [return] ok 237 - my %x; $x{a} <-fetch +fetch> [variable] ok 238 - our %x; local %x; use strict; $x{a} <-fetch +fetch> [exception] ok 239 - our %x; local %x; use strict; $x{a} <-fetch +fetch> [return] ok 240 - our %x; local %x; use strict; $x{a} <-fetch +fetch> [variable] ok 241 - our %x; local %x; no strict; $x{a} <-fetch +fetch> [exception] ok 242 - our %x; local %x; no strict; $x{a} <-fetch +fetch> [return] ok 243 - our %x; local %x; no strict; $x{a} <-fetch +fetch> [variable] ok 244 - my $x; $x->{a} <+fetch -exists> [exception] ok 245 - my $x; $x->{a} <+fetch -exists> [return] ok 246 - my $x; $x->{a} <+fetch -exists> [variable] ok 247 - our $x; local $x; use strict; $x->{a} <+fetch -exists> [exception] ok 248 - our $x; local $x; use strict; $x->{a} <+fetch -exists> [return] ok 249 - our $x; local $x; use strict; $x->{a} <+fetch -exists> [variable] ok 250 - our $x; local $x; no strict; $x->{a} <+fetch -exists> [exception] ok 251 - our $x; local $x; no strict; $x->{a} <+fetch -exists> [return] ok 252 - our $x; local $x; no strict; $x->{a} <+fetch -exists> [variable] ok 253 - my $x; $$x{a} <+fetch -exists> [exception] ok 254 - my $x; $$x{a} <+fetch -exists> [return] ok 255 - my $x; $$x{a} <+fetch -exists> [variable] ok 256 - our $x; local $x; use strict; $$x{a} <+fetch -exists> [exception] ok 257 - our $x; local $x; use strict; $$x{a} <+fetch -exists> [return] ok 258 - our $x; local $x; use strict; $$x{a} <+fetch -exists> [variable] ok 259 - our $x; local $x; no strict; $$x{a} <+fetch -exists> [exception] ok 260 - our $x; local $x; no strict; $$x{a} <+fetch -exists> [return] ok 261 - our $x; local $x; no strict; $$x{a} <+fetch -exists> [variable] ok 262 - my %x; $x{a} <+fetch -exists> [exception] ok 263 - my %x; $x{a} <+fetch -exists> [return] ok 264 - my %x; $x{a} <+fetch -exists> [variable] ok 265 - our %x; local %x; use strict; $x{a} <+fetch -exists> [exception] ok 266 - our %x; local %x; use strict; $x{a} <+fetch -exists> [return] ok 267 - our %x; local %x; use strict; $x{a} <+fetch -exists> [variable] ok 268 - our %x; local %x; no strict; $x{a} <+fetch -exists> [exception] ok 269 - our %x; local %x; no strict; $x{a} <+fetch -exists> [return] ok 270 - our %x; local %x; no strict; $x{a} <+fetch -exists> [variable] ok 271 - my $x; $x->{a} <+strict +fetch> [exception] ok 272 - my $x; $x->{a} <+strict +fetch> [return] ok 273 - my $x; $x->{a} <+strict +fetch> [variable] ok 274 - our $x; local $x; use strict; $x->{a} <+strict +fetch> [exception] ok 275 - our $x; local $x; use strict; $x->{a} <+strict +fetch> [return] ok 276 - our $x; local $x; use strict; $x->{a} <+strict +fetch> [variable] ok 277 - our $x; local $x; no strict; $x->{a} <+strict +fetch> [exception] ok 278 - our $x; local $x; no strict; $x->{a} <+strict +fetch> [return] ok 279 - our $x; local $x; no strict; $x->{a} <+strict +fetch> [variable] ok 280 - my $x; $$x{a} <+strict +fetch> [exception] ok 281 - my $x; $$x{a} <+strict +fetch> [return] ok 282 - my $x; $$x{a} <+strict +fetch> [variable] ok 283 - our $x; local $x; use strict; $$x{a} <+strict +fetch> [exception] ok 284 - our $x; local $x; use strict; $$x{a} <+strict +fetch> [return] ok 285 - our $x; local $x; use strict; $$x{a} <+strict +fetch> [variable] ok 286 - our $x; local $x; no strict; $$x{a} <+strict +fetch> [exception] ok 287 - our $x; local $x; no strict; $$x{a} <+strict +fetch> [return] ok 288 - our $x; local $x; no strict; $$x{a} <+strict +fetch> [variable] ok 289 - my %x; 1 <+strict +fetch> [exception] ok 290 - my %x; 1 <+strict +fetch> [return] ok 291 - my %x; 1 <+strict +fetch> [variable] ok 292 - our %x; local %x; use strict; 1 <+strict +fetch> [exception] ok 293 - our %x; local %x; use strict; 1 <+strict +fetch> [return] ok 294 - our %x; local %x; use strict; 1 <+strict +fetch> [variable] ok 295 - our %x; local %x; no strict; 1 <+strict +fetch> [exception] ok 296 - our %x; local %x; no strict; 1 <+strict +fetch> [return] ok 297 - our %x; local %x; no strict; 1 <+strict +fetch> [variable] ok 298 - my $x; $x->{a} <+strict +exists> [exception] ok 299 - my $x; $x->{a} <+strict +exists> [return] ok 300 - my $x; $x->{a} <+strict +exists> [variable] ok 301 - our $x; local $x; use strict; $x->{a} <+strict +exists> [exception] ok 302 - our $x; local $x; use strict; $x->{a} <+strict +exists> [return] ok 303 - our $x; local $x; use strict; $x->{a} <+strict +exists> [variable] ok 304 - our $x; local $x; no strict; $x->{a} <+strict +exists> [exception] ok 305 - our $x; local $x; no strict; $x->{a} <+strict +exists> [return] ok 306 - our $x; local $x; no strict; $x->{a} <+strict +exists> [variable] ok 307 - my $x; $$x{a} <+strict +exists> [exception] ok 308 - my $x; $$x{a} <+strict +exists> [return] ok 309 - my $x; $$x{a} <+strict +exists> [variable] ok 310 - our $x; local $x; use strict; $$x{a} <+strict +exists> [exception] ok 311 - our $x; local $x; use strict; $$x{a} <+strict +exists> [return] ok 312 - our $x; local $x; use strict; $$x{a} <+strict +exists> [variable] ok 313 - our $x; local $x; no strict; $$x{a} <+strict +exists> [exception] ok 314 - our $x; local $x; no strict; $$x{a} <+strict +exists> [return] ok 315 - our $x; local $x; no strict; $$x{a} <+strict +exists> [variable] ok 316 - my %x; $x{a} <+strict +exists> [exception] ok 317 - my %x; $x{a} <+strict +exists> [return] ok 318 - my %x; $x{a} <+strict +exists> [variable] ok 319 - our %x; local %x; use strict; $x{a} <+strict +exists> [exception] ok 320 - our %x; local %x; use strict; $x{a} <+strict +exists> [return] ok 321 - our %x; local %x; use strict; $x{a} <+strict +exists> [variable] ok 322 - our %x; local %x; no strict; $x{a} <+strict +exists> [exception] ok 323 - our %x; local %x; no strict; $x{a} <+strict +exists> [return] ok 324 - our %x; local %x; no strict; $x{a} <+strict +exists> [variable] ok 325 - my $x; $x->{a} <+strict +delete> [exception] ok 326 - my $x; $x->{a} <+strict +delete> [return] ok 327 - my $x; $x->{a} <+strict +delete> [variable] ok 328 - our $x; local $x; use strict; $x->{a} <+strict +delete> [exception] ok 329 - our $x; local $x; use strict; $x->{a} <+strict +delete> [return] ok 330 - our $x; local $x; use strict; $x->{a} <+strict +delete> [variable] ok 331 - our $x; local $x; no strict; $x->{a} <+strict +delete> [exception] ok 332 - our $x; local $x; no strict; $x->{a} <+strict +delete> [return] ok 333 - our $x; local $x; no strict; $x->{a} <+strict +delete> [variable] ok 334 - my $x; $$x{a} <+strict +delete> [exception] ok 335 - my $x; $$x{a} <+strict +delete> [return] ok 336 - my $x; $$x{a} <+strict +delete> [variable] ok 337 - our $x; local $x; use strict; $$x{a} <+strict +delete> [exception] ok 338 - our $x; local $x; use strict; $$x{a} <+strict +delete> [return] ok 339 - our $x; local $x; use strict; $$x{a} <+strict +delete> [variable] ok 340 - our $x; local $x; no strict; $$x{a} <+strict +delete> [exception] ok 341 - our $x; local $x; no strict; $$x{a} <+strict +delete> [return] ok 342 - our $x; local $x; no strict; $$x{a} <+strict +delete> [variable] ok 343 - my %x; $x{a} <+strict +delete> [exception] ok 344 - my %x; $x{a} <+strict +delete> [return] ok 345 - my %x; $x{a} <+strict +delete> [variable] ok 346 - our %x; local %x; use strict; $x{a} <+strict +delete> [exception] ok 347 - our %x; local %x; use strict; $x{a} <+strict +delete> [return] ok 348 - our %x; local %x; use strict; $x{a} <+strict +delete> [variable] ok 349 - our %x; local %x; no strict; $x{a} <+strict +delete> [exception] ok 350 - our %x; local %x; no strict; $x{a} <+strict +delete> [return] ok 351 - our %x; local %x; no strict; $x{a} <+strict +delete> [variable] ok 352 - my $x; $x->{a} <+strict +store> [exception] ok 353 - my $x; $x->{a} <+strict +store> [return] ok 354 - my $x; $x->{a} <+strict +store> [variable] ok 355 - our $x; local $x; use strict; $x->{a} <+strict +store> [exception] ok 356 - our $x; local $x; use strict; $x->{a} <+strict +store> [return] ok 357 - our $x; local $x; use strict; $x->{a} <+strict +store> [variable] ok 358 - our $x; local $x; no strict; $x->{a} <+strict +store> [exception] ok 359 - our $x; local $x; no strict; $x->{a} <+strict +store> [return] ok 360 - our $x; local $x; no strict; $x->{a} <+strict +store> [variable] ok 361 - my $x; $$x{a} <+strict +store> [exception] ok 362 - my $x; $$x{a} <+strict +store> [return] ok 363 - my $x; $$x{a} <+strict +store> [variable] ok 364 - our $x; local $x; use strict; $$x{a} <+strict +store> [exception] ok 365 - our $x; local $x; use strict; $$x{a} <+strict +store> [return] ok 366 - our $x; local $x; use strict; $$x{a} <+strict +store> [variable] ok 367 - our $x; local $x; no strict; $$x{a} <+strict +store> [exception] ok 368 - our $x; local $x; no strict; $$x{a} <+strict +store> [return] ok 369 - our $x; local $x; no strict; $$x{a} <+strict +store> [variable] ok 370 - my %x; $x{a} <+strict +store> [exception] ok 371 - my %x; $x{a} <+strict +store> [return] ok 372 - my %x; $x{a} <+strict +store> [variable] ok 373 - our %x; local %x; use strict; $x{a} <+strict +store> [exception] ok 374 - our %x; local %x; use strict; $x{a} <+strict +store> [return] ok 375 - our %x; local %x; use strict; $x{a} <+strict +store> [variable] ok 376 - our %x; local %x; no strict; $x{a} <+strict +store> [exception] ok 377 - our %x; local %x; no strict; $x{a} <+strict +store> [return] ok 378 - our %x; local %x; no strict; $x{a} <+strict +store> [variable] ok 379 - my $x; $x->{a}->{b} [exception] ok 380 - my $x; $x->{a}->{b} [return] ok 381 - my $x; $x->{a}->{b} [variable] ok 382 - our $x; local $x; use strict; $x->{a}->{b} [exception] ok 383 - our $x; local $x; use strict; $x->{a}->{b} [return] ok 384 - our $x; local $x; use strict; $x->{a}->{b} [variable] ok 385 - our $x; local $x; no strict; $x->{a}->{b} [exception] ok 386 - our $x; local $x; no strict; $x->{a}->{b} [return] ok 387 - our $x; local $x; no strict; $x->{a}->{b} [variable] ok 388 - my $x; $$x{a}->{b} [exception] ok 389 - my $x; $$x{a}->{b} [return] ok 390 - my $x; $$x{a}->{b} [variable] ok 391 - our $x; local $x; use strict; $$x{a}->{b} [exception] ok 392 - our $x; local $x; use strict; $$x{a}->{b} [return] ok 393 - our $x; local $x; use strict; $$x{a}->{b} [variable] ok 394 - our $x; local $x; no strict; $$x{a}->{b} [exception] ok 395 - our $x; local $x; no strict; $$x{a}->{b} [return] ok 396 - our $x; local $x; no strict; $$x{a}->{b} [variable] ok 397 - my %x; $x{a}->{b} [exception] ok 398 - my %x; $x{a}->{b} [return] ok 399 - my %x; $x{a}->{b} [variable] ok 400 - our %x; local %x; use strict; $x{a}->{b} [exception] ok 401 - our %x; local %x; use strict; $x{a}->{b} [return] ok 402 - our %x; local %x; use strict; $x{a}->{b} [variable] ok 403 - our %x; local %x; no strict; $x{a}->{b} [exception] ok 404 - our %x; local %x; no strict; $x{a}->{b} [return] ok 405 - our %x; local %x; no strict; $x{a}->{b} [variable] ok 406 - my $x; $x->{a}->{b} [exception] ok 407 - my $x; $x->{a}->{b} [return] ok 408 - my $x; $x->{a}->{b} [variable] ok 409 - our $x; local $x; use strict; $x->{a}->{b} [exception] ok 410 - our $x; local $x; use strict; $x->{a}->{b} [return] ok 411 - our $x; local $x; use strict; $x->{a}->{b} [variable] ok 412 - our $x; local $x; no strict; $x->{a}->{b} [exception] ok 413 - our $x; local $x; no strict; $x->{a}->{b} [return] ok 414 - our $x; local $x; no strict; $x->{a}->{b} [variable] ok 415 - my $x; $$x{a}->{b} [exception] ok 416 - my $x; $$x{a}->{b} [return] ok 417 - my $x; $$x{a}->{b} [variable] ok 418 - our $x; local $x; use strict; $$x{a}->{b} [exception] ok 419 - our $x; local $x; use strict; $$x{a}->{b} [return] ok 420 - our $x; local $x; use strict; $$x{a}->{b} [variable] ok 421 - our $x; local $x; no strict; $$x{a}->{b} [exception] ok 422 - our $x; local $x; no strict; $$x{a}->{b} [return] ok 423 - our $x; local $x; no strict; $$x{a}->{b} [variable] ok 424 - my %x; $x{a}->{b} [exception] ok 425 - my %x; $x{a}->{b} [return] ok 426 - my %x; $x{a}->{b} [variable] ok 427 - our %x; local %x; use strict; $x{a}->{b} [exception] ok 428 - our %x; local %x; use strict; $x{a}->{b} [return] ok 429 - our %x; local %x; use strict; $x{a}->{b} [variable] ok 430 - our %x; local %x; no strict; $x{a}->{b} [exception] ok 431 - our %x; local %x; no strict; $x{a}->{b} [return] ok 432 - our %x; local %x; no strict; $x{a}->{b} [variable] ok 433 - my $x; $x->{a}->{b} <+fetch> [exception] ok 434 - my $x; $x->{a}->{b} <+fetch> [return] ok 435 - my $x; $x->{a}->{b} <+fetch> [variable] ok 436 - our $x; local $x; use strict; $x->{a}->{b} <+fetch> [exception] ok 437 - our $x; local $x; use strict; $x->{a}->{b} <+fetch> [return] ok 438 - our $x; local $x; use strict; $x->{a}->{b} <+fetch> [variable] ok 439 - our $x; local $x; no strict; $x->{a}->{b} <+fetch> [exception] ok 440 - our $x; local $x; no strict; $x->{a}->{b} <+fetch> [return] ok 441 - our $x; local $x; no strict; $x->{a}->{b} <+fetch> [variable] ok 442 - my $x; $$x{a}->{b} <+fetch> [exception] ok 443 - my $x; $$x{a}->{b} <+fetch> [return] ok 444 - my $x; $$x{a}->{b} <+fetch> [variable] ok 445 - our $x; local $x; use strict; $$x{a}->{b} <+fetch> [exception] ok 446 - our $x; local $x; use strict; $$x{a}->{b} <+fetch> [return] ok 447 - our $x; local $x; use strict; $$x{a}->{b} <+fetch> [variable] ok 448 - our $x; local $x; no strict; $$x{a}->{b} <+fetch> [exception] ok 449 - our $x; local $x; no strict; $$x{a}->{b} <+fetch> [return] ok 450 - our $x; local $x; no strict; $$x{a}->{b} <+fetch> [variable] ok 451 - my %x; $x{a}->{b} <+fetch> [exception] ok 452 - my %x; $x{a}->{b} <+fetch> [return] ok 453 - my %x; $x{a}->{b} <+fetch> [variable] ok 454 - our %x; local %x; use strict; $x{a}->{b} <+fetch> [exception] ok 455 - our %x; local %x; use strict; $x{a}->{b} <+fetch> [return] ok 456 - our %x; local %x; use strict; $x{a}->{b} <+fetch> [variable] ok 457 - our %x; local %x; no strict; $x{a}->{b} <+fetch> [exception] ok 458 - our %x; local %x; no strict; $x{a}->{b} <+fetch> [return] ok 459 - our %x; local %x; no strict; $x{a}->{b} <+fetch> [variable] ok 460 - my $x; $x->{a}->{b} <+exists> [exception] ok 461 - my $x; $x->{a}->{b} <+exists> [return] ok 462 - my $x; $x->{a}->{b} <+exists> [variable] ok 463 - our $x; local $x; use strict; $x->{a}->{b} <+exists> [exception] ok 464 - our $x; local $x; use strict; $x->{a}->{b} <+exists> [return] ok 465 - our $x; local $x; use strict; $x->{a}->{b} <+exists> [variable] ok 466 - our $x; local $x; no strict; $x->{a}->{b} <+exists> [exception] ok 467 - our $x; local $x; no strict; $x->{a}->{b} <+exists> [return] ok 468 - our $x; local $x; no strict; $x->{a}->{b} <+exists> [variable] ok 469 - my $x; $$x{a}->{b} <+exists> [exception] ok 470 - my $x; $$x{a}->{b} <+exists> [return] ok 471 - my $x; $$x{a}->{b} <+exists> [variable] ok 472 - our $x; local $x; use strict; $$x{a}->{b} <+exists> [exception] ok 473 - our $x; local $x; use strict; $$x{a}->{b} <+exists> [return] ok 474 - our $x; local $x; use strict; $$x{a}->{b} <+exists> [variable] ok 475 - our $x; local $x; no strict; $$x{a}->{b} <+exists> [exception] ok 476 - our $x; local $x; no strict; $$x{a}->{b} <+exists> [return] ok 477 - our $x; local $x; no strict; $$x{a}->{b} <+exists> [variable] ok 478 - my %x; $x{a}->{b} <+exists> [exception] ok 479 - my %x; $x{a}->{b} <+exists> [return] ok 480 - my %x; $x{a}->{b} <+exists> [variable] ok 481 - our %x; local %x; use strict; $x{a}->{b} <+exists> [exception] ok 482 - our %x; local %x; use strict; $x{a}->{b} <+exists> [return] ok 483 - our %x; local %x; use strict; $x{a}->{b} <+exists> [variable] ok 484 - our %x; local %x; no strict; $x{a}->{b} <+exists> [exception] ok 485 - our %x; local %x; no strict; $x{a}->{b} <+exists> [return] ok 486 - our %x; local %x; no strict; $x{a}->{b} <+exists> [variable] ok 487 - my $x; $x->{a}->{b} <+delete> [exception] ok 488 - my $x; $x->{a}->{b} <+delete> [return] ok 489 - my $x; $x->{a}->{b} <+delete> [variable] ok 490 - our $x; local $x; use strict; $x->{a}->{b} <+delete> [exception] ok 491 - our $x; local $x; use strict; $x->{a}->{b} <+delete> [return] ok 492 - our $x; local $x; use strict; $x->{a}->{b} <+delete> [variable] ok 493 - our $x; local $x; no strict; $x->{a}->{b} <+delete> [exception] ok 494 - our $x; local $x; no strict; $x->{a}->{b} <+delete> [return] ok 495 - our $x; local $x; no strict; $x->{a}->{b} <+delete> [variable] ok 496 - my $x; $$x{a}->{b} <+delete> [exception] ok 497 - my $x; $$x{a}->{b} <+delete> [return] ok 498 - my $x; $$x{a}->{b} <+delete> [variable] ok 499 - our $x; local $x; use strict; $$x{a}->{b} <+delete> [exception] ok 500 - our $x; local $x; use strict; $$x{a}->{b} <+delete> [return] ok 501 - our $x; local $x; use strict; $$x{a}->{b} <+delete> [variable] ok 502 - our $x; local $x; no strict; $$x{a}->{b} <+delete> [exception] ok 503 - our $x; local $x; no strict; $$x{a}->{b} <+delete> [return] ok 504 - our $x; local $x; no strict; $$x{a}->{b} <+delete> [variable] ok 505 - my %x; $x{a}->{b} <+delete> [exception] ok 506 - my %x; $x{a}->{b} <+delete> [return] ok 507 - my %x; $x{a}->{b} <+delete> [variable] ok 508 - our %x; local %x; use strict; $x{a}->{b} <+delete> [exception] ok 509 - our %x; local %x; use strict; $x{a}->{b} <+delete> [return] ok 510 - our %x; local %x; use strict; $x{a}->{b} <+delete> [variable] ok 511 - our %x; local %x; no strict; $x{a}->{b} <+delete> [exception] ok 512 - our %x; local %x; no strict; $x{a}->{b} <+delete> [return] ok 513 - our %x; local %x; no strict; $x{a}->{b} <+delete> [variable] ok 514 - my $x; $x->{a}->{b} <+store> [exception] ok 515 - my $x; $x->{a}->{b} <+store> [return] ok 516 - my $x; $x->{a}->{b} <+store> [variable] ok 517 - our $x; local $x; use strict; $x->{a}->{b} <+store> [exception] ok 518 - our $x; local $x; use strict; $x->{a}->{b} <+store> [return] ok 519 - our $x; local $x; use strict; $x->{a}->{b} <+store> [variable] ok 520 - our $x; local $x; no strict; $x->{a}->{b} <+store> [exception] ok 521 - our $x; local $x; no strict; $x->{a}->{b} <+store> [return] ok 522 - our $x; local $x; no strict; $x->{a}->{b} <+store> [variable] ok 523 - my $x; $$x{a}->{b} <+store> [exception] ok 524 - my $x; $$x{a}->{b} <+store> [return] ok 525 - my $x; $$x{a}->{b} <+store> [variable] ok 526 - our $x; local $x; use strict; $$x{a}->{b} <+store> [exception] ok 527 - our $x; local $x; use strict; $$x{a}->{b} <+store> [return] ok 528 - our $x; local $x; use strict; $$x{a}->{b} <+store> [variable] ok 529 - our $x; local $x; no strict; $$x{a}->{b} <+store> [exception] ok 530 - our $x; local $x; no strict; $$x{a}->{b} <+store> [return] ok 531 - our $x; local $x; no strict; $$x{a}->{b} <+store> [variable] ok 532 - my %x; $x{a}->{b} <+store> [exception] ok 533 - my %x; $x{a}->{b} <+store> [return] ok 534 - my %x; $x{a}->{b} <+store> [variable] ok 535 - our %x; local %x; use strict; $x{a}->{b} <+store> [exception] ok 536 - our %x; local %x; use strict; $x{a}->{b} <+store> [return] ok 537 - our %x; local %x; use strict; $x{a}->{b} <+store> [variable] ok 538 - our %x; local %x; no strict; $x{a}->{b} <+store> [exception] ok 539 - our %x; local %x; no strict; $x{a}->{b} <+store> [return] ok 540 - our %x; local %x; no strict; $x{a}->{b} <+store> [variable] ok 541 - my $x; $x->{a}->{b} <+strict +fetch> [exception] ok 542 - my $x; $x->{a}->{b} <+strict +fetch> [return] ok 543 - my $x; $x->{a}->{b} <+strict +fetch> [variable] ok 544 - our $x; local $x; use strict; $x->{a}->{b} <+strict +fetch> [exception] ok 545 - our $x; local $x; use strict; $x->{a}->{b} <+strict +fetch> [return] ok 546 - our $x; local $x; use strict; $x->{a}->{b} <+strict +fetch> [variable] ok 547 - our $x; local $x; no strict; $x->{a}->{b} <+strict +fetch> [exception] ok 548 - our $x; local $x; no strict; $x->{a}->{b} <+strict +fetch> [return] ok 549 - our $x; local $x; no strict; $x->{a}->{b} <+strict +fetch> [variable] ok 550 - my $x; $$x{a}->{b} <+strict +fetch> [exception] ok 551 - my $x; $$x{a}->{b} <+strict +fetch> [return] ok 552 - my $x; $$x{a}->{b} <+strict +fetch> [variable] ok 553 - our $x; local $x; use strict; $$x{a}->{b} <+strict +fetch> [exception] ok 554 - our $x; local $x; use strict; $$x{a}->{b} <+strict +fetch> [return] ok 555 - our $x; local $x; use strict; $$x{a}->{b} <+strict +fetch> [variable] ok 556 - our $x; local $x; no strict; $$x{a}->{b} <+strict +fetch> [exception] ok 557 - our $x; local $x; no strict; $$x{a}->{b} <+strict +fetch> [return] ok 558 - our $x; local $x; no strict; $$x{a}->{b} <+strict +fetch> [variable] ok 559 - my %x; $x{a}->{b} <+strict +fetch> [exception] ok 560 - my %x; $x{a}->{b} <+strict +fetch> [return] ok 561 - my %x; $x{a}->{b} <+strict +fetch> [variable] ok 562 - our %x; local %x; use strict; $x{a}->{b} <+strict +fetch> [exception] ok 563 - our %x; local %x; use strict; $x{a}->{b} <+strict +fetch> [return] ok 564 - our %x; local %x; use strict; $x{a}->{b} <+strict +fetch> [variable] ok 565 - our %x; local %x; no strict; $x{a}->{b} <+strict +fetch> [exception] ok 566 - our %x; local %x; no strict; $x{a}->{b} <+strict +fetch> [return] ok 567 - our %x; local %x; no strict; $x{a}->{b} <+strict +fetch> [variable] ok 568 - my $x; $x->{a}->{b} <+strict +exists> [exception] ok 569 - my $x; $x->{a}->{b} <+strict +exists> [return] ok 570 - my $x; $x->{a}->{b} <+strict +exists> [variable] ok 571 - our $x; local $x; use strict; $x->{a}->{b} <+strict +exists> [exception] ok 572 - our $x; local $x; use strict; $x->{a}->{b} <+strict +exists> [return] ok 573 - our $x; local $x; use strict; $x->{a}->{b} <+strict +exists> [variable] ok 574 - our $x; local $x; no strict; $x->{a}->{b} <+strict +exists> [exception] ok 575 - our $x; local $x; no strict; $x->{a}->{b} <+strict +exists> [return] ok 576 - our $x; local $x; no strict; $x->{a}->{b} <+strict +exists> [variable] ok 577 - my $x; $$x{a}->{b} <+strict +exists> [exception] ok 578 - my $x; $$x{a}->{b} <+strict +exists> [return] ok 579 - my $x; $$x{a}->{b} <+strict +exists> [variable] ok 580 - our $x; local $x; use strict; $$x{a}->{b} <+strict +exists> [exception] ok 581 - our $x; local $x; use strict; $$x{a}->{b} <+strict +exists> [return] ok 582 - our $x; local $x; use strict; $$x{a}->{b} <+strict +exists> [variable] ok 583 - our $x; local $x; no strict; $$x{a}->{b} <+strict +exists> [exception] ok 584 - our $x; local $x; no strict; $$x{a}->{b} <+strict +exists> [return] ok 585 - our $x; local $x; no strict; $$x{a}->{b} <+strict +exists> [variable] ok 586 - my %x; $x{a}->{b} <+strict +exists> [exception] ok 587 - my %x; $x{a}->{b} <+strict +exists> [return] ok 588 - my %x; $x{a}->{b} <+strict +exists> [variable] ok 589 - our %x; local %x; use strict; $x{a}->{b} <+strict +exists> [exception] ok 590 - our %x; local %x; use strict; $x{a}->{b} <+strict +exists> [return] ok 591 - our %x; local %x; use strict; $x{a}->{b} <+strict +exists> [variable] ok 592 - our %x; local %x; no strict; $x{a}->{b} <+strict +exists> [exception] ok 593 - our %x; local %x; no strict; $x{a}->{b} <+strict +exists> [return] ok 594 - our %x; local %x; no strict; $x{a}->{b} <+strict +exists> [variable] ok 595 - my $x; $x->{a}->{b} <+strict +delete> [exception] ok 596 - my $x; $x->{a}->{b} <+strict +delete> [return] ok 597 - my $x; $x->{a}->{b} <+strict +delete> [variable] ok 598 - our $x; local $x; use strict; $x->{a}->{b} <+strict +delete> [exception] ok 599 - our $x; local $x; use strict; $x->{a}->{b} <+strict +delete> [return] ok 600 - our $x; local $x; use strict; $x->{a}->{b} <+strict +delete> [variable] ok 601 - our $x; local $x; no strict; $x->{a}->{b} <+strict +delete> [exception] ok 602 - our $x; local $x; no strict; $x->{a}->{b} <+strict +delete> [return] ok 603 - our $x; local $x; no strict; $x->{a}->{b} <+strict +delete> [variable] ok 604 - my $x; $$x{a}->{b} <+strict +delete> [exception] ok 605 - my $x; $$x{a}->{b} <+strict +delete> [return] ok 606 - my $x; $$x{a}->{b} <+strict +delete> [variable] ok 607 - our $x; local $x; use strict; $$x{a}->{b} <+strict +delete> [exception] ok 608 - our $x; local $x; use strict; $$x{a}->{b} <+strict +delete> [return] ok 609 - our $x; local $x; use strict; $$x{a}->{b} <+strict +delete> [variable] ok 610 - our $x; local $x; no strict; $$x{a}->{b} <+strict +delete> [exception] ok 611 - our $x; local $x; no strict; $$x{a}->{b} <+strict +delete> [return] ok 612 - our $x; local $x; no strict; $$x{a}->{b} <+strict +delete> [variable] ok 613 - my %x; $x{a}->{b} <+strict +delete> [exception] ok 614 - my %x; $x{a}->{b} <+strict +delete> [return] ok 615 - my %x; $x{a}->{b} <+strict +delete> [variable] ok 616 - our %x; local %x; use strict; $x{a}->{b} <+strict +delete> [exception] ok 617 - our %x; local %x; use strict; $x{a}->{b} <+strict +delete> [return] ok 618 - our %x; local %x; use strict; $x{a}->{b} <+strict +delete> [variable] ok 619 - our %x; local %x; no strict; $x{a}->{b} <+strict +delete> [exception] ok 620 - our %x; local %x; no strict; $x{a}->{b} <+strict +delete> [return] ok 621 - our %x; local %x; no strict; $x{a}->{b} <+strict +delete> [variable] ok 622 - my $x; $x->{a}->{b} <+strict +store> [exception] ok 623 - my $x; $x->{a}->{b} <+strict +store> [return] ok 624 - my $x; $x->{a}->{b} <+strict +store> [variable] ok 625 - our $x; local $x; use strict; $x->{a}->{b} <+strict +store> [exception] ok 626 - our $x; local $x; use strict; $x->{a}->{b} <+strict +store> [return] ok 627 - our $x; local $x; use strict; $x->{a}->{b} <+strict +store> [variable] ok 628 - our $x; local $x; no strict; $x->{a}->{b} <+strict +store> [exception] ok 629 - our $x; local $x; no strict; $x->{a}->{b} <+strict +store> [return] ok 630 - our $x; local $x; no strict; $x->{a}->{b} <+strict +store> [variable] ok 631 - my $x; $$x{a}->{b} <+strict +store> [exception] ok 632 - my $x; $$x{a}->{b} <+strict +store> [return] ok 633 - my $x; $$x{a}->{b} <+strict +store> [variable] ok 634 - our $x; local $x; use strict; $$x{a}->{b} <+strict +store> [exception] ok 635 - our $x; local $x; use strict; $$x{a}->{b} <+strict +store> [return] ok 636 - our $x; local $x; use strict; $$x{a}->{b} <+strict +store> [variable] ok 637 - our $x; local $x; no strict; $$x{a}->{b} <+strict +store> [exception] ok 638 - our $x; local $x; no strict; $$x{a}->{b} <+strict +store> [return] ok 639 - our $x; local $x; no strict; $$x{a}->{b} <+strict +store> [variable] ok 640 - my %x; $x{a}->{b} <+strict +store> [exception] ok 641 - my %x; $x{a}->{b} <+strict +store> [return] ok 642 - my %x; $x{a}->{b} <+strict +store> [variable] ok 643 - our %x; local %x; use strict; $x{a}->{b} <+strict +store> [exception] ok 644 - our %x; local %x; use strict; $x{a}->{b} <+strict +store> [return] ok 645 - our %x; local %x; use strict; $x{a}->{b} <+strict +store> [variable] ok 646 - our %x; local %x; no strict; $x{a}->{b} <+strict +store> [exception] ok 647 - our %x; local %x; no strict; $x{a}->{b} <+strict +store> [return] ok 648 - our %x; local %x; no strict; $x{a}->{b} <+strict +store> [variable] ok 649 - my $x; $x->{a} = 1; $x->{a} <+fetch> [exception] ok 650 - my $x; $x->{a} = 1; $x->{a} <+fetch> [return] ok 651 - my $x; $x->{a} = 1; $x->{a} <+fetch> [variable] ok 652 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+fetch> [exception] ok 653 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+fetch> [return] ok 654 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+fetch> [variable] ok 655 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+fetch> [exception] ok 656 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+fetch> [return] ok 657 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+fetch> [variable] ok 658 - my $x; $x->{a} = 1; $$x{a} <+fetch> [exception] ok 659 - my $x; $x->{a} = 1; $$x{a} <+fetch> [return] ok 660 - my $x; $x->{a} = 1; $$x{a} <+fetch> [variable] ok 661 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+fetch> [exception] ok 662 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+fetch> [return] ok 663 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+fetch> [variable] ok 664 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+fetch> [exception] ok 665 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+fetch> [return] ok 666 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+fetch> [variable] ok 667 - my %x; $x{a} = 1; $x{a} <+fetch> [exception] ok 668 - my %x; $x{a} = 1; $x{a} <+fetch> [return] ok 669 - my %x; $x{a} = 1; $x{a} <+fetch> [variable] ok 670 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+fetch> [exception] ok 671 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+fetch> [return] ok 672 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+fetch> [variable] ok 673 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+fetch> [exception] ok 674 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+fetch> [return] ok 675 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+fetch> [variable] ok 676 - my $x; $x->{a} = 1; $x->{b} <+fetch> [exception] ok 677 - my $x; $x->{a} = 1; $x->{b} <+fetch> [return] ok 678 - my $x; $x->{a} = 1; $x->{b} <+fetch> [variable] ok 679 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+fetch> [exception] ok 680 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+fetch> [return] ok 681 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+fetch> [variable] ok 682 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+fetch> [exception] ok 683 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+fetch> [return] ok 684 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+fetch> [variable] ok 685 - my $x; $x->{a} = 1; $$x{b} <+fetch> [exception] ok 686 - my $x; $x->{a} = 1; $$x{b} <+fetch> [return] ok 687 - my $x; $x->{a} = 1; $$x{b} <+fetch> [variable] ok 688 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+fetch> [exception] ok 689 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+fetch> [return] ok 690 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+fetch> [variable] ok 691 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+fetch> [exception] ok 692 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+fetch> [return] ok 693 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+fetch> [variable] ok 694 - my %x; $x{a} = 1; $x{b} <+fetch> [exception] ok 695 - my %x; $x{a} = 1; $x{b} <+fetch> [return] ok 696 - my %x; $x{a} = 1; $x{b} <+fetch> [variable] ok 697 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+fetch> [exception] ok 698 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+fetch> [return] ok 699 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+fetch> [variable] ok 700 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+fetch> [exception] ok 701 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+fetch> [return] ok 702 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+fetch> [variable] ok 703 - my $x; $x->{a} = 1; $x->{a} <+exists> [exception] ok 704 - my $x; $x->{a} = 1; $x->{a} <+exists> [return] ok 705 - my $x; $x->{a} = 1; $x->{a} <+exists> [variable] ok 706 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+exists> [exception] ok 707 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+exists> [return] ok 708 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+exists> [variable] ok 709 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+exists> [exception] ok 710 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+exists> [return] ok 711 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+exists> [variable] ok 712 - my $x; $x->{a} = 1; $$x{a} <+exists> [exception] ok 713 - my $x; $x->{a} = 1; $$x{a} <+exists> [return] ok 714 - my $x; $x->{a} = 1; $$x{a} <+exists> [variable] ok 715 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+exists> [exception] ok 716 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+exists> [return] ok 717 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+exists> [variable] ok 718 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+exists> [exception] ok 719 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+exists> [return] ok 720 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+exists> [variable] ok 721 - my %x; $x{a} = 1; $x{a} <+exists> [exception] ok 722 - my %x; $x{a} = 1; $x{a} <+exists> [return] ok 723 - my %x; $x{a} = 1; $x{a} <+exists> [variable] ok 724 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+exists> [exception] ok 725 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+exists> [return] ok 726 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+exists> [variable] ok 727 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+exists> [exception] ok 728 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+exists> [return] ok 729 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+exists> [variable] ok 730 - my $x; $x->{a} = 1; $x->{b} <+exists> [exception] ok 731 - my $x; $x->{a} = 1; $x->{b} <+exists> [return] ok 732 - my $x; $x->{a} = 1; $x->{b} <+exists> [variable] ok 733 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+exists> [exception] ok 734 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+exists> [return] ok 735 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+exists> [variable] ok 736 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+exists> [exception] ok 737 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+exists> [return] ok 738 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+exists> [variable] ok 739 - my $x; $x->{a} = 1; $$x{b} <+exists> [exception] ok 740 - my $x; $x->{a} = 1; $$x{b} <+exists> [return] ok 741 - my $x; $x->{a} = 1; $$x{b} <+exists> [variable] ok 742 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+exists> [exception] ok 743 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+exists> [return] ok 744 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+exists> [variable] ok 745 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+exists> [exception] ok 746 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+exists> [return] ok 747 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+exists> [variable] ok 748 - my %x; $x{a} = 1; $x{b} <+exists> [exception] ok 749 - my %x; $x{a} = 1; $x{b} <+exists> [return] ok 750 - my %x; $x{a} = 1; $x{b} <+exists> [variable] ok 751 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+exists> [exception] ok 752 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+exists> [return] ok 753 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+exists> [variable] ok 754 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+exists> [exception] ok 755 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+exists> [return] ok 756 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+exists> [variable] ok 757 - my $x; $x->{a} = 1; $x->{a} <+delete> [exception] ok 758 - my $x; $x->{a} = 1; $x->{a} <+delete> [return] ok 759 - my $x; $x->{a} = 1; $x->{a} <+delete> [variable] ok 760 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+delete> [exception] ok 761 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+delete> [return] ok 762 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+delete> [variable] ok 763 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+delete> [exception] ok 764 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+delete> [return] ok 765 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+delete> [variable] ok 766 - my $x; $x->{a} = 1; $$x{a} <+delete> [exception] ok 767 - my $x; $x->{a} = 1; $$x{a} <+delete> [return] ok 768 - my $x; $x->{a} = 1; $$x{a} <+delete> [variable] ok 769 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+delete> [exception] ok 770 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+delete> [return] ok 771 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+delete> [variable] ok 772 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+delete> [exception] ok 773 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+delete> [return] ok 774 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+delete> [variable] ok 775 - my %x; $x{a} = 1; $x{a} <+delete> [exception] ok 776 - my %x; $x{a} = 1; $x{a} <+delete> [return] ok 777 - my %x; $x{a} = 1; $x{a} <+delete> [variable] ok 778 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+delete> [exception] ok 779 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+delete> [return] ok 780 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+delete> [variable] ok 781 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+delete> [exception] ok 782 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+delete> [return] ok 783 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+delete> [variable] ok 784 - my $x; $x->{a} = 1; $x->{b} <+delete> [exception] ok 785 - my $x; $x->{a} = 1; $x->{b} <+delete> [return] ok 786 - my $x; $x->{a} = 1; $x->{b} <+delete> [variable] ok 787 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+delete> [exception] ok 788 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+delete> [return] ok 789 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+delete> [variable] ok 790 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+delete> [exception] ok 791 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+delete> [return] ok 792 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+delete> [variable] ok 793 - my $x; $x->{a} = 1; $$x{b} <+delete> [exception] ok 794 - my $x; $x->{a} = 1; $$x{b} <+delete> [return] ok 795 - my $x; $x->{a} = 1; $$x{b} <+delete> [variable] ok 796 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+delete> [exception] ok 797 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+delete> [return] ok 798 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+delete> [variable] ok 799 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+delete> [exception] ok 800 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+delete> [return] ok 801 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+delete> [variable] ok 802 - my %x; $x{a} = 1; $x{b} <+delete> [exception] ok 803 - my %x; $x{a} = 1; $x{b} <+delete> [return] ok 804 - my %x; $x{a} = 1; $x{b} <+delete> [variable] ok 805 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+delete> [exception] ok 806 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+delete> [return] ok 807 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+delete> [variable] ok 808 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+delete> [exception] ok 809 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+delete> [return] ok 810 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+delete> [variable] ok 811 - my $x; $x->{a} = 1; $x->{a} <+store> [exception] ok 812 - my $x; $x->{a} = 1; $x->{a} <+store> [return] ok 813 - my $x; $x->{a} = 1; $x->{a} <+store> [variable] ok 814 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+store> [exception] ok 815 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+store> [return] ok 816 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+store> [variable] ok 817 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+store> [exception] ok 818 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+store> [return] ok 819 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+store> [variable] ok 820 - my $x; $x->{a} = 1; $$x{a} <+store> [exception] ok 821 - my $x; $x->{a} = 1; $$x{a} <+store> [return] ok 822 - my $x; $x->{a} = 1; $$x{a} <+store> [variable] ok 823 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+store> [exception] ok 824 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+store> [return] ok 825 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+store> [variable] ok 826 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+store> [exception] ok 827 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+store> [return] ok 828 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+store> [variable] ok 829 - my %x; $x{a} = 1; $x{a} <+store> [exception] ok 830 - my %x; $x{a} = 1; $x{a} <+store> [return] ok 831 - my %x; $x{a} = 1; $x{a} <+store> [variable] ok 832 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+store> [exception] ok 833 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+store> [return] ok 834 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+store> [variable] ok 835 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+store> [exception] ok 836 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+store> [return] ok 837 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+store> [variable] ok 838 - my $x; $x->{a} = 1; $x->{b} <+store> [exception] ok 839 - my $x; $x->{a} = 1; $x->{b} <+store> [return] ok 840 - my $x; $x->{a} = 1; $x->{b} <+store> [variable] ok 841 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+store> [exception] ok 842 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+store> [return] ok 843 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+store> [variable] ok 844 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+store> [exception] ok 845 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+store> [return] ok 846 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+store> [variable] ok 847 - my $x; $x->{a} = 1; $$x{b} <+store> [exception] ok 848 - my $x; $x->{a} = 1; $$x{b} <+store> [return] ok 849 - my $x; $x->{a} = 1; $$x{b} <+store> [variable] ok 850 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+store> [exception] ok 851 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+store> [return] ok 852 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+store> [variable] ok 853 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+store> [exception] ok 854 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+store> [return] ok 855 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+store> [variable] ok 856 - my %x; $x{a} = 1; $x{b} <+store> [exception] ok 857 - my %x; $x{a} = 1; $x{b} <+store> [return] ok 858 - my %x; $x{a} = 1; $x{b} <+store> [variable] ok 859 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+store> [exception] ok 860 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+store> [return] ok 861 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+store> [variable] ok 862 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+store> [exception] ok 863 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+store> [return] ok 864 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+store> [variable] ok 865 - my $x; $x->{a} = 1; $x->{a} <+strict +fetch> [exception] ok 866 - my $x; $x->{a} = 1; $x->{a} <+strict +fetch> [return] ok 867 - my $x; $x->{a} = 1; $x->{a} <+strict +fetch> [variable] ok 868 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+strict +fetch> [exception] ok 869 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+strict +fetch> [return] ok 870 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+strict +fetch> [variable] ok 871 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+strict +fetch> [exception] ok 872 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+strict +fetch> [return] ok 873 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+strict +fetch> [variable] ok 874 - my $x; $x->{a} = 1; $$x{a} <+strict +fetch> [exception] ok 875 - my $x; $x->{a} = 1; $$x{a} <+strict +fetch> [return] ok 876 - my $x; $x->{a} = 1; $$x{a} <+strict +fetch> [variable] ok 877 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+strict +fetch> [exception] ok 878 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+strict +fetch> [return] ok 879 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+strict +fetch> [variable] ok 880 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+strict +fetch> [exception] ok 881 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+strict +fetch> [return] ok 882 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+strict +fetch> [variable] ok 883 - my %x; $x{a} = 1; $x{a} <+strict +fetch> [exception] ok 884 - my %x; $x{a} = 1; $x{a} <+strict +fetch> [return] ok 885 - my %x; $x{a} = 1; $x{a} <+strict +fetch> [variable] ok 886 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+strict +fetch> [exception] ok 887 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+strict +fetch> [return] ok 888 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+strict +fetch> [variable] ok 889 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+strict +fetch> [exception] ok 890 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+strict +fetch> [return] ok 891 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+strict +fetch> [variable] ok 892 - my $x; $x->{a} = 1; $x->{b} <+strict +fetch> [exception] ok 893 - my $x; $x->{a} = 1; $x->{b} <+strict +fetch> [return] ok 894 - my $x; $x->{a} = 1; $x->{b} <+strict +fetch> [variable] ok 895 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+strict +fetch> [exception] ok 896 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+strict +fetch> [return] ok 897 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+strict +fetch> [variable] ok 898 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+strict +fetch> [exception] ok 899 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+strict +fetch> [return] ok 900 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+strict +fetch> [variable] ok 901 - my $x; $x->{a} = 1; $$x{b} <+strict +fetch> [exception] ok 902 - my $x; $x->{a} = 1; $$x{b} <+strict +fetch> [return] ok 903 - my $x; $x->{a} = 1; $$x{b} <+strict +fetch> [variable] ok 904 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+strict +fetch> [exception] ok 905 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+strict +fetch> [return] ok 906 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+strict +fetch> [variable] ok 907 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+strict +fetch> [exception] ok 908 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+strict +fetch> [return] ok 909 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+strict +fetch> [variable] ok 910 - my %x; $x{a} = 1; $x{b} <+strict +fetch> [exception] ok 911 - my %x; $x{a} = 1; $x{b} <+strict +fetch> [return] ok 912 - my %x; $x{a} = 1; $x{b} <+strict +fetch> [variable] ok 913 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+strict +fetch> [exception] ok 914 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+strict +fetch> [return] ok 915 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+strict +fetch> [variable] ok 916 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+strict +fetch> [exception] ok 917 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+strict +fetch> [return] ok 918 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+strict +fetch> [variable] ok 919 - my $x; $x->{a} = 1; $x->{a} <+strict +exists> [exception] ok 920 - my $x; $x->{a} = 1; $x->{a} <+strict +exists> [return] ok 921 - my $x; $x->{a} = 1; $x->{a} <+strict +exists> [variable] ok 922 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+strict +exists> [exception] ok 923 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+strict +exists> [return] ok 924 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+strict +exists> [variable] ok 925 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+strict +exists> [exception] ok 926 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+strict +exists> [return] ok 927 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+strict +exists> [variable] ok 928 - my $x; $x->{a} = 1; $$x{a} <+strict +exists> [exception] ok 929 - my $x; $x->{a} = 1; $$x{a} <+strict +exists> [return] ok 930 - my $x; $x->{a} = 1; $$x{a} <+strict +exists> [variable] ok 931 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+strict +exists> [exception] ok 932 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+strict +exists> [return] ok 933 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+strict +exists> [variable] ok 934 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+strict +exists> [exception] ok 935 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+strict +exists> [return] ok 936 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+strict +exists> [variable] ok 937 - my %x; $x{a} = 1; $x{a} <+strict +exists> [exception] ok 938 - my %x; $x{a} = 1; $x{a} <+strict +exists> [return] ok 939 - my %x; $x{a} = 1; $x{a} <+strict +exists> [variable] ok 940 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+strict +exists> [exception] ok 941 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+strict +exists> [return] ok 942 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+strict +exists> [variable] ok 943 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+strict +exists> [exception] ok 944 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+strict +exists> [return] ok 945 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+strict +exists> [variable] ok 946 - my $x; $x->{a} = 1; $x->{b} <+strict +exists> [exception] ok 947 - my $x; $x->{a} = 1; $x->{b} <+strict +exists> [return] ok 948 - my $x; $x->{a} = 1; $x->{b} <+strict +exists> [variable] ok 949 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+strict +exists> [exception] ok 950 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+strict +exists> [return] ok 951 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+strict +exists> [variable] ok 952 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+strict +exists> [exception] ok 953 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+strict +exists> [return] ok 954 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+strict +exists> [variable] ok 955 - my $x; $x->{a} = 1; $$x{b} <+strict +exists> [exception] ok 956 - my $x; $x->{a} = 1; $$x{b} <+strict +exists> [return] ok 957 - my $x; $x->{a} = 1; $$x{b} <+strict +exists> [variable] ok 958 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+strict +exists> [exception] ok 959 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+strict +exists> [return] ok 960 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+strict +exists> [variable] ok 961 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+strict +exists> [exception] ok 962 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+strict +exists> [return] ok 963 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+strict +exists> [variable] ok 964 - my %x; $x{a} = 1; $x{b} <+strict +exists> [exception] ok 965 - my %x; $x{a} = 1; $x{b} <+strict +exists> [return] ok 966 - my %x; $x{a} = 1; $x{b} <+strict +exists> [variable] ok 967 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+strict +exists> [exception] ok 968 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+strict +exists> [return] ok 969 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+strict +exists> [variable] ok 970 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+strict +exists> [exception] ok 971 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+strict +exists> [return] ok 972 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+strict +exists> [variable] ok 973 - my $x; $x->{a} = 1; $x->{a} <+strict +delete> [exception] ok 974 - my $x; $x->{a} = 1; $x->{a} <+strict +delete> [return] ok 975 - my $x; $x->{a} = 1; $x->{a} <+strict +delete> [variable] ok 976 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+strict +delete> [exception] ok 977 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+strict +delete> [return] ok 978 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+strict +delete> [variable] ok 979 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+strict +delete> [exception] ok 980 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+strict +delete> [return] ok 981 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+strict +delete> [variable] ok 982 - my $x; $x->{a} = 1; $$x{a} <+strict +delete> [exception] ok 983 - my $x; $x->{a} = 1; $$x{a} <+strict +delete> [return] ok 984 - my $x; $x->{a} = 1; $$x{a} <+strict +delete> [variable] ok 985 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+strict +delete> [exception] ok 986 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+strict +delete> [return] ok 987 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+strict +delete> [variable] ok 988 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+strict +delete> [exception] ok 989 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+strict +delete> [return] ok 990 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+strict +delete> [variable] ok 991 - my %x; $x{a} = 1; $x{a} <+strict +delete> [exception] ok 992 - my %x; $x{a} = 1; $x{a} <+strict +delete> [return] ok 993 - my %x; $x{a} = 1; $x{a} <+strict +delete> [variable] ok 994 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+strict +delete> [exception] ok 995 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+strict +delete> [return] ok 996 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+strict +delete> [variable] ok 997 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+strict +delete> [exception] ok 998 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+strict +delete> [return] ok 999 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+strict +delete> [variable] ok 1000 - my $x; $x->{a} = 1; $x->{b} <+strict +delete> [exception] ok 1001 - my $x; $x->{a} = 1; $x->{b} <+strict +delete> [return] ok 1002 - my $x; $x->{a} = 1; $x->{b} <+strict +delete> [variable] ok 1003 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+strict +delete> [exception] ok 1004 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+strict +delete> [return] ok 1005 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+strict +delete> [variable] ok 1006 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+strict +delete> [exception] ok 1007 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+strict +delete> [return] ok 1008 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+strict +delete> [variable] ok 1009 - my $x; $x->{a} = 1; $$x{b} <+strict +delete> [exception] ok 1010 - my $x; $x->{a} = 1; $$x{b} <+strict +delete> [return] ok 1011 - my $x; $x->{a} = 1; $$x{b} <+strict +delete> [variable] ok 1012 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+strict +delete> [exception] ok 1013 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+strict +delete> [return] ok 1014 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+strict +delete> [variable] ok 1015 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+strict +delete> [exception] ok 1016 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+strict +delete> [return] ok 1017 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+strict +delete> [variable] ok 1018 - my %x; $x{a} = 1; $x{b} <+strict +delete> [exception] ok 1019 - my %x; $x{a} = 1; $x{b} <+strict +delete> [return] ok 1020 - my %x; $x{a} = 1; $x{b} <+strict +delete> [variable] ok 1021 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+strict +delete> [exception] ok 1022 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+strict +delete> [return] ok 1023 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+strict +delete> [variable] ok 1024 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+strict +delete> [exception] ok 1025 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+strict +delete> [return] ok 1026 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+strict +delete> [variable] ok 1027 - my $x; $x->{a} = 1; $x->{a} <+strict +store> [exception] ok 1028 - my $x; $x->{a} = 1; $x->{a} <+strict +store> [return] ok 1029 - my $x; $x->{a} = 1; $x->{a} <+strict +store> [variable] ok 1030 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+strict +store> [exception] ok 1031 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+strict +store> [return] ok 1032 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} <+strict +store> [variable] ok 1033 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+strict +store> [exception] ok 1034 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+strict +store> [return] ok 1035 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} <+strict +store> [variable] ok 1036 - my $x; $x->{a} = 1; $$x{a} <+strict +store> [exception] ok 1037 - my $x; $x->{a} = 1; $$x{a} <+strict +store> [return] ok 1038 - my $x; $x->{a} = 1; $$x{a} <+strict +store> [variable] ok 1039 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+strict +store> [exception] ok 1040 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+strict +store> [return] ok 1041 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} <+strict +store> [variable] ok 1042 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+strict +store> [exception] ok 1043 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+strict +store> [return] ok 1044 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} <+strict +store> [variable] ok 1045 - my %x; $x{a} = 1; $x{a} <+strict +store> [exception] ok 1046 - my %x; $x{a} = 1; $x{a} <+strict +store> [return] ok 1047 - my %x; $x{a} = 1; $x{a} <+strict +store> [variable] ok 1048 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+strict +store> [exception] ok 1049 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+strict +store> [return] ok 1050 - our %x; local %x; use strict; $x{a} = 1; $x{a} <+strict +store> [variable] ok 1051 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+strict +store> [exception] ok 1052 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+strict +store> [return] ok 1053 - our %x; local %x; no strict; $x{a} = 1; $x{a} <+strict +store> [variable] ok 1054 - my $x; $x->{a} = 1; $x->{b} <+strict +store> [exception] ok 1055 - my $x; $x->{a} = 1; $x->{b} <+strict +store> [return] ok 1056 - my $x; $x->{a} = 1; $x->{b} <+strict +store> [variable] ok 1057 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+strict +store> [exception] ok 1058 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+strict +store> [return] ok 1059 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} <+strict +store> [variable] ok 1060 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+strict +store> [exception] ok 1061 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+strict +store> [return] ok 1062 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} <+strict +store> [variable] ok 1063 - my $x; $x->{a} = 1; $$x{b} <+strict +store> [exception] ok 1064 - my $x; $x->{a} = 1; $$x{b} <+strict +store> [return] ok 1065 - my $x; $x->{a} = 1; $$x{b} <+strict +store> [variable] ok 1066 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+strict +store> [exception] ok 1067 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+strict +store> [return] ok 1068 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} <+strict +store> [variable] ok 1069 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+strict +store> [exception] ok 1070 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+strict +store> [return] ok 1071 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} <+strict +store> [variable] ok 1072 - my %x; $x{a} = 1; $x{b} <+strict +store> [exception] ok 1073 - my %x; $x{a} = 1; $x{b} <+strict +store> [return] ok 1074 - my %x; $x{a} = 1; $x{b} <+strict +store> [variable] ok 1075 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+strict +store> [exception] ok 1076 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+strict +store> [return] ok 1077 - our %x; local %x; use strict; $x{a} = 1; $x{b} <+strict +store> [variable] ok 1078 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+strict +store> [exception] ok 1079 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+strict +store> [return] ok 1080 - our %x; local %x; no strict; $x{a} = 1; $x{b} <+strict +store> [variable] ok 1081 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+fetch> [exception] ok 1082 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+fetch> [return] ok 1083 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+fetch> [variable] ok 1084 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+fetch> [exception] ok 1085 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+fetch> [return] ok 1086 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+fetch> [variable] ok 1087 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+fetch> [exception] ok 1088 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+fetch> [return] ok 1089 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+fetch> [variable] ok 1090 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+fetch> [exception] ok 1091 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+fetch> [return] ok 1092 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+fetch> [variable] ok 1093 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+fetch> [exception] ok 1094 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+fetch> [return] ok 1095 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+fetch> [variable] ok 1096 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+fetch> [exception] ok 1097 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+fetch> [return] ok 1098 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+fetch> [variable] ok 1099 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+fetch> [exception] ok 1100 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+fetch> [return] ok 1101 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+fetch> [variable] ok 1102 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+fetch> [exception] ok 1103 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+fetch> [return] ok 1104 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+fetch> [variable] ok 1105 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+fetch> [exception] ok 1106 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+fetch> [return] ok 1107 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+fetch> [variable] ok 1108 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+fetch> [exception] ok 1109 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+fetch> [return] ok 1110 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+fetch> [variable] ok 1111 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+fetch> [exception] ok 1112 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+fetch> [return] ok 1113 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+fetch> [variable] ok 1114 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+fetch> [exception] ok 1115 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+fetch> [return] ok 1116 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+fetch> [variable] ok 1117 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+fetch> [exception] ok 1118 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+fetch> [return] ok 1119 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+fetch> [variable] ok 1120 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+fetch> [exception] ok 1121 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+fetch> [return] ok 1122 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+fetch> [variable] ok 1123 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+fetch> [exception] ok 1124 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+fetch> [return] ok 1125 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+fetch> [variable] ok 1126 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+fetch> [exception] ok 1127 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+fetch> [return] ok 1128 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+fetch> [variable] ok 1129 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+fetch> [exception] ok 1130 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+fetch> [return] ok 1131 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+fetch> [variable] ok 1132 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+fetch> [exception] ok 1133 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+fetch> [return] ok 1134 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+fetch> [variable] ok 1135 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+fetch> [exception] ok 1136 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+fetch> [return] ok 1137 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+fetch> [variable] ok 1138 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+fetch> [exception] ok 1139 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+fetch> [return] ok 1140 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+fetch> [variable] ok 1141 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+fetch> [exception] ok 1142 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+fetch> [return] ok 1143 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+fetch> [variable] ok 1144 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+fetch> [exception] ok 1145 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+fetch> [return] ok 1146 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+fetch> [variable] ok 1147 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+fetch> [exception] ok 1148 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+fetch> [return] ok 1149 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+fetch> [variable] ok 1150 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+fetch> [exception] ok 1151 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+fetch> [return] ok 1152 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+fetch> [variable] ok 1153 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+fetch> [exception] ok 1154 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+fetch> [return] ok 1155 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+fetch> [variable] ok 1156 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+fetch> [exception] ok 1157 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+fetch> [return] ok 1158 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+fetch> [variable] ok 1159 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+fetch> [exception] ok 1160 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+fetch> [return] ok 1161 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+fetch> [variable] ok 1162 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+exists> [exception] ok 1163 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+exists> [return] ok 1164 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+exists> [variable] ok 1165 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+exists> [exception] ok 1166 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+exists> [return] ok 1167 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+exists> [variable] ok 1168 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+exists> [exception] ok 1169 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+exists> [return] ok 1170 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+exists> [variable] ok 1171 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+exists> [exception] ok 1172 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+exists> [return] ok 1173 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+exists> [variable] ok 1174 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+exists> [exception] ok 1175 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+exists> [return] ok 1176 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+exists> [variable] ok 1177 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+exists> [exception] ok 1178 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+exists> [return] ok 1179 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+exists> [variable] ok 1180 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+exists> [exception] ok 1181 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+exists> [return] ok 1182 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+exists> [variable] ok 1183 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+exists> [exception] ok 1184 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+exists> [return] ok 1185 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+exists> [variable] ok 1186 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+exists> [exception] ok 1187 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+exists> [return] ok 1188 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+exists> [variable] ok 1189 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+exists> [exception] ok 1190 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+exists> [return] ok 1191 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+exists> [variable] ok 1192 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+exists> [exception] ok 1193 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+exists> [return] ok 1194 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+exists> [variable] ok 1195 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+exists> [exception] ok 1196 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+exists> [return] ok 1197 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+exists> [variable] ok 1198 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+exists> [exception] ok 1199 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+exists> [return] ok 1200 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+exists> [variable] ok 1201 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+exists> [exception] ok 1202 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+exists> [return] ok 1203 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+exists> [variable] ok 1204 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+exists> [exception] ok 1205 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+exists> [return] ok 1206 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+exists> [variable] ok 1207 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+exists> [exception] ok 1208 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+exists> [return] ok 1209 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+exists> [variable] ok 1210 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+exists> [exception] ok 1211 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+exists> [return] ok 1212 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+exists> [variable] ok 1213 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+exists> [exception] ok 1214 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+exists> [return] ok 1215 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+exists> [variable] ok 1216 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+exists> [exception] ok 1217 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+exists> [return] ok 1218 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+exists> [variable] ok 1219 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+exists> [exception] ok 1220 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+exists> [return] ok 1221 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+exists> [variable] ok 1222 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+exists> [exception] ok 1223 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+exists> [return] ok 1224 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+exists> [variable] ok 1225 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+exists> [exception] ok 1226 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+exists> [return] ok 1227 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+exists> [variable] ok 1228 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+exists> [exception] ok 1229 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+exists> [return] ok 1230 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+exists> [variable] ok 1231 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+exists> [exception] ok 1232 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+exists> [return] ok 1233 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+exists> [variable] ok 1234 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+exists> [exception] ok 1235 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+exists> [return] ok 1236 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+exists> [variable] ok 1237 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+exists> [exception] ok 1238 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+exists> [return] ok 1239 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+exists> [variable] ok 1240 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+exists> [exception] ok 1241 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+exists> [return] ok 1242 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+exists> [variable] ok 1243 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+delete> [exception] ok 1244 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+delete> [return] ok 1245 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+delete> [variable] ok 1246 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+delete> [exception] ok 1247 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+delete> [return] ok 1248 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+delete> [variable] ok 1249 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+delete> [exception] ok 1250 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+delete> [return] ok 1251 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+delete> [variable] ok 1252 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+delete> [exception] ok 1253 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+delete> [return] ok 1254 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+delete> [variable] ok 1255 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+delete> [exception] ok 1256 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+delete> [return] ok 1257 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+delete> [variable] ok 1258 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+delete> [exception] ok 1259 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+delete> [return] ok 1260 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+delete> [variable] ok 1261 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+delete> [exception] ok 1262 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+delete> [return] ok 1263 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+delete> [variable] ok 1264 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+delete> [exception] ok 1265 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+delete> [return] ok 1266 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+delete> [variable] ok 1267 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+delete> [exception] ok 1268 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+delete> [return] ok 1269 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+delete> [variable] ok 1270 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+delete> [exception] ok 1271 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+delete> [return] ok 1272 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+delete> [variable] ok 1273 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+delete> [exception] ok 1274 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+delete> [return] ok 1275 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+delete> [variable] ok 1276 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+delete> [exception] ok 1277 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+delete> [return] ok 1278 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+delete> [variable] ok 1279 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+delete> [exception] ok 1280 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+delete> [return] ok 1281 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+delete> [variable] ok 1282 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+delete> [exception] ok 1283 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+delete> [return] ok 1284 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+delete> [variable] ok 1285 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+delete> [exception] ok 1286 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+delete> [return] ok 1287 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+delete> [variable] ok 1288 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+delete> [exception] ok 1289 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+delete> [return] ok 1290 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+delete> [variable] ok 1291 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+delete> [exception] ok 1292 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+delete> [return] ok 1293 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+delete> [variable] ok 1294 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+delete> [exception] ok 1295 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+delete> [return] ok 1296 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+delete> [variable] ok 1297 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+delete> [exception] ok 1298 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+delete> [return] ok 1299 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+delete> [variable] ok 1300 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+delete> [exception] ok 1301 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+delete> [return] ok 1302 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+delete> [variable] ok 1303 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+delete> [exception] ok 1304 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+delete> [return] ok 1305 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+delete> [variable] ok 1306 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+delete> [exception] ok 1307 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+delete> [return] ok 1308 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+delete> [variable] ok 1309 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+delete> [exception] ok 1310 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+delete> [return] ok 1311 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+delete> [variable] ok 1312 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+delete> [exception] ok 1313 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+delete> [return] ok 1314 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+delete> [variable] ok 1315 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+delete> [exception] ok 1316 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+delete> [return] ok 1317 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+delete> [variable] ok 1318 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+delete> [exception] ok 1319 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+delete> [return] ok 1320 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+delete> [variable] ok 1321 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+delete> [exception] ok 1322 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+delete> [return] ok 1323 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+delete> [variable] ok 1324 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+store> [exception] ok 1325 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+store> [return] ok 1326 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+store> [variable] ok 1327 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+store> [exception] ok 1328 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+store> [return] ok 1329 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+store> [variable] ok 1330 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+store> [exception] ok 1331 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+store> [return] ok 1332 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+store> [variable] ok 1333 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+store> [exception] ok 1334 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+store> [return] ok 1335 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+store> [variable] ok 1336 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+store> [exception] ok 1337 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+store> [return] ok 1338 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+store> [variable] ok 1339 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+store> [exception] ok 1340 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+store> [return] ok 1341 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+store> [variable] ok 1342 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+store> [exception] ok 1343 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+store> [return] ok 1344 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+store> [variable] ok 1345 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+store> [exception] ok 1346 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+store> [return] ok 1347 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+store> [variable] ok 1348 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+store> [exception] ok 1349 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+store> [return] ok 1350 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+store> [variable] ok 1351 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+store> [exception] ok 1352 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+store> [return] ok 1353 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+store> [variable] ok 1354 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+store> [exception] ok 1355 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+store> [return] ok 1356 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+store> [variable] ok 1357 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+store> [exception] ok 1358 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+store> [return] ok 1359 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+store> [variable] ok 1360 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+store> [exception] ok 1361 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+store> [return] ok 1362 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+store> [variable] ok 1363 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+store> [exception] ok 1364 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+store> [return] ok 1365 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+store> [variable] ok 1366 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+store> [exception] ok 1367 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+store> [return] ok 1368 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+store> [variable] ok 1369 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+store> [exception] ok 1370 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+store> [return] ok 1371 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+store> [variable] ok 1372 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+store> [exception] ok 1373 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+store> [return] ok 1374 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+store> [variable] ok 1375 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+store> [exception] ok 1376 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+store> [return] ok 1377 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+store> [variable] ok 1378 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+store> [exception] ok 1379 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+store> [return] ok 1380 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+store> [variable] ok 1381 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+store> [exception] ok 1382 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+store> [return] ok 1383 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+store> [variable] ok 1384 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+store> [exception] ok 1385 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+store> [return] ok 1386 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+store> [variable] ok 1387 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+store> [exception] ok 1388 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+store> [return] ok 1389 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+store> [variable] ok 1390 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+store> [exception] ok 1391 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+store> [return] ok 1392 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+store> [variable] ok 1393 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+store> [exception] ok 1394 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+store> [return] ok 1395 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+store> [variable] ok 1396 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+store> [exception] ok 1397 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+store> [return] ok 1398 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+store> [variable] ok 1399 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+store> [exception] ok 1400 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+store> [return] ok 1401 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+store> [variable] ok 1402 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+store> [exception] ok 1403 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+store> [return] ok 1404 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+store> [variable] ok 1405 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +fetch> [exception] ok 1406 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +fetch> [return] ok 1407 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +fetch> [variable] ok 1408 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +fetch> [exception] ok 1409 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +fetch> [return] ok 1410 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +fetch> [variable] ok 1411 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +fetch> [exception] ok 1412 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +fetch> [return] ok 1413 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +fetch> [variable] ok 1414 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +fetch> [exception] ok 1415 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +fetch> [return] ok 1416 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +fetch> [variable] ok 1417 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +fetch> [exception] ok 1418 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +fetch> [return] ok 1419 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +fetch> [variable] ok 1420 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +fetch> [exception] ok 1421 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +fetch> [return] ok 1422 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +fetch> [variable] ok 1423 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+strict +fetch> [exception] ok 1424 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+strict +fetch> [return] ok 1425 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+strict +fetch> [variable] ok 1426 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +fetch> [exception] ok 1427 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +fetch> [return] ok 1428 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +fetch> [variable] ok 1429 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +fetch> [exception] ok 1430 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +fetch> [return] ok 1431 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +fetch> [variable] ok 1432 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +fetch> [exception] ok 1433 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +fetch> [return] ok 1434 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +fetch> [variable] ok 1435 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +fetch> [exception] ok 1436 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +fetch> [return] ok 1437 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +fetch> [variable] ok 1438 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +fetch> [exception] ok 1439 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +fetch> [return] ok 1440 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +fetch> [variable] ok 1441 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +fetch> [exception] ok 1442 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +fetch> [return] ok 1443 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +fetch> [variable] ok 1444 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +fetch> [exception] ok 1445 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +fetch> [return] ok 1446 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +fetch> [variable] ok 1447 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +fetch> [exception] ok 1448 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +fetch> [return] ok 1449 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +fetch> [variable] ok 1450 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+strict +fetch> [exception] ok 1451 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+strict +fetch> [return] ok 1452 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+strict +fetch> [variable] ok 1453 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +fetch> [exception] ok 1454 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +fetch> [return] ok 1455 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +fetch> [variable] ok 1456 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +fetch> [exception] ok 1457 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +fetch> [return] ok 1458 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +fetch> [variable] ok 1459 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +fetch> [exception] ok 1460 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +fetch> [return] ok 1461 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +fetch> [variable] ok 1462 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +fetch> [exception] ok 1463 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +fetch> [return] ok 1464 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +fetch> [variable] ok 1465 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +fetch> [exception] ok 1466 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +fetch> [return] ok 1467 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +fetch> [variable] ok 1468 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +fetch> [exception] ok 1469 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +fetch> [return] ok 1470 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +fetch> [variable] ok 1471 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +fetch> [exception] ok 1472 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +fetch> [return] ok 1473 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +fetch> [variable] ok 1474 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +fetch> [exception] ok 1475 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +fetch> [return] ok 1476 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +fetch> [variable] ok 1477 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+strict +fetch> [exception] ok 1478 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+strict +fetch> [return] ok 1479 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+strict +fetch> [variable] ok 1480 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +fetch> [exception] ok 1481 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +fetch> [return] ok 1482 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +fetch> [variable] ok 1483 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +fetch> [exception] ok 1484 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +fetch> [return] ok 1485 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +fetch> [variable] ok 1486 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +exists> [exception] ok 1487 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +exists> [return] ok 1488 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +exists> [variable] ok 1489 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +exists> [exception] ok 1490 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +exists> [return] ok 1491 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +exists> [variable] ok 1492 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +exists> [exception] ok 1493 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +exists> [return] ok 1494 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +exists> [variable] ok 1495 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +exists> [exception] ok 1496 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +exists> [return] ok 1497 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +exists> [variable] ok 1498 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +exists> [exception] ok 1499 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +exists> [return] ok 1500 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +exists> [variable] ok 1501 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +exists> [exception] ok 1502 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +exists> [return] ok 1503 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +exists> [variable] ok 1504 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+strict +exists> [exception] ok 1505 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+strict +exists> [return] ok 1506 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+strict +exists> [variable] ok 1507 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +exists> [exception] ok 1508 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +exists> [return] ok 1509 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +exists> [variable] ok 1510 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +exists> [exception] ok 1511 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +exists> [return] ok 1512 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +exists> [variable] ok 1513 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +exists> [exception] ok 1514 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +exists> [return] ok 1515 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +exists> [variable] ok 1516 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +exists> [exception] ok 1517 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +exists> [return] ok 1518 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +exists> [variable] ok 1519 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +exists> [exception] ok 1520 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +exists> [return] ok 1521 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +exists> [variable] ok 1522 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +exists> [exception] ok 1523 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +exists> [return] ok 1524 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +exists> [variable] ok 1525 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +exists> [exception] ok 1526 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +exists> [return] ok 1527 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +exists> [variable] ok 1528 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +exists> [exception] ok 1529 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +exists> [return] ok 1530 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +exists> [variable] ok 1531 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+strict +exists> [exception] ok 1532 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+strict +exists> [return] ok 1533 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+strict +exists> [variable] ok 1534 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +exists> [exception] ok 1535 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +exists> [return] ok 1536 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +exists> [variable] ok 1537 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +exists> [exception] ok 1538 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +exists> [return] ok 1539 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +exists> [variable] ok 1540 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +exists> [exception] ok 1541 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +exists> [return] ok 1542 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +exists> [variable] ok 1543 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +exists> [exception] ok 1544 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +exists> [return] ok 1545 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +exists> [variable] ok 1546 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +exists> [exception] ok 1547 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +exists> [return] ok 1548 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +exists> [variable] ok 1549 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +exists> [exception] ok 1550 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +exists> [return] ok 1551 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +exists> [variable] ok 1552 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +exists> [exception] ok 1553 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +exists> [return] ok 1554 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +exists> [variable] ok 1555 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +exists> [exception] ok 1556 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +exists> [return] ok 1557 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +exists> [variable] ok 1558 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+strict +exists> [exception] ok 1559 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+strict +exists> [return] ok 1560 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+strict +exists> [variable] ok 1561 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +exists> [exception] ok 1562 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +exists> [return] ok 1563 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +exists> [variable] ok 1564 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +exists> [exception] ok 1565 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +exists> [return] ok 1566 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +exists> [variable] ok 1567 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +delete> [exception] ok 1568 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +delete> [return] ok 1569 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +delete> [variable] ok 1570 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +delete> [exception] ok 1571 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +delete> [return] ok 1572 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +delete> [variable] ok 1573 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +delete> [exception] ok 1574 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +delete> [return] ok 1575 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +delete> [variable] ok 1576 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +delete> [exception] ok 1577 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +delete> [return] ok 1578 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +delete> [variable] ok 1579 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +delete> [exception] ok 1580 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +delete> [return] ok 1581 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +delete> [variable] ok 1582 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +delete> [exception] ok 1583 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +delete> [return] ok 1584 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +delete> [variable] ok 1585 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+strict +delete> [exception] ok 1586 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+strict +delete> [return] ok 1587 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+strict +delete> [variable] ok 1588 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +delete> [exception] ok 1589 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +delete> [return] ok 1590 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +delete> [variable] ok 1591 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +delete> [exception] ok 1592 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +delete> [return] ok 1593 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +delete> [variable] ok 1594 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +delete> [exception] ok 1595 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +delete> [return] ok 1596 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +delete> [variable] ok 1597 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +delete> [exception] ok 1598 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +delete> [return] ok 1599 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +delete> [variable] ok 1600 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +delete> [exception] ok 1601 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +delete> [return] ok 1602 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +delete> [variable] ok 1603 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +delete> [exception] ok 1604 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +delete> [return] ok 1605 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +delete> [variable] ok 1606 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +delete> [exception] ok 1607 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +delete> [return] ok 1608 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +delete> [variable] ok 1609 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +delete> [exception] ok 1610 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +delete> [return] ok 1611 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +delete> [variable] ok 1612 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+strict +delete> [exception] ok 1613 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+strict +delete> [return] ok 1614 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+strict +delete> [variable] ok 1615 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +delete> [exception] ok 1616 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +delete> [return] ok 1617 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +delete> [variable] ok 1618 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +delete> [exception] ok 1619 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +delete> [return] ok 1620 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +delete> [variable] ok 1621 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +delete> [exception] ok 1622 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +delete> [return] ok 1623 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +delete> [variable] ok 1624 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +delete> [exception] ok 1625 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +delete> [return] ok 1626 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +delete> [variable] ok 1627 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +delete> [exception] ok 1628 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +delete> [return] ok 1629 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +delete> [variable] ok 1630 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +delete> [exception] ok 1631 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +delete> [return] ok 1632 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +delete> [variable] ok 1633 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +delete> [exception] ok 1634 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +delete> [return] ok 1635 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +delete> [variable] ok 1636 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +delete> [exception] ok 1637 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +delete> [return] ok 1638 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +delete> [variable] ok 1639 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+strict +delete> [exception] ok 1640 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+strict +delete> [return] ok 1641 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+strict +delete> [variable] ok 1642 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +delete> [exception] ok 1643 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +delete> [return] ok 1644 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +delete> [variable] ok 1645 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +delete> [exception] ok 1646 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +delete> [return] ok 1647 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +delete> [variable] ok 1648 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +store> [exception] ok 1649 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +store> [return] ok 1650 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +store> [variable] ok 1651 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +store> [exception] ok 1652 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +store> [return] ok 1653 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +store> [variable] ok 1654 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +store> [exception] ok 1655 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +store> [return] ok 1656 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} <+strict +store> [variable] ok 1657 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +store> [exception] ok 1658 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +store> [return] ok 1659 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +store> [variable] ok 1660 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +store> [exception] ok 1661 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +store> [return] ok 1662 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +store> [variable] ok 1663 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +store> [exception] ok 1664 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +store> [return] ok 1665 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} <+strict +store> [variable] ok 1666 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+strict +store> [exception] ok 1667 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+strict +store> [return] ok 1668 - my %x; $x{a}->{b} = 1; $x{a}->{b} <+strict +store> [variable] ok 1669 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +store> [exception] ok 1670 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +store> [return] ok 1671 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +store> [variable] ok 1672 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +store> [exception] ok 1673 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +store> [return] ok 1674 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} <+strict +store> [variable] ok 1675 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +store> [exception] ok 1676 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +store> [return] ok 1677 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +store> [variable] ok 1678 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +store> [exception] ok 1679 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +store> [return] ok 1680 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +store> [variable] ok 1681 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +store> [exception] ok 1682 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +store> [return] ok 1683 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} <+strict +store> [variable] ok 1684 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +store> [exception] ok 1685 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +store> [return] ok 1686 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +store> [variable] ok 1687 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +store> [exception] ok 1688 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +store> [return] ok 1689 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +store> [variable] ok 1690 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +store> [exception] ok 1691 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +store> [return] ok 1692 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} <+strict +store> [variable] ok 1693 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+strict +store> [exception] ok 1694 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+strict +store> [return] ok 1695 - my %x; $x{a}->{b} = 1; $x{a}->{d} <+strict +store> [variable] ok 1696 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +store> [exception] ok 1697 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +store> [return] ok 1698 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +store> [variable] ok 1699 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +store> [exception] ok 1700 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +store> [return] ok 1701 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} <+strict +store> [variable] ok 1702 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +store> [exception] ok 1703 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +store> [return] ok 1704 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +store> [variable] ok 1705 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +store> [exception] ok 1706 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +store> [return] ok 1707 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +store> [variable] ok 1708 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +store> [exception] ok 1709 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +store> [return] ok 1710 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} <+strict +store> [variable] ok 1711 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +store> [exception] ok 1712 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +store> [return] ok 1713 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +store> [variable] ok 1714 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +store> [exception] ok 1715 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +store> [return] ok 1716 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +store> [variable] ok 1717 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +store> [exception] ok 1718 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +store> [return] ok 1719 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} <+strict +store> [variable] ok 1720 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+strict +store> [exception] ok 1721 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+strict +store> [return] ok 1722 - my %x; $x{a}->{b} = 1; $x{c}->{d} <+strict +store> [variable] ok 1723 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +store> [exception] ok 1724 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +store> [return] ok 1725 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +store> [variable] ok 1726 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +store> [exception] ok 1727 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +store> [return] ok 1728 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} <+strict +store> [variable] ok 1729 - my $x; 1 for $x->{a}; () [exception] ok 1730 - my $x; 1 for $x->{a}; () [return] ok 1731 - my $x; 1 for $x->{a}; () [variable] ok 1732 - our $x; local $x; use strict; 1 for $x->{a}; () [exception] ok 1733 - our $x; local $x; use strict; 1 for $x->{a}; () [return] ok 1734 - our $x; local $x; use strict; 1 for $x->{a}; () [variable] ok 1735 - our $x; local $x; no strict; 1 for $x->{a}; () [exception] ok 1736 - our $x; local $x; no strict; 1 for $x->{a}; () [return] ok 1737 - our $x; local $x; no strict; 1 for $x->{a}; () [variable] ok 1738 - my $x; 1 for $$x{a}; () [exception] ok 1739 - my $x; 1 for $$x{a}; () [return] ok 1740 - my $x; 1 for $$x{a}; () [variable] ok 1741 - our $x; local $x; use strict; 1 for $$x{a}; () [exception] ok 1742 - our $x; local $x; use strict; 1 for $$x{a}; () [return] ok 1743 - our $x; local $x; use strict; 1 for $$x{a}; () [variable] ok 1744 - our $x; local $x; no strict; 1 for $$x{a}; () [exception] ok 1745 - our $x; local $x; no strict; 1 for $$x{a}; () [return] ok 1746 - our $x; local $x; no strict; 1 for $$x{a}; () [variable] ok 1747 - my %x; 1 for $x{a}; () [exception] ok 1748 - my %x; 1 for $x{a}; () [return] ok 1749 - my %x; 1 for $x{a}; () [variable] ok 1750 - our %x; local %x; use strict; 1 for $x{a}; () [exception] ok 1751 - our %x; local %x; use strict; 1 for $x{a}; () [return] ok 1752 - our %x; local %x; use strict; 1 for $x{a}; () [variable] ok 1753 - our %x; local %x; no strict; 1 for $x{a}; () [exception] ok 1754 - our %x; local %x; no strict; 1 for $x{a}; () [return] ok 1755 - our %x; local %x; no strict; 1 for $x{a}; () [variable] ok 1756 - my $x; 1 for $x->{a}; () [exception] ok 1757 - my $x; 1 for $x->{a}; () [return] ok 1758 - my $x; 1 for $x->{a}; () [variable] ok 1759 - our $x; local $x; use strict; 1 for $x->{a}; () [exception] ok 1760 - our $x; local $x; use strict; 1 for $x->{a}; () [return] ok 1761 - our $x; local $x; use strict; 1 for $x->{a}; () [variable] ok 1762 - our $x; local $x; no strict; 1 for $x->{a}; () [exception] ok 1763 - our $x; local $x; no strict; 1 for $x->{a}; () [return] ok 1764 - our $x; local $x; no strict; 1 for $x->{a}; () [variable] ok 1765 - my $x; 1 for $$x{a}; () [exception] ok 1766 - my $x; 1 for $$x{a}; () [return] ok 1767 - my $x; 1 for $$x{a}; () [variable] ok 1768 - our $x; local $x; use strict; 1 for $$x{a}; () [exception] ok 1769 - our $x; local $x; use strict; 1 for $$x{a}; () [return] ok 1770 - our $x; local $x; use strict; 1 for $$x{a}; () [variable] ok 1771 - our $x; local $x; no strict; 1 for $$x{a}; () [exception] ok 1772 - our $x; local $x; no strict; 1 for $$x{a}; () [return] ok 1773 - our $x; local $x; no strict; 1 for $$x{a}; () [variable] ok 1774 - my %x; 1 for $x{a}; () [exception] ok 1775 - my %x; 1 for $x{a}; () [return] ok 1776 - my %x; 1 for $x{a}; () [variable] ok 1777 - our %x; local %x; use strict; 1 for $x{a}; () [exception] ok 1778 - our %x; local %x; use strict; 1 for $x{a}; () [return] ok 1779 - our %x; local %x; use strict; 1 for $x{a}; () [variable] ok 1780 - our %x; local %x; no strict; 1 for $x{a}; () [exception] ok 1781 - our %x; local %x; no strict; 1 for $x{a}; () [return] ok 1782 - our %x; local %x; no strict; 1 for $x{a}; () [variable] ok 1783 - my $x; 1 for $x->{a}; () <+fetch> [exception] ok 1784 - my $x; 1 for $x->{a}; () <+fetch> [return] ok 1785 - my $x; 1 for $x->{a}; () <+fetch> [variable] ok 1786 - our $x; local $x; use strict; 1 for $x->{a}; () <+fetch> [exception] ok 1787 - our $x; local $x; use strict; 1 for $x->{a}; () <+fetch> [return] ok 1788 - our $x; local $x; use strict; 1 for $x->{a}; () <+fetch> [variable] ok 1789 - our $x; local $x; no strict; 1 for $x->{a}; () <+fetch> [exception] ok 1790 - our $x; local $x; no strict; 1 for $x->{a}; () <+fetch> [return] ok 1791 - our $x; local $x; no strict; 1 for $x->{a}; () <+fetch> [variable] ok 1792 - my $x; 1 for $$x{a}; () <+fetch> [exception] ok 1793 - my $x; 1 for $$x{a}; () <+fetch> [return] ok 1794 - my $x; 1 for $$x{a}; () <+fetch> [variable] ok 1795 - our $x; local $x; use strict; 1 for $$x{a}; () <+fetch> [exception] ok 1796 - our $x; local $x; use strict; 1 for $$x{a}; () <+fetch> [return] ok 1797 - our $x; local $x; use strict; 1 for $$x{a}; () <+fetch> [variable] ok 1798 - our $x; local $x; no strict; 1 for $$x{a}; () <+fetch> [exception] ok 1799 - our $x; local $x; no strict; 1 for $$x{a}; () <+fetch> [return] ok 1800 - our $x; local $x; no strict; 1 for $$x{a}; () <+fetch> [variable] ok 1801 - my %x; 1 for $x{a}; () <+fetch> [exception] ok 1802 - my %x; 1 for $x{a}; () <+fetch> [return] ok 1803 - my %x; 1 for $x{a}; () <+fetch> [variable] ok 1804 - our %x; local %x; use strict; 1 for $x{a}; () <+fetch> [exception] ok 1805 - our %x; local %x; use strict; 1 for $x{a}; () <+fetch> [return] ok 1806 - our %x; local %x; use strict; 1 for $x{a}; () <+fetch> [variable] ok 1807 - our %x; local %x; no strict; 1 for $x{a}; () <+fetch> [exception] ok 1808 - our %x; local %x; no strict; 1 for $x{a}; () <+fetch> [return] ok 1809 - our %x; local %x; no strict; 1 for $x{a}; () <+fetch> [variable] ok 1810 - my $x; 1 for $x->{a}; () <+exists> [exception] ok 1811 - my $x; 1 for $x->{a}; () <+exists> [return] ok 1812 - my $x; 1 for $x->{a}; () <+exists> [variable] ok 1813 - our $x; local $x; use strict; 1 for $x->{a}; () <+exists> [exception] ok 1814 - our $x; local $x; use strict; 1 for $x->{a}; () <+exists> [return] ok 1815 - our $x; local $x; use strict; 1 for $x->{a}; () <+exists> [variable] ok 1816 - our $x; local $x; no strict; 1 for $x->{a}; () <+exists> [exception] ok 1817 - our $x; local $x; no strict; 1 for $x->{a}; () <+exists> [return] ok 1818 - our $x; local $x; no strict; 1 for $x->{a}; () <+exists> [variable] ok 1819 - my $x; 1 for $$x{a}; () <+exists> [exception] ok 1820 - my $x; 1 for $$x{a}; () <+exists> [return] ok 1821 - my $x; 1 for $$x{a}; () <+exists> [variable] ok 1822 - our $x; local $x; use strict; 1 for $$x{a}; () <+exists> [exception] ok 1823 - our $x; local $x; use strict; 1 for $$x{a}; () <+exists> [return] ok 1824 - our $x; local $x; use strict; 1 for $$x{a}; () <+exists> [variable] ok 1825 - our $x; local $x; no strict; 1 for $$x{a}; () <+exists> [exception] ok 1826 - our $x; local $x; no strict; 1 for $$x{a}; () <+exists> [return] ok 1827 - our $x; local $x; no strict; 1 for $$x{a}; () <+exists> [variable] ok 1828 - my %x; 1 for $x{a}; () <+exists> [exception] ok 1829 - my %x; 1 for $x{a}; () <+exists> [return] ok 1830 - my %x; 1 for $x{a}; () <+exists> [variable] ok 1831 - our %x; local %x; use strict; 1 for $x{a}; () <+exists> [exception] ok 1832 - our %x; local %x; use strict; 1 for $x{a}; () <+exists> [return] ok 1833 - our %x; local %x; use strict; 1 for $x{a}; () <+exists> [variable] ok 1834 - our %x; local %x; no strict; 1 for $x{a}; () <+exists> [exception] ok 1835 - our %x; local %x; no strict; 1 for $x{a}; () <+exists> [return] ok 1836 - our %x; local %x; no strict; 1 for $x{a}; () <+exists> [variable] ok 1837 - my $x; 1 for $x->{a}; () <+delete> [exception] ok 1838 - my $x; 1 for $x->{a}; () <+delete> [return] ok 1839 - my $x; 1 for $x->{a}; () <+delete> [variable] ok 1840 - our $x; local $x; use strict; 1 for $x->{a}; () <+delete> [exception] ok 1841 - our $x; local $x; use strict; 1 for $x->{a}; () <+delete> [return] ok 1842 - our $x; local $x; use strict; 1 for $x->{a}; () <+delete> [variable] ok 1843 - our $x; local $x; no strict; 1 for $x->{a}; () <+delete> [exception] ok 1844 - our $x; local $x; no strict; 1 for $x->{a}; () <+delete> [return] ok 1845 - our $x; local $x; no strict; 1 for $x->{a}; () <+delete> [variable] ok 1846 - my $x; 1 for $$x{a}; () <+delete> [exception] ok 1847 - my $x; 1 for $$x{a}; () <+delete> [return] ok 1848 - my $x; 1 for $$x{a}; () <+delete> [variable] ok 1849 - our $x; local $x; use strict; 1 for $$x{a}; () <+delete> [exception] ok 1850 - our $x; local $x; use strict; 1 for $$x{a}; () <+delete> [return] ok 1851 - our $x; local $x; use strict; 1 for $$x{a}; () <+delete> [variable] ok 1852 - our $x; local $x; no strict; 1 for $$x{a}; () <+delete> [exception] ok 1853 - our $x; local $x; no strict; 1 for $$x{a}; () <+delete> [return] ok 1854 - our $x; local $x; no strict; 1 for $$x{a}; () <+delete> [variable] ok 1855 - my %x; 1 for $x{a}; () <+delete> [exception] ok 1856 - my %x; 1 for $x{a}; () <+delete> [return] ok 1857 - my %x; 1 for $x{a}; () <+delete> [variable] ok 1858 - our %x; local %x; use strict; 1 for $x{a}; () <+delete> [exception] ok 1859 - our %x; local %x; use strict; 1 for $x{a}; () <+delete> [return] ok 1860 - our %x; local %x; use strict; 1 for $x{a}; () <+delete> [variable] ok 1861 - our %x; local %x; no strict; 1 for $x{a}; () <+delete> [exception] ok 1862 - our %x; local %x; no strict; 1 for $x{a}; () <+delete> [return] ok 1863 - our %x; local %x; no strict; 1 for $x{a}; () <+delete> [variable] ok 1864 - my $x; 1 for $x->{a}; () <+store> [exception] ok 1865 - my $x; 1 for $x->{a}; () <+store> [return] ok 1866 - my $x; 1 for $x->{a}; () <+store> [variable] ok 1867 - our $x; local $x; use strict; 1 for $x->{a}; () <+store> [exception] ok 1868 - our $x; local $x; use strict; 1 for $x->{a}; () <+store> [return] ok 1869 - our $x; local $x; use strict; 1 for $x->{a}; () <+store> [variable] ok 1870 - our $x; local $x; no strict; 1 for $x->{a}; () <+store> [exception] ok 1871 - our $x; local $x; no strict; 1 for $x->{a}; () <+store> [return] ok 1872 - our $x; local $x; no strict; 1 for $x->{a}; () <+store> [variable] ok 1873 - my $x; 1 for $$x{a}; () <+store> [exception] ok 1874 - my $x; 1 for $$x{a}; () <+store> [return] ok 1875 - my $x; 1 for $$x{a}; () <+store> [variable] ok 1876 - our $x; local $x; use strict; 1 for $$x{a}; () <+store> [exception] ok 1877 - our $x; local $x; use strict; 1 for $$x{a}; () <+store> [return] ok 1878 - our $x; local $x; use strict; 1 for $$x{a}; () <+store> [variable] ok 1879 - our $x; local $x; no strict; 1 for $$x{a}; () <+store> [exception] ok 1880 - our $x; local $x; no strict; 1 for $$x{a}; () <+store> [return] ok 1881 - our $x; local $x; no strict; 1 for $$x{a}; () <+store> [variable] ok 1882 - my %x; 1 <+store> [exception] ok 1883 - my %x; 1 <+store> [return] ok 1884 - my %x; 1 <+store> [variable] ok 1885 - our %x; local %x; use strict; 1 <+store> [exception] ok 1886 - our %x; local %x; use strict; 1 <+store> [return] ok 1887 - our %x; local %x; use strict; 1 <+store> [variable] ok 1888 - our %x; local %x; no strict; 1 <+store> [exception] ok 1889 - our %x; local %x; no strict; 1 <+store> [return] ok 1890 - our %x; local %x; no strict; 1 <+store> [variable] ok 1891 - my $x; $_ = 1 for $x->{a}; () [exception] ok 1892 - my $x; $_ = 1 for $x->{a}; () [return] ok 1893 - my $x; $_ = 1 for $x->{a}; () [variable] ok 1894 - our $x; local $x; use strict; $_ = 1 for $x->{a}; () [exception] ok 1895 - our $x; local $x; use strict; $_ = 1 for $x->{a}; () [return] ok 1896 - our $x; local $x; use strict; $_ = 1 for $x->{a}; () [variable] ok 1897 - our $x; local $x; no strict; $_ = 1 for $x->{a}; () [exception] ok 1898 - our $x; local $x; no strict; $_ = 1 for $x->{a}; () [return] ok 1899 - our $x; local $x; no strict; $_ = 1 for $x->{a}; () [variable] ok 1900 - my $x; $_ = 1 for $$x{a}; () [exception] ok 1901 - my $x; $_ = 1 for $$x{a}; () [return] ok 1902 - my $x; $_ = 1 for $$x{a}; () [variable] ok 1903 - our $x; local $x; use strict; $_ = 1 for $$x{a}; () [exception] ok 1904 - our $x; local $x; use strict; $_ = 1 for $$x{a}; () [return] ok 1905 - our $x; local $x; use strict; $_ = 1 for $$x{a}; () [variable] ok 1906 - our $x; local $x; no strict; $_ = 1 for $$x{a}; () [exception] ok 1907 - our $x; local $x; no strict; $_ = 1 for $$x{a}; () [return] ok 1908 - our $x; local $x; no strict; $_ = 1 for $$x{a}; () [variable] ok 1909 - my %x; $_ = 1 for $x{a}; () [exception] ok 1910 - my %x; $_ = 1 for $x{a}; () [return] ok 1911 - my %x; $_ = 1 for $x{a}; () [variable] ok 1912 - our %x; local %x; use strict; $_ = 1 for $x{a}; () [exception] ok 1913 - our %x; local %x; use strict; $_ = 1 for $x{a}; () [return] ok 1914 - our %x; local %x; use strict; $_ = 1 for $x{a}; () [variable] ok 1915 - our %x; local %x; no strict; $_ = 1 for $x{a}; () [exception] ok 1916 - our %x; local %x; no strict; $_ = 1 for $x{a}; () [return] ok 1917 - our %x; local %x; no strict; $_ = 1 for $x{a}; () [variable] ok 1918 - my $x; $_ = 1 for $x->{a}; () [exception] ok 1919 - my $x; $_ = 1 for $x->{a}; () [return] ok 1920 - my $x; $_ = 1 for $x->{a}; () [variable] ok 1921 - our $x; local $x; use strict; $_ = 1 for $x->{a}; () [exception] ok 1922 - our $x; local $x; use strict; $_ = 1 for $x->{a}; () [return] ok 1923 - our $x; local $x; use strict; $_ = 1 for $x->{a}; () [variable] ok 1924 - our $x; local $x; no strict; $_ = 1 for $x->{a}; () [exception] ok 1925 - our $x; local $x; no strict; $_ = 1 for $x->{a}; () [return] ok 1926 - our $x; local $x; no strict; $_ = 1 for $x->{a}; () [variable] ok 1927 - my $x; $_ = 1 for $$x{a}; () [exception] ok 1928 - my $x; $_ = 1 for $$x{a}; () [return] ok 1929 - my $x; $_ = 1 for $$x{a}; () [variable] ok 1930 - our $x; local $x; use strict; $_ = 1 for $$x{a}; () [exception] ok 1931 - our $x; local $x; use strict; $_ = 1 for $$x{a}; () [return] ok 1932 - our $x; local $x; use strict; $_ = 1 for $$x{a}; () [variable] ok 1933 - our $x; local $x; no strict; $_ = 1 for $$x{a}; () [exception] ok 1934 - our $x; local $x; no strict; $_ = 1 for $$x{a}; () [return] ok 1935 - our $x; local $x; no strict; $_ = 1 for $$x{a}; () [variable] ok 1936 - my %x; $_ = 1 for $x{a}; () [exception] ok 1937 - my %x; $_ = 1 for $x{a}; () [return] ok 1938 - my %x; $_ = 1 for $x{a}; () [variable] ok 1939 - our %x; local %x; use strict; $_ = 1 for $x{a}; () [exception] ok 1940 - our %x; local %x; use strict; $_ = 1 for $x{a}; () [return] ok 1941 - our %x; local %x; use strict; $_ = 1 for $x{a}; () [variable] ok 1942 - our %x; local %x; no strict; $_ = 1 for $x{a}; () [exception] ok 1943 - our %x; local %x; no strict; $_ = 1 for $x{a}; () [return] ok 1944 - our %x; local %x; no strict; $_ = 1 for $x{a}; () [variable] ok 1945 - my $x; $_ = 1 for $x->{a}; () <+fetch> [exception] ok 1946 - my $x; $_ = 1 for $x->{a}; () <+fetch> [return] ok 1947 - my $x; $_ = 1 for $x->{a}; () <+fetch> [variable] ok 1948 - our $x; local $x; use strict; $_ = 1 for $x->{a}; () <+fetch> [exception] ok 1949 - our $x; local $x; use strict; $_ = 1 for $x->{a}; () <+fetch> [return] ok 1950 - our $x; local $x; use strict; $_ = 1 for $x->{a}; () <+fetch> [variable] ok 1951 - our $x; local $x; no strict; $_ = 1 for $x->{a}; () <+fetch> [exception] ok 1952 - our $x; local $x; no strict; $_ = 1 for $x->{a}; () <+fetch> [return] ok 1953 - our $x; local $x; no strict; $_ = 1 for $x->{a}; () <+fetch> [variable] ok 1954 - my $x; $_ = 1 for $$x{a}; () <+fetch> [exception] ok 1955 - my $x; $_ = 1 for $$x{a}; () <+fetch> [return] ok 1956 - my $x; $_ = 1 for $$x{a}; () <+fetch> [variable] ok 1957 - our $x; local $x; use strict; $_ = 1 for $$x{a}; () <+fetch> [exception] ok 1958 - our $x; local $x; use strict; $_ = 1 for $$x{a}; () <+fetch> [return] ok 1959 - our $x; local $x; use strict; $_ = 1 for $$x{a}; () <+fetch> [variable] ok 1960 - our $x; local $x; no strict; $_ = 1 for $$x{a}; () <+fetch> [exception] ok 1961 - our $x; local $x; no strict; $_ = 1 for $$x{a}; () <+fetch> [return] ok 1962 - our $x; local $x; no strict; $_ = 1 for $$x{a}; () <+fetch> [variable] ok 1963 - my %x; $_ = 1 for $x{a}; () <+fetch> [exception] ok 1964 - my %x; $_ = 1 for $x{a}; () <+fetch> [return] ok 1965 - my %x; $_ = 1 for $x{a}; () <+fetch> [variable] ok 1966 - our %x; local %x; use strict; $_ = 1 for $x{a}; () <+fetch> [exception] ok 1967 - our %x; local %x; use strict; $_ = 1 for $x{a}; () <+fetch> [return] ok 1968 - our %x; local %x; use strict; $_ = 1 for $x{a}; () <+fetch> [variable] ok 1969 - our %x; local %x; no strict; $_ = 1 for $x{a}; () <+fetch> [exception] ok 1970 - our %x; local %x; no strict; $_ = 1 for $x{a}; () <+fetch> [return] ok 1971 - our %x; local %x; no strict; $_ = 1 for $x{a}; () <+fetch> [variable] ok 1972 - my $x; $_ = 1 for $x->{a}; () <+exists> [exception] ok 1973 - my $x; $_ = 1 for $x->{a}; () <+exists> [return] ok 1974 - my $x; $_ = 1 for $x->{a}; () <+exists> [variable] ok 1975 - our $x; local $x; use strict; $_ = 1 for $x->{a}; () <+exists> [exception] ok 1976 - our $x; local $x; use strict; $_ = 1 for $x->{a}; () <+exists> [return] ok 1977 - our $x; local $x; use strict; $_ = 1 for $x->{a}; () <+exists> [variable] ok 1978 - our $x; local $x; no strict; $_ = 1 for $x->{a}; () <+exists> [exception] ok 1979 - our $x; local $x; no strict; $_ = 1 for $x->{a}; () <+exists> [return] ok 1980 - our $x; local $x; no strict; $_ = 1 for $x->{a}; () <+exists> [variable] ok 1981 - my $x; $_ = 1 for $$x{a}; () <+exists> [exception] ok 1982 - my $x; $_ = 1 for $$x{a}; () <+exists> [return] ok 1983 - my $x; $_ = 1 for $$x{a}; () <+exists> [variable] ok 1984 - our $x; local $x; use strict; $_ = 1 for $$x{a}; () <+exists> [exception] ok 1985 - our $x; local $x; use strict; $_ = 1 for $$x{a}; () <+exists> [return] ok 1986 - our $x; local $x; use strict; $_ = 1 for $$x{a}; () <+exists> [variable] ok 1987 - our $x; local $x; no strict; $_ = 1 for $$x{a}; () <+exists> [exception] ok 1988 - our $x; local $x; no strict; $_ = 1 for $$x{a}; () <+exists> [return] ok 1989 - our $x; local $x; no strict; $_ = 1 for $$x{a}; () <+exists> [variable] ok 1990 - my %x; $_ = 1 for $x{a}; () <+exists> [exception] ok 1991 - my %x; $_ = 1 for $x{a}; () <+exists> [return] ok 1992 - my %x; $_ = 1 for $x{a}; () <+exists> [variable] ok 1993 - our %x; local %x; use strict; $_ = 1 for $x{a}; () <+exists> [exception] ok 1994 - our %x; local %x; use strict; $_ = 1 for $x{a}; () <+exists> [return] ok 1995 - our %x; local %x; use strict; $_ = 1 for $x{a}; () <+exists> [variable] ok 1996 - our %x; local %x; no strict; $_ = 1 for $x{a}; () <+exists> [exception] ok 1997 - our %x; local %x; no strict; $_ = 1 for $x{a}; () <+exists> [return] ok 1998 - our %x; local %x; no strict; $_ = 1 for $x{a}; () <+exists> [variable] ok 1999 - my $x; $_ = 1 for $x->{a}; () <+delete> [exception] ok 2000 - my $x; $_ = 1 for $x->{a}; () <+delete> [return] ok 2001 - my $x; $_ = 1 for $x->{a}; () <+delete> [variable] ok 2002 - our $x; local $x; use strict; $_ = 1 for $x->{a}; () <+delete> [exception] ok 2003 - our $x; local $x; use strict; $_ = 1 for $x->{a}; () <+delete> [return] ok 2004 - our $x; local $x; use strict; $_ = 1 for $x->{a}; () <+delete> [variable] ok 2005 - our $x; local $x; no strict; $_ = 1 for $x->{a}; () <+delete> [exception] ok 2006 - our $x; local $x; no strict; $_ = 1 for $x->{a}; () <+delete> [return] ok 2007 - our $x; local $x; no strict; $_ = 1 for $x->{a}; () <+delete> [variable] ok 2008 - my $x; $_ = 1 for $$x{a}; () <+delete> [exception] ok 2009 - my $x; $_ = 1 for $$x{a}; () <+delete> [return] ok 2010 - my $x; $_ = 1 for $$x{a}; () <+delete> [variable] ok 2011 - our $x; local $x; use strict; $_ = 1 for $$x{a}; () <+delete> [exception] ok 2012 - our $x; local $x; use strict; $_ = 1 for $$x{a}; () <+delete> [return] ok 2013 - our $x; local $x; use strict; $_ = 1 for $$x{a}; () <+delete> [variable] ok 2014 - our $x; local $x; no strict; $_ = 1 for $$x{a}; () <+delete> [exception] ok 2015 - our $x; local $x; no strict; $_ = 1 for $$x{a}; () <+delete> [return] ok 2016 - our $x; local $x; no strict; $_ = 1 for $$x{a}; () <+delete> [variable] ok 2017 - my %x; $_ = 1 for $x{a}; () <+delete> [exception] ok 2018 - my %x; $_ = 1 for $x{a}; () <+delete> [return] ok 2019 - my %x; $_ = 1 for $x{a}; () <+delete> [variable] ok 2020 - our %x; local %x; use strict; $_ = 1 for $x{a}; () <+delete> [exception] ok 2021 - our %x; local %x; use strict; $_ = 1 for $x{a}; () <+delete> [return] ok 2022 - our %x; local %x; use strict; $_ = 1 for $x{a}; () <+delete> [variable] ok 2023 - our %x; local %x; no strict; $_ = 1 for $x{a}; () <+delete> [exception] ok 2024 - our %x; local %x; no strict; $_ = 1 for $x{a}; () <+delete> [return] ok 2025 - our %x; local %x; no strict; $_ = 1 for $x{a}; () <+delete> [variable] ok 2026 - my $x; $_ = 1 for $x->{a}; () <+store> [exception] ok 2027 - my $x; $_ = 1 for $x->{a}; () <+store> [return] ok 2028 - my $x; $_ = 1 for $x->{a}; () <+store> [variable] ok 2029 - our $x; local $x; use strict; $_ = 1 for $x->{a}; () <+store> [exception] ok 2030 - our $x; local $x; use strict; $_ = 1 for $x->{a}; () <+store> [return] ok 2031 - our $x; local $x; use strict; $_ = 1 for $x->{a}; () <+store> [variable] ok 2032 - our $x; local $x; no strict; $_ = 1 for $x->{a}; () <+store> [exception] ok 2033 - our $x; local $x; no strict; $_ = 1 for $x->{a}; () <+store> [return] ok 2034 - our $x; local $x; no strict; $_ = 1 for $x->{a}; () <+store> [variable] ok 2035 - my $x; $_ = 1 for $$x{a}; () <+store> [exception] ok 2036 - my $x; $_ = 1 for $$x{a}; () <+store> [return] ok 2037 - my $x; $_ = 1 for $$x{a}; () <+store> [variable] ok 2038 - our $x; local $x; use strict; $_ = 1 for $$x{a}; () <+store> [exception] ok 2039 - our $x; local $x; use strict; $_ = 1 for $$x{a}; () <+store> [return] ok 2040 - our $x; local $x; use strict; $_ = 1 for $$x{a}; () <+store> [variable] ok 2041 - our $x; local $x; no strict; $_ = 1 for $$x{a}; () <+store> [exception] ok 2042 - our $x; local $x; no strict; $_ = 1 for $$x{a}; () <+store> [return] ok 2043 - our $x; local $x; no strict; $_ = 1 for $$x{a}; () <+store> [variable] ok 2044 - my %x; 1 <+store> [exception] ok 2045 - my %x; 1 <+store> [return] ok 2046 - my %x; 1 <+store> [variable] ok 2047 - our %x; local %x; use strict; 1 <+store> [exception] ok 2048 - our %x; local %x; use strict; 1 <+store> [return] ok 2049 - our %x; local %x; use strict; 1 <+store> [variable] ok 2050 - our %x; local %x; no strict; 1 <+store> [exception] ok 2051 - our %x; local %x; no strict; 1 <+store> [return] ok 2052 - our %x; local %x; no strict; 1 <+store> [variable] ok 2053 - my $x; $x->{a} = 1; 1 for $x->{a}; () <+fetch> [exception] ok 2054 - my $x; $x->{a} = 1; 1 for $x->{a}; () <+fetch> [return] ok 2055 - my $x; $x->{a} = 1; 1 for $x->{a}; () <+fetch> [variable] ok 2056 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{a}; () <+fetch> [exception] ok 2057 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{a}; () <+fetch> [return] ok 2058 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{a}; () <+fetch> [variable] ok 2059 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{a}; () <+fetch> [exception] ok 2060 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{a}; () <+fetch> [return] ok 2061 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{a}; () <+fetch> [variable] ok 2062 - my $x; $x->{a} = 1; 1 for $$x{a}; () <+fetch> [exception] ok 2063 - my $x; $x->{a} = 1; 1 for $$x{a}; () <+fetch> [return] ok 2064 - my $x; $x->{a} = 1; 1 for $$x{a}; () <+fetch> [variable] ok 2065 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{a}; () <+fetch> [exception] ok 2066 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{a}; () <+fetch> [return] ok 2067 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{a}; () <+fetch> [variable] ok 2068 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{a}; () <+fetch> [exception] ok 2069 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{a}; () <+fetch> [return] ok 2070 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{a}; () <+fetch> [variable] ok 2071 - my %x; $x{a} = 1; 1 for $x{a}; () <+fetch> [exception] ok 2072 - my %x; $x{a} = 1; 1 for $x{a}; () <+fetch> [return] ok 2073 - my %x; $x{a} = 1; 1 for $x{a}; () <+fetch> [variable] ok 2074 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{a}; () <+fetch> [exception] ok 2075 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{a}; () <+fetch> [return] ok 2076 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{a}; () <+fetch> [variable] ok 2077 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{a}; () <+fetch> [exception] ok 2078 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{a}; () <+fetch> [return] ok 2079 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{a}; () <+fetch> [variable] ok 2080 - my $x; $x->{a} = 1; 1 for $x->{b}; () <+fetch> [exception] ok 2081 - my $x; $x->{a} = 1; 1 for $x->{b}; () <+fetch> [return] ok 2082 - my $x; $x->{a} = 1; 1 for $x->{b}; () <+fetch> [variable] ok 2083 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{b}; () <+fetch> [exception] ok 2084 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{b}; () <+fetch> [return] ok 2085 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{b}; () <+fetch> [variable] ok 2086 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{b}; () <+fetch> [exception] ok 2087 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{b}; () <+fetch> [return] ok 2088 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{b}; () <+fetch> [variable] ok 2089 - my $x; $x->{a} = 1; 1 for $$x{b}; () <+fetch> [exception] ok 2090 - my $x; $x->{a} = 1; 1 for $$x{b}; () <+fetch> [return] ok 2091 - my $x; $x->{a} = 1; 1 for $$x{b}; () <+fetch> [variable] ok 2092 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{b}; () <+fetch> [exception] ok 2093 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{b}; () <+fetch> [return] ok 2094 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{b}; () <+fetch> [variable] ok 2095 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{b}; () <+fetch> [exception] ok 2096 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{b}; () <+fetch> [return] ok 2097 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{b}; () <+fetch> [variable] ok 2098 - my %x; $x{a} = 1; 1 for $x{b}; () <+fetch> [exception] ok 2099 - my %x; $x{a} = 1; 1 for $x{b}; () <+fetch> [return] ok 2100 - my %x; $x{a} = 1; 1 for $x{b}; () <+fetch> [variable] ok 2101 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{b}; () <+fetch> [exception] ok 2102 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{b}; () <+fetch> [return] ok 2103 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{b}; () <+fetch> [variable] ok 2104 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{b}; () <+fetch> [exception] ok 2105 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{b}; () <+fetch> [return] ok 2106 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{b}; () <+fetch> [variable] ok 2107 - my $x; $x->{a} = 1; 1 for $x->{a}; () <+exists> [exception] ok 2108 - my $x; $x->{a} = 1; 1 for $x->{a}; () <+exists> [return] ok 2109 - my $x; $x->{a} = 1; 1 for $x->{a}; () <+exists> [variable] ok 2110 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{a}; () <+exists> [exception] ok 2111 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{a}; () <+exists> [return] ok 2112 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{a}; () <+exists> [variable] ok 2113 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{a}; () <+exists> [exception] ok 2114 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{a}; () <+exists> [return] ok 2115 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{a}; () <+exists> [variable] ok 2116 - my $x; $x->{a} = 1; 1 for $$x{a}; () <+exists> [exception] ok 2117 - my $x; $x->{a} = 1; 1 for $$x{a}; () <+exists> [return] ok 2118 - my $x; $x->{a} = 1; 1 for $$x{a}; () <+exists> [variable] ok 2119 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{a}; () <+exists> [exception] ok 2120 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{a}; () <+exists> [return] ok 2121 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{a}; () <+exists> [variable] ok 2122 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{a}; () <+exists> [exception] ok 2123 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{a}; () <+exists> [return] ok 2124 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{a}; () <+exists> [variable] ok 2125 - my %x; $x{a} = 1; 1 for $x{a}; () <+exists> [exception] ok 2126 - my %x; $x{a} = 1; 1 for $x{a}; () <+exists> [return] ok 2127 - my %x; $x{a} = 1; 1 for $x{a}; () <+exists> [variable] ok 2128 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{a}; () <+exists> [exception] ok 2129 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{a}; () <+exists> [return] ok 2130 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{a}; () <+exists> [variable] ok 2131 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{a}; () <+exists> [exception] ok 2132 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{a}; () <+exists> [return] ok 2133 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{a}; () <+exists> [variable] ok 2134 - my $x; $x->{a} = 1; 1 for $x->{b}; () <+exists> [exception] ok 2135 - my $x; $x->{a} = 1; 1 for $x->{b}; () <+exists> [return] ok 2136 - my $x; $x->{a} = 1; 1 for $x->{b}; () <+exists> [variable] ok 2137 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{b}; () <+exists> [exception] ok 2138 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{b}; () <+exists> [return] ok 2139 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{b}; () <+exists> [variable] ok 2140 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{b}; () <+exists> [exception] ok 2141 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{b}; () <+exists> [return] ok 2142 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{b}; () <+exists> [variable] ok 2143 - my $x; $x->{a} = 1; 1 for $$x{b}; () <+exists> [exception] ok 2144 - my $x; $x->{a} = 1; 1 for $$x{b}; () <+exists> [return] ok 2145 - my $x; $x->{a} = 1; 1 for $$x{b}; () <+exists> [variable] ok 2146 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{b}; () <+exists> [exception] ok 2147 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{b}; () <+exists> [return] ok 2148 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{b}; () <+exists> [variable] ok 2149 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{b}; () <+exists> [exception] ok 2150 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{b}; () <+exists> [return] ok 2151 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{b}; () <+exists> [variable] ok 2152 - my %x; $x{a} = 1; 1 for $x{b}; () <+exists> [exception] ok 2153 - my %x; $x{a} = 1; 1 for $x{b}; () <+exists> [return] ok 2154 - my %x; $x{a} = 1; 1 for $x{b}; () <+exists> [variable] ok 2155 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{b}; () <+exists> [exception] ok 2156 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{b}; () <+exists> [return] ok 2157 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{b}; () <+exists> [variable] ok 2158 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{b}; () <+exists> [exception] ok 2159 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{b}; () <+exists> [return] ok 2160 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{b}; () <+exists> [variable] ok 2161 - my $x; $x->{a} = 1; 1 for $x->{a}; () <+delete> [exception] ok 2162 - my $x; $x->{a} = 1; 1 for $x->{a}; () <+delete> [return] ok 2163 - my $x; $x->{a} = 1; 1 for $x->{a}; () <+delete> [variable] ok 2164 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{a}; () <+delete> [exception] ok 2165 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{a}; () <+delete> [return] ok 2166 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{a}; () <+delete> [variable] ok 2167 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{a}; () <+delete> [exception] ok 2168 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{a}; () <+delete> [return] ok 2169 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{a}; () <+delete> [variable] ok 2170 - my $x; $x->{a} = 1; 1 for $$x{a}; () <+delete> [exception] ok 2171 - my $x; $x->{a} = 1; 1 for $$x{a}; () <+delete> [return] ok 2172 - my $x; $x->{a} = 1; 1 for $$x{a}; () <+delete> [variable] ok 2173 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{a}; () <+delete> [exception] ok 2174 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{a}; () <+delete> [return] ok 2175 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{a}; () <+delete> [variable] ok 2176 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{a}; () <+delete> [exception] ok 2177 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{a}; () <+delete> [return] ok 2178 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{a}; () <+delete> [variable] ok 2179 - my %x; $x{a} = 1; 1 for $x{a}; () <+delete> [exception] ok 2180 - my %x; $x{a} = 1; 1 for $x{a}; () <+delete> [return] ok 2181 - my %x; $x{a} = 1; 1 for $x{a}; () <+delete> [variable] ok 2182 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{a}; () <+delete> [exception] ok 2183 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{a}; () <+delete> [return] ok 2184 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{a}; () <+delete> [variable] ok 2185 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{a}; () <+delete> [exception] ok 2186 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{a}; () <+delete> [return] ok 2187 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{a}; () <+delete> [variable] ok 2188 - my $x; $x->{a} = 1; 1 for $x->{b}; () <+delete> [exception] ok 2189 - my $x; $x->{a} = 1; 1 for $x->{b}; () <+delete> [return] ok 2190 - my $x; $x->{a} = 1; 1 for $x->{b}; () <+delete> [variable] ok 2191 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{b}; () <+delete> [exception] ok 2192 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{b}; () <+delete> [return] ok 2193 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{b}; () <+delete> [variable] ok 2194 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{b}; () <+delete> [exception] ok 2195 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{b}; () <+delete> [return] ok 2196 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{b}; () <+delete> [variable] ok 2197 - my $x; $x->{a} = 1; 1 for $$x{b}; () <+delete> [exception] ok 2198 - my $x; $x->{a} = 1; 1 for $$x{b}; () <+delete> [return] ok 2199 - my $x; $x->{a} = 1; 1 for $$x{b}; () <+delete> [variable] ok 2200 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{b}; () <+delete> [exception] ok 2201 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{b}; () <+delete> [return] ok 2202 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{b}; () <+delete> [variable] ok 2203 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{b}; () <+delete> [exception] ok 2204 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{b}; () <+delete> [return] ok 2205 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{b}; () <+delete> [variable] ok 2206 - my %x; $x{a} = 1; 1 for $x{b}; () <+delete> [exception] ok 2207 - my %x; $x{a} = 1; 1 for $x{b}; () <+delete> [return] ok 2208 - my %x; $x{a} = 1; 1 for $x{b}; () <+delete> [variable] ok 2209 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{b}; () <+delete> [exception] ok 2210 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{b}; () <+delete> [return] ok 2211 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{b}; () <+delete> [variable] ok 2212 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{b}; () <+delete> [exception] ok 2213 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{b}; () <+delete> [return] ok 2214 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{b}; () <+delete> [variable] ok 2215 - my $x; $x->{a} = 1; 1 for $x->{a}; () <+store> [exception] ok 2216 - my $x; $x->{a} = 1; 1 for $x->{a}; () <+store> [return] ok 2217 - my $x; $x->{a} = 1; 1 for $x->{a}; () <+store> [variable] ok 2218 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{a}; () <+store> [exception] ok 2219 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{a}; () <+store> [return] ok 2220 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{a}; () <+store> [variable] ok 2221 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{a}; () <+store> [exception] ok 2222 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{a}; () <+store> [return] ok 2223 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{a}; () <+store> [variable] ok 2224 - my $x; $x->{a} = 1; 1 for $$x{a}; () <+store> [exception] ok 2225 - my $x; $x->{a} = 1; 1 for $$x{a}; () <+store> [return] ok 2226 - my $x; $x->{a} = 1; 1 for $$x{a}; () <+store> [variable] ok 2227 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{a}; () <+store> [exception] ok 2228 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{a}; () <+store> [return] ok 2229 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{a}; () <+store> [variable] ok 2230 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{a}; () <+store> [exception] ok 2231 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{a}; () <+store> [return] ok 2232 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{a}; () <+store> [variable] ok 2233 - my %x; $x{a} = 1; 1 for $x{a}; () <+store> [exception] ok 2234 - my %x; $x{a} = 1; 1 for $x{a}; () <+store> [return] ok 2235 - my %x; $x{a} = 1; 1 for $x{a}; () <+store> [variable] ok 2236 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{a}; () <+store> [exception] ok 2237 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{a}; () <+store> [return] ok 2238 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{a}; () <+store> [variable] ok 2239 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{a}; () <+store> [exception] ok 2240 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{a}; () <+store> [return] ok 2241 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{a}; () <+store> [variable] ok 2242 - my $x; $x->{a} = 1; 1 for $x->{b}; () <+store> [exception] ok 2243 - my $x; $x->{a} = 1; 1 for $x->{b}; () <+store> [return] ok 2244 - my $x; $x->{a} = 1; 1 for $x->{b}; () <+store> [variable] ok 2245 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{b}; () <+store> [exception] ok 2246 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{b}; () <+store> [return] ok 2247 - our $x; local $x; use strict; $x->{a} = 1; 1 for $x->{b}; () <+store> [variable] ok 2248 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{b}; () <+store> [exception] ok 2249 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{b}; () <+store> [return] ok 2250 - our $x; local $x; no strict; $x->{a} = 1; 1 for $x->{b}; () <+store> [variable] ok 2251 - my $x; $x->{a} = 1; 1 for $$x{b}; () <+store> [exception] ok 2252 - my $x; $x->{a} = 1; 1 for $$x{b}; () <+store> [return] ok 2253 - my $x; $x->{a} = 1; 1 for $$x{b}; () <+store> [variable] ok 2254 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{b}; () <+store> [exception] ok 2255 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{b}; () <+store> [return] ok 2256 - our $x; local $x; use strict; $x->{a} = 1; 1 for $$x{b}; () <+store> [variable] ok 2257 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{b}; () <+store> [exception] ok 2258 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{b}; () <+store> [return] ok 2259 - our $x; local $x; no strict; $x->{a} = 1; 1 for $$x{b}; () <+store> [variable] ok 2260 - my %x; $x{a} = 1; 1 for $x{b}; () <+store> [exception] ok 2261 - my %x; $x{a} = 1; 1 for $x{b}; () <+store> [return] ok 2262 - my %x; $x{a} = 1; 1 for $x{b}; () <+store> [variable] ok 2263 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{b}; () <+store> [exception] ok 2264 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{b}; () <+store> [return] ok 2265 - our %x; local %x; use strict; $x{a} = 1; 1 for $x{b}; () <+store> [variable] ok 2266 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{b}; () <+store> [exception] ok 2267 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{b}; () <+store> [return] ok 2268 - our %x; local %x; no strict; $x{a} = 1; 1 for $x{b}; () <+store> [variable] ok 2269 - my $x; do_nothing($x->{a}); () [exception] ok 2270 - my $x; do_nothing($x->{a}); () [return] ok 2271 - my $x; do_nothing($x->{a}); () [variable] ok 2272 - our $x; local $x; use strict; do_nothing($x->{a}); () [exception] ok 2273 - our $x; local $x; use strict; do_nothing($x->{a}); () [return] ok 2274 - our $x; local $x; use strict; do_nothing($x->{a}); () [variable] ok 2275 - our $x; local $x; no strict; do_nothing($x->{a}); () [exception] ok 2276 - our $x; local $x; no strict; do_nothing($x->{a}); () [return] ok 2277 - our $x; local $x; no strict; do_nothing($x->{a}); () [variable] ok 2278 - my $x; do_nothing($$x{a}); () [exception] ok 2279 - my $x; do_nothing($$x{a}); () [return] ok 2280 - my $x; do_nothing($$x{a}); () [variable] ok 2281 - our $x; local $x; use strict; do_nothing($$x{a}); () [exception] ok 2282 - our $x; local $x; use strict; do_nothing($$x{a}); () [return] ok 2283 - our $x; local $x; use strict; do_nothing($$x{a}); () [variable] ok 2284 - our $x; local $x; no strict; do_nothing($$x{a}); () [exception] ok 2285 - our $x; local $x; no strict; do_nothing($$x{a}); () [return] ok 2286 - our $x; local $x; no strict; do_nothing($$x{a}); () [variable] ok 2287 - my %x; do_nothing($x{a}); () [exception] ok 2288 - my %x; do_nothing($x{a}); () [return] ok 2289 - my %x; do_nothing($x{a}); () [variable] ok 2290 - our %x; local %x; use strict; do_nothing($x{a}); () [exception] ok 2291 - our %x; local %x; use strict; do_nothing($x{a}); () [return] ok 2292 - our %x; local %x; use strict; do_nothing($x{a}); () [variable] ok 2293 - our %x; local %x; no strict; do_nothing($x{a}); () [exception] ok 2294 - our %x; local %x; no strict; do_nothing($x{a}); () [return] ok 2295 - our %x; local %x; no strict; do_nothing($x{a}); () [variable] ok 2296 - my $x; do_nothing($x->{a}); () [exception] ok 2297 - my $x; do_nothing($x->{a}); () [return] ok 2298 - my $x; do_nothing($x->{a}); () [variable] ok 2299 - our $x; local $x; use strict; do_nothing($x->{a}); () [exception] ok 2300 - our $x; local $x; use strict; do_nothing($x->{a}); () [return] ok 2301 - our $x; local $x; use strict; do_nothing($x->{a}); () [variable] ok 2302 - our $x; local $x; no strict; do_nothing($x->{a}); () [exception] ok 2303 - our $x; local $x; no strict; do_nothing($x->{a}); () [return] ok 2304 - our $x; local $x; no strict; do_nothing($x->{a}); () [variable] ok 2305 - my $x; do_nothing($$x{a}); () [exception] ok 2306 - my $x; do_nothing($$x{a}); () [return] ok 2307 - my $x; do_nothing($$x{a}); () [variable] ok 2308 - our $x; local $x; use strict; do_nothing($$x{a}); () [exception] ok 2309 - our $x; local $x; use strict; do_nothing($$x{a}); () [return] ok 2310 - our $x; local $x; use strict; do_nothing($$x{a}); () [variable] ok 2311 - our $x; local $x; no strict; do_nothing($$x{a}); () [exception] ok 2312 - our $x; local $x; no strict; do_nothing($$x{a}); () [return] ok 2313 - our $x; local $x; no strict; do_nothing($$x{a}); () [variable] ok 2314 - my %x; do_nothing($x{a}); () [exception] ok 2315 - my %x; do_nothing($x{a}); () [return] ok 2316 - my %x; do_nothing($x{a}); () [variable] ok 2317 - our %x; local %x; use strict; do_nothing($x{a}); () [exception] ok 2318 - our %x; local %x; use strict; do_nothing($x{a}); () [return] ok 2319 - our %x; local %x; use strict; do_nothing($x{a}); () [variable] ok 2320 - our %x; local %x; no strict; do_nothing($x{a}); () [exception] ok 2321 - our %x; local %x; no strict; do_nothing($x{a}); () [return] ok 2322 - our %x; local %x; no strict; do_nothing($x{a}); () [variable] ok 2323 - my $x; do_nothing($x->{a}); () <+fetch> [exception] ok 2324 - my $x; do_nothing($x->{a}); () <+fetch> [return] ok 2325 - my $x; do_nothing($x->{a}); () <+fetch> [variable] ok 2326 - our $x; local $x; use strict; do_nothing($x->{a}); () <+fetch> [exception] ok 2327 - our $x; local $x; use strict; do_nothing($x->{a}); () <+fetch> [return] ok 2328 - our $x; local $x; use strict; do_nothing($x->{a}); () <+fetch> [variable] ok 2329 - our $x; local $x; no strict; do_nothing($x->{a}); () <+fetch> [exception] ok 2330 - our $x; local $x; no strict; do_nothing($x->{a}); () <+fetch> [return] ok 2331 - our $x; local $x; no strict; do_nothing($x->{a}); () <+fetch> [variable] ok 2332 - my $x; do_nothing($$x{a}); () <+fetch> [exception] ok 2333 - my $x; do_nothing($$x{a}); () <+fetch> [return] ok 2334 - my $x; do_nothing($$x{a}); () <+fetch> [variable] ok 2335 - our $x; local $x; use strict; do_nothing($$x{a}); () <+fetch> [exception] ok 2336 - our $x; local $x; use strict; do_nothing($$x{a}); () <+fetch> [return] ok 2337 - our $x; local $x; use strict; do_nothing($$x{a}); () <+fetch> [variable] ok 2338 - our $x; local $x; no strict; do_nothing($$x{a}); () <+fetch> [exception] ok 2339 - our $x; local $x; no strict; do_nothing($$x{a}); () <+fetch> [return] ok 2340 - our $x; local $x; no strict; do_nothing($$x{a}); () <+fetch> [variable] ok 2341 - my %x; do_nothing($x{a}); () <+fetch> [exception] ok 2342 - my %x; do_nothing($x{a}); () <+fetch> [return] ok 2343 - my %x; do_nothing($x{a}); () <+fetch> [variable] ok 2344 - our %x; local %x; use strict; do_nothing($x{a}); () <+fetch> [exception] ok 2345 - our %x; local %x; use strict; do_nothing($x{a}); () <+fetch> [return] ok 2346 - our %x; local %x; use strict; do_nothing($x{a}); () <+fetch> [variable] ok 2347 - our %x; local %x; no strict; do_nothing($x{a}); () <+fetch> [exception] ok 2348 - our %x; local %x; no strict; do_nothing($x{a}); () <+fetch> [return] ok 2349 - our %x; local %x; no strict; do_nothing($x{a}); () <+fetch> [variable] ok 2350 - my $x; do_nothing($x->{a}); () <+exists> [exception] ok 2351 - my $x; do_nothing($x->{a}); () <+exists> [return] ok 2352 - my $x; do_nothing($x->{a}); () <+exists> [variable] ok 2353 - our $x; local $x; use strict; do_nothing($x->{a}); () <+exists> [exception] ok 2354 - our $x; local $x; use strict; do_nothing($x->{a}); () <+exists> [return] ok 2355 - our $x; local $x; use strict; do_nothing($x->{a}); () <+exists> [variable] ok 2356 - our $x; local $x; no strict; do_nothing($x->{a}); () <+exists> [exception] ok 2357 - our $x; local $x; no strict; do_nothing($x->{a}); () <+exists> [return] ok 2358 - our $x; local $x; no strict; do_nothing($x->{a}); () <+exists> [variable] ok 2359 - my $x; do_nothing($$x{a}); () <+exists> [exception] ok 2360 - my $x; do_nothing($$x{a}); () <+exists> [return] ok 2361 - my $x; do_nothing($$x{a}); () <+exists> [variable] ok 2362 - our $x; local $x; use strict; do_nothing($$x{a}); () <+exists> [exception] ok 2363 - our $x; local $x; use strict; do_nothing($$x{a}); () <+exists> [return] ok 2364 - our $x; local $x; use strict; do_nothing($$x{a}); () <+exists> [variable] ok 2365 - our $x; local $x; no strict; do_nothing($$x{a}); () <+exists> [exception] ok 2366 - our $x; local $x; no strict; do_nothing($$x{a}); () <+exists> [return] ok 2367 - our $x; local $x; no strict; do_nothing($$x{a}); () <+exists> [variable] ok 2368 - my %x; do_nothing($x{a}); () <+exists> [exception] ok 2369 - my %x; do_nothing($x{a}); () <+exists> [return] ok 2370 - my %x; do_nothing($x{a}); () <+exists> [variable] ok 2371 - our %x; local %x; use strict; do_nothing($x{a}); () <+exists> [exception] ok 2372 - our %x; local %x; use strict; do_nothing($x{a}); () <+exists> [return] ok 2373 - our %x; local %x; use strict; do_nothing($x{a}); () <+exists> [variable] ok 2374 - our %x; local %x; no strict; do_nothing($x{a}); () <+exists> [exception] ok 2375 - our %x; local %x; no strict; do_nothing($x{a}); () <+exists> [return] ok 2376 - our %x; local %x; no strict; do_nothing($x{a}); () <+exists> [variable] ok 2377 - my $x; do_nothing($x->{a}); () <+delete> [exception] ok 2378 - my $x; do_nothing($x->{a}); () <+delete> [return] ok 2379 - my $x; do_nothing($x->{a}); () <+delete> [variable] ok 2380 - our $x; local $x; use strict; do_nothing($x->{a}); () <+delete> [exception] ok 2381 - our $x; local $x; use strict; do_nothing($x->{a}); () <+delete> [return] ok 2382 - our $x; local $x; use strict; do_nothing($x->{a}); () <+delete> [variable] ok 2383 - our $x; local $x; no strict; do_nothing($x->{a}); () <+delete> [exception] ok 2384 - our $x; local $x; no strict; do_nothing($x->{a}); () <+delete> [return] ok 2385 - our $x; local $x; no strict; do_nothing($x->{a}); () <+delete> [variable] ok 2386 - my $x; do_nothing($$x{a}); () <+delete> [exception] ok 2387 - my $x; do_nothing($$x{a}); () <+delete> [return] ok 2388 - my $x; do_nothing($$x{a}); () <+delete> [variable] ok 2389 - our $x; local $x; use strict; do_nothing($$x{a}); () <+delete> [exception] ok 2390 - our $x; local $x; use strict; do_nothing($$x{a}); () <+delete> [return] ok 2391 - our $x; local $x; use strict; do_nothing($$x{a}); () <+delete> [variable] ok 2392 - our $x; local $x; no strict; do_nothing($$x{a}); () <+delete> [exception] ok 2393 - our $x; local $x; no strict; do_nothing($$x{a}); () <+delete> [return] ok 2394 - our $x; local $x; no strict; do_nothing($$x{a}); () <+delete> [variable] ok 2395 - my %x; do_nothing($x{a}); () <+delete> [exception] ok 2396 - my %x; do_nothing($x{a}); () <+delete> [return] ok 2397 - my %x; do_nothing($x{a}); () <+delete> [variable] ok 2398 - our %x; local %x; use strict; do_nothing($x{a}); () <+delete> [exception] ok 2399 - our %x; local %x; use strict; do_nothing($x{a}); () <+delete> [return] ok 2400 - our %x; local %x; use strict; do_nothing($x{a}); () <+delete> [variable] ok 2401 - our %x; local %x; no strict; do_nothing($x{a}); () <+delete> [exception] ok 2402 - our %x; local %x; no strict; do_nothing($x{a}); () <+delete> [return] ok 2403 - our %x; local %x; no strict; do_nothing($x{a}); () <+delete> [variable] ok 2404 - my $x; do_nothing($x->{a}); () <+store> [exception] ok 2405 - my $x; do_nothing($x->{a}); () <+store> [return] ok 2406 - my $x; do_nothing($x->{a}); () <+store> [variable] ok 2407 - our $x; local $x; use strict; do_nothing($x->{a}); () <+store> [exception] ok 2408 - our $x; local $x; use strict; do_nothing($x->{a}); () <+store> [return] ok 2409 - our $x; local $x; use strict; do_nothing($x->{a}); () <+store> [variable] ok 2410 - our $x; local $x; no strict; do_nothing($x->{a}); () <+store> [exception] ok 2411 - our $x; local $x; no strict; do_nothing($x->{a}); () <+store> [return] ok 2412 - our $x; local $x; no strict; do_nothing($x->{a}); () <+store> [variable] ok 2413 - my $x; do_nothing($$x{a}); () <+store> [exception] ok 2414 - my $x; do_nothing($$x{a}); () <+store> [return] ok 2415 - my $x; do_nothing($$x{a}); () <+store> [variable] ok 2416 - our $x; local $x; use strict; do_nothing($$x{a}); () <+store> [exception] ok 2417 - our $x; local $x; use strict; do_nothing($$x{a}); () <+store> [return] ok 2418 - our $x; local $x; use strict; do_nothing($$x{a}); () <+store> [variable] ok 2419 - our $x; local $x; no strict; do_nothing($$x{a}); () <+store> [exception] ok 2420 - our $x; local $x; no strict; do_nothing($$x{a}); () <+store> [return] ok 2421 - our $x; local $x; no strict; do_nothing($$x{a}); () <+store> [variable] ok 2422 - my %x; 1 <+store> [exception] ok 2423 - my %x; 1 <+store> [return] ok 2424 - my %x; 1 <+store> [variable] ok 2425 - our %x; local %x; use strict; 1 <+store> [exception] ok 2426 - our %x; local %x; use strict; 1 <+store> [return] ok 2427 - our %x; local %x; use strict; 1 <+store> [variable] ok 2428 - our %x; local %x; no strict; 1 <+store> [exception] ok 2429 - our %x; local %x; no strict; 1 <+store> [return] ok 2430 - our %x; local %x; no strict; 1 <+store> [variable] ok 2431 - my $x; set_arg($x->{a}); () [exception] ok 2432 - my $x; set_arg($x->{a}); () [return] ok 2433 - my $x; set_arg($x->{a}); () [variable] ok 2434 - our $x; local $x; use strict; set_arg($x->{a}); () [exception] ok 2435 - our $x; local $x; use strict; set_arg($x->{a}); () [return] ok 2436 - our $x; local $x; use strict; set_arg($x->{a}); () [variable] ok 2437 - our $x; local $x; no strict; set_arg($x->{a}); () [exception] ok 2438 - our $x; local $x; no strict; set_arg($x->{a}); () [return] ok 2439 - our $x; local $x; no strict; set_arg($x->{a}); () [variable] ok 2440 - my $x; set_arg($$x{a}); () [exception] ok 2441 - my $x; set_arg($$x{a}); () [return] ok 2442 - my $x; set_arg($$x{a}); () [variable] ok 2443 - our $x; local $x; use strict; set_arg($$x{a}); () [exception] ok 2444 - our $x; local $x; use strict; set_arg($$x{a}); () [return] ok 2445 - our $x; local $x; use strict; set_arg($$x{a}); () [variable] ok 2446 - our $x; local $x; no strict; set_arg($$x{a}); () [exception] ok 2447 - our $x; local $x; no strict; set_arg($$x{a}); () [return] ok 2448 - our $x; local $x; no strict; set_arg($$x{a}); () [variable] ok 2449 - my %x; set_arg($x{a}); () [exception] ok 2450 - my %x; set_arg($x{a}); () [return] ok 2451 - my %x; set_arg($x{a}); () [variable] ok 2452 - our %x; local %x; use strict; set_arg($x{a}); () [exception] ok 2453 - our %x; local %x; use strict; set_arg($x{a}); () [return] ok 2454 - our %x; local %x; use strict; set_arg($x{a}); () [variable] ok 2455 - our %x; local %x; no strict; set_arg($x{a}); () [exception] ok 2456 - our %x; local %x; no strict; set_arg($x{a}); () [return] ok 2457 - our %x; local %x; no strict; set_arg($x{a}); () [variable] ok 2458 - my $x; set_arg($x->{a}); () [exception] ok 2459 - my $x; set_arg($x->{a}); () [return] ok 2460 - my $x; set_arg($x->{a}); () [variable] ok 2461 - our $x; local $x; use strict; set_arg($x->{a}); () [exception] ok 2462 - our $x; local $x; use strict; set_arg($x->{a}); () [return] ok 2463 - our $x; local $x; use strict; set_arg($x->{a}); () [variable] ok 2464 - our $x; local $x; no strict; set_arg($x->{a}); () [exception] ok 2465 - our $x; local $x; no strict; set_arg($x->{a}); () [return] ok 2466 - our $x; local $x; no strict; set_arg($x->{a}); () [variable] ok 2467 - my $x; set_arg($$x{a}); () [exception] ok 2468 - my $x; set_arg($$x{a}); () [return] ok 2469 - my $x; set_arg($$x{a}); () [variable] ok 2470 - our $x; local $x; use strict; set_arg($$x{a}); () [exception] ok 2471 - our $x; local $x; use strict; set_arg($$x{a}); () [return] ok 2472 - our $x; local $x; use strict; set_arg($$x{a}); () [variable] ok 2473 - our $x; local $x; no strict; set_arg($$x{a}); () [exception] ok 2474 - our $x; local $x; no strict; set_arg($$x{a}); () [return] ok 2475 - our $x; local $x; no strict; set_arg($$x{a}); () [variable] ok 2476 - my %x; set_arg($x{a}); () [exception] ok 2477 - my %x; set_arg($x{a}); () [return] ok 2478 - my %x; set_arg($x{a}); () [variable] ok 2479 - our %x; local %x; use strict; set_arg($x{a}); () [exception] ok 2480 - our %x; local %x; use strict; set_arg($x{a}); () [return] ok 2481 - our %x; local %x; use strict; set_arg($x{a}); () [variable] ok 2482 - our %x; local %x; no strict; set_arg($x{a}); () [exception] ok 2483 - our %x; local %x; no strict; set_arg($x{a}); () [return] ok 2484 - our %x; local %x; no strict; set_arg($x{a}); () [variable] ok 2485 - my $x; set_arg($x->{a}); () <+fetch> [exception] ok 2486 - my $x; set_arg($x->{a}); () <+fetch> [return] ok 2487 - my $x; set_arg($x->{a}); () <+fetch> [variable] ok 2488 - our $x; local $x; use strict; set_arg($x->{a}); () <+fetch> [exception] ok 2489 - our $x; local $x; use strict; set_arg($x->{a}); () <+fetch> [return] ok 2490 - our $x; local $x; use strict; set_arg($x->{a}); () <+fetch> [variable] ok 2491 - our $x; local $x; no strict; set_arg($x->{a}); () <+fetch> [exception] ok 2492 - our $x; local $x; no strict; set_arg($x->{a}); () <+fetch> [return] ok 2493 - our $x; local $x; no strict; set_arg($x->{a}); () <+fetch> [variable] ok 2494 - my $x; set_arg($$x{a}); () <+fetch> [exception] ok 2495 - my $x; set_arg($$x{a}); () <+fetch> [return] ok 2496 - my $x; set_arg($$x{a}); () <+fetch> [variable] ok 2497 - our $x; local $x; use strict; set_arg($$x{a}); () <+fetch> [exception] ok 2498 - our $x; local $x; use strict; set_arg($$x{a}); () <+fetch> [return] ok 2499 - our $x; local $x; use strict; set_arg($$x{a}); () <+fetch> [variable] ok 2500 - our $x; local $x; no strict; set_arg($$x{a}); () <+fetch> [exception] ok 2501 - our $x; local $x; no strict; set_arg($$x{a}); () <+fetch> [return] ok 2502 - our $x; local $x; no strict; set_arg($$x{a}); () <+fetch> [variable] ok 2503 - my %x; set_arg($x{a}); () <+fetch> [exception] ok 2504 - my %x; set_arg($x{a}); () <+fetch> [return] ok 2505 - my %x; set_arg($x{a}); () <+fetch> [variable] ok 2506 - our %x; local %x; use strict; set_arg($x{a}); () <+fetch> [exception] ok 2507 - our %x; local %x; use strict; set_arg($x{a}); () <+fetch> [return] ok 2508 - our %x; local %x; use strict; set_arg($x{a}); () <+fetch> [variable] ok 2509 - our %x; local %x; no strict; set_arg($x{a}); () <+fetch> [exception] ok 2510 - our %x; local %x; no strict; set_arg($x{a}); () <+fetch> [return] ok 2511 - our %x; local %x; no strict; set_arg($x{a}); () <+fetch> [variable] ok 2512 - my $x; set_arg($x->{a}); () <+exists> [exception] ok 2513 - my $x; set_arg($x->{a}); () <+exists> [return] ok 2514 - my $x; set_arg($x->{a}); () <+exists> [variable] ok 2515 - our $x; local $x; use strict; set_arg($x->{a}); () <+exists> [exception] ok 2516 - our $x; local $x; use strict; set_arg($x->{a}); () <+exists> [return] ok 2517 - our $x; local $x; use strict; set_arg($x->{a}); () <+exists> [variable] ok 2518 - our $x; local $x; no strict; set_arg($x->{a}); () <+exists> [exception] ok 2519 - our $x; local $x; no strict; set_arg($x->{a}); () <+exists> [return] ok 2520 - our $x; local $x; no strict; set_arg($x->{a}); () <+exists> [variable] ok 2521 - my $x; set_arg($$x{a}); () <+exists> [exception] ok 2522 - my $x; set_arg($$x{a}); () <+exists> [return] ok 2523 - my $x; set_arg($$x{a}); () <+exists> [variable] ok 2524 - our $x; local $x; use strict; set_arg($$x{a}); () <+exists> [exception] ok 2525 - our $x; local $x; use strict; set_arg($$x{a}); () <+exists> [return] ok 2526 - our $x; local $x; use strict; set_arg($$x{a}); () <+exists> [variable] ok 2527 - our $x; local $x; no strict; set_arg($$x{a}); () <+exists> [exception] ok 2528 - our $x; local $x; no strict; set_arg($$x{a}); () <+exists> [return] ok 2529 - our $x; local $x; no strict; set_arg($$x{a}); () <+exists> [variable] ok 2530 - my %x; set_arg($x{a}); () <+exists> [exception] ok 2531 - my %x; set_arg($x{a}); () <+exists> [return] ok 2532 - my %x; set_arg($x{a}); () <+exists> [variable] ok 2533 - our %x; local %x; use strict; set_arg($x{a}); () <+exists> [exception] ok 2534 - our %x; local %x; use strict; set_arg($x{a}); () <+exists> [return] ok 2535 - our %x; local %x; use strict; set_arg($x{a}); () <+exists> [variable] ok 2536 - our %x; local %x; no strict; set_arg($x{a}); () <+exists> [exception] ok 2537 - our %x; local %x; no strict; set_arg($x{a}); () <+exists> [return] ok 2538 - our %x; local %x; no strict; set_arg($x{a}); () <+exists> [variable] ok 2539 - my $x; set_arg($x->{a}); () <+delete> [exception] ok 2540 - my $x; set_arg($x->{a}); () <+delete> [return] ok 2541 - my $x; set_arg($x->{a}); () <+delete> [variable] ok 2542 - our $x; local $x; use strict; set_arg($x->{a}); () <+delete> [exception] ok 2543 - our $x; local $x; use strict; set_arg($x->{a}); () <+delete> [return] ok 2544 - our $x; local $x; use strict; set_arg($x->{a}); () <+delete> [variable] ok 2545 - our $x; local $x; no strict; set_arg($x->{a}); () <+delete> [exception] ok 2546 - our $x; local $x; no strict; set_arg($x->{a}); () <+delete> [return] ok 2547 - our $x; local $x; no strict; set_arg($x->{a}); () <+delete> [variable] ok 2548 - my $x; set_arg($$x{a}); () <+delete> [exception] ok 2549 - my $x; set_arg($$x{a}); () <+delete> [return] ok 2550 - my $x; set_arg($$x{a}); () <+delete> [variable] ok 2551 - our $x; local $x; use strict; set_arg($$x{a}); () <+delete> [exception] ok 2552 - our $x; local $x; use strict; set_arg($$x{a}); () <+delete> [return] ok 2553 - our $x; local $x; use strict; set_arg($$x{a}); () <+delete> [variable] ok 2554 - our $x; local $x; no strict; set_arg($$x{a}); () <+delete> [exception] ok 2555 - our $x; local $x; no strict; set_arg($$x{a}); () <+delete> [return] ok 2556 - our $x; local $x; no strict; set_arg($$x{a}); () <+delete> [variable] ok 2557 - my %x; set_arg($x{a}); () <+delete> [exception] ok 2558 - my %x; set_arg($x{a}); () <+delete> [return] ok 2559 - my %x; set_arg($x{a}); () <+delete> [variable] ok 2560 - our %x; local %x; use strict; set_arg($x{a}); () <+delete> [exception] ok 2561 - our %x; local %x; use strict; set_arg($x{a}); () <+delete> [return] ok 2562 - our %x; local %x; use strict; set_arg($x{a}); () <+delete> [variable] ok 2563 - our %x; local %x; no strict; set_arg($x{a}); () <+delete> [exception] ok 2564 - our %x; local %x; no strict; set_arg($x{a}); () <+delete> [return] ok 2565 - our %x; local %x; no strict; set_arg($x{a}); () <+delete> [variable] ok 2566 - my $x; set_arg($x->{a}); () <+store> [exception] ok 2567 - my $x; set_arg($x->{a}); () <+store> [return] ok 2568 - my $x; set_arg($x->{a}); () <+store> [variable] ok 2569 - our $x; local $x; use strict; set_arg($x->{a}); () <+store> [exception] ok 2570 - our $x; local $x; use strict; set_arg($x->{a}); () <+store> [return] ok 2571 - our $x; local $x; use strict; set_arg($x->{a}); () <+store> [variable] ok 2572 - our $x; local $x; no strict; set_arg($x->{a}); () <+store> [exception] ok 2573 - our $x; local $x; no strict; set_arg($x->{a}); () <+store> [return] ok 2574 - our $x; local $x; no strict; set_arg($x->{a}); () <+store> [variable] ok 2575 - my $x; set_arg($$x{a}); () <+store> [exception] ok 2576 - my $x; set_arg($$x{a}); () <+store> [return] ok 2577 - my $x; set_arg($$x{a}); () <+store> [variable] ok 2578 - our $x; local $x; use strict; set_arg($$x{a}); () <+store> [exception] ok 2579 - our $x; local $x; use strict; set_arg($$x{a}); () <+store> [return] ok 2580 - our $x; local $x; use strict; set_arg($$x{a}); () <+store> [variable] ok 2581 - our $x; local $x; no strict; set_arg($$x{a}); () <+store> [exception] ok 2582 - our $x; local $x; no strict; set_arg($$x{a}); () <+store> [return] ok 2583 - our $x; local $x; no strict; set_arg($$x{a}); () <+store> [variable] ok 2584 - my %x; 1 <+store> [exception] ok 2585 - my %x; 1 <+store> [return] ok 2586 - my %x; 1 <+store> [variable] ok 2587 - our %x; local %x; use strict; 1 <+store> [exception] ok 2588 - our %x; local %x; use strict; 1 <+store> [return] ok 2589 - our %x; local %x; use strict; 1 <+store> [variable] ok 2590 - our %x; local %x; no strict; 1 <+store> [exception] ok 2591 - our %x; local %x; no strict; 1 <+store> [return] ok 2592 - our %x; local %x; no strict; 1 <+store> [variable] ok 2593 - my $x; no warnings 'uninitialized'; my @a = %$x; () [exception] ok 2594 - my $x; no warnings 'uninitialized'; my @a = %$x; () [return] ok 2595 - my $x; no warnings 'uninitialized'; my @a = %$x; () [variable] ok 2596 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () [exception] ok 2597 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () [return] ok 2598 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () [variable] ok 2599 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () [exception] ok 2600 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () [return] ok 2601 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () [variable] ok 2602 - my $x; no warnings 'uninitialized'; my @a = %$x; () [exception] ok 2603 - my $x; no warnings 'uninitialized'; my @a = %$x; () [return] ok 2604 - my $x; no warnings 'uninitialized'; my @a = %$x; () [variable] ok 2605 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () [exception] ok 2606 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () [return] ok 2607 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () [variable] ok 2608 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () [exception] ok 2609 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () [return] ok 2610 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () [variable] ok 2611 - my %x; 1 [exception] ok 2612 - my %x; 1 [return] ok 2613 - my %x; 1 [variable] ok 2614 - our %x; local %x; use strict; 1 [exception] ok 2615 - our %x; local %x; use strict; 1 [return] ok 2616 - our %x; local %x; use strict; 1 [variable] ok 2617 - our %x; local %x; no strict; 1 [exception] ok 2618 - our %x; local %x; no strict; 1 [return] ok 2619 - our %x; local %x; no strict; 1 [variable] ok 2620 - my $x; no warnings 'uninitialized'; my @a = %$x; () [exception] ok 2621 - my $x; no warnings 'uninitialized'; my @a = %$x; () [return] ok 2622 - my $x; no warnings 'uninitialized'; my @a = %$x; () [variable] ok 2623 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () [exception] ok 2624 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () [return] ok 2625 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () [variable] ok 2626 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () [exception] ok 2627 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () [return] ok 2628 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () [variable] ok 2629 - my $x; no warnings 'uninitialized'; my @a = %$x; () [exception] ok 2630 - my $x; no warnings 'uninitialized'; my @a = %$x; () [return] ok 2631 - my $x; no warnings 'uninitialized'; my @a = %$x; () [variable] ok 2632 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () [exception] ok 2633 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () [return] ok 2634 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () [variable] ok 2635 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () [exception] ok 2636 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () [return] ok 2637 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () [variable] ok 2638 - my %x; 1 [exception] ok 2639 - my %x; 1 [return] ok 2640 - my %x; 1 [variable] ok 2641 - our %x; local %x; use strict; 1 [exception] ok 2642 - our %x; local %x; use strict; 1 [return] ok 2643 - our %x; local %x; use strict; 1 [variable] ok 2644 - our %x; local %x; no strict; 1 [exception] ok 2645 - our %x; local %x; no strict; 1 [return] ok 2646 - our %x; local %x; no strict; 1 [variable] ok 2647 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+fetch> [exception] ok 2648 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+fetch> [return] ok 2649 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+fetch> [variable] ok 2650 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+fetch> [exception] ok 2651 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+fetch> [return] ok 2652 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+fetch> [variable] ok 2653 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+fetch> [exception] ok 2654 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+fetch> [return] ok 2655 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+fetch> [variable] ok 2656 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+fetch> [exception] ok 2657 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+fetch> [return] ok 2658 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+fetch> [variable] ok 2659 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+fetch> [exception] ok 2660 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+fetch> [return] ok 2661 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+fetch> [variable] ok 2662 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+fetch> [exception] ok 2663 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+fetch> [return] ok 2664 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+fetch> [variable] ok 2665 - my %x; 1 <+fetch> [exception] ok 2666 - my %x; 1 <+fetch> [return] ok 2667 - my %x; 1 <+fetch> [variable] ok 2668 - our %x; local %x; use strict; 1 <+fetch> [exception] ok 2669 - our %x; local %x; use strict; 1 <+fetch> [return] ok 2670 - our %x; local %x; use strict; 1 <+fetch> [variable] ok 2671 - our %x; local %x; no strict; 1 <+fetch> [exception] ok 2672 - our %x; local %x; no strict; 1 <+fetch> [return] ok 2673 - our %x; local %x; no strict; 1 <+fetch> [variable] ok 2674 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+exists> [exception] ok 2675 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+exists> [return] ok 2676 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+exists> [variable] ok 2677 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+exists> [exception] ok 2678 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+exists> [return] ok 2679 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+exists> [variable] ok 2680 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+exists> [exception] ok 2681 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+exists> [return] ok 2682 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+exists> [variable] ok 2683 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+exists> [exception] ok 2684 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+exists> [return] ok 2685 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+exists> [variable] ok 2686 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+exists> [exception] ok 2687 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+exists> [return] ok 2688 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+exists> [variable] ok 2689 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+exists> [exception] ok 2690 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+exists> [return] ok 2691 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+exists> [variable] ok 2692 - my %x; 1 <+exists> [exception] ok 2693 - my %x; 1 <+exists> [return] ok 2694 - my %x; 1 <+exists> [variable] ok 2695 - our %x; local %x; use strict; 1 <+exists> [exception] ok 2696 - our %x; local %x; use strict; 1 <+exists> [return] ok 2697 - our %x; local %x; use strict; 1 <+exists> [variable] ok 2698 - our %x; local %x; no strict; 1 <+exists> [exception] ok 2699 - our %x; local %x; no strict; 1 <+exists> [return] ok 2700 - our %x; local %x; no strict; 1 <+exists> [variable] ok 2701 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+delete> [exception] ok 2702 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+delete> [return] ok 2703 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+delete> [variable] ok 2704 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+delete> [exception] ok 2705 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+delete> [return] ok 2706 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+delete> [variable] ok 2707 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+delete> [exception] ok 2708 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+delete> [return] ok 2709 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+delete> [variable] ok 2710 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+delete> [exception] ok 2711 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+delete> [return] ok 2712 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+delete> [variable] ok 2713 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+delete> [exception] ok 2714 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+delete> [return] ok 2715 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+delete> [variable] ok 2716 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+delete> [exception] ok 2717 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+delete> [return] ok 2718 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+delete> [variable] ok 2719 - my %x; 1 <+delete> [exception] ok 2720 - my %x; 1 <+delete> [return] ok 2721 - my %x; 1 <+delete> [variable] ok 2722 - our %x; local %x; use strict; 1 <+delete> [exception] ok 2723 - our %x; local %x; use strict; 1 <+delete> [return] ok 2724 - our %x; local %x; use strict; 1 <+delete> [variable] ok 2725 - our %x; local %x; no strict; 1 <+delete> [exception] ok 2726 - our %x; local %x; no strict; 1 <+delete> [return] ok 2727 - our %x; local %x; no strict; 1 <+delete> [variable] ok 2728 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+store> [exception] ok 2729 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+store> [return] ok 2730 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+store> [variable] ok 2731 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+store> [exception] ok 2732 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+store> [return] ok 2733 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+store> [variable] ok 2734 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+store> [exception] ok 2735 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+store> [return] ok 2736 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+store> [variable] ok 2737 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+store> [exception] ok 2738 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+store> [return] ok 2739 - my $x; no warnings 'uninitialized'; my @a = %$x; () <+store> [variable] ok 2740 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+store> [exception] ok 2741 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+store> [return] ok 2742 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = %$x; () <+store> [variable] ok 2743 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+store> [exception] ok 2744 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+store> [return] ok 2745 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = %$x; () <+store> [variable] ok 2746 - my %x; 1 <+store> [exception] ok 2747 - my %x; 1 <+store> [return] ok 2748 - my %x; 1 <+store> [variable] ok 2749 - our %x; local %x; use strict; 1 <+store> [exception] ok 2750 - our %x; local %x; use strict; 1 <+store> [return] ok 2751 - our %x; local %x; use strict; 1 <+store> [variable] ok 2752 - our %x; local %x; no strict; 1 <+store> [exception] ok 2753 - our %x; local %x; no strict; 1 <+store> [return] ok 2754 - our %x; local %x; no strict; 1 <+store> [variable] ok 2755 - my $x; $x->{a} = 1; my @a = %$x; () <+fetch> [exception] ok 2756 - my $x; $x->{a} = 1; my @a = %$x; () <+fetch> [return] ok 2757 - my $x; $x->{a} = 1; my @a = %$x; () <+fetch> [variable] ok 2758 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+fetch> [exception] ok 2759 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+fetch> [return] ok 2760 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+fetch> [variable] ok 2761 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+fetch> [exception] ok 2762 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+fetch> [return] ok 2763 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+fetch> [variable] ok 2764 - my $x; $x->{a} = 1; my @a = %$x; () <+fetch> [exception] ok 2765 - my $x; $x->{a} = 1; my @a = %$x; () <+fetch> [return] ok 2766 - my $x; $x->{a} = 1; my @a = %$x; () <+fetch> [variable] ok 2767 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+fetch> [exception] ok 2768 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+fetch> [return] ok 2769 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+fetch> [variable] ok 2770 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+fetch> [exception] ok 2771 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+fetch> [return] ok 2772 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+fetch> [variable] ok 2773 - my %x; $x{a} = 1; my @a = %x; () <+fetch> [exception] ok 2774 - my %x; $x{a} = 1; my @a = %x; () <+fetch> [return] ok 2775 - my %x; $x{a} = 1; my @a = %x; () <+fetch> [variable] ok 2776 - our %x; local %x; use strict; $x{a} = 1; my @a = %x; () <+fetch> [exception] ok 2777 - our %x; local %x; use strict; $x{a} = 1; my @a = %x; () <+fetch> [return] ok 2778 - our %x; local %x; use strict; $x{a} = 1; my @a = %x; () <+fetch> [variable] ok 2779 - our %x; local %x; no strict; $x{a} = 1; my @a = %x; () <+fetch> [exception] ok 2780 - our %x; local %x; no strict; $x{a} = 1; my @a = %x; () <+fetch> [return] ok 2781 - our %x; local %x; no strict; $x{a} = 1; my @a = %x; () <+fetch> [variable] ok 2782 - my $x; $x->{a} = 1; my @a = %$x; () <+exists> [exception] ok 2783 - my $x; $x->{a} = 1; my @a = %$x; () <+exists> [return] ok 2784 - my $x; $x->{a} = 1; my @a = %$x; () <+exists> [variable] ok 2785 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+exists> [exception] ok 2786 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+exists> [return] ok 2787 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+exists> [variable] ok 2788 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+exists> [exception] ok 2789 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+exists> [return] ok 2790 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+exists> [variable] ok 2791 - my $x; $x->{a} = 1; my @a = %$x; () <+exists> [exception] ok 2792 - my $x; $x->{a} = 1; my @a = %$x; () <+exists> [return] ok 2793 - my $x; $x->{a} = 1; my @a = %$x; () <+exists> [variable] ok 2794 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+exists> [exception] ok 2795 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+exists> [return] ok 2796 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+exists> [variable] ok 2797 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+exists> [exception] ok 2798 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+exists> [return] ok 2799 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+exists> [variable] ok 2800 - my %x; $x{a} = 1; my @a = %x; () <+exists> [exception] ok 2801 - my %x; $x{a} = 1; my @a = %x; () <+exists> [return] ok 2802 - my %x; $x{a} = 1; my @a = %x; () <+exists> [variable] ok 2803 - our %x; local %x; use strict; $x{a} = 1; my @a = %x; () <+exists> [exception] ok 2804 - our %x; local %x; use strict; $x{a} = 1; my @a = %x; () <+exists> [return] ok 2805 - our %x; local %x; use strict; $x{a} = 1; my @a = %x; () <+exists> [variable] ok 2806 - our %x; local %x; no strict; $x{a} = 1; my @a = %x; () <+exists> [exception] ok 2807 - our %x; local %x; no strict; $x{a} = 1; my @a = %x; () <+exists> [return] ok 2808 - our %x; local %x; no strict; $x{a} = 1; my @a = %x; () <+exists> [variable] ok 2809 - my $x; $x->{a} = 1; my @a = %$x; () <+delete> [exception] ok 2810 - my $x; $x->{a} = 1; my @a = %$x; () <+delete> [return] ok 2811 - my $x; $x->{a} = 1; my @a = %$x; () <+delete> [variable] ok 2812 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+delete> [exception] ok 2813 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+delete> [return] ok 2814 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+delete> [variable] ok 2815 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+delete> [exception] ok 2816 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+delete> [return] ok 2817 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+delete> [variable] ok 2818 - my $x; $x->{a} = 1; my @a = %$x; () <+delete> [exception] ok 2819 - my $x; $x->{a} = 1; my @a = %$x; () <+delete> [return] ok 2820 - my $x; $x->{a} = 1; my @a = %$x; () <+delete> [variable] ok 2821 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+delete> [exception] ok 2822 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+delete> [return] ok 2823 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+delete> [variable] ok 2824 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+delete> [exception] ok 2825 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+delete> [return] ok 2826 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+delete> [variable] ok 2827 - my %x; $x{a} = 1; my @a = %x; () <+delete> [exception] ok 2828 - my %x; $x{a} = 1; my @a = %x; () <+delete> [return] ok 2829 - my %x; $x{a} = 1; my @a = %x; () <+delete> [variable] ok 2830 - our %x; local %x; use strict; $x{a} = 1; my @a = %x; () <+delete> [exception] ok 2831 - our %x; local %x; use strict; $x{a} = 1; my @a = %x; () <+delete> [return] ok 2832 - our %x; local %x; use strict; $x{a} = 1; my @a = %x; () <+delete> [variable] ok 2833 - our %x; local %x; no strict; $x{a} = 1; my @a = %x; () <+delete> [exception] ok 2834 - our %x; local %x; no strict; $x{a} = 1; my @a = %x; () <+delete> [return] ok 2835 - our %x; local %x; no strict; $x{a} = 1; my @a = %x; () <+delete> [variable] ok 2836 - my $x; $x->{a} = 1; my @a = %$x; () <+store> [exception] ok 2837 - my $x; $x->{a} = 1; my @a = %$x; () <+store> [return] ok 2838 - my $x; $x->{a} = 1; my @a = %$x; () <+store> [variable] ok 2839 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+store> [exception] ok 2840 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+store> [return] ok 2841 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+store> [variable] ok 2842 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+store> [exception] ok 2843 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+store> [return] ok 2844 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+store> [variable] ok 2845 - my $x; $x->{a} = 1; my @a = %$x; () <+store> [exception] ok 2846 - my $x; $x->{a} = 1; my @a = %$x; () <+store> [return] ok 2847 - my $x; $x->{a} = 1; my @a = %$x; () <+store> [variable] ok 2848 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+store> [exception] ok 2849 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+store> [return] ok 2850 - our $x; local $x; use strict; $x->{a} = 1; my @a = %$x; () <+store> [variable] ok 2851 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+store> [exception] ok 2852 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+store> [return] ok 2853 - our $x; local $x; no strict; $x->{a} = 1; my @a = %$x; () <+store> [variable] ok 2854 - my %x; $x{a} = 1; my @a = %x; () <+store> [exception] ok 2855 - my %x; $x{a} = 1; my @a = %x; () <+store> [return] ok 2856 - my %x; $x{a} = 1; my @a = %x; () <+store> [variable] ok 2857 - our %x; local %x; use strict; $x{a} = 1; my @a = %x; () <+store> [exception] ok 2858 - our %x; local %x; use strict; $x{a} = 1; my @a = %x; () <+store> [return] ok 2859 - our %x; local %x; use strict; $x{a} = 1; my @a = %x; () <+store> [variable] ok 2860 - our %x; local %x; no strict; $x{a} = 1; my @a = %x; () <+store> [exception] ok 2861 - our %x; local %x; no strict; $x{a} = 1; my @a = %x; () <+store> [return] ok 2862 - our %x; local %x; no strict; $x{a} = 1; my @a = %x; () <+store> [variable] ok 2863 - my $x; my @a = @$x{'a', 'b'}; \@a [exception] ok 2864 - my $x; my @a = @$x{'a', 'b'}; \@a [return] ok 2865 - my $x; my @a = @$x{'a', 'b'}; \@a [variable] ok 2866 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a [exception] ok 2867 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a [return] ok 2868 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a [variable] ok 2869 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a [exception] ok 2870 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a [return] ok 2871 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a [variable] ok 2872 - my $x; my @a = @$x{'a', 'b'}; \@a [exception] ok 2873 - my $x; my @a = @$x{'a', 'b'}; \@a [return] ok 2874 - my $x; my @a = @$x{'a', 'b'}; \@a [variable] ok 2875 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a [exception] ok 2876 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a [return] ok 2877 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a [variable] ok 2878 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a [exception] ok 2879 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a [return] ok 2880 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a [variable] ok 2881 - my %x; my @a = @x{'a', 'b'}; \@a [exception] ok 2882 - my %x; my @a = @x{'a', 'b'}; \@a [return] ok 2883 - my %x; my @a = @x{'a', 'b'}; \@a [variable] ok 2884 - our %x; local %x; use strict; my @a = @x{'a', 'b'}; \@a [exception] ok 2885 - our %x; local %x; use strict; my @a = @x{'a', 'b'}; \@a [return] ok 2886 - our %x; local %x; use strict; my @a = @x{'a', 'b'}; \@a [variable] ok 2887 - our %x; local %x; no strict; my @a = @x{'a', 'b'}; \@a [exception] ok 2888 - our %x; local %x; no strict; my @a = @x{'a', 'b'}; \@a [return] ok 2889 - our %x; local %x; no strict; my @a = @x{'a', 'b'}; \@a [variable] ok 2890 - my $x; my @a = @$x{'a', 'b'}; \@a [exception] ok 2891 - my $x; my @a = @$x{'a', 'b'}; \@a [return] ok 2892 - my $x; my @a = @$x{'a', 'b'}; \@a [variable] ok 2893 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a [exception] ok 2894 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a [return] ok 2895 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a [variable] ok 2896 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a [exception] ok 2897 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a [return] ok 2898 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a [variable] ok 2899 - my $x; my @a = @$x{'a', 'b'}; \@a [exception] ok 2900 - my $x; my @a = @$x{'a', 'b'}; \@a [return] ok 2901 - my $x; my @a = @$x{'a', 'b'}; \@a [variable] ok 2902 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a [exception] ok 2903 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a [return] ok 2904 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a [variable] ok 2905 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a [exception] ok 2906 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a [return] ok 2907 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a [variable] ok 2908 - my %x; my @a = @x{'a', 'b'}; \@a [exception] ok 2909 - my %x; my @a = @x{'a', 'b'}; \@a [return] ok 2910 - my %x; my @a = @x{'a', 'b'}; \@a [variable] ok 2911 - our %x; local %x; use strict; my @a = @x{'a', 'b'}; \@a [exception] ok 2912 - our %x; local %x; use strict; my @a = @x{'a', 'b'}; \@a [return] ok 2913 - our %x; local %x; use strict; my @a = @x{'a', 'b'}; \@a [variable] ok 2914 - our %x; local %x; no strict; my @a = @x{'a', 'b'}; \@a [exception] ok 2915 - our %x; local %x; no strict; my @a = @x{'a', 'b'}; \@a [return] ok 2916 - our %x; local %x; no strict; my @a = @x{'a', 'b'}; \@a [variable] ok 2917 - my $x; my @a = @$x{'a', 'b'}; \@a <+fetch> [exception] ok 2918 - my $x; my @a = @$x{'a', 'b'}; \@a <+fetch> [return] ok 2919 - my $x; my @a = @$x{'a', 'b'}; \@a <+fetch> [variable] ok 2920 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+fetch> [exception] ok 2921 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+fetch> [return] ok 2922 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+fetch> [variable] ok 2923 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+fetch> [exception] ok 2924 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+fetch> [return] ok 2925 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+fetch> [variable] ok 2926 - my $x; my @a = @$x{'a', 'b'}; \@a <+fetch> [exception] ok 2927 - my $x; my @a = @$x{'a', 'b'}; \@a <+fetch> [return] ok 2928 - my $x; my @a = @$x{'a', 'b'}; \@a <+fetch> [variable] ok 2929 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+fetch> [exception] ok 2930 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+fetch> [return] ok 2931 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+fetch> [variable] ok 2932 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+fetch> [exception] ok 2933 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+fetch> [return] ok 2934 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+fetch> [variable] ok 2935 - my %x; my @a = @x{'a', 'b'}; \@a <+fetch> [exception] ok 2936 - my %x; my @a = @x{'a', 'b'}; \@a <+fetch> [return] ok 2937 - my %x; my @a = @x{'a', 'b'}; \@a <+fetch> [variable] ok 2938 - our %x; local %x; use strict; my @a = @x{'a', 'b'}; \@a <+fetch> [exception] ok 2939 - our %x; local %x; use strict; my @a = @x{'a', 'b'}; \@a <+fetch> [return] ok 2940 - our %x; local %x; use strict; my @a = @x{'a', 'b'}; \@a <+fetch> [variable] ok 2941 - our %x; local %x; no strict; my @a = @x{'a', 'b'}; \@a <+fetch> [exception] ok 2942 - our %x; local %x; no strict; my @a = @x{'a', 'b'}; \@a <+fetch> [return] ok 2943 - our %x; local %x; no strict; my @a = @x{'a', 'b'}; \@a <+fetch> [variable] ok 2944 - my $x; my @a = @$x{'a', 'b'}; \@a <+exists> [exception] ok 2945 - my $x; my @a = @$x{'a', 'b'}; \@a <+exists> [return] ok 2946 - my $x; my @a = @$x{'a', 'b'}; \@a <+exists> [variable] ok 2947 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+exists> [exception] ok 2948 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+exists> [return] ok 2949 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+exists> [variable] ok 2950 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+exists> [exception] ok 2951 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+exists> [return] ok 2952 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+exists> [variable] ok 2953 - my $x; my @a = @$x{'a', 'b'}; \@a <+exists> [exception] ok 2954 - my $x; my @a = @$x{'a', 'b'}; \@a <+exists> [return] ok 2955 - my $x; my @a = @$x{'a', 'b'}; \@a <+exists> [variable] ok 2956 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+exists> [exception] ok 2957 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+exists> [return] ok 2958 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+exists> [variable] ok 2959 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+exists> [exception] ok 2960 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+exists> [return] ok 2961 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+exists> [variable] ok 2962 - my %x; my @a = @x{'a', 'b'}; \@a <+exists> [exception] ok 2963 - my %x; my @a = @x{'a', 'b'}; \@a <+exists> [return] ok 2964 - my %x; my @a = @x{'a', 'b'}; \@a <+exists> [variable] ok 2965 - our %x; local %x; use strict; my @a = @x{'a', 'b'}; \@a <+exists> [exception] ok 2966 - our %x; local %x; use strict; my @a = @x{'a', 'b'}; \@a <+exists> [return] ok 2967 - our %x; local %x; use strict; my @a = @x{'a', 'b'}; \@a <+exists> [variable] ok 2968 - our %x; local %x; no strict; my @a = @x{'a', 'b'}; \@a <+exists> [exception] ok 2969 - our %x; local %x; no strict; my @a = @x{'a', 'b'}; \@a <+exists> [return] ok 2970 - our %x; local %x; no strict; my @a = @x{'a', 'b'}; \@a <+exists> [variable] ok 2971 - my $x; my @a = @$x{'a', 'b'}; \@a <+delete> [exception] ok 2972 - my $x; my @a = @$x{'a', 'b'}; \@a <+delete> [return] ok 2973 - my $x; my @a = @$x{'a', 'b'}; \@a <+delete> [variable] ok 2974 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+delete> [exception] ok 2975 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+delete> [return] ok 2976 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+delete> [variable] ok 2977 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+delete> [exception] ok 2978 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+delete> [return] ok 2979 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+delete> [variable] ok 2980 - my $x; my @a = @$x{'a', 'b'}; \@a <+delete> [exception] ok 2981 - my $x; my @a = @$x{'a', 'b'}; \@a <+delete> [return] ok 2982 - my $x; my @a = @$x{'a', 'b'}; \@a <+delete> [variable] ok 2983 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+delete> [exception] ok 2984 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+delete> [return] ok 2985 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+delete> [variable] ok 2986 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+delete> [exception] ok 2987 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+delete> [return] ok 2988 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+delete> [variable] ok 2989 - my %x; my @a = @x{'a', 'b'}; \@a <+delete> [exception] ok 2990 - my %x; my @a = @x{'a', 'b'}; \@a <+delete> [return] ok 2991 - my %x; my @a = @x{'a', 'b'}; \@a <+delete> [variable] ok 2992 - our %x; local %x; use strict; my @a = @x{'a', 'b'}; \@a <+delete> [exception] ok 2993 - our %x; local %x; use strict; my @a = @x{'a', 'b'}; \@a <+delete> [return] ok 2994 - our %x; local %x; use strict; my @a = @x{'a', 'b'}; \@a <+delete> [variable] ok 2995 - our %x; local %x; no strict; my @a = @x{'a', 'b'}; \@a <+delete> [exception] ok 2996 - our %x; local %x; no strict; my @a = @x{'a', 'b'}; \@a <+delete> [return] ok 2997 - our %x; local %x; no strict; my @a = @x{'a', 'b'}; \@a <+delete> [variable] ok 2998 - my $x; my @a = @$x{'a', 'b'}; \@a <+store> [exception] ok 2999 - my $x; my @a = @$x{'a', 'b'}; \@a <+store> [return] ok 3000 - my $x; my @a = @$x{'a', 'b'}; \@a <+store> [variable] ok 3001 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+store> [exception] ok 3002 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+store> [return] ok 3003 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+store> [variable] ok 3004 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+store> [exception] ok 3005 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+store> [return] ok 3006 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+store> [variable] ok 3007 - my $x; my @a = @$x{'a', 'b'}; \@a <+store> [exception] ok 3008 - my $x; my @a = @$x{'a', 'b'}; \@a <+store> [return] ok 3009 - my $x; my @a = @$x{'a', 'b'}; \@a <+store> [variable] ok 3010 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+store> [exception] ok 3011 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+store> [return] ok 3012 - our $x; local $x; use strict; my @a = @$x{'a', 'b'}; \@a <+store> [variable] ok 3013 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+store> [exception] ok 3014 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+store> [return] ok 3015 - our $x; local $x; no strict; my @a = @$x{'a', 'b'}; \@a <+store> [variable] ok 3016 - my %x; my @a = @x{'a', 'b'}; \@a <+store> [exception] ok 3017 - my %x; my @a = @x{'a', 'b'}; \@a <+store> [return] ok 3018 - my %x; my @a = @x{'a', 'b'}; \@a <+store> [variable] ok 3019 - our %x; local %x; use strict; my @a = @x{'a', 'b'}; \@a <+store> [exception] ok 3020 - our %x; local %x; use strict; my @a = @x{'a', 'b'}; \@a <+store> [return] ok 3021 - our %x; local %x; use strict; my @a = @x{'a', 'b'}; \@a <+store> [variable] ok 3022 - our %x; local %x; no strict; my @a = @x{'a', 'b'}; \@a <+store> [exception] ok 3023 - our %x; local %x; no strict; my @a = @x{'a', 'b'}; \@a <+store> [return] ok 3024 - our %x; local %x; no strict; my @a = @x{'a', 'b'}; \@a <+store> [variable] ok 3025 - my $x; $x->{b} = 0; my @a = @$x{'a', 'b'}; \@a <+fetch> [exception] ok 3026 - my $x; $x->{b} = 0; my @a = @$x{'a', 'b'}; \@a <+fetch> [return] ok 3027 - my $x; $x->{b} = 0; my @a = @$x{'a', 'b'}; \@a <+fetch> [variable] ok 3028 - our $x; local $x; use strict; $x->{b} = 0; my @a = @$x{'a', 'b'}; \@a <+fetch> [exception] ok 3029 - our $x; local $x; use strict; $x->{b} = 0; my @a = @$x{'a', 'b'}; \@a <+fetch> [return] ok 3030 - our $x; local $x; use strict; $x->{b} = 0; my @a = @$x{'a', 'b'}; \@a <+fetch> [variable] ok 3031 - our $x; local $x; no strict; $x->{b} = 0; my @a = @$x{'a', 'b'}; \@a <+fetch> [exception] ok 3032 - our $x; local $x; no strict; $x->{b} = 0; my @a = @$x{'a', 'b'}; \@a <+fetch> [return] ok 3033 - our $x; local $x; no strict; $x->{b} = 0; my @a = @$x{'a', 'b'}; \@a <+fetch> [variable] ok 3034 - my $x; $x->{b} = 0; my @a = @$x{'a', 'b'}; \@a <+fetch> [exception] ok 3035 - my $x; $x->{b} = 0; my @a = @$x{'a', 'b'}; \@a <+fetch> [return] ok 3036 - my $x; $x->{b} = 0; my @a = @$x{'a', 'b'}; \@a <+fetch> [variable] ok 3037 - our $x; local $x; use strict; $x->{b} = 0; my @a = @$x{'a', 'b'}; \@a <+fetch> [exception] ok 3038 - our $x; local $x; use strict; $x->{b} = 0; my @a = @$x{'a', 'b'}; \@a <+fetch> [return] ok 3039 - our $x; local $x; use strict; $x->{b} = 0; my @a = @$x{'a', 'b'}; \@a <+fetch> [variable] ok 3040 - our $x; local $x; no strict; $x->{b} = 0; my @a = @$x{'a', 'b'}; \@a <+fetch> [exception] ok 3041 - our $x; local $x; no strict; $x->{b} = 0; my @a = @$x{'a', 'b'}; \@a <+fetch> [return] ok 3042 - our $x; local $x; no strict; $x->{b} = 0; my @a = @$x{'a', 'b'}; \@a <+fetch> [variable] ok 3043 - my %x; $x{b} = 0; my @a = @x{'a', 'b'}; \@a <+fetch> [exception] ok 3044 - my %x; $x{b} = 0; my @a = @x{'a', 'b'}; \@a <+fetch> [return] ok 3045 - my %x; $x{b} = 0; my @a = @x{'a', 'b'}; \@a <+fetch> [variable] ok 3046 - our %x; local %x; use strict; $x{b} = 0; my @a = @x{'a', 'b'}; \@a <+fetch> [exception] ok 3047 - our %x; local %x; use strict; $x{b} = 0; my @a = @x{'a', 'b'}; \@a <+fetch> [return] ok 3048 - our %x; local %x; use strict; $x{b} = 0; my @a = @x{'a', 'b'}; \@a <+fetch> [variable] ok 3049 - our %x; local %x; no strict; $x{b} = 0; my @a = @x{'a', 'b'}; \@a <+fetch> [exception] ok 3050 - our %x; local %x; no strict; $x{b} = 0; my @a = @x{'a', 'b'}; \@a <+fetch> [return] ok 3051 - our %x; local %x; no strict; $x{b} = 0; my @a = @x{'a', 'b'}; \@a <+fetch> [variable] ok 3052 - my $x; @$x{'a', 'b'} = (1, 2); () [exception] ok 3053 - my $x; @$x{'a', 'b'} = (1, 2); () [return] ok 3054 - my $x; @$x{'a', 'b'} = (1, 2); () [variable] ok 3055 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () [exception] ok 3056 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () [return] ok 3057 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () [variable] ok 3058 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () [exception] ok 3059 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () [return] ok 3060 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () [variable] ok 3061 - my $x; @$x{'a', 'b'} = (1, 2); () [exception] ok 3062 - my $x; @$x{'a', 'b'} = (1, 2); () [return] ok 3063 - my $x; @$x{'a', 'b'} = (1, 2); () [variable] ok 3064 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () [exception] ok 3065 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () [return] ok 3066 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () [variable] ok 3067 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () [exception] ok 3068 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () [return] ok 3069 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () [variable] ok 3070 - my %x; @x{'a', 'b'} = (1, 2); () [exception] ok 3071 - my %x; @x{'a', 'b'} = (1, 2); () [return] ok 3072 - my %x; @x{'a', 'b'} = (1, 2); () [variable] ok 3073 - our %x; local %x; use strict; @x{'a', 'b'} = (1, 2); () [exception] ok 3074 - our %x; local %x; use strict; @x{'a', 'b'} = (1, 2); () [return] ok 3075 - our %x; local %x; use strict; @x{'a', 'b'} = (1, 2); () [variable] ok 3076 - our %x; local %x; no strict; @x{'a', 'b'} = (1, 2); () [exception] ok 3077 - our %x; local %x; no strict; @x{'a', 'b'} = (1, 2); () [return] ok 3078 - our %x; local %x; no strict; @x{'a', 'b'} = (1, 2); () [variable] ok 3079 - my $x; @$x{'a', 'b'} = (1, 2); () [exception] ok 3080 - my $x; @$x{'a', 'b'} = (1, 2); () [return] ok 3081 - my $x; @$x{'a', 'b'} = (1, 2); () [variable] ok 3082 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () [exception] ok 3083 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () [return] ok 3084 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () [variable] ok 3085 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () [exception] ok 3086 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () [return] ok 3087 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () [variable] ok 3088 - my $x; @$x{'a', 'b'} = (1, 2); () [exception] ok 3089 - my $x; @$x{'a', 'b'} = (1, 2); () [return] ok 3090 - my $x; @$x{'a', 'b'} = (1, 2); () [variable] ok 3091 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () [exception] ok 3092 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () [return] ok 3093 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () [variable] ok 3094 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () [exception] ok 3095 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () [return] ok 3096 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () [variable] ok 3097 - my %x; @x{'a', 'b'} = (1, 2); () [exception] ok 3098 - my %x; @x{'a', 'b'} = (1, 2); () [return] ok 3099 - my %x; @x{'a', 'b'} = (1, 2); () [variable] ok 3100 - our %x; local %x; use strict; @x{'a', 'b'} = (1, 2); () [exception] ok 3101 - our %x; local %x; use strict; @x{'a', 'b'} = (1, 2); () [return] ok 3102 - our %x; local %x; use strict; @x{'a', 'b'} = (1, 2); () [variable] ok 3103 - our %x; local %x; no strict; @x{'a', 'b'} = (1, 2); () [exception] ok 3104 - our %x; local %x; no strict; @x{'a', 'b'} = (1, 2); () [return] ok 3105 - our %x; local %x; no strict; @x{'a', 'b'} = (1, 2); () [variable] ok 3106 - my $x; @$x{'a', 'b'} = (1, 2); () <+fetch> [exception] ok 3107 - my $x; @$x{'a', 'b'} = (1, 2); () <+fetch> [return] ok 3108 - my $x; @$x{'a', 'b'} = (1, 2); () <+fetch> [variable] ok 3109 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+fetch> [exception] ok 3110 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+fetch> [return] ok 3111 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+fetch> [variable] ok 3112 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+fetch> [exception] ok 3113 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+fetch> [return] ok 3114 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+fetch> [variable] ok 3115 - my $x; @$x{'a', 'b'} = (1, 2); () <+fetch> [exception] ok 3116 - my $x; @$x{'a', 'b'} = (1, 2); () <+fetch> [return] ok 3117 - my $x; @$x{'a', 'b'} = (1, 2); () <+fetch> [variable] ok 3118 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+fetch> [exception] ok 3119 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+fetch> [return] ok 3120 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+fetch> [variable] ok 3121 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+fetch> [exception] ok 3122 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+fetch> [return] ok 3123 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+fetch> [variable] ok 3124 - my %x; @x{'a', 'b'} = (1, 2); () <+fetch> [exception] ok 3125 - my %x; @x{'a', 'b'} = (1, 2); () <+fetch> [return] ok 3126 - my %x; @x{'a', 'b'} = (1, 2); () <+fetch> [variable] ok 3127 - our %x; local %x; use strict; @x{'a', 'b'} = (1, 2); () <+fetch> [exception] ok 3128 - our %x; local %x; use strict; @x{'a', 'b'} = (1, 2); () <+fetch> [return] ok 3129 - our %x; local %x; use strict; @x{'a', 'b'} = (1, 2); () <+fetch> [variable] ok 3130 - our %x; local %x; no strict; @x{'a', 'b'} = (1, 2); () <+fetch> [exception] ok 3131 - our %x; local %x; no strict; @x{'a', 'b'} = (1, 2); () <+fetch> [return] ok 3132 - our %x; local %x; no strict; @x{'a', 'b'} = (1, 2); () <+fetch> [variable] ok 3133 - my $x; @$x{'a', 'b'} = (1, 2); () <+exists> [exception] ok 3134 - my $x; @$x{'a', 'b'} = (1, 2); () <+exists> [return] ok 3135 - my $x; @$x{'a', 'b'} = (1, 2); () <+exists> [variable] ok 3136 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+exists> [exception] ok 3137 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+exists> [return] ok 3138 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+exists> [variable] ok 3139 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+exists> [exception] ok 3140 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+exists> [return] ok 3141 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+exists> [variable] ok 3142 - my $x; @$x{'a', 'b'} = (1, 2); () <+exists> [exception] ok 3143 - my $x; @$x{'a', 'b'} = (1, 2); () <+exists> [return] ok 3144 - my $x; @$x{'a', 'b'} = (1, 2); () <+exists> [variable] ok 3145 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+exists> [exception] ok 3146 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+exists> [return] ok 3147 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+exists> [variable] ok 3148 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+exists> [exception] ok 3149 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+exists> [return] ok 3150 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+exists> [variable] ok 3151 - my %x; @x{'a', 'b'} = (1, 2); () <+exists> [exception] ok 3152 - my %x; @x{'a', 'b'} = (1, 2); () <+exists> [return] ok 3153 - my %x; @x{'a', 'b'} = (1, 2); () <+exists> [variable] ok 3154 - our %x; local %x; use strict; @x{'a', 'b'} = (1, 2); () <+exists> [exception] ok 3155 - our %x; local %x; use strict; @x{'a', 'b'} = (1, 2); () <+exists> [return] ok 3156 - our %x; local %x; use strict; @x{'a', 'b'} = (1, 2); () <+exists> [variable] ok 3157 - our %x; local %x; no strict; @x{'a', 'b'} = (1, 2); () <+exists> [exception] ok 3158 - our %x; local %x; no strict; @x{'a', 'b'} = (1, 2); () <+exists> [return] ok 3159 - our %x; local %x; no strict; @x{'a', 'b'} = (1, 2); () <+exists> [variable] ok 3160 - my $x; @$x{'a', 'b'} = (1, 2); () <+delete> [exception] ok 3161 - my $x; @$x{'a', 'b'} = (1, 2); () <+delete> [return] ok 3162 - my $x; @$x{'a', 'b'} = (1, 2); () <+delete> [variable] ok 3163 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+delete> [exception] ok 3164 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+delete> [return] ok 3165 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+delete> [variable] ok 3166 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+delete> [exception] ok 3167 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+delete> [return] ok 3168 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+delete> [variable] ok 3169 - my $x; @$x{'a', 'b'} = (1, 2); () <+delete> [exception] ok 3170 - my $x; @$x{'a', 'b'} = (1, 2); () <+delete> [return] ok 3171 - my $x; @$x{'a', 'b'} = (1, 2); () <+delete> [variable] ok 3172 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+delete> [exception] ok 3173 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+delete> [return] ok 3174 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+delete> [variable] ok 3175 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+delete> [exception] ok 3176 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+delete> [return] ok 3177 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+delete> [variable] ok 3178 - my %x; @x{'a', 'b'} = (1, 2); () <+delete> [exception] ok 3179 - my %x; @x{'a', 'b'} = (1, 2); () <+delete> [return] ok 3180 - my %x; @x{'a', 'b'} = (1, 2); () <+delete> [variable] ok 3181 - our %x; local %x; use strict; @x{'a', 'b'} = (1, 2); () <+delete> [exception] ok 3182 - our %x; local %x; use strict; @x{'a', 'b'} = (1, 2); () <+delete> [return] ok 3183 - our %x; local %x; use strict; @x{'a', 'b'} = (1, 2); () <+delete> [variable] ok 3184 - our %x; local %x; no strict; @x{'a', 'b'} = (1, 2); () <+delete> [exception] ok 3185 - our %x; local %x; no strict; @x{'a', 'b'} = (1, 2); () <+delete> [return] ok 3186 - our %x; local %x; no strict; @x{'a', 'b'} = (1, 2); () <+delete> [variable] ok 3187 - my $x; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3188 - my $x; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3189 - my $x; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3190 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3191 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3192 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3193 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3194 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3195 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3196 - my $x; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3197 - my $x; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3198 - my $x; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3199 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3200 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3201 - our $x; local $x; use strict; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3202 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3203 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3204 - our $x; local $x; no strict; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3205 - my %x; 1 <+store> [exception] ok 3206 - my %x; 1 <+store> [return] ok 3207 - my %x; 1 <+store> [variable] ok 3208 - our %x; local %x; use strict; 1 <+store> [exception] ok 3209 - our %x; local %x; use strict; 1 <+store> [return] ok 3210 - our %x; local %x; use strict; 1 <+store> [variable] ok 3211 - our %x; local %x; no strict; 1 <+store> [exception] ok 3212 - our %x; local %x; no strict; 1 <+store> [return] ok 3213 - our %x; local %x; no strict; 1 <+store> [variable] ok 3214 - my $x; $x->{a} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3215 - my $x; $x->{a} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3216 - my $x; $x->{a} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3217 - our $x; local $x; use strict; $x->{a} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3218 - our $x; local $x; use strict; $x->{a} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3219 - our $x; local $x; use strict; $x->{a} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3220 - our $x; local $x; no strict; $x->{a} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3221 - our $x; local $x; no strict; $x->{a} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3222 - our $x; local $x; no strict; $x->{a} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3223 - my $x; $x->{a} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3224 - my $x; $x->{a} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3225 - my $x; $x->{a} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3226 - our $x; local $x; use strict; $x->{a} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3227 - our $x; local $x; use strict; $x->{a} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3228 - our $x; local $x; use strict; $x->{a} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3229 - our $x; local $x; no strict; $x->{a} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3230 - our $x; local $x; no strict; $x->{a} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3231 - our $x; local $x; no strict; $x->{a} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3232 - my %x; $x{a} = 0; @x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3233 - my %x; $x{a} = 0; @x{'a', 'b'} = (1, 2); () <+store> [return] ok 3234 - my %x; $x{a} = 0; @x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3235 - our %x; local %x; use strict; $x{a} = 0; @x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3236 - our %x; local %x; use strict; $x{a} = 0; @x{'a', 'b'} = (1, 2); () <+store> [return] ok 3237 - our %x; local %x; use strict; $x{a} = 0; @x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3238 - our %x; local %x; no strict; $x{a} = 0; @x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3239 - our %x; local %x; no strict; $x{a} = 0; @x{'a', 'b'} = (1, 2); () <+store> [return] ok 3240 - our %x; local %x; no strict; $x{a} = 0; @x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3241 - my $x; $x->{c} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3242 - my $x; $x->{c} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3243 - my $x; $x->{c} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3244 - our $x; local $x; use strict; $x->{c} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3245 - our $x; local $x; use strict; $x->{c} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3246 - our $x; local $x; use strict; $x->{c} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3247 - our $x; local $x; no strict; $x->{c} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3248 - our $x; local $x; no strict; $x->{c} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3249 - our $x; local $x; no strict; $x->{c} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3250 - my $x; $x->{c} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3251 - my $x; $x->{c} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3252 - my $x; $x->{c} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3253 - our $x; local $x; use strict; $x->{c} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3254 - our $x; local $x; use strict; $x->{c} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3255 - our $x; local $x; use strict; $x->{c} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3256 - our $x; local $x; no strict; $x->{c} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3257 - our $x; local $x; no strict; $x->{c} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3258 - our $x; local $x; no strict; $x->{c} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3259 - my %x; $x{c} = 0; @x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3260 - my %x; $x{c} = 0; @x{'a', 'b'} = (1, 2); () <+store> [return] ok 3261 - my %x; $x{c} = 0; @x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3262 - our %x; local %x; use strict; $x{c} = 0; @x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3263 - our %x; local %x; use strict; $x{c} = 0; @x{'a', 'b'} = (1, 2); () <+store> [return] ok 3264 - our %x; local %x; use strict; $x{c} = 0; @x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3265 - our %x; local %x; no strict; $x{c} = 0; @x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3266 - our %x; local %x; no strict; $x{c} = 0; @x{'a', 'b'} = (1, 2); () <+store> [return] ok 3267 - our %x; local %x; no strict; $x{c} = 0; @x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3268 - my $x; $x->{a} = 0, $x->{b} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3269 - my $x; $x->{a} = 0, $x->{b} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3270 - my $x; $x->{a} = 0, $x->{b} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3271 - our $x; local $x; use strict; $x->{a} = 0, $x->{b} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3272 - our $x; local $x; use strict; $x->{a} = 0, $x->{b} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3273 - our $x; local $x; use strict; $x->{a} = 0, $x->{b} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3274 - our $x; local $x; no strict; $x->{a} = 0, $x->{b} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3275 - our $x; local $x; no strict; $x->{a} = 0, $x->{b} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3276 - our $x; local $x; no strict; $x->{a} = 0, $x->{b} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3277 - my $x; $x->{a} = 0, $x->{b} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3278 - my $x; $x->{a} = 0, $x->{b} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3279 - my $x; $x->{a} = 0, $x->{b} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3280 - our $x; local $x; use strict; $x->{a} = 0, $x->{b} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3281 - our $x; local $x; use strict; $x->{a} = 0, $x->{b} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3282 - our $x; local $x; use strict; $x->{a} = 0, $x->{b} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3283 - our $x; local $x; no strict; $x->{a} = 0, $x->{b} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3284 - our $x; local $x; no strict; $x->{a} = 0, $x->{b} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [return] ok 3285 - our $x; local $x; no strict; $x->{a} = 0, $x->{b} = 0; @$x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3286 - my %x; $x{a} = 0, $x{b} = 0; @x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3287 - my %x; $x{a} = 0, $x{b} = 0; @x{'a', 'b'} = (1, 2); () <+store> [return] ok 3288 - my %x; $x{a} = 0, $x{b} = 0; @x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3289 - our %x; local %x; use strict; $x{a} = 0, $x{b} = 0; @x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3290 - our %x; local %x; use strict; $x{a} = 0, $x{b} = 0; @x{'a', 'b'} = (1, 2); () <+store> [return] ok 3291 - our %x; local %x; use strict; $x{a} = 0, $x{b} = 0; @x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3292 - our %x; local %x; no strict; $x{a} = 0, $x{b} = 0; @x{'a', 'b'} = (1, 2); () <+store> [exception] ok 3293 - our %x; local %x; no strict; $x{a} = 0, $x{b} = 0; @x{'a', 'b'} = (1, 2); () <+store> [return] ok 3294 - our %x; local %x; no strict; $x{a} = 0, $x{b} = 0; @x{'a', 'b'} = (1, 2); () <+store> [variable] ok 3295 - my $x; exists $x->{a} [exception] ok 3296 - my $x; exists $x->{a} [return] ok 3297 - my $x; exists $x->{a} [variable] ok 3298 - our $x; local $x; use strict; exists $x->{a} [exception] ok 3299 - our $x; local $x; use strict; exists $x->{a} [return] ok 3300 - our $x; local $x; use strict; exists $x->{a} [variable] ok 3301 - our $x; local $x; no strict; exists $x->{a} [exception] ok 3302 - our $x; local $x; no strict; exists $x->{a} [return] ok 3303 - our $x; local $x; no strict; exists $x->{a} [variable] ok 3304 - my $x; exists $$x{a} [exception] ok 3305 - my $x; exists $$x{a} [return] ok 3306 - my $x; exists $$x{a} [variable] ok 3307 - our $x; local $x; use strict; exists $$x{a} [exception] ok 3308 - our $x; local $x; use strict; exists $$x{a} [return] ok 3309 - our $x; local $x; use strict; exists $$x{a} [variable] ok 3310 - our $x; local $x; no strict; exists $$x{a} [exception] ok 3311 - our $x; local $x; no strict; exists $$x{a} [return] ok 3312 - our $x; local $x; no strict; exists $$x{a} [variable] ok 3313 - my %x; exists $x{a} [exception] ok 3314 - my %x; exists $x{a} [return] ok 3315 - my %x; exists $x{a} [variable] ok 3316 - our %x; local %x; use strict; exists $x{a} [exception] ok 3317 - our %x; local %x; use strict; exists $x{a} [return] ok 3318 - our %x; local %x; use strict; exists $x{a} [variable] ok 3319 - our %x; local %x; no strict; exists $x{a} [exception] ok 3320 - our %x; local %x; no strict; exists $x{a} [return] ok 3321 - our %x; local %x; no strict; exists $x{a} [variable] ok 3322 - my $x; exists $x->{a} [exception] ok 3323 - my $x; exists $x->{a} [return] ok 3324 - my $x; exists $x->{a} [variable] ok 3325 - our $x; local $x; use strict; exists $x->{a} [exception] ok 3326 - our $x; local $x; use strict; exists $x->{a} [return] ok 3327 - our $x; local $x; use strict; exists $x->{a} [variable] ok 3328 - our $x; local $x; no strict; exists $x->{a} [exception] ok 3329 - our $x; local $x; no strict; exists $x->{a} [return] ok 3330 - our $x; local $x; no strict; exists $x->{a} [variable] ok 3331 - my $x; exists $$x{a} [exception] ok 3332 - my $x; exists $$x{a} [return] ok 3333 - my $x; exists $$x{a} [variable] ok 3334 - our $x; local $x; use strict; exists $$x{a} [exception] ok 3335 - our $x; local $x; use strict; exists $$x{a} [return] ok 3336 - our $x; local $x; use strict; exists $$x{a} [variable] ok 3337 - our $x; local $x; no strict; exists $$x{a} [exception] ok 3338 - our $x; local $x; no strict; exists $$x{a} [return] ok 3339 - our $x; local $x; no strict; exists $$x{a} [variable] ok 3340 - my %x; exists $x{a} [exception] ok 3341 - my %x; exists $x{a} [return] ok 3342 - my %x; exists $x{a} [variable] ok 3343 - our %x; local %x; use strict; exists $x{a} [exception] ok 3344 - our %x; local %x; use strict; exists $x{a} [return] ok 3345 - our %x; local %x; use strict; exists $x{a} [variable] ok 3346 - our %x; local %x; no strict; exists $x{a} [exception] ok 3347 - our %x; local %x; no strict; exists $x{a} [return] ok 3348 - our %x; local %x; no strict; exists $x{a} [variable] ok 3349 - my $x; exists $x->{a} <+fetch> [exception] ok 3350 - my $x; exists $x->{a} <+fetch> [return] ok 3351 - my $x; exists $x->{a} <+fetch> [variable] ok 3352 - our $x; local $x; use strict; exists $x->{a} <+fetch> [exception] ok 3353 - our $x; local $x; use strict; exists $x->{a} <+fetch> [return] ok 3354 - our $x; local $x; use strict; exists $x->{a} <+fetch> [variable] ok 3355 - our $x; local $x; no strict; exists $x->{a} <+fetch> [exception] ok 3356 - our $x; local $x; no strict; exists $x->{a} <+fetch> [return] ok 3357 - our $x; local $x; no strict; exists $x->{a} <+fetch> [variable] ok 3358 - my $x; exists $$x{a} <+fetch> [exception] ok 3359 - my $x; exists $$x{a} <+fetch> [return] ok 3360 - my $x; exists $$x{a} <+fetch> [variable] ok 3361 - our $x; local $x; use strict; exists $$x{a} <+fetch> [exception] ok 3362 - our $x; local $x; use strict; exists $$x{a} <+fetch> [return] ok 3363 - our $x; local $x; use strict; exists $$x{a} <+fetch> [variable] ok 3364 - our $x; local $x; no strict; exists $$x{a} <+fetch> [exception] ok 3365 - our $x; local $x; no strict; exists $$x{a} <+fetch> [return] ok 3366 - our $x; local $x; no strict; exists $$x{a} <+fetch> [variable] ok 3367 - my %x; exists $x{a} <+fetch> [exception] ok 3368 - my %x; exists $x{a} <+fetch> [return] ok 3369 - my %x; exists $x{a} <+fetch> [variable] ok 3370 - our %x; local %x; use strict; exists $x{a} <+fetch> [exception] ok 3371 - our %x; local %x; use strict; exists $x{a} <+fetch> [return] ok 3372 - our %x; local %x; use strict; exists $x{a} <+fetch> [variable] ok 3373 - our %x; local %x; no strict; exists $x{a} <+fetch> [exception] ok 3374 - our %x; local %x; no strict; exists $x{a} <+fetch> [return] ok 3375 - our %x; local %x; no strict; exists $x{a} <+fetch> [variable] ok 3376 - my $x; exists $x->{a} <+exists> [exception] ok 3377 - my $x; exists $x->{a} <+exists> [return] ok 3378 - my $x; exists $x->{a} <+exists> [variable] ok 3379 - our $x; local $x; use strict; exists $x->{a} <+exists> [exception] ok 3380 - our $x; local $x; use strict; exists $x->{a} <+exists> [return] ok 3381 - our $x; local $x; use strict; exists $x->{a} <+exists> [variable] ok 3382 - our $x; local $x; no strict; exists $x->{a} <+exists> [exception] ok 3383 - our $x; local $x; no strict; exists $x->{a} <+exists> [return] ok 3384 - our $x; local $x; no strict; exists $x->{a} <+exists> [variable] ok 3385 - my $x; exists $$x{a} <+exists> [exception] ok 3386 - my $x; exists $$x{a} <+exists> [return] ok 3387 - my $x; exists $$x{a} <+exists> [variable] ok 3388 - our $x; local $x; use strict; exists $$x{a} <+exists> [exception] ok 3389 - our $x; local $x; use strict; exists $$x{a} <+exists> [return] ok 3390 - our $x; local $x; use strict; exists $$x{a} <+exists> [variable] ok 3391 - our $x; local $x; no strict; exists $$x{a} <+exists> [exception] ok 3392 - our $x; local $x; no strict; exists $$x{a} <+exists> [return] ok 3393 - our $x; local $x; no strict; exists $$x{a} <+exists> [variable] ok 3394 - my %x; exists $x{a} <+exists> [exception] ok 3395 - my %x; exists $x{a} <+exists> [return] ok 3396 - my %x; exists $x{a} <+exists> [variable] ok 3397 - our %x; local %x; use strict; exists $x{a} <+exists> [exception] ok 3398 - our %x; local %x; use strict; exists $x{a} <+exists> [return] ok 3399 - our %x; local %x; use strict; exists $x{a} <+exists> [variable] ok 3400 - our %x; local %x; no strict; exists $x{a} <+exists> [exception] ok 3401 - our %x; local %x; no strict; exists $x{a} <+exists> [return] ok 3402 - our %x; local %x; no strict; exists $x{a} <+exists> [variable] ok 3403 - my $x; exists $x->{a} <+delete> [exception] ok 3404 - my $x; exists $x->{a} <+delete> [return] ok 3405 - my $x; exists $x->{a} <+delete> [variable] ok 3406 - our $x; local $x; use strict; exists $x->{a} <+delete> [exception] ok 3407 - our $x; local $x; use strict; exists $x->{a} <+delete> [return] ok 3408 - our $x; local $x; use strict; exists $x->{a} <+delete> [variable] ok 3409 - our $x; local $x; no strict; exists $x->{a} <+delete> [exception] ok 3410 - our $x; local $x; no strict; exists $x->{a} <+delete> [return] ok 3411 - our $x; local $x; no strict; exists $x->{a} <+delete> [variable] ok 3412 - my $x; exists $$x{a} <+delete> [exception] ok 3413 - my $x; exists $$x{a} <+delete> [return] ok 3414 - my $x; exists $$x{a} <+delete> [variable] ok 3415 - our $x; local $x; use strict; exists $$x{a} <+delete> [exception] ok 3416 - our $x; local $x; use strict; exists $$x{a} <+delete> [return] ok 3417 - our $x; local $x; use strict; exists $$x{a} <+delete> [variable] ok 3418 - our $x; local $x; no strict; exists $$x{a} <+delete> [exception] ok 3419 - our $x; local $x; no strict; exists $$x{a} <+delete> [return] ok 3420 - our $x; local $x; no strict; exists $$x{a} <+delete> [variable] ok 3421 - my %x; exists $x{a} <+delete> [exception] ok 3422 - my %x; exists $x{a} <+delete> [return] ok 3423 - my %x; exists $x{a} <+delete> [variable] ok 3424 - our %x; local %x; use strict; exists $x{a} <+delete> [exception] ok 3425 - our %x; local %x; use strict; exists $x{a} <+delete> [return] ok 3426 - our %x; local %x; use strict; exists $x{a} <+delete> [variable] ok 3427 - our %x; local %x; no strict; exists $x{a} <+delete> [exception] ok 3428 - our %x; local %x; no strict; exists $x{a} <+delete> [return] ok 3429 - our %x; local %x; no strict; exists $x{a} <+delete> [variable] ok 3430 - my $x; exists $x->{a} <+store> [exception] ok 3431 - my $x; exists $x->{a} <+store> [return] ok 3432 - my $x; exists $x->{a} <+store> [variable] ok 3433 - our $x; local $x; use strict; exists $x->{a} <+store> [exception] ok 3434 - our $x; local $x; use strict; exists $x->{a} <+store> [return] ok 3435 - our $x; local $x; use strict; exists $x->{a} <+store> [variable] ok 3436 - our $x; local $x; no strict; exists $x->{a} <+store> [exception] ok 3437 - our $x; local $x; no strict; exists $x->{a} <+store> [return] ok 3438 - our $x; local $x; no strict; exists $x->{a} <+store> [variable] ok 3439 - my $x; exists $$x{a} <+store> [exception] ok 3440 - my $x; exists $$x{a} <+store> [return] ok 3441 - my $x; exists $$x{a} <+store> [variable] ok 3442 - our $x; local $x; use strict; exists $$x{a} <+store> [exception] ok 3443 - our $x; local $x; use strict; exists $$x{a} <+store> [return] ok 3444 - our $x; local $x; use strict; exists $$x{a} <+store> [variable] ok 3445 - our $x; local $x; no strict; exists $$x{a} <+store> [exception] ok 3446 - our $x; local $x; no strict; exists $$x{a} <+store> [return] ok 3447 - our $x; local $x; no strict; exists $$x{a} <+store> [variable] ok 3448 - my %x; exists $x{a} <+store> [exception] ok 3449 - my %x; exists $x{a} <+store> [return] ok 3450 - my %x; exists $x{a} <+store> [variable] ok 3451 - our %x; local %x; use strict; exists $x{a} <+store> [exception] ok 3452 - our %x; local %x; use strict; exists $x{a} <+store> [return] ok 3453 - our %x; local %x; use strict; exists $x{a} <+store> [variable] ok 3454 - our %x; local %x; no strict; exists $x{a} <+store> [exception] ok 3455 - our %x; local %x; no strict; exists $x{a} <+store> [return] ok 3456 - our %x; local %x; no strict; exists $x{a} <+store> [variable] ok 3457 - my $x; exists $x->{a} <+strict +fetch> [exception] ok 3458 - my $x; exists $x->{a} <+strict +fetch> [return] ok 3459 - my $x; exists $x->{a} <+strict +fetch> [variable] ok 3460 - our $x; local $x; use strict; exists $x->{a} <+strict +fetch> [exception] ok 3461 - our $x; local $x; use strict; exists $x->{a} <+strict +fetch> [return] ok 3462 - our $x; local $x; use strict; exists $x->{a} <+strict +fetch> [variable] ok 3463 - our $x; local $x; no strict; exists $x->{a} <+strict +fetch> [exception] ok 3464 - our $x; local $x; no strict; exists $x->{a} <+strict +fetch> [return] ok 3465 - our $x; local $x; no strict; exists $x->{a} <+strict +fetch> [variable] ok 3466 - my $x; exists $$x{a} <+strict +fetch> [exception] ok 3467 - my $x; exists $$x{a} <+strict +fetch> [return] ok 3468 - my $x; exists $$x{a} <+strict +fetch> [variable] ok 3469 - our $x; local $x; use strict; exists $$x{a} <+strict +fetch> [exception] ok 3470 - our $x; local $x; use strict; exists $$x{a} <+strict +fetch> [return] ok 3471 - our $x; local $x; use strict; exists $$x{a} <+strict +fetch> [variable] ok 3472 - our $x; local $x; no strict; exists $$x{a} <+strict +fetch> [exception] ok 3473 - our $x; local $x; no strict; exists $$x{a} <+strict +fetch> [return] ok 3474 - our $x; local $x; no strict; exists $$x{a} <+strict +fetch> [variable] ok 3475 - my %x; exists $x{a} <+strict +fetch> [exception] ok 3476 - my %x; exists $x{a} <+strict +fetch> [return] ok 3477 - my %x; exists $x{a} <+strict +fetch> [variable] ok 3478 - our %x; local %x; use strict; exists $x{a} <+strict +fetch> [exception] ok 3479 - our %x; local %x; use strict; exists $x{a} <+strict +fetch> [return] ok 3480 - our %x; local %x; use strict; exists $x{a} <+strict +fetch> [variable] ok 3481 - our %x; local %x; no strict; exists $x{a} <+strict +fetch> [exception] ok 3482 - our %x; local %x; no strict; exists $x{a} <+strict +fetch> [return] ok 3483 - our %x; local %x; no strict; exists $x{a} <+strict +fetch> [variable] ok 3484 - my $x; exists $x->{a} <+strict +exists> [exception] ok 3485 - my $x; exists $x->{a} <+strict +exists> [return] ok 3486 - my $x; exists $x->{a} <+strict +exists> [variable] ok 3487 - our $x; local $x; use strict; exists $x->{a} <+strict +exists> [exception] ok 3488 - our $x; local $x; use strict; exists $x->{a} <+strict +exists> [return] ok 3489 - our $x; local $x; use strict; exists $x->{a} <+strict +exists> [variable] ok 3490 - our $x; local $x; no strict; exists $x->{a} <+strict +exists> [exception] ok 3491 - our $x; local $x; no strict; exists $x->{a} <+strict +exists> [return] ok 3492 - our $x; local $x; no strict; exists $x->{a} <+strict +exists> [variable] ok 3493 - my $x; exists $$x{a} <+strict +exists> [exception] ok 3494 - my $x; exists $$x{a} <+strict +exists> [return] ok 3495 - my $x; exists $$x{a} <+strict +exists> [variable] ok 3496 - our $x; local $x; use strict; exists $$x{a} <+strict +exists> [exception] ok 3497 - our $x; local $x; use strict; exists $$x{a} <+strict +exists> [return] ok 3498 - our $x; local $x; use strict; exists $$x{a} <+strict +exists> [variable] ok 3499 - our $x; local $x; no strict; exists $$x{a} <+strict +exists> [exception] ok 3500 - our $x; local $x; no strict; exists $$x{a} <+strict +exists> [return] ok 3501 - our $x; local $x; no strict; exists $$x{a} <+strict +exists> [variable] ok 3502 - my %x; 1 <+strict +exists> [exception] ok 3503 - my %x; 1 <+strict +exists> [return] ok 3504 - my %x; 1 <+strict +exists> [variable] ok 3505 - our %x; local %x; use strict; 1 <+strict +exists> [exception] ok 3506 - our %x; local %x; use strict; 1 <+strict +exists> [return] ok 3507 - our %x; local %x; use strict; 1 <+strict +exists> [variable] ok 3508 - our %x; local %x; no strict; 1 <+strict +exists> [exception] ok 3509 - our %x; local %x; no strict; 1 <+strict +exists> [return] ok 3510 - our %x; local %x; no strict; 1 <+strict +exists> [variable] ok 3511 - my $x; exists $x->{a} <+strict +delete> [exception] ok 3512 - my $x; exists $x->{a} <+strict +delete> [return] ok 3513 - my $x; exists $x->{a} <+strict +delete> [variable] ok 3514 - our $x; local $x; use strict; exists $x->{a} <+strict +delete> [exception] ok 3515 - our $x; local $x; use strict; exists $x->{a} <+strict +delete> [return] ok 3516 - our $x; local $x; use strict; exists $x->{a} <+strict +delete> [variable] ok 3517 - our $x; local $x; no strict; exists $x->{a} <+strict +delete> [exception] ok 3518 - our $x; local $x; no strict; exists $x->{a} <+strict +delete> [return] ok 3519 - our $x; local $x; no strict; exists $x->{a} <+strict +delete> [variable] ok 3520 - my $x; exists $$x{a} <+strict +delete> [exception] ok 3521 - my $x; exists $$x{a} <+strict +delete> [return] ok 3522 - my $x; exists $$x{a} <+strict +delete> [variable] ok 3523 - our $x; local $x; use strict; exists $$x{a} <+strict +delete> [exception] ok 3524 - our $x; local $x; use strict; exists $$x{a} <+strict +delete> [return] ok 3525 - our $x; local $x; use strict; exists $$x{a} <+strict +delete> [variable] ok 3526 - our $x; local $x; no strict; exists $$x{a} <+strict +delete> [exception] ok 3527 - our $x; local $x; no strict; exists $$x{a} <+strict +delete> [return] ok 3528 - our $x; local $x; no strict; exists $$x{a} <+strict +delete> [variable] ok 3529 - my %x; exists $x{a} <+strict +delete> [exception] ok 3530 - my %x; exists $x{a} <+strict +delete> [return] ok 3531 - my %x; exists $x{a} <+strict +delete> [variable] ok 3532 - our %x; local %x; use strict; exists $x{a} <+strict +delete> [exception] ok 3533 - our %x; local %x; use strict; exists $x{a} <+strict +delete> [return] ok 3534 - our %x; local %x; use strict; exists $x{a} <+strict +delete> [variable] ok 3535 - our %x; local %x; no strict; exists $x{a} <+strict +delete> [exception] ok 3536 - our %x; local %x; no strict; exists $x{a} <+strict +delete> [return] ok 3537 - our %x; local %x; no strict; exists $x{a} <+strict +delete> [variable] ok 3538 - my $x; exists $x->{a} <+strict +store> [exception] ok 3539 - my $x; exists $x->{a} <+strict +store> [return] ok 3540 - my $x; exists $x->{a} <+strict +store> [variable] ok 3541 - our $x; local $x; use strict; exists $x->{a} <+strict +store> [exception] ok 3542 - our $x; local $x; use strict; exists $x->{a} <+strict +store> [return] ok 3543 - our $x; local $x; use strict; exists $x->{a} <+strict +store> [variable] ok 3544 - our $x; local $x; no strict; exists $x->{a} <+strict +store> [exception] ok 3545 - our $x; local $x; no strict; exists $x->{a} <+strict +store> [return] ok 3546 - our $x; local $x; no strict; exists $x->{a} <+strict +store> [variable] ok 3547 - my $x; exists $$x{a} <+strict +store> [exception] ok 3548 - my $x; exists $$x{a} <+strict +store> [return] ok 3549 - my $x; exists $$x{a} <+strict +store> [variable] ok 3550 - our $x; local $x; use strict; exists $$x{a} <+strict +store> [exception] ok 3551 - our $x; local $x; use strict; exists $$x{a} <+strict +store> [return] ok 3552 - our $x; local $x; use strict; exists $$x{a} <+strict +store> [variable] ok 3553 - our $x; local $x; no strict; exists $$x{a} <+strict +store> [exception] ok 3554 - our $x; local $x; no strict; exists $$x{a} <+strict +store> [return] ok 3555 - our $x; local $x; no strict; exists $$x{a} <+strict +store> [variable] ok 3556 - my %x; exists $x{a} <+strict +store> [exception] ok 3557 - my %x; exists $x{a} <+strict +store> [return] ok 3558 - my %x; exists $x{a} <+strict +store> [variable] ok 3559 - our %x; local %x; use strict; exists $x{a} <+strict +store> [exception] ok 3560 - our %x; local %x; use strict; exists $x{a} <+strict +store> [return] ok 3561 - our %x; local %x; use strict; exists $x{a} <+strict +store> [variable] ok 3562 - our %x; local %x; no strict; exists $x{a} <+strict +store> [exception] ok 3563 - our %x; local %x; no strict; exists $x{a} <+strict +store> [return] ok 3564 - our %x; local %x; no strict; exists $x{a} <+strict +store> [variable] ok 3565 - my $x; exists $x->{a}->{b} [exception] ok 3566 - my $x; exists $x->{a}->{b} [return] ok 3567 - my $x; exists $x->{a}->{b} [variable] ok 3568 - our $x; local $x; use strict; exists $x->{a}->{b} [exception] ok 3569 - our $x; local $x; use strict; exists $x->{a}->{b} [return] ok 3570 - our $x; local $x; use strict; exists $x->{a}->{b} [variable] ok 3571 - our $x; local $x; no strict; exists $x->{a}->{b} [exception] ok 3572 - our $x; local $x; no strict; exists $x->{a}->{b} [return] ok 3573 - our $x; local $x; no strict; exists $x->{a}->{b} [variable] ok 3574 - my $x; exists $$x{a}->{b} [exception] ok 3575 - my $x; exists $$x{a}->{b} [return] ok 3576 - my $x; exists $$x{a}->{b} [variable] ok 3577 - our $x; local $x; use strict; exists $$x{a}->{b} [exception] ok 3578 - our $x; local $x; use strict; exists $$x{a}->{b} [return] ok 3579 - our $x; local $x; use strict; exists $$x{a}->{b} [variable] ok 3580 - our $x; local $x; no strict; exists $$x{a}->{b} [exception] ok 3581 - our $x; local $x; no strict; exists $$x{a}->{b} [return] ok 3582 - our $x; local $x; no strict; exists $$x{a}->{b} [variable] ok 3583 - my %x; exists $x{a}->{b} [exception] ok 3584 - my %x; exists $x{a}->{b} [return] ok 3585 - my %x; exists $x{a}->{b} [variable] ok 3586 - our %x; local %x; use strict; exists $x{a}->{b} [exception] ok 3587 - our %x; local %x; use strict; exists $x{a}->{b} [return] ok 3588 - our %x; local %x; use strict; exists $x{a}->{b} [variable] ok 3589 - our %x; local %x; no strict; exists $x{a}->{b} [exception] ok 3590 - our %x; local %x; no strict; exists $x{a}->{b} [return] ok 3591 - our %x; local %x; no strict; exists $x{a}->{b} [variable] ok 3592 - my $x; exists $x->{a}->{b} [exception] ok 3593 - my $x; exists $x->{a}->{b} [return] ok 3594 - my $x; exists $x->{a}->{b} [variable] ok 3595 - our $x; local $x; use strict; exists $x->{a}->{b} [exception] ok 3596 - our $x; local $x; use strict; exists $x->{a}->{b} [return] ok 3597 - our $x; local $x; use strict; exists $x->{a}->{b} [variable] ok 3598 - our $x; local $x; no strict; exists $x->{a}->{b} [exception] ok 3599 - our $x; local $x; no strict; exists $x->{a}->{b} [return] ok 3600 - our $x; local $x; no strict; exists $x->{a}->{b} [variable] ok 3601 - my $x; exists $$x{a}->{b} [exception] ok 3602 - my $x; exists $$x{a}->{b} [return] ok 3603 - my $x; exists $$x{a}->{b} [variable] ok 3604 - our $x; local $x; use strict; exists $$x{a}->{b} [exception] ok 3605 - our $x; local $x; use strict; exists $$x{a}->{b} [return] ok 3606 - our $x; local $x; use strict; exists $$x{a}->{b} [variable] ok 3607 - our $x; local $x; no strict; exists $$x{a}->{b} [exception] ok 3608 - our $x; local $x; no strict; exists $$x{a}->{b} [return] ok 3609 - our $x; local $x; no strict; exists $$x{a}->{b} [variable] ok 3610 - my %x; exists $x{a}->{b} [exception] ok 3611 - my %x; exists $x{a}->{b} [return] ok 3612 - my %x; exists $x{a}->{b} [variable] ok 3613 - our %x; local %x; use strict; exists $x{a}->{b} [exception] ok 3614 - our %x; local %x; use strict; exists $x{a}->{b} [return] ok 3615 - our %x; local %x; use strict; exists $x{a}->{b} [variable] ok 3616 - our %x; local %x; no strict; exists $x{a}->{b} [exception] ok 3617 - our %x; local %x; no strict; exists $x{a}->{b} [return] ok 3618 - our %x; local %x; no strict; exists $x{a}->{b} [variable] ok 3619 - my $x; exists $x->{a}->{b} <+fetch> [exception] ok 3620 - my $x; exists $x->{a}->{b} <+fetch> [return] ok 3621 - my $x; exists $x->{a}->{b} <+fetch> [variable] ok 3622 - our $x; local $x; use strict; exists $x->{a}->{b} <+fetch> [exception] ok 3623 - our $x; local $x; use strict; exists $x->{a}->{b} <+fetch> [return] ok 3624 - our $x; local $x; use strict; exists $x->{a}->{b} <+fetch> [variable] ok 3625 - our $x; local $x; no strict; exists $x->{a}->{b} <+fetch> [exception] ok 3626 - our $x; local $x; no strict; exists $x->{a}->{b} <+fetch> [return] ok 3627 - our $x; local $x; no strict; exists $x->{a}->{b} <+fetch> [variable] ok 3628 - my $x; exists $$x{a}->{b} <+fetch> [exception] ok 3629 - my $x; exists $$x{a}->{b} <+fetch> [return] ok 3630 - my $x; exists $$x{a}->{b} <+fetch> [variable] ok 3631 - our $x; local $x; use strict; exists $$x{a}->{b} <+fetch> [exception] ok 3632 - our $x; local $x; use strict; exists $$x{a}->{b} <+fetch> [return] ok 3633 - our $x; local $x; use strict; exists $$x{a}->{b} <+fetch> [variable] ok 3634 - our $x; local $x; no strict; exists $$x{a}->{b} <+fetch> [exception] ok 3635 - our $x; local $x; no strict; exists $$x{a}->{b} <+fetch> [return] ok 3636 - our $x; local $x; no strict; exists $$x{a}->{b} <+fetch> [variable] ok 3637 - my %x; exists $x{a}->{b} <+fetch> [exception] ok 3638 - my %x; exists $x{a}->{b} <+fetch> [return] ok 3639 - my %x; exists $x{a}->{b} <+fetch> [variable] ok 3640 - our %x; local %x; use strict; exists $x{a}->{b} <+fetch> [exception] ok 3641 - our %x; local %x; use strict; exists $x{a}->{b} <+fetch> [return] ok 3642 - our %x; local %x; use strict; exists $x{a}->{b} <+fetch> [variable] ok 3643 - our %x; local %x; no strict; exists $x{a}->{b} <+fetch> [exception] ok 3644 - our %x; local %x; no strict; exists $x{a}->{b} <+fetch> [return] ok 3645 - our %x; local %x; no strict; exists $x{a}->{b} <+fetch> [variable] ok 3646 - my $x; exists $x->{a}->{b} <+exists> [exception] ok 3647 - my $x; exists $x->{a}->{b} <+exists> [return] ok 3648 - my $x; exists $x->{a}->{b} <+exists> [variable] ok 3649 - our $x; local $x; use strict; exists $x->{a}->{b} <+exists> [exception] ok 3650 - our $x; local $x; use strict; exists $x->{a}->{b} <+exists> [return] ok 3651 - our $x; local $x; use strict; exists $x->{a}->{b} <+exists> [variable] ok 3652 - our $x; local $x; no strict; exists $x->{a}->{b} <+exists> [exception] ok 3653 - our $x; local $x; no strict; exists $x->{a}->{b} <+exists> [return] ok 3654 - our $x; local $x; no strict; exists $x->{a}->{b} <+exists> [variable] ok 3655 - my $x; exists $$x{a}->{b} <+exists> [exception] ok 3656 - my $x; exists $$x{a}->{b} <+exists> [return] ok 3657 - my $x; exists $$x{a}->{b} <+exists> [variable] ok 3658 - our $x; local $x; use strict; exists $$x{a}->{b} <+exists> [exception] ok 3659 - our $x; local $x; use strict; exists $$x{a}->{b} <+exists> [return] ok 3660 - our $x; local $x; use strict; exists $$x{a}->{b} <+exists> [variable] ok 3661 - our $x; local $x; no strict; exists $$x{a}->{b} <+exists> [exception] ok 3662 - our $x; local $x; no strict; exists $$x{a}->{b} <+exists> [return] ok 3663 - our $x; local $x; no strict; exists $$x{a}->{b} <+exists> [variable] ok 3664 - my %x; exists $x{a}->{b} <+exists> [exception] ok 3665 - my %x; exists $x{a}->{b} <+exists> [return] ok 3666 - my %x; exists $x{a}->{b} <+exists> [variable] ok 3667 - our %x; local %x; use strict; exists $x{a}->{b} <+exists> [exception] ok 3668 - our %x; local %x; use strict; exists $x{a}->{b} <+exists> [return] ok 3669 - our %x; local %x; use strict; exists $x{a}->{b} <+exists> [variable] ok 3670 - our %x; local %x; no strict; exists $x{a}->{b} <+exists> [exception] ok 3671 - our %x; local %x; no strict; exists $x{a}->{b} <+exists> [return] ok 3672 - our %x; local %x; no strict; exists $x{a}->{b} <+exists> [variable] ok 3673 - my $x; exists $x->{a}->{b} <+delete> [exception] ok 3674 - my $x; exists $x->{a}->{b} <+delete> [return] ok 3675 - my $x; exists $x->{a}->{b} <+delete> [variable] ok 3676 - our $x; local $x; use strict; exists $x->{a}->{b} <+delete> [exception] ok 3677 - our $x; local $x; use strict; exists $x->{a}->{b} <+delete> [return] ok 3678 - our $x; local $x; use strict; exists $x->{a}->{b} <+delete> [variable] ok 3679 - our $x; local $x; no strict; exists $x->{a}->{b} <+delete> [exception] ok 3680 - our $x; local $x; no strict; exists $x->{a}->{b} <+delete> [return] ok 3681 - our $x; local $x; no strict; exists $x->{a}->{b} <+delete> [variable] ok 3682 - my $x; exists $$x{a}->{b} <+delete> [exception] ok 3683 - my $x; exists $$x{a}->{b} <+delete> [return] ok 3684 - my $x; exists $$x{a}->{b} <+delete> [variable] ok 3685 - our $x; local $x; use strict; exists $$x{a}->{b} <+delete> [exception] ok 3686 - our $x; local $x; use strict; exists $$x{a}->{b} <+delete> [return] ok 3687 - our $x; local $x; use strict; exists $$x{a}->{b} <+delete> [variable] ok 3688 - our $x; local $x; no strict; exists $$x{a}->{b} <+delete> [exception] ok 3689 - our $x; local $x; no strict; exists $$x{a}->{b} <+delete> [return] ok 3690 - our $x; local $x; no strict; exists $$x{a}->{b} <+delete> [variable] ok 3691 - my %x; exists $x{a}->{b} <+delete> [exception] ok 3692 - my %x; exists $x{a}->{b} <+delete> [return] ok 3693 - my %x; exists $x{a}->{b} <+delete> [variable] ok 3694 - our %x; local %x; use strict; exists $x{a}->{b} <+delete> [exception] ok 3695 - our %x; local %x; use strict; exists $x{a}->{b} <+delete> [return] ok 3696 - our %x; local %x; use strict; exists $x{a}->{b} <+delete> [variable] ok 3697 - our %x; local %x; no strict; exists $x{a}->{b} <+delete> [exception] ok 3698 - our %x; local %x; no strict; exists $x{a}->{b} <+delete> [return] ok 3699 - our %x; local %x; no strict; exists $x{a}->{b} <+delete> [variable] ok 3700 - my $x; exists $x->{a}->{b} <+store> [exception] ok 3701 - my $x; exists $x->{a}->{b} <+store> [return] ok 3702 - my $x; exists $x->{a}->{b} <+store> [variable] ok 3703 - our $x; local $x; use strict; exists $x->{a}->{b} <+store> [exception] ok 3704 - our $x; local $x; use strict; exists $x->{a}->{b} <+store> [return] ok 3705 - our $x; local $x; use strict; exists $x->{a}->{b} <+store> [variable] ok 3706 - our $x; local $x; no strict; exists $x->{a}->{b} <+store> [exception] ok 3707 - our $x; local $x; no strict; exists $x->{a}->{b} <+store> [return] ok 3708 - our $x; local $x; no strict; exists $x->{a}->{b} <+store> [variable] ok 3709 - my $x; exists $$x{a}->{b} <+store> [exception] ok 3710 - my $x; exists $$x{a}->{b} <+store> [return] ok 3711 - my $x; exists $$x{a}->{b} <+store> [variable] ok 3712 - our $x; local $x; use strict; exists $$x{a}->{b} <+store> [exception] ok 3713 - our $x; local $x; use strict; exists $$x{a}->{b} <+store> [return] ok 3714 - our $x; local $x; use strict; exists $$x{a}->{b} <+store> [variable] ok 3715 - our $x; local $x; no strict; exists $$x{a}->{b} <+store> [exception] ok 3716 - our $x; local $x; no strict; exists $$x{a}->{b} <+store> [return] ok 3717 - our $x; local $x; no strict; exists $$x{a}->{b} <+store> [variable] ok 3718 - my %x; exists $x{a}->{b} <+store> [exception] ok 3719 - my %x; exists $x{a}->{b} <+store> [return] ok 3720 - my %x; exists $x{a}->{b} <+store> [variable] ok 3721 - our %x; local %x; use strict; exists $x{a}->{b} <+store> [exception] ok 3722 - our %x; local %x; use strict; exists $x{a}->{b} <+store> [return] ok 3723 - our %x; local %x; use strict; exists $x{a}->{b} <+store> [variable] ok 3724 - our %x; local %x; no strict; exists $x{a}->{b} <+store> [exception] ok 3725 - our %x; local %x; no strict; exists $x{a}->{b} <+store> [return] ok 3726 - our %x; local %x; no strict; exists $x{a}->{b} <+store> [variable] ok 3727 - my $x; exists $x->{a}->{b} <+strict +fetch> [exception] ok 3728 - my $x; exists $x->{a}->{b} <+strict +fetch> [return] ok 3729 - my $x; exists $x->{a}->{b} <+strict +fetch> [variable] ok 3730 - our $x; local $x; use strict; exists $x->{a}->{b} <+strict +fetch> [exception] ok 3731 - our $x; local $x; use strict; exists $x->{a}->{b} <+strict +fetch> [return] ok 3732 - our $x; local $x; use strict; exists $x->{a}->{b} <+strict +fetch> [variable] ok 3733 - our $x; local $x; no strict; exists $x->{a}->{b} <+strict +fetch> [exception] ok 3734 - our $x; local $x; no strict; exists $x->{a}->{b} <+strict +fetch> [return] ok 3735 - our $x; local $x; no strict; exists $x->{a}->{b} <+strict +fetch> [variable] ok 3736 - my $x; exists $$x{a}->{b} <+strict +fetch> [exception] ok 3737 - my $x; exists $$x{a}->{b} <+strict +fetch> [return] ok 3738 - my $x; exists $$x{a}->{b} <+strict +fetch> [variable] ok 3739 - our $x; local $x; use strict; exists $$x{a}->{b} <+strict +fetch> [exception] ok 3740 - our $x; local $x; use strict; exists $$x{a}->{b} <+strict +fetch> [return] ok 3741 - our $x; local $x; use strict; exists $$x{a}->{b} <+strict +fetch> [variable] ok 3742 - our $x; local $x; no strict; exists $$x{a}->{b} <+strict +fetch> [exception] ok 3743 - our $x; local $x; no strict; exists $$x{a}->{b} <+strict +fetch> [return] ok 3744 - our $x; local $x; no strict; exists $$x{a}->{b} <+strict +fetch> [variable] ok 3745 - my %x; exists $x{a}->{b} <+strict +fetch> [exception] ok 3746 - my %x; exists $x{a}->{b} <+strict +fetch> [return] ok 3747 - my %x; exists $x{a}->{b} <+strict +fetch> [variable] ok 3748 - our %x; local %x; use strict; exists $x{a}->{b} <+strict +fetch> [exception] ok 3749 - our %x; local %x; use strict; exists $x{a}->{b} <+strict +fetch> [return] ok 3750 - our %x; local %x; use strict; exists $x{a}->{b} <+strict +fetch> [variable] ok 3751 - our %x; local %x; no strict; exists $x{a}->{b} <+strict +fetch> [exception] ok 3752 - our %x; local %x; no strict; exists $x{a}->{b} <+strict +fetch> [return] ok 3753 - our %x; local %x; no strict; exists $x{a}->{b} <+strict +fetch> [variable] ok 3754 - my $x; exists $x->{a}->{b} <+strict +exists> [exception] ok 3755 - my $x; exists $x->{a}->{b} <+strict +exists> [return] ok 3756 - my $x; exists $x->{a}->{b} <+strict +exists> [variable] ok 3757 - our $x; local $x; use strict; exists $x->{a}->{b} <+strict +exists> [exception] ok 3758 - our $x; local $x; use strict; exists $x->{a}->{b} <+strict +exists> [return] ok 3759 - our $x; local $x; use strict; exists $x->{a}->{b} <+strict +exists> [variable] ok 3760 - our $x; local $x; no strict; exists $x->{a}->{b} <+strict +exists> [exception] ok 3761 - our $x; local $x; no strict; exists $x->{a}->{b} <+strict +exists> [return] ok 3762 - our $x; local $x; no strict; exists $x->{a}->{b} <+strict +exists> [variable] ok 3763 - my $x; exists $$x{a}->{b} <+strict +exists> [exception] ok 3764 - my $x; exists $$x{a}->{b} <+strict +exists> [return] ok 3765 - my $x; exists $$x{a}->{b} <+strict +exists> [variable] ok 3766 - our $x; local $x; use strict; exists $$x{a}->{b} <+strict +exists> [exception] ok 3767 - our $x; local $x; use strict; exists $$x{a}->{b} <+strict +exists> [return] ok 3768 - our $x; local $x; use strict; exists $$x{a}->{b} <+strict +exists> [variable] ok 3769 - our $x; local $x; no strict; exists $$x{a}->{b} <+strict +exists> [exception] ok 3770 - our $x; local $x; no strict; exists $$x{a}->{b} <+strict +exists> [return] ok 3771 - our $x; local $x; no strict; exists $$x{a}->{b} <+strict +exists> [variable] ok 3772 - my %x; exists $x{a}->{b} <+strict +exists> [exception] ok 3773 - my %x; exists $x{a}->{b} <+strict +exists> [return] ok 3774 - my %x; exists $x{a}->{b} <+strict +exists> [variable] ok 3775 - our %x; local %x; use strict; exists $x{a}->{b} <+strict +exists> [exception] ok 3776 - our %x; local %x; use strict; exists $x{a}->{b} <+strict +exists> [return] ok 3777 - our %x; local %x; use strict; exists $x{a}->{b} <+strict +exists> [variable] ok 3778 - our %x; local %x; no strict; exists $x{a}->{b} <+strict +exists> [exception] ok 3779 - our %x; local %x; no strict; exists $x{a}->{b} <+strict +exists> [return] ok 3780 - our %x; local %x; no strict; exists $x{a}->{b} <+strict +exists> [variable] ok 3781 - my $x; exists $x->{a}->{b} <+strict +delete> [exception] ok 3782 - my $x; exists $x->{a}->{b} <+strict +delete> [return] ok 3783 - my $x; exists $x->{a}->{b} <+strict +delete> [variable] ok 3784 - our $x; local $x; use strict; exists $x->{a}->{b} <+strict +delete> [exception] ok 3785 - our $x; local $x; use strict; exists $x->{a}->{b} <+strict +delete> [return] ok 3786 - our $x; local $x; use strict; exists $x->{a}->{b} <+strict +delete> [variable] ok 3787 - our $x; local $x; no strict; exists $x->{a}->{b} <+strict +delete> [exception] ok 3788 - our $x; local $x; no strict; exists $x->{a}->{b} <+strict +delete> [return] ok 3789 - our $x; local $x; no strict; exists $x->{a}->{b} <+strict +delete> [variable] ok 3790 - my $x; exists $$x{a}->{b} <+strict +delete> [exception] ok 3791 - my $x; exists $$x{a}->{b} <+strict +delete> [return] ok 3792 - my $x; exists $$x{a}->{b} <+strict +delete> [variable] ok 3793 - our $x; local $x; use strict; exists $$x{a}->{b} <+strict +delete> [exception] ok 3794 - our $x; local $x; use strict; exists $$x{a}->{b} <+strict +delete> [return] ok 3795 - our $x; local $x; use strict; exists $$x{a}->{b} <+strict +delete> [variable] ok 3796 - our $x; local $x; no strict; exists $$x{a}->{b} <+strict +delete> [exception] ok 3797 - our $x; local $x; no strict; exists $$x{a}->{b} <+strict +delete> [return] ok 3798 - our $x; local $x; no strict; exists $$x{a}->{b} <+strict +delete> [variable] ok 3799 - my %x; exists $x{a}->{b} <+strict +delete> [exception] ok 3800 - my %x; exists $x{a}->{b} <+strict +delete> [return] ok 3801 - my %x; exists $x{a}->{b} <+strict +delete> [variable] ok 3802 - our %x; local %x; use strict; exists $x{a}->{b} <+strict +delete> [exception] ok 3803 - our %x; local %x; use strict; exists $x{a}->{b} <+strict +delete> [return] ok 3804 - our %x; local %x; use strict; exists $x{a}->{b} <+strict +delete> [variable] ok 3805 - our %x; local %x; no strict; exists $x{a}->{b} <+strict +delete> [exception] ok 3806 - our %x; local %x; no strict; exists $x{a}->{b} <+strict +delete> [return] ok 3807 - our %x; local %x; no strict; exists $x{a}->{b} <+strict +delete> [variable] ok 3808 - my $x; exists $x->{a}->{b} <+strict +store> [exception] ok 3809 - my $x; exists $x->{a}->{b} <+strict +store> [return] ok 3810 - my $x; exists $x->{a}->{b} <+strict +store> [variable] ok 3811 - our $x; local $x; use strict; exists $x->{a}->{b} <+strict +store> [exception] ok 3812 - our $x; local $x; use strict; exists $x->{a}->{b} <+strict +store> [return] ok 3813 - our $x; local $x; use strict; exists $x->{a}->{b} <+strict +store> [variable] ok 3814 - our $x; local $x; no strict; exists $x->{a}->{b} <+strict +store> [exception] ok 3815 - our $x; local $x; no strict; exists $x->{a}->{b} <+strict +store> [return] ok 3816 - our $x; local $x; no strict; exists $x->{a}->{b} <+strict +store> [variable] ok 3817 - my $x; exists $$x{a}->{b} <+strict +store> [exception] ok 3818 - my $x; exists $$x{a}->{b} <+strict +store> [return] ok 3819 - my $x; exists $$x{a}->{b} <+strict +store> [variable] ok 3820 - our $x; local $x; use strict; exists $$x{a}->{b} <+strict +store> [exception] ok 3821 - our $x; local $x; use strict; exists $$x{a}->{b} <+strict +store> [return] ok 3822 - our $x; local $x; use strict; exists $$x{a}->{b} <+strict +store> [variable] ok 3823 - our $x; local $x; no strict; exists $$x{a}->{b} <+strict +store> [exception] ok 3824 - our $x; local $x; no strict; exists $$x{a}->{b} <+strict +store> [return] ok 3825 - our $x; local $x; no strict; exists $$x{a}->{b} <+strict +store> [variable] ok 3826 - my %x; exists $x{a}->{b} <+strict +store> [exception] ok 3827 - my %x; exists $x{a}->{b} <+strict +store> [return] ok 3828 - my %x; exists $x{a}->{b} <+strict +store> [variable] ok 3829 - our %x; local %x; use strict; exists $x{a}->{b} <+strict +store> [exception] ok 3830 - our %x; local %x; use strict; exists $x{a}->{b} <+strict +store> [return] ok 3831 - our %x; local %x; use strict; exists $x{a}->{b} <+strict +store> [variable] ok 3832 - our %x; local %x; no strict; exists $x{a}->{b} <+strict +store> [exception] ok 3833 - our %x; local %x; no strict; exists $x{a}->{b} <+strict +store> [return] ok 3834 - our %x; local %x; no strict; exists $x{a}->{b} <+strict +store> [variable] ok 3835 - my $x; $x->{a} = 1; exists $x->{a} <+fetch> [exception] ok 3836 - my $x; $x->{a} = 1; exists $x->{a} <+fetch> [return] ok 3837 - my $x; $x->{a} = 1; exists $x->{a} <+fetch> [variable] ok 3838 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+fetch> [exception] ok 3839 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+fetch> [return] ok 3840 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+fetch> [variable] ok 3841 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+fetch> [exception] ok 3842 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+fetch> [return] ok 3843 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+fetch> [variable] ok 3844 - my $x; $x->{a} = 1; exists $$x{a} <+fetch> [exception] ok 3845 - my $x; $x->{a} = 1; exists $$x{a} <+fetch> [return] ok 3846 - my $x; $x->{a} = 1; exists $$x{a} <+fetch> [variable] ok 3847 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+fetch> [exception] ok 3848 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+fetch> [return] ok 3849 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+fetch> [variable] ok 3850 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+fetch> [exception] ok 3851 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+fetch> [return] ok 3852 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+fetch> [variable] ok 3853 - my %x; $x{a} = 1; exists $x{a} <+fetch> [exception] ok 3854 - my %x; $x{a} = 1; exists $x{a} <+fetch> [return] ok 3855 - my %x; $x{a} = 1; exists $x{a} <+fetch> [variable] ok 3856 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+fetch> [exception] ok 3857 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+fetch> [return] ok 3858 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+fetch> [variable] ok 3859 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+fetch> [exception] ok 3860 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+fetch> [return] ok 3861 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+fetch> [variable] ok 3862 - my $x; $x->{a} = 1; exists $x->{b} <+fetch> [exception] ok 3863 - my $x; $x->{a} = 1; exists $x->{b} <+fetch> [return] ok 3864 - my $x; $x->{a} = 1; exists $x->{b} <+fetch> [variable] ok 3865 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+fetch> [exception] ok 3866 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+fetch> [return] ok 3867 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+fetch> [variable] ok 3868 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+fetch> [exception] ok 3869 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+fetch> [return] ok 3870 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+fetch> [variable] ok 3871 - my $x; $x->{a} = 1; exists $$x{b} <+fetch> [exception] ok 3872 - my $x; $x->{a} = 1; exists $$x{b} <+fetch> [return] ok 3873 - my $x; $x->{a} = 1; exists $$x{b} <+fetch> [variable] ok 3874 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+fetch> [exception] ok 3875 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+fetch> [return] ok 3876 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+fetch> [variable] ok 3877 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+fetch> [exception] ok 3878 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+fetch> [return] ok 3879 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+fetch> [variable] ok 3880 - my %x; $x{a} = 1; exists $x{b} <+fetch> [exception] ok 3881 - my %x; $x{a} = 1; exists $x{b} <+fetch> [return] ok 3882 - my %x; $x{a} = 1; exists $x{b} <+fetch> [variable] ok 3883 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+fetch> [exception] ok 3884 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+fetch> [return] ok 3885 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+fetch> [variable] ok 3886 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+fetch> [exception] ok 3887 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+fetch> [return] ok 3888 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+fetch> [variable] ok 3889 - my $x; $x->{a} = 1; exists $x->{a} <+exists> [exception] ok 3890 - my $x; $x->{a} = 1; exists $x->{a} <+exists> [return] ok 3891 - my $x; $x->{a} = 1; exists $x->{a} <+exists> [variable] ok 3892 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+exists> [exception] ok 3893 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+exists> [return] ok 3894 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+exists> [variable] ok 3895 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+exists> [exception] ok 3896 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+exists> [return] ok 3897 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+exists> [variable] ok 3898 - my $x; $x->{a} = 1; exists $$x{a} <+exists> [exception] ok 3899 - my $x; $x->{a} = 1; exists $$x{a} <+exists> [return] ok 3900 - my $x; $x->{a} = 1; exists $$x{a} <+exists> [variable] ok 3901 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+exists> [exception] ok 3902 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+exists> [return] ok 3903 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+exists> [variable] ok 3904 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+exists> [exception] ok 3905 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+exists> [return] ok 3906 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+exists> [variable] ok 3907 - my %x; $x{a} = 1; exists $x{a} <+exists> [exception] ok 3908 - my %x; $x{a} = 1; exists $x{a} <+exists> [return] ok 3909 - my %x; $x{a} = 1; exists $x{a} <+exists> [variable] ok 3910 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+exists> [exception] ok 3911 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+exists> [return] ok 3912 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+exists> [variable] ok 3913 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+exists> [exception] ok 3914 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+exists> [return] ok 3915 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+exists> [variable] ok 3916 - my $x; $x->{a} = 1; exists $x->{b} <+exists> [exception] ok 3917 - my $x; $x->{a} = 1; exists $x->{b} <+exists> [return] ok 3918 - my $x; $x->{a} = 1; exists $x->{b} <+exists> [variable] ok 3919 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+exists> [exception] ok 3920 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+exists> [return] ok 3921 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+exists> [variable] ok 3922 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+exists> [exception] ok 3923 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+exists> [return] ok 3924 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+exists> [variable] ok 3925 - my $x; $x->{a} = 1; exists $$x{b} <+exists> [exception] ok 3926 - my $x; $x->{a} = 1; exists $$x{b} <+exists> [return] ok 3927 - my $x; $x->{a} = 1; exists $$x{b} <+exists> [variable] ok 3928 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+exists> [exception] ok 3929 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+exists> [return] ok 3930 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+exists> [variable] ok 3931 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+exists> [exception] ok 3932 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+exists> [return] ok 3933 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+exists> [variable] ok 3934 - my %x; $x{a} = 1; exists $x{b} <+exists> [exception] ok 3935 - my %x; $x{a} = 1; exists $x{b} <+exists> [return] ok 3936 - my %x; $x{a} = 1; exists $x{b} <+exists> [variable] ok 3937 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+exists> [exception] ok 3938 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+exists> [return] ok 3939 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+exists> [variable] ok 3940 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+exists> [exception] ok 3941 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+exists> [return] ok 3942 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+exists> [variable] ok 3943 - my $x; $x->{a} = 1; exists $x->{a} <+delete> [exception] ok 3944 - my $x; $x->{a} = 1; exists $x->{a} <+delete> [return] ok 3945 - my $x; $x->{a} = 1; exists $x->{a} <+delete> [variable] ok 3946 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+delete> [exception] ok 3947 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+delete> [return] ok 3948 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+delete> [variable] ok 3949 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+delete> [exception] ok 3950 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+delete> [return] ok 3951 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+delete> [variable] ok 3952 - my $x; $x->{a} = 1; exists $$x{a} <+delete> [exception] ok 3953 - my $x; $x->{a} = 1; exists $$x{a} <+delete> [return] ok 3954 - my $x; $x->{a} = 1; exists $$x{a} <+delete> [variable] ok 3955 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+delete> [exception] ok 3956 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+delete> [return] ok 3957 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+delete> [variable] ok 3958 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+delete> [exception] ok 3959 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+delete> [return] ok 3960 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+delete> [variable] ok 3961 - my %x; $x{a} = 1; exists $x{a} <+delete> [exception] ok 3962 - my %x; $x{a} = 1; exists $x{a} <+delete> [return] ok 3963 - my %x; $x{a} = 1; exists $x{a} <+delete> [variable] ok 3964 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+delete> [exception] ok 3965 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+delete> [return] ok 3966 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+delete> [variable] ok 3967 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+delete> [exception] ok 3968 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+delete> [return] ok 3969 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+delete> [variable] ok 3970 - my $x; $x->{a} = 1; exists $x->{b} <+delete> [exception] ok 3971 - my $x; $x->{a} = 1; exists $x->{b} <+delete> [return] ok 3972 - my $x; $x->{a} = 1; exists $x->{b} <+delete> [variable] ok 3973 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+delete> [exception] ok 3974 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+delete> [return] ok 3975 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+delete> [variable] ok 3976 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+delete> [exception] ok 3977 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+delete> [return] ok 3978 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+delete> [variable] ok 3979 - my $x; $x->{a} = 1; exists $$x{b} <+delete> [exception] ok 3980 - my $x; $x->{a} = 1; exists $$x{b} <+delete> [return] ok 3981 - my $x; $x->{a} = 1; exists $$x{b} <+delete> [variable] ok 3982 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+delete> [exception] ok 3983 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+delete> [return] ok 3984 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+delete> [variable] ok 3985 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+delete> [exception] ok 3986 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+delete> [return] ok 3987 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+delete> [variable] ok 3988 - my %x; $x{a} = 1; exists $x{b} <+delete> [exception] ok 3989 - my %x; $x{a} = 1; exists $x{b} <+delete> [return] ok 3990 - my %x; $x{a} = 1; exists $x{b} <+delete> [variable] ok 3991 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+delete> [exception] ok 3992 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+delete> [return] ok 3993 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+delete> [variable] ok 3994 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+delete> [exception] ok 3995 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+delete> [return] ok 3996 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+delete> [variable] ok 3997 - my $x; $x->{a} = 1; exists $x->{a} <+store> [exception] ok 3998 - my $x; $x->{a} = 1; exists $x->{a} <+store> [return] ok 3999 - my $x; $x->{a} = 1; exists $x->{a} <+store> [variable] ok 4000 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+store> [exception] ok 4001 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+store> [return] ok 4002 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+store> [variable] ok 4003 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+store> [exception] ok 4004 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+store> [return] ok 4005 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+store> [variable] ok 4006 - my $x; $x->{a} = 1; exists $$x{a} <+store> [exception] ok 4007 - my $x; $x->{a} = 1; exists $$x{a} <+store> [return] ok 4008 - my $x; $x->{a} = 1; exists $$x{a} <+store> [variable] ok 4009 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+store> [exception] ok 4010 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+store> [return] ok 4011 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+store> [variable] ok 4012 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+store> [exception] ok 4013 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+store> [return] ok 4014 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+store> [variable] ok 4015 - my %x; $x{a} = 1; exists $x{a} <+store> [exception] ok 4016 - my %x; $x{a} = 1; exists $x{a} <+store> [return] ok 4017 - my %x; $x{a} = 1; exists $x{a} <+store> [variable] ok 4018 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+store> [exception] ok 4019 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+store> [return] ok 4020 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+store> [variable] ok 4021 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+store> [exception] ok 4022 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+store> [return] ok 4023 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+store> [variable] ok 4024 - my $x; $x->{a} = 1; exists $x->{b} <+store> [exception] ok 4025 - my $x; $x->{a} = 1; exists $x->{b} <+store> [return] ok 4026 - my $x; $x->{a} = 1; exists $x->{b} <+store> [variable] ok 4027 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+store> [exception] ok 4028 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+store> [return] ok 4029 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+store> [variable] ok 4030 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+store> [exception] ok 4031 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+store> [return] ok 4032 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+store> [variable] ok 4033 - my $x; $x->{a} = 1; exists $$x{b} <+store> [exception] ok 4034 - my $x; $x->{a} = 1; exists $$x{b} <+store> [return] ok 4035 - my $x; $x->{a} = 1; exists $$x{b} <+store> [variable] ok 4036 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+store> [exception] ok 4037 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+store> [return] ok 4038 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+store> [variable] ok 4039 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+store> [exception] ok 4040 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+store> [return] ok 4041 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+store> [variable] ok 4042 - my %x; $x{a} = 1; exists $x{b} <+store> [exception] ok 4043 - my %x; $x{a} = 1; exists $x{b} <+store> [return] ok 4044 - my %x; $x{a} = 1; exists $x{b} <+store> [variable] ok 4045 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+store> [exception] ok 4046 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+store> [return] ok 4047 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+store> [variable] ok 4048 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+store> [exception] ok 4049 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+store> [return] ok 4050 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+store> [variable] ok 4051 - my $x; $x->{a} = 1; exists $x->{a} <+strict +fetch> [exception] ok 4052 - my $x; $x->{a} = 1; exists $x->{a} <+strict +fetch> [return] ok 4053 - my $x; $x->{a} = 1; exists $x->{a} <+strict +fetch> [variable] ok 4054 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+strict +fetch> [exception] ok 4055 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+strict +fetch> [return] ok 4056 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+strict +fetch> [variable] ok 4057 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+strict +fetch> [exception] ok 4058 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+strict +fetch> [return] ok 4059 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+strict +fetch> [variable] ok 4060 - my $x; $x->{a} = 1; exists $$x{a} <+strict +fetch> [exception] ok 4061 - my $x; $x->{a} = 1; exists $$x{a} <+strict +fetch> [return] ok 4062 - my $x; $x->{a} = 1; exists $$x{a} <+strict +fetch> [variable] ok 4063 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+strict +fetch> [exception] ok 4064 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+strict +fetch> [return] ok 4065 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+strict +fetch> [variable] ok 4066 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+strict +fetch> [exception] ok 4067 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+strict +fetch> [return] ok 4068 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+strict +fetch> [variable] ok 4069 - my %x; $x{a} = 1; exists $x{a} <+strict +fetch> [exception] ok 4070 - my %x; $x{a} = 1; exists $x{a} <+strict +fetch> [return] ok 4071 - my %x; $x{a} = 1; exists $x{a} <+strict +fetch> [variable] ok 4072 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+strict +fetch> [exception] ok 4073 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+strict +fetch> [return] ok 4074 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+strict +fetch> [variable] ok 4075 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+strict +fetch> [exception] ok 4076 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+strict +fetch> [return] ok 4077 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+strict +fetch> [variable] ok 4078 - my $x; $x->{a} = 1; exists $x->{b} <+strict +fetch> [exception] ok 4079 - my $x; $x->{a} = 1; exists $x->{b} <+strict +fetch> [return] ok 4080 - my $x; $x->{a} = 1; exists $x->{b} <+strict +fetch> [variable] ok 4081 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+strict +fetch> [exception] ok 4082 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+strict +fetch> [return] ok 4083 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+strict +fetch> [variable] ok 4084 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+strict +fetch> [exception] ok 4085 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+strict +fetch> [return] ok 4086 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+strict +fetch> [variable] ok 4087 - my $x; $x->{a} = 1; exists $$x{b} <+strict +fetch> [exception] ok 4088 - my $x; $x->{a} = 1; exists $$x{b} <+strict +fetch> [return] ok 4089 - my $x; $x->{a} = 1; exists $$x{b} <+strict +fetch> [variable] ok 4090 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+strict +fetch> [exception] ok 4091 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+strict +fetch> [return] ok 4092 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+strict +fetch> [variable] ok 4093 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+strict +fetch> [exception] ok 4094 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+strict +fetch> [return] ok 4095 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+strict +fetch> [variable] ok 4096 - my %x; $x{a} = 1; exists $x{b} <+strict +fetch> [exception] ok 4097 - my %x; $x{a} = 1; exists $x{b} <+strict +fetch> [return] ok 4098 - my %x; $x{a} = 1; exists $x{b} <+strict +fetch> [variable] ok 4099 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+strict +fetch> [exception] ok 4100 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+strict +fetch> [return] ok 4101 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+strict +fetch> [variable] ok 4102 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+strict +fetch> [exception] ok 4103 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+strict +fetch> [return] ok 4104 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+strict +fetch> [variable] ok 4105 - my $x; $x->{a} = 1; exists $x->{a} <+strict +exists> [exception] ok 4106 - my $x; $x->{a} = 1; exists $x->{a} <+strict +exists> [return] ok 4107 - my $x; $x->{a} = 1; exists $x->{a} <+strict +exists> [variable] ok 4108 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+strict +exists> [exception] ok 4109 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+strict +exists> [return] ok 4110 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+strict +exists> [variable] ok 4111 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+strict +exists> [exception] ok 4112 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+strict +exists> [return] ok 4113 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+strict +exists> [variable] ok 4114 - my $x; $x->{a} = 1; exists $$x{a} <+strict +exists> [exception] ok 4115 - my $x; $x->{a} = 1; exists $$x{a} <+strict +exists> [return] ok 4116 - my $x; $x->{a} = 1; exists $$x{a} <+strict +exists> [variable] ok 4117 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+strict +exists> [exception] ok 4118 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+strict +exists> [return] ok 4119 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+strict +exists> [variable] ok 4120 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+strict +exists> [exception] ok 4121 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+strict +exists> [return] ok 4122 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+strict +exists> [variable] ok 4123 - my %x; $x{a} = 1; exists $x{a} <+strict +exists> [exception] ok 4124 - my %x; $x{a} = 1; exists $x{a} <+strict +exists> [return] ok 4125 - my %x; $x{a} = 1; exists $x{a} <+strict +exists> [variable] ok 4126 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+strict +exists> [exception] ok 4127 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+strict +exists> [return] ok 4128 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+strict +exists> [variable] ok 4129 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+strict +exists> [exception] ok 4130 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+strict +exists> [return] ok 4131 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+strict +exists> [variable] ok 4132 - my $x; $x->{a} = 1; exists $x->{b} <+strict +exists> [exception] ok 4133 - my $x; $x->{a} = 1; exists $x->{b} <+strict +exists> [return] ok 4134 - my $x; $x->{a} = 1; exists $x->{b} <+strict +exists> [variable] ok 4135 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+strict +exists> [exception] ok 4136 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+strict +exists> [return] ok 4137 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+strict +exists> [variable] ok 4138 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+strict +exists> [exception] ok 4139 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+strict +exists> [return] ok 4140 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+strict +exists> [variable] ok 4141 - my $x; $x->{a} = 1; exists $$x{b} <+strict +exists> [exception] ok 4142 - my $x; $x->{a} = 1; exists $$x{b} <+strict +exists> [return] ok 4143 - my $x; $x->{a} = 1; exists $$x{b} <+strict +exists> [variable] ok 4144 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+strict +exists> [exception] ok 4145 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+strict +exists> [return] ok 4146 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+strict +exists> [variable] ok 4147 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+strict +exists> [exception] ok 4148 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+strict +exists> [return] ok 4149 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+strict +exists> [variable] ok 4150 - my %x; $x{a} = 1; exists $x{b} <+strict +exists> [exception] ok 4151 - my %x; $x{a} = 1; exists $x{b} <+strict +exists> [return] ok 4152 - my %x; $x{a} = 1; exists $x{b} <+strict +exists> [variable] ok 4153 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+strict +exists> [exception] ok 4154 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+strict +exists> [return] ok 4155 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+strict +exists> [variable] ok 4156 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+strict +exists> [exception] ok 4157 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+strict +exists> [return] ok 4158 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+strict +exists> [variable] ok 4159 - my $x; $x->{a} = 1; exists $x->{a} <+strict +delete> [exception] ok 4160 - my $x; $x->{a} = 1; exists $x->{a} <+strict +delete> [return] ok 4161 - my $x; $x->{a} = 1; exists $x->{a} <+strict +delete> [variable] ok 4162 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+strict +delete> [exception] ok 4163 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+strict +delete> [return] ok 4164 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+strict +delete> [variable] ok 4165 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+strict +delete> [exception] ok 4166 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+strict +delete> [return] ok 4167 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+strict +delete> [variable] ok 4168 - my $x; $x->{a} = 1; exists $$x{a} <+strict +delete> [exception] ok 4169 - my $x; $x->{a} = 1; exists $$x{a} <+strict +delete> [return] ok 4170 - my $x; $x->{a} = 1; exists $$x{a} <+strict +delete> [variable] ok 4171 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+strict +delete> [exception] ok 4172 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+strict +delete> [return] ok 4173 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+strict +delete> [variable] ok 4174 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+strict +delete> [exception] ok 4175 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+strict +delete> [return] ok 4176 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+strict +delete> [variable] ok 4177 - my %x; $x{a} = 1; exists $x{a} <+strict +delete> [exception] ok 4178 - my %x; $x{a} = 1; exists $x{a} <+strict +delete> [return] ok 4179 - my %x; $x{a} = 1; exists $x{a} <+strict +delete> [variable] ok 4180 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+strict +delete> [exception] ok 4181 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+strict +delete> [return] ok 4182 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+strict +delete> [variable] ok 4183 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+strict +delete> [exception] ok 4184 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+strict +delete> [return] ok 4185 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+strict +delete> [variable] ok 4186 - my $x; $x->{a} = 1; exists $x->{b} <+strict +delete> [exception] ok 4187 - my $x; $x->{a} = 1; exists $x->{b} <+strict +delete> [return] ok 4188 - my $x; $x->{a} = 1; exists $x->{b} <+strict +delete> [variable] ok 4189 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+strict +delete> [exception] ok 4190 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+strict +delete> [return] ok 4191 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+strict +delete> [variable] ok 4192 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+strict +delete> [exception] ok 4193 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+strict +delete> [return] ok 4194 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+strict +delete> [variable] ok 4195 - my $x; $x->{a} = 1; exists $$x{b} <+strict +delete> [exception] ok 4196 - my $x; $x->{a} = 1; exists $$x{b} <+strict +delete> [return] ok 4197 - my $x; $x->{a} = 1; exists $$x{b} <+strict +delete> [variable] ok 4198 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+strict +delete> [exception] ok 4199 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+strict +delete> [return] ok 4200 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+strict +delete> [variable] ok 4201 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+strict +delete> [exception] ok 4202 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+strict +delete> [return] ok 4203 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+strict +delete> [variable] ok 4204 - my %x; $x{a} = 1; exists $x{b} <+strict +delete> [exception] ok 4205 - my %x; $x{a} = 1; exists $x{b} <+strict +delete> [return] ok 4206 - my %x; $x{a} = 1; exists $x{b} <+strict +delete> [variable] ok 4207 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+strict +delete> [exception] ok 4208 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+strict +delete> [return] ok 4209 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+strict +delete> [variable] ok 4210 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+strict +delete> [exception] ok 4211 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+strict +delete> [return] ok 4212 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+strict +delete> [variable] ok 4213 - my $x; $x->{a} = 1; exists $x->{a} <+strict +store> [exception] ok 4214 - my $x; $x->{a} = 1; exists $x->{a} <+strict +store> [return] ok 4215 - my $x; $x->{a} = 1; exists $x->{a} <+strict +store> [variable] ok 4216 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+strict +store> [exception] ok 4217 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+strict +store> [return] ok 4218 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{a} <+strict +store> [variable] ok 4219 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+strict +store> [exception] ok 4220 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+strict +store> [return] ok 4221 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{a} <+strict +store> [variable] ok 4222 - my $x; $x->{a} = 1; exists $$x{a} <+strict +store> [exception] ok 4223 - my $x; $x->{a} = 1; exists $$x{a} <+strict +store> [return] ok 4224 - my $x; $x->{a} = 1; exists $$x{a} <+strict +store> [variable] ok 4225 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+strict +store> [exception] ok 4226 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+strict +store> [return] ok 4227 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{a} <+strict +store> [variable] ok 4228 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+strict +store> [exception] ok 4229 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+strict +store> [return] ok 4230 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{a} <+strict +store> [variable] ok 4231 - my %x; $x{a} = 1; exists $x{a} <+strict +store> [exception] ok 4232 - my %x; $x{a} = 1; exists $x{a} <+strict +store> [return] ok 4233 - my %x; $x{a} = 1; exists $x{a} <+strict +store> [variable] ok 4234 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+strict +store> [exception] ok 4235 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+strict +store> [return] ok 4236 - our %x; local %x; use strict; $x{a} = 1; exists $x{a} <+strict +store> [variable] ok 4237 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+strict +store> [exception] ok 4238 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+strict +store> [return] ok 4239 - our %x; local %x; no strict; $x{a} = 1; exists $x{a} <+strict +store> [variable] ok 4240 - my $x; $x->{a} = 1; exists $x->{b} <+strict +store> [exception] ok 4241 - my $x; $x->{a} = 1; exists $x->{b} <+strict +store> [return] ok 4242 - my $x; $x->{a} = 1; exists $x->{b} <+strict +store> [variable] ok 4243 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+strict +store> [exception] ok 4244 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+strict +store> [return] ok 4245 - our $x; local $x; use strict; $x->{a} = 1; exists $x->{b} <+strict +store> [variable] ok 4246 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+strict +store> [exception] ok 4247 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+strict +store> [return] ok 4248 - our $x; local $x; no strict; $x->{a} = 1; exists $x->{b} <+strict +store> [variable] ok 4249 - my $x; $x->{a} = 1; exists $$x{b} <+strict +store> [exception] ok 4250 - my $x; $x->{a} = 1; exists $$x{b} <+strict +store> [return] ok 4251 - my $x; $x->{a} = 1; exists $$x{b} <+strict +store> [variable] ok 4252 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+strict +store> [exception] ok 4253 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+strict +store> [return] ok 4254 - our $x; local $x; use strict; $x->{a} = 1; exists $$x{b} <+strict +store> [variable] ok 4255 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+strict +store> [exception] ok 4256 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+strict +store> [return] ok 4257 - our $x; local $x; no strict; $x->{a} = 1; exists $$x{b} <+strict +store> [variable] ok 4258 - my %x; $x{a} = 1; exists $x{b} <+strict +store> [exception] ok 4259 - my %x; $x{a} = 1; exists $x{b} <+strict +store> [return] ok 4260 - my %x; $x{a} = 1; exists $x{b} <+strict +store> [variable] ok 4261 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+strict +store> [exception] ok 4262 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+strict +store> [return] ok 4263 - our %x; local %x; use strict; $x{a} = 1; exists $x{b} <+strict +store> [variable] ok 4264 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+strict +store> [exception] ok 4265 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+strict +store> [return] ok 4266 - our %x; local %x; no strict; $x{a} = 1; exists $x{b} <+strict +store> [variable] ok 4267 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+fetch> [exception] ok 4268 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+fetch> [return] ok 4269 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+fetch> [variable] ok 4270 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+fetch> [exception] ok 4271 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+fetch> [return] ok 4272 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+fetch> [variable] ok 4273 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+fetch> [exception] ok 4274 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+fetch> [return] ok 4275 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+fetch> [variable] ok 4276 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+fetch> [exception] ok 4277 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+fetch> [return] ok 4278 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+fetch> [variable] ok 4279 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+fetch> [exception] ok 4280 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+fetch> [return] ok 4281 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+fetch> [variable] ok 4282 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+fetch> [exception] ok 4283 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+fetch> [return] ok 4284 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+fetch> [variable] ok 4285 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+fetch> [exception] ok 4286 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+fetch> [return] ok 4287 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+fetch> [variable] ok 4288 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+fetch> [exception] ok 4289 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+fetch> [return] ok 4290 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+fetch> [variable] ok 4291 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+fetch> [exception] ok 4292 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+fetch> [return] ok 4293 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+fetch> [variable] ok 4294 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+fetch> [exception] ok 4295 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+fetch> [return] ok 4296 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+fetch> [variable] ok 4297 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+fetch> [exception] ok 4298 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+fetch> [return] ok 4299 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+fetch> [variable] ok 4300 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+fetch> [exception] ok 4301 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+fetch> [return] ok 4302 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+fetch> [variable] ok 4303 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+fetch> [exception] ok 4304 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+fetch> [return] ok 4305 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+fetch> [variable] ok 4306 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+fetch> [exception] ok 4307 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+fetch> [return] ok 4308 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+fetch> [variable] ok 4309 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+fetch> [exception] ok 4310 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+fetch> [return] ok 4311 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+fetch> [variable] ok 4312 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+fetch> [exception] ok 4313 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+fetch> [return] ok 4314 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+fetch> [variable] ok 4315 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+fetch> [exception] ok 4316 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+fetch> [return] ok 4317 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+fetch> [variable] ok 4318 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+fetch> [exception] ok 4319 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+fetch> [return] ok 4320 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+fetch> [variable] ok 4321 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+fetch> [exception] ok 4322 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+fetch> [return] ok 4323 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+fetch> [variable] ok 4324 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+fetch> [exception] ok 4325 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+fetch> [return] ok 4326 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+fetch> [variable] ok 4327 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+fetch> [exception] ok 4328 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+fetch> [return] ok 4329 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+fetch> [variable] ok 4330 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+fetch> [exception] ok 4331 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+fetch> [return] ok 4332 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+fetch> [variable] ok 4333 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+fetch> [exception] ok 4334 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+fetch> [return] ok 4335 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+fetch> [variable] ok 4336 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+fetch> [exception] ok 4337 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+fetch> [return] ok 4338 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+fetch> [variable] ok 4339 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+fetch> [exception] ok 4340 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+fetch> [return] ok 4341 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+fetch> [variable] ok 4342 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+fetch> [exception] ok 4343 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+fetch> [return] ok 4344 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+fetch> [variable] ok 4345 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+fetch> [exception] ok 4346 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+fetch> [return] ok 4347 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+fetch> [variable] ok 4348 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+exists> [exception] ok 4349 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+exists> [return] ok 4350 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+exists> [variable] ok 4351 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+exists> [exception] ok 4352 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+exists> [return] ok 4353 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+exists> [variable] ok 4354 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+exists> [exception] ok 4355 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+exists> [return] ok 4356 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+exists> [variable] ok 4357 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+exists> [exception] ok 4358 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+exists> [return] ok 4359 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+exists> [variable] ok 4360 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+exists> [exception] ok 4361 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+exists> [return] ok 4362 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+exists> [variable] ok 4363 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+exists> [exception] ok 4364 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+exists> [return] ok 4365 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+exists> [variable] ok 4366 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+exists> [exception] ok 4367 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+exists> [return] ok 4368 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+exists> [variable] ok 4369 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+exists> [exception] ok 4370 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+exists> [return] ok 4371 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+exists> [variable] ok 4372 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+exists> [exception] ok 4373 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+exists> [return] ok 4374 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+exists> [variable] ok 4375 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+exists> [exception] ok 4376 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+exists> [return] ok 4377 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+exists> [variable] ok 4378 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+exists> [exception] ok 4379 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+exists> [return] ok 4380 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+exists> [variable] ok 4381 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+exists> [exception] ok 4382 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+exists> [return] ok 4383 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+exists> [variable] ok 4384 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+exists> [exception] ok 4385 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+exists> [return] ok 4386 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+exists> [variable] ok 4387 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+exists> [exception] ok 4388 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+exists> [return] ok 4389 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+exists> [variable] ok 4390 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+exists> [exception] ok 4391 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+exists> [return] ok 4392 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+exists> [variable] ok 4393 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+exists> [exception] ok 4394 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+exists> [return] ok 4395 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+exists> [variable] ok 4396 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+exists> [exception] ok 4397 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+exists> [return] ok 4398 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+exists> [variable] ok 4399 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+exists> [exception] ok 4400 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+exists> [return] ok 4401 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+exists> [variable] ok 4402 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+exists> [exception] ok 4403 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+exists> [return] ok 4404 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+exists> [variable] ok 4405 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+exists> [exception] ok 4406 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+exists> [return] ok 4407 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+exists> [variable] ok 4408 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+exists> [exception] ok 4409 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+exists> [return] ok 4410 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+exists> [variable] ok 4411 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+exists> [exception] ok 4412 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+exists> [return] ok 4413 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+exists> [variable] ok 4414 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+exists> [exception] ok 4415 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+exists> [return] ok 4416 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+exists> [variable] ok 4417 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+exists> [exception] ok 4418 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+exists> [return] ok 4419 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+exists> [variable] ok 4420 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+exists> [exception] ok 4421 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+exists> [return] ok 4422 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+exists> [variable] ok 4423 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+exists> [exception] ok 4424 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+exists> [return] ok 4425 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+exists> [variable] ok 4426 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+exists> [exception] ok 4427 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+exists> [return] ok 4428 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+exists> [variable] ok 4429 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+delete> [exception] ok 4430 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+delete> [return] ok 4431 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+delete> [variable] ok 4432 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+delete> [exception] ok 4433 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+delete> [return] ok 4434 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+delete> [variable] ok 4435 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+delete> [exception] ok 4436 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+delete> [return] ok 4437 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+delete> [variable] ok 4438 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+delete> [exception] ok 4439 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+delete> [return] ok 4440 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+delete> [variable] ok 4441 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+delete> [exception] ok 4442 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+delete> [return] ok 4443 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+delete> [variable] ok 4444 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+delete> [exception] ok 4445 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+delete> [return] ok 4446 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+delete> [variable] ok 4447 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+delete> [exception] ok 4448 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+delete> [return] ok 4449 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+delete> [variable] ok 4450 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+delete> [exception] ok 4451 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+delete> [return] ok 4452 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+delete> [variable] ok 4453 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+delete> [exception] ok 4454 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+delete> [return] ok 4455 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+delete> [variable] ok 4456 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+delete> [exception] ok 4457 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+delete> [return] ok 4458 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+delete> [variable] ok 4459 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+delete> [exception] ok 4460 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+delete> [return] ok 4461 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+delete> [variable] ok 4462 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+delete> [exception] ok 4463 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+delete> [return] ok 4464 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+delete> [variable] ok 4465 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+delete> [exception] ok 4466 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+delete> [return] ok 4467 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+delete> [variable] ok 4468 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+delete> [exception] ok 4469 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+delete> [return] ok 4470 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+delete> [variable] ok 4471 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+delete> [exception] ok 4472 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+delete> [return] ok 4473 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+delete> [variable] ok 4474 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+delete> [exception] ok 4475 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+delete> [return] ok 4476 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+delete> [variable] ok 4477 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+delete> [exception] ok 4478 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+delete> [return] ok 4479 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+delete> [variable] ok 4480 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+delete> [exception] ok 4481 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+delete> [return] ok 4482 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+delete> [variable] ok 4483 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+delete> [exception] ok 4484 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+delete> [return] ok 4485 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+delete> [variable] ok 4486 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+delete> [exception] ok 4487 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+delete> [return] ok 4488 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+delete> [variable] ok 4489 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+delete> [exception] ok 4490 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+delete> [return] ok 4491 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+delete> [variable] ok 4492 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+delete> [exception] ok 4493 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+delete> [return] ok 4494 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+delete> [variable] ok 4495 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+delete> [exception] ok 4496 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+delete> [return] ok 4497 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+delete> [variable] ok 4498 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+delete> [exception] ok 4499 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+delete> [return] ok 4500 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+delete> [variable] ok 4501 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+delete> [exception] ok 4502 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+delete> [return] ok 4503 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+delete> [variable] ok 4504 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+delete> [exception] ok 4505 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+delete> [return] ok 4506 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+delete> [variable] ok 4507 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+delete> [exception] ok 4508 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+delete> [return] ok 4509 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+delete> [variable] ok 4510 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+store> [exception] ok 4511 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+store> [return] ok 4512 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+store> [variable] ok 4513 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+store> [exception] ok 4514 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+store> [return] ok 4515 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+store> [variable] ok 4516 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+store> [exception] ok 4517 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+store> [return] ok 4518 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+store> [variable] ok 4519 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+store> [exception] ok 4520 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+store> [return] ok 4521 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+store> [variable] ok 4522 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+store> [exception] ok 4523 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+store> [return] ok 4524 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+store> [variable] ok 4525 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+store> [exception] ok 4526 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+store> [return] ok 4527 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+store> [variable] ok 4528 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+store> [exception] ok 4529 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+store> [return] ok 4530 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+store> [variable] ok 4531 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+store> [exception] ok 4532 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+store> [return] ok 4533 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+store> [variable] ok 4534 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+store> [exception] ok 4535 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+store> [return] ok 4536 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+store> [variable] ok 4537 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+store> [exception] ok 4538 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+store> [return] ok 4539 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+store> [variable] ok 4540 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+store> [exception] ok 4541 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+store> [return] ok 4542 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+store> [variable] ok 4543 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+store> [exception] ok 4544 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+store> [return] ok 4545 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+store> [variable] ok 4546 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+store> [exception] ok 4547 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+store> [return] ok 4548 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+store> [variable] ok 4549 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+store> [exception] ok 4550 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+store> [return] ok 4551 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+store> [variable] ok 4552 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+store> [exception] ok 4553 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+store> [return] ok 4554 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+store> [variable] ok 4555 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+store> [exception] ok 4556 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+store> [return] ok 4557 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+store> [variable] ok 4558 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+store> [exception] ok 4559 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+store> [return] ok 4560 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+store> [variable] ok 4561 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+store> [exception] ok 4562 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+store> [return] ok 4563 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+store> [variable] ok 4564 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+store> [exception] ok 4565 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+store> [return] ok 4566 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+store> [variable] ok 4567 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+store> [exception] ok 4568 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+store> [return] ok 4569 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+store> [variable] ok 4570 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+store> [exception] ok 4571 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+store> [return] ok 4572 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+store> [variable] ok 4573 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+store> [exception] ok 4574 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+store> [return] ok 4575 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+store> [variable] ok 4576 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+store> [exception] ok 4577 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+store> [return] ok 4578 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+store> [variable] ok 4579 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+store> [exception] ok 4580 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+store> [return] ok 4581 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+store> [variable] ok 4582 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+store> [exception] ok 4583 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+store> [return] ok 4584 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+store> [variable] ok 4585 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+store> [exception] ok 4586 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+store> [return] ok 4587 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+store> [variable] ok 4588 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+store> [exception] ok 4589 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+store> [return] ok 4590 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+store> [variable] ok 4591 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +fetch> [exception] ok 4592 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +fetch> [return] ok 4593 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +fetch> [variable] ok 4594 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +fetch> [exception] ok 4595 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +fetch> [return] ok 4596 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +fetch> [variable] ok 4597 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +fetch> [exception] ok 4598 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +fetch> [return] ok 4599 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +fetch> [variable] ok 4600 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +fetch> [exception] ok 4601 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +fetch> [return] ok 4602 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +fetch> [variable] ok 4603 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +fetch> [exception] ok 4604 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +fetch> [return] ok 4605 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +fetch> [variable] ok 4606 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +fetch> [exception] ok 4607 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +fetch> [return] ok 4608 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +fetch> [variable] ok 4609 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +fetch> [exception] ok 4610 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +fetch> [return] ok 4611 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +fetch> [variable] ok 4612 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +fetch> [exception] ok 4613 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +fetch> [return] ok 4614 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +fetch> [variable] ok 4615 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +fetch> [exception] ok 4616 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +fetch> [return] ok 4617 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +fetch> [variable] ok 4618 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +fetch> [exception] ok 4619 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +fetch> [return] ok 4620 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +fetch> [variable] ok 4621 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +fetch> [exception] ok 4622 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +fetch> [return] ok 4623 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +fetch> [variable] ok 4624 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +fetch> [exception] ok 4625 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +fetch> [return] ok 4626 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +fetch> [variable] ok 4627 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +fetch> [exception] ok 4628 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +fetch> [return] ok 4629 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +fetch> [variable] ok 4630 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +fetch> [exception] ok 4631 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +fetch> [return] ok 4632 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +fetch> [variable] ok 4633 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +fetch> [exception] ok 4634 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +fetch> [return] ok 4635 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +fetch> [variable] ok 4636 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +fetch> [exception] ok 4637 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +fetch> [return] ok 4638 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +fetch> [variable] ok 4639 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +fetch> [exception] ok 4640 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +fetch> [return] ok 4641 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +fetch> [variable] ok 4642 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +fetch> [exception] ok 4643 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +fetch> [return] ok 4644 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +fetch> [variable] ok 4645 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +fetch> [exception] ok 4646 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +fetch> [return] ok 4647 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +fetch> [variable] ok 4648 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +fetch> [exception] ok 4649 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +fetch> [return] ok 4650 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +fetch> [variable] ok 4651 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +fetch> [exception] ok 4652 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +fetch> [return] ok 4653 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +fetch> [variable] ok 4654 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +fetch> [exception] ok 4655 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +fetch> [return] ok 4656 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +fetch> [variable] ok 4657 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +fetch> [exception] ok 4658 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +fetch> [return] ok 4659 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +fetch> [variable] ok 4660 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +fetch> [exception] ok 4661 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +fetch> [return] ok 4662 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +fetch> [variable] ok 4663 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +fetch> [exception] ok 4664 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +fetch> [return] ok 4665 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +fetch> [variable] ok 4666 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +fetch> [exception] ok 4667 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +fetch> [return] ok 4668 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +fetch> [variable] ok 4669 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +fetch> [exception] ok 4670 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +fetch> [return] ok 4671 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +fetch> [variable] ok 4672 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +exists> [exception] ok 4673 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +exists> [return] ok 4674 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +exists> [variable] ok 4675 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +exists> [exception] ok 4676 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +exists> [return] ok 4677 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +exists> [variable] ok 4678 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +exists> [exception] ok 4679 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +exists> [return] ok 4680 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +exists> [variable] ok 4681 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +exists> [exception] ok 4682 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +exists> [return] ok 4683 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +exists> [variable] ok 4684 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +exists> [exception] ok 4685 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +exists> [return] ok 4686 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +exists> [variable] ok 4687 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +exists> [exception] ok 4688 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +exists> [return] ok 4689 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +exists> [variable] ok 4690 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +exists> [exception] ok 4691 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +exists> [return] ok 4692 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +exists> [variable] ok 4693 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +exists> [exception] ok 4694 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +exists> [return] ok 4695 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +exists> [variable] ok 4696 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +exists> [exception] ok 4697 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +exists> [return] ok 4698 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +exists> [variable] ok 4699 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +exists> [exception] ok 4700 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +exists> [return] ok 4701 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +exists> [variable] ok 4702 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +exists> [exception] ok 4703 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +exists> [return] ok 4704 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +exists> [variable] ok 4705 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +exists> [exception] ok 4706 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +exists> [return] ok 4707 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +exists> [variable] ok 4708 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +exists> [exception] ok 4709 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +exists> [return] ok 4710 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +exists> [variable] ok 4711 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +exists> [exception] ok 4712 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +exists> [return] ok 4713 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +exists> [variable] ok 4714 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +exists> [exception] ok 4715 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +exists> [return] ok 4716 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +exists> [variable] ok 4717 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +exists> [exception] ok 4718 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +exists> [return] ok 4719 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +exists> [variable] ok 4720 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +exists> [exception] ok 4721 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +exists> [return] ok 4722 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +exists> [variable] ok 4723 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +exists> [exception] ok 4724 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +exists> [return] ok 4725 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +exists> [variable] ok 4726 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +exists> [exception] ok 4727 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +exists> [return] ok 4728 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +exists> [variable] ok 4729 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +exists> [exception] ok 4730 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +exists> [return] ok 4731 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +exists> [variable] ok 4732 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +exists> [exception] ok 4733 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +exists> [return] ok 4734 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +exists> [variable] ok 4735 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +exists> [exception] ok 4736 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +exists> [return] ok 4737 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +exists> [variable] ok 4738 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +exists> [exception] ok 4739 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +exists> [return] ok 4740 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +exists> [variable] ok 4741 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +exists> [exception] ok 4742 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +exists> [return] ok 4743 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +exists> [variable] ok 4744 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +exists> [exception] ok 4745 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +exists> [return] ok 4746 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +exists> [variable] ok 4747 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +exists> [exception] ok 4748 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +exists> [return] ok 4749 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +exists> [variable] ok 4750 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +exists> [exception] ok 4751 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +exists> [return] ok 4752 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +exists> [variable] ok 4753 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +delete> [exception] ok 4754 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +delete> [return] ok 4755 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +delete> [variable] ok 4756 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +delete> [exception] ok 4757 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +delete> [return] ok 4758 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +delete> [variable] ok 4759 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +delete> [exception] ok 4760 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +delete> [return] ok 4761 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +delete> [variable] ok 4762 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +delete> [exception] ok 4763 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +delete> [return] ok 4764 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +delete> [variable] ok 4765 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +delete> [exception] ok 4766 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +delete> [return] ok 4767 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +delete> [variable] ok 4768 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +delete> [exception] ok 4769 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +delete> [return] ok 4770 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +delete> [variable] ok 4771 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +delete> [exception] ok 4772 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +delete> [return] ok 4773 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +delete> [variable] ok 4774 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +delete> [exception] ok 4775 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +delete> [return] ok 4776 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +delete> [variable] ok 4777 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +delete> [exception] ok 4778 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +delete> [return] ok 4779 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +delete> [variable] ok 4780 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +delete> [exception] ok 4781 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +delete> [return] ok 4782 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +delete> [variable] ok 4783 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +delete> [exception] ok 4784 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +delete> [return] ok 4785 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +delete> [variable] ok 4786 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +delete> [exception] ok 4787 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +delete> [return] ok 4788 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +delete> [variable] ok 4789 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +delete> [exception] ok 4790 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +delete> [return] ok 4791 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +delete> [variable] ok 4792 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +delete> [exception] ok 4793 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +delete> [return] ok 4794 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +delete> [variable] ok 4795 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +delete> [exception] ok 4796 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +delete> [return] ok 4797 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +delete> [variable] ok 4798 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +delete> [exception] ok 4799 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +delete> [return] ok 4800 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +delete> [variable] ok 4801 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +delete> [exception] ok 4802 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +delete> [return] ok 4803 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +delete> [variable] ok 4804 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +delete> [exception] ok 4805 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +delete> [return] ok 4806 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +delete> [variable] ok 4807 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +delete> [exception] ok 4808 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +delete> [return] ok 4809 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +delete> [variable] ok 4810 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +delete> [exception] ok 4811 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +delete> [return] ok 4812 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +delete> [variable] ok 4813 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +delete> [exception] ok 4814 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +delete> [return] ok 4815 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +delete> [variable] ok 4816 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +delete> [exception] ok 4817 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +delete> [return] ok 4818 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +delete> [variable] ok 4819 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +delete> [exception] ok 4820 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +delete> [return] ok 4821 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +delete> [variable] ok 4822 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +delete> [exception] ok 4823 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +delete> [return] ok 4824 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +delete> [variable] ok 4825 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +delete> [exception] ok 4826 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +delete> [return] ok 4827 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +delete> [variable] ok 4828 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +delete> [exception] ok 4829 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +delete> [return] ok 4830 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +delete> [variable] ok 4831 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +delete> [exception] ok 4832 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +delete> [return] ok 4833 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +delete> [variable] ok 4834 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +store> [exception] ok 4835 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +store> [return] ok 4836 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +store> [variable] ok 4837 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +store> [exception] ok 4838 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +store> [return] ok 4839 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +store> [variable] ok 4840 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +store> [exception] ok 4841 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +store> [return] ok 4842 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{b} <+strict +store> [variable] ok 4843 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +store> [exception] ok 4844 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +store> [return] ok 4845 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +store> [variable] ok 4846 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +store> [exception] ok 4847 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +store> [return] ok 4848 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +store> [variable] ok 4849 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +store> [exception] ok 4850 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +store> [return] ok 4851 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{b} <+strict +store> [variable] ok 4852 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +store> [exception] ok 4853 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +store> [return] ok 4854 - my %x; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +store> [variable] ok 4855 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +store> [exception] ok 4856 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +store> [return] ok 4857 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +store> [variable] ok 4858 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +store> [exception] ok 4859 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +store> [return] ok 4860 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{b} <+strict +store> [variable] ok 4861 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +store> [exception] ok 4862 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +store> [return] ok 4863 - my $x; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +store> [variable] ok 4864 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +store> [exception] ok 4865 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +store> [return] ok 4866 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +store> [variable] ok 4867 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +store> [exception] ok 4868 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +store> [return] ok 4869 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{a}->{d} <+strict +store> [variable] ok 4870 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +store> [exception] ok 4871 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +store> [return] ok 4872 - my $x; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +store> [variable] ok 4873 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +store> [exception] ok 4874 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +store> [return] ok 4875 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +store> [variable] ok 4876 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +store> [exception] ok 4877 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +store> [return] ok 4878 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{a}->{d} <+strict +store> [variable] ok 4879 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +store> [exception] ok 4880 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +store> [return] ok 4881 - my %x; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +store> [variable] ok 4882 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +store> [exception] ok 4883 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +store> [return] ok 4884 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +store> [variable] ok 4885 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +store> [exception] ok 4886 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +store> [return] ok 4887 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{a}->{d} <+strict +store> [variable] ok 4888 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +store> [exception] ok 4889 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +store> [return] ok 4890 - my $x; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +store> [variable] ok 4891 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +store> [exception] ok 4892 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +store> [return] ok 4893 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +store> [variable] ok 4894 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +store> [exception] ok 4895 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +store> [return] ok 4896 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $x->{c}->{d} <+strict +store> [variable] ok 4897 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +store> [exception] ok 4898 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +store> [return] ok 4899 - my $x; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +store> [variable] ok 4900 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +store> [exception] ok 4901 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +store> [return] ok 4902 - our $x; local $x; use strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +store> [variable] ok 4903 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +store> [exception] ok 4904 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +store> [return] ok 4905 - our $x; local $x; no strict; $x->{a}->{b} = 1; exists $$x{c}->{d} <+strict +store> [variable] ok 4906 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +store> [exception] ok 4907 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +store> [return] ok 4908 - my %x; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +store> [variable] ok 4909 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +store> [exception] ok 4910 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +store> [return] ok 4911 - our %x; local %x; use strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +store> [variable] ok 4912 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +store> [exception] ok 4913 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +store> [return] ok 4914 - our %x; local %x; no strict; $x{a}->{b} = 1; exists $x{c}->{d} <+strict +store> [variable] ok 4915 - my $x; delete $x->{a} [exception] ok 4916 - my $x; delete $x->{a} [return] ok 4917 - my $x; delete $x->{a} [variable] ok 4918 - our $x; local $x; use strict; delete $x->{a} [exception] ok 4919 - our $x; local $x; use strict; delete $x->{a} [return] ok 4920 - our $x; local $x; use strict; delete $x->{a} [variable] ok 4921 - our $x; local $x; no strict; delete $x->{a} [exception] ok 4922 - our $x; local $x; no strict; delete $x->{a} [return] ok 4923 - our $x; local $x; no strict; delete $x->{a} [variable] ok 4924 - my $x; delete $$x{a} [exception] ok 4925 - my $x; delete $$x{a} [return] ok 4926 - my $x; delete $$x{a} [variable] ok 4927 - our $x; local $x; use strict; delete $$x{a} [exception] ok 4928 - our $x; local $x; use strict; delete $$x{a} [return] ok 4929 - our $x; local $x; use strict; delete $$x{a} [variable] ok 4930 - our $x; local $x; no strict; delete $$x{a} [exception] ok 4931 - our $x; local $x; no strict; delete $$x{a} [return] ok 4932 - our $x; local $x; no strict; delete $$x{a} [variable] ok 4933 - my %x; delete $x{a} [exception] ok 4934 - my %x; delete $x{a} [return] ok 4935 - my %x; delete $x{a} [variable] ok 4936 - our %x; local %x; use strict; delete $x{a} [exception] ok 4937 - our %x; local %x; use strict; delete $x{a} [return] ok 4938 - our %x; local %x; use strict; delete $x{a} [variable] ok 4939 - our %x; local %x; no strict; delete $x{a} [exception] ok 4940 - our %x; local %x; no strict; delete $x{a} [return] ok 4941 - our %x; local %x; no strict; delete $x{a} [variable] ok 4942 - my $x; delete $x->{a} [exception] ok 4943 - my $x; delete $x->{a} [return] ok 4944 - my $x; delete $x->{a} [variable] ok 4945 - our $x; local $x; use strict; delete $x->{a} [exception] ok 4946 - our $x; local $x; use strict; delete $x->{a} [return] ok 4947 - our $x; local $x; use strict; delete $x->{a} [variable] ok 4948 - our $x; local $x; no strict; delete $x->{a} [exception] ok 4949 - our $x; local $x; no strict; delete $x->{a} [return] ok 4950 - our $x; local $x; no strict; delete $x->{a} [variable] ok 4951 - my $x; delete $$x{a} [exception] ok 4952 - my $x; delete $$x{a} [return] ok 4953 - my $x; delete $$x{a} [variable] ok 4954 - our $x; local $x; use strict; delete $$x{a} [exception] ok 4955 - our $x; local $x; use strict; delete $$x{a} [return] ok 4956 - our $x; local $x; use strict; delete $$x{a} [variable] ok 4957 - our $x; local $x; no strict; delete $$x{a} [exception] ok 4958 - our $x; local $x; no strict; delete $$x{a} [return] ok 4959 - our $x; local $x; no strict; delete $$x{a} [variable] ok 4960 - my %x; delete $x{a} [exception] ok 4961 - my %x; delete $x{a} [return] ok 4962 - my %x; delete $x{a} [variable] ok 4963 - our %x; local %x; use strict; delete $x{a} [exception] ok 4964 - our %x; local %x; use strict; delete $x{a} [return] ok 4965 - our %x; local %x; use strict; delete $x{a} [variable] ok 4966 - our %x; local %x; no strict; delete $x{a} [exception] ok 4967 - our %x; local %x; no strict; delete $x{a} [return] ok 4968 - our %x; local %x; no strict; delete $x{a} [variable] ok 4969 - my $x; delete $x->{a} <+fetch> [exception] ok 4970 - my $x; delete $x->{a} <+fetch> [return] ok 4971 - my $x; delete $x->{a} <+fetch> [variable] ok 4972 - our $x; local $x; use strict; delete $x->{a} <+fetch> [exception] ok 4973 - our $x; local $x; use strict; delete $x->{a} <+fetch> [return] ok 4974 - our $x; local $x; use strict; delete $x->{a} <+fetch> [variable] ok 4975 - our $x; local $x; no strict; delete $x->{a} <+fetch> [exception] ok 4976 - our $x; local $x; no strict; delete $x->{a} <+fetch> [return] ok 4977 - our $x; local $x; no strict; delete $x->{a} <+fetch> [variable] ok 4978 - my $x; delete $$x{a} <+fetch> [exception] ok 4979 - my $x; delete $$x{a} <+fetch> [return] ok 4980 - my $x; delete $$x{a} <+fetch> [variable] ok 4981 - our $x; local $x; use strict; delete $$x{a} <+fetch> [exception] ok 4982 - our $x; local $x; use strict; delete $$x{a} <+fetch> [return] ok 4983 - our $x; local $x; use strict; delete $$x{a} <+fetch> [variable] ok 4984 - our $x; local $x; no strict; delete $$x{a} <+fetch> [exception] ok 4985 - our $x; local $x; no strict; delete $$x{a} <+fetch> [return] ok 4986 - our $x; local $x; no strict; delete $$x{a} <+fetch> [variable] ok 4987 - my %x; delete $x{a} <+fetch> [exception] ok 4988 - my %x; delete $x{a} <+fetch> [return] ok 4989 - my %x; delete $x{a} <+fetch> [variable] ok 4990 - our %x; local %x; use strict; delete $x{a} <+fetch> [exception] ok 4991 - our %x; local %x; use strict; delete $x{a} <+fetch> [return] ok 4992 - our %x; local %x; use strict; delete $x{a} <+fetch> [variable] ok 4993 - our %x; local %x; no strict; delete $x{a} <+fetch> [exception] ok 4994 - our %x; local %x; no strict; delete $x{a} <+fetch> [return] ok 4995 - our %x; local %x; no strict; delete $x{a} <+fetch> [variable] ok 4996 - my $x; delete $x->{a} <+exists> [exception] ok 4997 - my $x; delete $x->{a} <+exists> [return] ok 4998 - my $x; delete $x->{a} <+exists> [variable] ok 4999 - our $x; local $x; use strict; delete $x->{a} <+exists> [exception] ok 5000 - our $x; local $x; use strict; delete $x->{a} <+exists> [return] ok 5001 - our $x; local $x; use strict; delete $x->{a} <+exists> [variable] ok 5002 - our $x; local $x; no strict; delete $x->{a} <+exists> [exception] ok 5003 - our $x; local $x; no strict; delete $x->{a} <+exists> [return] ok 5004 - our $x; local $x; no strict; delete $x->{a} <+exists> [variable] ok 5005 - my $x; delete $$x{a} <+exists> [exception] ok 5006 - my $x; delete $$x{a} <+exists> [return] ok 5007 - my $x; delete $$x{a} <+exists> [variable] ok 5008 - our $x; local $x; use strict; delete $$x{a} <+exists> [exception] ok 5009 - our $x; local $x; use strict; delete $$x{a} <+exists> [return] ok 5010 - our $x; local $x; use strict; delete $$x{a} <+exists> [variable] ok 5011 - our $x; local $x; no strict; delete $$x{a} <+exists> [exception] ok 5012 - our $x; local $x; no strict; delete $$x{a} <+exists> [return] ok 5013 - our $x; local $x; no strict; delete $$x{a} <+exists> [variable] ok 5014 - my %x; delete $x{a} <+exists> [exception] ok 5015 - my %x; delete $x{a} <+exists> [return] ok 5016 - my %x; delete $x{a} <+exists> [variable] ok 5017 - our %x; local %x; use strict; delete $x{a} <+exists> [exception] ok 5018 - our %x; local %x; use strict; delete $x{a} <+exists> [return] ok 5019 - our %x; local %x; use strict; delete $x{a} <+exists> [variable] ok 5020 - our %x; local %x; no strict; delete $x{a} <+exists> [exception] ok 5021 - our %x; local %x; no strict; delete $x{a} <+exists> [return] ok 5022 - our %x; local %x; no strict; delete $x{a} <+exists> [variable] ok 5023 - my $x; delete $x->{a} <+delete> [exception] ok 5024 - my $x; delete $x->{a} <+delete> [return] ok 5025 - my $x; delete $x->{a} <+delete> [variable] ok 5026 - our $x; local $x; use strict; delete $x->{a} <+delete> [exception] ok 5027 - our $x; local $x; use strict; delete $x->{a} <+delete> [return] ok 5028 - our $x; local $x; use strict; delete $x->{a} <+delete> [variable] ok 5029 - our $x; local $x; no strict; delete $x->{a} <+delete> [exception] ok 5030 - our $x; local $x; no strict; delete $x->{a} <+delete> [return] ok 5031 - our $x; local $x; no strict; delete $x->{a} <+delete> [variable] ok 5032 - my $x; delete $$x{a} <+delete> [exception] ok 5033 - my $x; delete $$x{a} <+delete> [return] ok 5034 - my $x; delete $$x{a} <+delete> [variable] ok 5035 - our $x; local $x; use strict; delete $$x{a} <+delete> [exception] ok 5036 - our $x; local $x; use strict; delete $$x{a} <+delete> [return] ok 5037 - our $x; local $x; use strict; delete $$x{a} <+delete> [variable] ok 5038 - our $x; local $x; no strict; delete $$x{a} <+delete> [exception] ok 5039 - our $x; local $x; no strict; delete $$x{a} <+delete> [return] ok 5040 - our $x; local $x; no strict; delete $$x{a} <+delete> [variable] ok 5041 - my %x; delete $x{a} <+delete> [exception] ok 5042 - my %x; delete $x{a} <+delete> [return] ok 5043 - my %x; delete $x{a} <+delete> [variable] ok 5044 - our %x; local %x; use strict; delete $x{a} <+delete> [exception] ok 5045 - our %x; local %x; use strict; delete $x{a} <+delete> [return] ok 5046 - our %x; local %x; use strict; delete $x{a} <+delete> [variable] ok 5047 - our %x; local %x; no strict; delete $x{a} <+delete> [exception] ok 5048 - our %x; local %x; no strict; delete $x{a} <+delete> [return] ok 5049 - our %x; local %x; no strict; delete $x{a} <+delete> [variable] ok 5050 - my $x; delete $x->{a} <+store> [exception] ok 5051 - my $x; delete $x->{a} <+store> [return] ok 5052 - my $x; delete $x->{a} <+store> [variable] ok 5053 - our $x; local $x; use strict; delete $x->{a} <+store> [exception] ok 5054 - our $x; local $x; use strict; delete $x->{a} <+store> [return] ok 5055 - our $x; local $x; use strict; delete $x->{a} <+store> [variable] ok 5056 - our $x; local $x; no strict; delete $x->{a} <+store> [exception] ok 5057 - our $x; local $x; no strict; delete $x->{a} <+store> [return] ok 5058 - our $x; local $x; no strict; delete $x->{a} <+store> [variable] ok 5059 - my $x; delete $$x{a} <+store> [exception] ok 5060 - my $x; delete $$x{a} <+store> [return] ok 5061 - my $x; delete $$x{a} <+store> [variable] ok 5062 - our $x; local $x; use strict; delete $$x{a} <+store> [exception] ok 5063 - our $x; local $x; use strict; delete $$x{a} <+store> [return] ok 5064 - our $x; local $x; use strict; delete $$x{a} <+store> [variable] ok 5065 - our $x; local $x; no strict; delete $$x{a} <+store> [exception] ok 5066 - our $x; local $x; no strict; delete $$x{a} <+store> [return] ok 5067 - our $x; local $x; no strict; delete $$x{a} <+store> [variable] ok 5068 - my %x; delete $x{a} <+store> [exception] ok 5069 - my %x; delete $x{a} <+store> [return] ok 5070 - my %x; delete $x{a} <+store> [variable] ok 5071 - our %x; local %x; use strict; delete $x{a} <+store> [exception] ok 5072 - our %x; local %x; use strict; delete $x{a} <+store> [return] ok 5073 - our %x; local %x; use strict; delete $x{a} <+store> [variable] ok 5074 - our %x; local %x; no strict; delete $x{a} <+store> [exception] ok 5075 - our %x; local %x; no strict; delete $x{a} <+store> [return] ok 5076 - our %x; local %x; no strict; delete $x{a} <+store> [variable] ok 5077 - my $x; delete $x->{a} <+strict +fetch> [exception] ok 5078 - my $x; delete $x->{a} <+strict +fetch> [return] ok 5079 - my $x; delete $x->{a} <+strict +fetch> [variable] ok 5080 - our $x; local $x; use strict; delete $x->{a} <+strict +fetch> [exception] ok 5081 - our $x; local $x; use strict; delete $x->{a} <+strict +fetch> [return] ok 5082 - our $x; local $x; use strict; delete $x->{a} <+strict +fetch> [variable] ok 5083 - our $x; local $x; no strict; delete $x->{a} <+strict +fetch> [exception] ok 5084 - our $x; local $x; no strict; delete $x->{a} <+strict +fetch> [return] ok 5085 - our $x; local $x; no strict; delete $x->{a} <+strict +fetch> [variable] ok 5086 - my $x; delete $$x{a} <+strict +fetch> [exception] ok 5087 - my $x; delete $$x{a} <+strict +fetch> [return] ok 5088 - my $x; delete $$x{a} <+strict +fetch> [variable] ok 5089 - our $x; local $x; use strict; delete $$x{a} <+strict +fetch> [exception] ok 5090 - our $x; local $x; use strict; delete $$x{a} <+strict +fetch> [return] ok 5091 - our $x; local $x; use strict; delete $$x{a} <+strict +fetch> [variable] ok 5092 - our $x; local $x; no strict; delete $$x{a} <+strict +fetch> [exception] ok 5093 - our $x; local $x; no strict; delete $$x{a} <+strict +fetch> [return] ok 5094 - our $x; local $x; no strict; delete $$x{a} <+strict +fetch> [variable] ok 5095 - my %x; delete $x{a} <+strict +fetch> [exception] ok 5096 - my %x; delete $x{a} <+strict +fetch> [return] ok 5097 - my %x; delete $x{a} <+strict +fetch> [variable] ok 5098 - our %x; local %x; use strict; delete $x{a} <+strict +fetch> [exception] ok 5099 - our %x; local %x; use strict; delete $x{a} <+strict +fetch> [return] ok 5100 - our %x; local %x; use strict; delete $x{a} <+strict +fetch> [variable] ok 5101 - our %x; local %x; no strict; delete $x{a} <+strict +fetch> [exception] ok 5102 - our %x; local %x; no strict; delete $x{a} <+strict +fetch> [return] ok 5103 - our %x; local %x; no strict; delete $x{a} <+strict +fetch> [variable] ok 5104 - my $x; delete $x->{a} <+strict +exists> [exception] ok 5105 - my $x; delete $x->{a} <+strict +exists> [return] ok 5106 - my $x; delete $x->{a} <+strict +exists> [variable] ok 5107 - our $x; local $x; use strict; delete $x->{a} <+strict +exists> [exception] ok 5108 - our $x; local $x; use strict; delete $x->{a} <+strict +exists> [return] ok 5109 - our $x; local $x; use strict; delete $x->{a} <+strict +exists> [variable] ok 5110 - our $x; local $x; no strict; delete $x->{a} <+strict +exists> [exception] ok 5111 - our $x; local $x; no strict; delete $x->{a} <+strict +exists> [return] ok 5112 - our $x; local $x; no strict; delete $x->{a} <+strict +exists> [variable] ok 5113 - my $x; delete $$x{a} <+strict +exists> [exception] ok 5114 - my $x; delete $$x{a} <+strict +exists> [return] ok 5115 - my $x; delete $$x{a} <+strict +exists> [variable] ok 5116 - our $x; local $x; use strict; delete $$x{a} <+strict +exists> [exception] ok 5117 - our $x; local $x; use strict; delete $$x{a} <+strict +exists> [return] ok 5118 - our $x; local $x; use strict; delete $$x{a} <+strict +exists> [variable] ok 5119 - our $x; local $x; no strict; delete $$x{a} <+strict +exists> [exception] ok 5120 - our $x; local $x; no strict; delete $$x{a} <+strict +exists> [return] ok 5121 - our $x; local $x; no strict; delete $$x{a} <+strict +exists> [variable] ok 5122 - my %x; delete $x{a} <+strict +exists> [exception] ok 5123 - my %x; delete $x{a} <+strict +exists> [return] ok 5124 - my %x; delete $x{a} <+strict +exists> [variable] ok 5125 - our %x; local %x; use strict; delete $x{a} <+strict +exists> [exception] ok 5126 - our %x; local %x; use strict; delete $x{a} <+strict +exists> [return] ok 5127 - our %x; local %x; use strict; delete $x{a} <+strict +exists> [variable] ok 5128 - our %x; local %x; no strict; delete $x{a} <+strict +exists> [exception] ok 5129 - our %x; local %x; no strict; delete $x{a} <+strict +exists> [return] ok 5130 - our %x; local %x; no strict; delete $x{a} <+strict +exists> [variable] ok 5131 - my $x; delete $x->{a} <+strict +delete> [exception] ok 5132 - my $x; delete $x->{a} <+strict +delete> [return] ok 5133 - my $x; delete $x->{a} <+strict +delete> [variable] ok 5134 - our $x; local $x; use strict; delete $x->{a} <+strict +delete> [exception] ok 5135 - our $x; local $x; use strict; delete $x->{a} <+strict +delete> [return] ok 5136 - our $x; local $x; use strict; delete $x->{a} <+strict +delete> [variable] ok 5137 - our $x; local $x; no strict; delete $x->{a} <+strict +delete> [exception] ok 5138 - our $x; local $x; no strict; delete $x->{a} <+strict +delete> [return] ok 5139 - our $x; local $x; no strict; delete $x->{a} <+strict +delete> [variable] ok 5140 - my $x; delete $$x{a} <+strict +delete> [exception] ok 5141 - my $x; delete $$x{a} <+strict +delete> [return] ok 5142 - my $x; delete $$x{a} <+strict +delete> [variable] ok 5143 - our $x; local $x; use strict; delete $$x{a} <+strict +delete> [exception] ok 5144 - our $x; local $x; use strict; delete $$x{a} <+strict +delete> [return] ok 5145 - our $x; local $x; use strict; delete $$x{a} <+strict +delete> [variable] ok 5146 - our $x; local $x; no strict; delete $$x{a} <+strict +delete> [exception] ok 5147 - our $x; local $x; no strict; delete $$x{a} <+strict +delete> [return] ok 5148 - our $x; local $x; no strict; delete $$x{a} <+strict +delete> [variable] ok 5149 - my %x; 1 <+strict +delete> [exception] ok 5150 - my %x; 1 <+strict +delete> [return] ok 5151 - my %x; 1 <+strict +delete> [variable] ok 5152 - our %x; local %x; use strict; 1 <+strict +delete> [exception] ok 5153 - our %x; local %x; use strict; 1 <+strict +delete> [return] ok 5154 - our %x; local %x; use strict; 1 <+strict +delete> [variable] ok 5155 - our %x; local %x; no strict; 1 <+strict +delete> [exception] ok 5156 - our %x; local %x; no strict; 1 <+strict +delete> [return] ok 5157 - our %x; local %x; no strict; 1 <+strict +delete> [variable] ok 5158 - my $x; delete $x->{a} <+strict +store> [exception] ok 5159 - my $x; delete $x->{a} <+strict +store> [return] ok 5160 - my $x; delete $x->{a} <+strict +store> [variable] ok 5161 - our $x; local $x; use strict; delete $x->{a} <+strict +store> [exception] ok 5162 - our $x; local $x; use strict; delete $x->{a} <+strict +store> [return] ok 5163 - our $x; local $x; use strict; delete $x->{a} <+strict +store> [variable] ok 5164 - our $x; local $x; no strict; delete $x->{a} <+strict +store> [exception] ok 5165 - our $x; local $x; no strict; delete $x->{a} <+strict +store> [return] ok 5166 - our $x; local $x; no strict; delete $x->{a} <+strict +store> [variable] ok 5167 - my $x; delete $$x{a} <+strict +store> [exception] ok 5168 - my $x; delete $$x{a} <+strict +store> [return] ok 5169 - my $x; delete $$x{a} <+strict +store> [variable] ok 5170 - our $x; local $x; use strict; delete $$x{a} <+strict +store> [exception] ok 5171 - our $x; local $x; use strict; delete $$x{a} <+strict +store> [return] ok 5172 - our $x; local $x; use strict; delete $$x{a} <+strict +store> [variable] ok 5173 - our $x; local $x; no strict; delete $$x{a} <+strict +store> [exception] ok 5174 - our $x; local $x; no strict; delete $$x{a} <+strict +store> [return] ok 5175 - our $x; local $x; no strict; delete $$x{a} <+strict +store> [variable] ok 5176 - my %x; delete $x{a} <+strict +store> [exception] ok 5177 - my %x; delete $x{a} <+strict +store> [return] ok 5178 - my %x; delete $x{a} <+strict +store> [variable] ok 5179 - our %x; local %x; use strict; delete $x{a} <+strict +store> [exception] ok 5180 - our %x; local %x; use strict; delete $x{a} <+strict +store> [return] ok 5181 - our %x; local %x; use strict; delete $x{a} <+strict +store> [variable] ok 5182 - our %x; local %x; no strict; delete $x{a} <+strict +store> [exception] ok 5183 - our %x; local %x; no strict; delete $x{a} <+strict +store> [return] ok 5184 - our %x; local %x; no strict; delete $x{a} <+strict +store> [variable] ok 5185 - my $x; delete $x->{a}->{b} [exception] ok 5186 - my $x; delete $x->{a}->{b} [return] ok 5187 - my $x; delete $x->{a}->{b} [variable] ok 5188 - our $x; local $x; use strict; delete $x->{a}->{b} [exception] ok 5189 - our $x; local $x; use strict; delete $x->{a}->{b} [return] ok 5190 - our $x; local $x; use strict; delete $x->{a}->{b} [variable] ok 5191 - our $x; local $x; no strict; delete $x->{a}->{b} [exception] ok 5192 - our $x; local $x; no strict; delete $x->{a}->{b} [return] ok 5193 - our $x; local $x; no strict; delete $x->{a}->{b} [variable] ok 5194 - my $x; delete $$x{a}->{b} [exception] ok 5195 - my $x; delete $$x{a}->{b} [return] ok 5196 - my $x; delete $$x{a}->{b} [variable] ok 5197 - our $x; local $x; use strict; delete $$x{a}->{b} [exception] ok 5198 - our $x; local $x; use strict; delete $$x{a}->{b} [return] ok 5199 - our $x; local $x; use strict; delete $$x{a}->{b} [variable] ok 5200 - our $x; local $x; no strict; delete $$x{a}->{b} [exception] ok 5201 - our $x; local $x; no strict; delete $$x{a}->{b} [return] ok 5202 - our $x; local $x; no strict; delete $$x{a}->{b} [variable] ok 5203 - my %x; delete $x{a}->{b} [exception] ok 5204 - my %x; delete $x{a}->{b} [return] ok 5205 - my %x; delete $x{a}->{b} [variable] ok 5206 - our %x; local %x; use strict; delete $x{a}->{b} [exception] ok 5207 - our %x; local %x; use strict; delete $x{a}->{b} [return] ok 5208 - our %x; local %x; use strict; delete $x{a}->{b} [variable] ok 5209 - our %x; local %x; no strict; delete $x{a}->{b} [exception] ok 5210 - our %x; local %x; no strict; delete $x{a}->{b} [return] ok 5211 - our %x; local %x; no strict; delete $x{a}->{b} [variable] ok 5212 - my $x; delete $x->{a}->{b} [exception] ok 5213 - my $x; delete $x->{a}->{b} [return] ok 5214 - my $x; delete $x->{a}->{b} [variable] ok 5215 - our $x; local $x; use strict; delete $x->{a}->{b} [exception] ok 5216 - our $x; local $x; use strict; delete $x->{a}->{b} [return] ok 5217 - our $x; local $x; use strict; delete $x->{a}->{b} [variable] ok 5218 - our $x; local $x; no strict; delete $x->{a}->{b} [exception] ok 5219 - our $x; local $x; no strict; delete $x->{a}->{b} [return] ok 5220 - our $x; local $x; no strict; delete $x->{a}->{b} [variable] ok 5221 - my $x; delete $$x{a}->{b} [exception] ok 5222 - my $x; delete $$x{a}->{b} [return] ok 5223 - my $x; delete $$x{a}->{b} [variable] ok 5224 - our $x; local $x; use strict; delete $$x{a}->{b} [exception] ok 5225 - our $x; local $x; use strict; delete $$x{a}->{b} [return] ok 5226 - our $x; local $x; use strict; delete $$x{a}->{b} [variable] ok 5227 - our $x; local $x; no strict; delete $$x{a}->{b} [exception] ok 5228 - our $x; local $x; no strict; delete $$x{a}->{b} [return] ok 5229 - our $x; local $x; no strict; delete $$x{a}->{b} [variable] ok 5230 - my %x; delete $x{a}->{b} [exception] ok 5231 - my %x; delete $x{a}->{b} [return] ok 5232 - my %x; delete $x{a}->{b} [variable] ok 5233 - our %x; local %x; use strict; delete $x{a}->{b} [exception] ok 5234 - our %x; local %x; use strict; delete $x{a}->{b} [return] ok 5235 - our %x; local %x; use strict; delete $x{a}->{b} [variable] ok 5236 - our %x; local %x; no strict; delete $x{a}->{b} [exception] ok 5237 - our %x; local %x; no strict; delete $x{a}->{b} [return] ok 5238 - our %x; local %x; no strict; delete $x{a}->{b} [variable] ok 5239 - my $x; delete $x->{a}->{b} <+fetch> [exception] ok 5240 - my $x; delete $x->{a}->{b} <+fetch> [return] ok 5241 - my $x; delete $x->{a}->{b} <+fetch> [variable] ok 5242 - our $x; local $x; use strict; delete $x->{a}->{b} <+fetch> [exception] ok 5243 - our $x; local $x; use strict; delete $x->{a}->{b} <+fetch> [return] ok 5244 - our $x; local $x; use strict; delete $x->{a}->{b} <+fetch> [variable] ok 5245 - our $x; local $x; no strict; delete $x->{a}->{b} <+fetch> [exception] ok 5246 - our $x; local $x; no strict; delete $x->{a}->{b} <+fetch> [return] ok 5247 - our $x; local $x; no strict; delete $x->{a}->{b} <+fetch> [variable] ok 5248 - my $x; delete $$x{a}->{b} <+fetch> [exception] ok 5249 - my $x; delete $$x{a}->{b} <+fetch> [return] ok 5250 - my $x; delete $$x{a}->{b} <+fetch> [variable] ok 5251 - our $x; local $x; use strict; delete $$x{a}->{b} <+fetch> [exception] ok 5252 - our $x; local $x; use strict; delete $$x{a}->{b} <+fetch> [return] ok 5253 - our $x; local $x; use strict; delete $$x{a}->{b} <+fetch> [variable] ok 5254 - our $x; local $x; no strict; delete $$x{a}->{b} <+fetch> [exception] ok 5255 - our $x; local $x; no strict; delete $$x{a}->{b} <+fetch> [return] ok 5256 - our $x; local $x; no strict; delete $$x{a}->{b} <+fetch> [variable] ok 5257 - my %x; delete $x{a}->{b} <+fetch> [exception] ok 5258 - my %x; delete $x{a}->{b} <+fetch> [return] ok 5259 - my %x; delete $x{a}->{b} <+fetch> [variable] ok 5260 - our %x; local %x; use strict; delete $x{a}->{b} <+fetch> [exception] ok 5261 - our %x; local %x; use strict; delete $x{a}->{b} <+fetch> [return] ok 5262 - our %x; local %x; use strict; delete $x{a}->{b} <+fetch> [variable] ok 5263 - our %x; local %x; no strict; delete $x{a}->{b} <+fetch> [exception] ok 5264 - our %x; local %x; no strict; delete $x{a}->{b} <+fetch> [return] ok 5265 - our %x; local %x; no strict; delete $x{a}->{b} <+fetch> [variable] ok 5266 - my $x; delete $x->{a}->{b} <+exists> [exception] ok 5267 - my $x; delete $x->{a}->{b} <+exists> [return] ok 5268 - my $x; delete $x->{a}->{b} <+exists> [variable] ok 5269 - our $x; local $x; use strict; delete $x->{a}->{b} <+exists> [exception] ok 5270 - our $x; local $x; use strict; delete $x->{a}->{b} <+exists> [return] ok 5271 - our $x; local $x; use strict; delete $x->{a}->{b} <+exists> [variable] ok 5272 - our $x; local $x; no strict; delete $x->{a}->{b} <+exists> [exception] ok 5273 - our $x; local $x; no strict; delete $x->{a}->{b} <+exists> [return] ok 5274 - our $x; local $x; no strict; delete $x->{a}->{b} <+exists> [variable] ok 5275 - my $x; delete $$x{a}->{b} <+exists> [exception] ok 5276 - my $x; delete $$x{a}->{b} <+exists> [return] ok 5277 - my $x; delete $$x{a}->{b} <+exists> [variable] ok 5278 - our $x; local $x; use strict; delete $$x{a}->{b} <+exists> [exception] ok 5279 - our $x; local $x; use strict; delete $$x{a}->{b} <+exists> [return] ok 5280 - our $x; local $x; use strict; delete $$x{a}->{b} <+exists> [variable] ok 5281 - our $x; local $x; no strict; delete $$x{a}->{b} <+exists> [exception] ok 5282 - our $x; local $x; no strict; delete $$x{a}->{b} <+exists> [return] ok 5283 - our $x; local $x; no strict; delete $$x{a}->{b} <+exists> [variable] ok 5284 - my %x; delete $x{a}->{b} <+exists> [exception] ok 5285 - my %x; delete $x{a}->{b} <+exists> [return] ok 5286 - my %x; delete $x{a}->{b} <+exists> [variable] ok 5287 - our %x; local %x; use strict; delete $x{a}->{b} <+exists> [exception] ok 5288 - our %x; local %x; use strict; delete $x{a}->{b} <+exists> [return] ok 5289 - our %x; local %x; use strict; delete $x{a}->{b} <+exists> [variable] ok 5290 - our %x; local %x; no strict; delete $x{a}->{b} <+exists> [exception] ok 5291 - our %x; local %x; no strict; delete $x{a}->{b} <+exists> [return] ok 5292 - our %x; local %x; no strict; delete $x{a}->{b} <+exists> [variable] ok 5293 - my $x; delete $x->{a}->{b} <+delete> [exception] ok 5294 - my $x; delete $x->{a}->{b} <+delete> [return] ok 5295 - my $x; delete $x->{a}->{b} <+delete> [variable] ok 5296 - our $x; local $x; use strict; delete $x->{a}->{b} <+delete> [exception] ok 5297 - our $x; local $x; use strict; delete $x->{a}->{b} <+delete> [return] ok 5298 - our $x; local $x; use strict; delete $x->{a}->{b} <+delete> [variable] ok 5299 - our $x; local $x; no strict; delete $x->{a}->{b} <+delete> [exception] ok 5300 - our $x; local $x; no strict; delete $x->{a}->{b} <+delete> [return] ok 5301 - our $x; local $x; no strict; delete $x->{a}->{b} <+delete> [variable] ok 5302 - my $x; delete $$x{a}->{b} <+delete> [exception] ok 5303 - my $x; delete $$x{a}->{b} <+delete> [return] ok 5304 - my $x; delete $$x{a}->{b} <+delete> [variable] ok 5305 - our $x; local $x; use strict; delete $$x{a}->{b} <+delete> [exception] ok 5306 - our $x; local $x; use strict; delete $$x{a}->{b} <+delete> [return] ok 5307 - our $x; local $x; use strict; delete $$x{a}->{b} <+delete> [variable] ok 5308 - our $x; local $x; no strict; delete $$x{a}->{b} <+delete> [exception] ok 5309 - our $x; local $x; no strict; delete $$x{a}->{b} <+delete> [return] ok 5310 - our $x; local $x; no strict; delete $$x{a}->{b} <+delete> [variable] ok 5311 - my %x; delete $x{a}->{b} <+delete> [exception] ok 5312 - my %x; delete $x{a}->{b} <+delete> [return] ok 5313 - my %x; delete $x{a}->{b} <+delete> [variable] ok 5314 - our %x; local %x; use strict; delete $x{a}->{b} <+delete> [exception] ok 5315 - our %x; local %x; use strict; delete $x{a}->{b} <+delete> [return] ok 5316 - our %x; local %x; use strict; delete $x{a}->{b} <+delete> [variable] ok 5317 - our %x; local %x; no strict; delete $x{a}->{b} <+delete> [exception] ok 5318 - our %x; local %x; no strict; delete $x{a}->{b} <+delete> [return] ok 5319 - our %x; local %x; no strict; delete $x{a}->{b} <+delete> [variable] ok 5320 - my $x; delete $x->{a}->{b} <+store> [exception] ok 5321 - my $x; delete $x->{a}->{b} <+store> [return] ok 5322 - my $x; delete $x->{a}->{b} <+store> [variable] ok 5323 - our $x; local $x; use strict; delete $x->{a}->{b} <+store> [exception] ok 5324 - our $x; local $x; use strict; delete $x->{a}->{b} <+store> [return] ok 5325 - our $x; local $x; use strict; delete $x->{a}->{b} <+store> [variable] ok 5326 - our $x; local $x; no strict; delete $x->{a}->{b} <+store> [exception] ok 5327 - our $x; local $x; no strict; delete $x->{a}->{b} <+store> [return] ok 5328 - our $x; local $x; no strict; delete $x->{a}->{b} <+store> [variable] ok 5329 - my $x; delete $$x{a}->{b} <+store> [exception] ok 5330 - my $x; delete $$x{a}->{b} <+store> [return] ok 5331 - my $x; delete $$x{a}->{b} <+store> [variable] ok 5332 - our $x; local $x; use strict; delete $$x{a}->{b} <+store> [exception] ok 5333 - our $x; local $x; use strict; delete $$x{a}->{b} <+store> [return] ok 5334 - our $x; local $x; use strict; delete $$x{a}->{b} <+store> [variable] ok 5335 - our $x; local $x; no strict; delete $$x{a}->{b} <+store> [exception] ok 5336 - our $x; local $x; no strict; delete $$x{a}->{b} <+store> [return] ok 5337 - our $x; local $x; no strict; delete $$x{a}->{b} <+store> [variable] ok 5338 - my %x; delete $x{a}->{b} <+store> [exception] ok 5339 - my %x; delete $x{a}->{b} <+store> [return] ok 5340 - my %x; delete $x{a}->{b} <+store> [variable] ok 5341 - our %x; local %x; use strict; delete $x{a}->{b} <+store> [exception] ok 5342 - our %x; local %x; use strict; delete $x{a}->{b} <+store> [return] ok 5343 - our %x; local %x; use strict; delete $x{a}->{b} <+store> [variable] ok 5344 - our %x; local %x; no strict; delete $x{a}->{b} <+store> [exception] ok 5345 - our %x; local %x; no strict; delete $x{a}->{b} <+store> [return] ok 5346 - our %x; local %x; no strict; delete $x{a}->{b} <+store> [variable] ok 5347 - my $x; delete $x->{a}->{b} <+strict +fetch> [exception] ok 5348 - my $x; delete $x->{a}->{b} <+strict +fetch> [return] ok 5349 - my $x; delete $x->{a}->{b} <+strict +fetch> [variable] ok 5350 - our $x; local $x; use strict; delete $x->{a}->{b} <+strict +fetch> [exception] ok 5351 - our $x; local $x; use strict; delete $x->{a}->{b} <+strict +fetch> [return] ok 5352 - our $x; local $x; use strict; delete $x->{a}->{b} <+strict +fetch> [variable] ok 5353 - our $x; local $x; no strict; delete $x->{a}->{b} <+strict +fetch> [exception] ok 5354 - our $x; local $x; no strict; delete $x->{a}->{b} <+strict +fetch> [return] ok 5355 - our $x; local $x; no strict; delete $x->{a}->{b} <+strict +fetch> [variable] ok 5356 - my $x; delete $$x{a}->{b} <+strict +fetch> [exception] ok 5357 - my $x; delete $$x{a}->{b} <+strict +fetch> [return] ok 5358 - my $x; delete $$x{a}->{b} <+strict +fetch> [variable] ok 5359 - our $x; local $x; use strict; delete $$x{a}->{b} <+strict +fetch> [exception] ok 5360 - our $x; local $x; use strict; delete $$x{a}->{b} <+strict +fetch> [return] ok 5361 - our $x; local $x; use strict; delete $$x{a}->{b} <+strict +fetch> [variable] ok 5362 - our $x; local $x; no strict; delete $$x{a}->{b} <+strict +fetch> [exception] ok 5363 - our $x; local $x; no strict; delete $$x{a}->{b} <+strict +fetch> [return] ok 5364 - our $x; local $x; no strict; delete $$x{a}->{b} <+strict +fetch> [variable] ok 5365 - my %x; delete $x{a}->{b} <+strict +fetch> [exception] ok 5366 - my %x; delete $x{a}->{b} <+strict +fetch> [return] ok 5367 - my %x; delete $x{a}->{b} <+strict +fetch> [variable] ok 5368 - our %x; local %x; use strict; delete $x{a}->{b} <+strict +fetch> [exception] ok 5369 - our %x; local %x; use strict; delete $x{a}->{b} <+strict +fetch> [return] ok 5370 - our %x; local %x; use strict; delete $x{a}->{b} <+strict +fetch> [variable] ok 5371 - our %x; local %x; no strict; delete $x{a}->{b} <+strict +fetch> [exception] ok 5372 - our %x; local %x; no strict; delete $x{a}->{b} <+strict +fetch> [return] ok 5373 - our %x; local %x; no strict; delete $x{a}->{b} <+strict +fetch> [variable] ok 5374 - my $x; delete $x->{a}->{b} <+strict +exists> [exception] ok 5375 - my $x; delete $x->{a}->{b} <+strict +exists> [return] ok 5376 - my $x; delete $x->{a}->{b} <+strict +exists> [variable] ok 5377 - our $x; local $x; use strict; delete $x->{a}->{b} <+strict +exists> [exception] ok 5378 - our $x; local $x; use strict; delete $x->{a}->{b} <+strict +exists> [return] ok 5379 - our $x; local $x; use strict; delete $x->{a}->{b} <+strict +exists> [variable] ok 5380 - our $x; local $x; no strict; delete $x->{a}->{b} <+strict +exists> [exception] ok 5381 - our $x; local $x; no strict; delete $x->{a}->{b} <+strict +exists> [return] ok 5382 - our $x; local $x; no strict; delete $x->{a}->{b} <+strict +exists> [variable] ok 5383 - my $x; delete $$x{a}->{b} <+strict +exists> [exception] ok 5384 - my $x; delete $$x{a}->{b} <+strict +exists> [return] ok 5385 - my $x; delete $$x{a}->{b} <+strict +exists> [variable] ok 5386 - our $x; local $x; use strict; delete $$x{a}->{b} <+strict +exists> [exception] ok 5387 - our $x; local $x; use strict; delete $$x{a}->{b} <+strict +exists> [return] ok 5388 - our $x; local $x; use strict; delete $$x{a}->{b} <+strict +exists> [variable] ok 5389 - our $x; local $x; no strict; delete $$x{a}->{b} <+strict +exists> [exception] ok 5390 - our $x; local $x; no strict; delete $$x{a}->{b} <+strict +exists> [return] ok 5391 - our $x; local $x; no strict; delete $$x{a}->{b} <+strict +exists> [variable] ok 5392 - my %x; delete $x{a}->{b} <+strict +exists> [exception] ok 5393 - my %x; delete $x{a}->{b} <+strict +exists> [return] ok 5394 - my %x; delete $x{a}->{b} <+strict +exists> [variable] ok 5395 - our %x; local %x; use strict; delete $x{a}->{b} <+strict +exists> [exception] ok 5396 - our %x; local %x; use strict; delete $x{a}->{b} <+strict +exists> [return] ok 5397 - our %x; local %x; use strict; delete $x{a}->{b} <+strict +exists> [variable] ok 5398 - our %x; local %x; no strict; delete $x{a}->{b} <+strict +exists> [exception] ok 5399 - our %x; local %x; no strict; delete $x{a}->{b} <+strict +exists> [return] ok 5400 - our %x; local %x; no strict; delete $x{a}->{b} <+strict +exists> [variable] ok 5401 - my $x; delete $x->{a}->{b} <+strict +delete> [exception] ok 5402 - my $x; delete $x->{a}->{b} <+strict +delete> [return] ok 5403 - my $x; delete $x->{a}->{b} <+strict +delete> [variable] ok 5404 - our $x; local $x; use strict; delete $x->{a}->{b} <+strict +delete> [exception] ok 5405 - our $x; local $x; use strict; delete $x->{a}->{b} <+strict +delete> [return] ok 5406 - our $x; local $x; use strict; delete $x->{a}->{b} <+strict +delete> [variable] ok 5407 - our $x; local $x; no strict; delete $x->{a}->{b} <+strict +delete> [exception] ok 5408 - our $x; local $x; no strict; delete $x->{a}->{b} <+strict +delete> [return] ok 5409 - our $x; local $x; no strict; delete $x->{a}->{b} <+strict +delete> [variable] ok 5410 - my $x; delete $$x{a}->{b} <+strict +delete> [exception] ok 5411 - my $x; delete $$x{a}->{b} <+strict +delete> [return] ok 5412 - my $x; delete $$x{a}->{b} <+strict +delete> [variable] ok 5413 - our $x; local $x; use strict; delete $$x{a}->{b} <+strict +delete> [exception] ok 5414 - our $x; local $x; use strict; delete $$x{a}->{b} <+strict +delete> [return] ok 5415 - our $x; local $x; use strict; delete $$x{a}->{b} <+strict +delete> [variable] ok 5416 - our $x; local $x; no strict; delete $$x{a}->{b} <+strict +delete> [exception] ok 5417 - our $x; local $x; no strict; delete $$x{a}->{b} <+strict +delete> [return] ok 5418 - our $x; local $x; no strict; delete $$x{a}->{b} <+strict +delete> [variable] ok 5419 - my %x; delete $x{a}->{b} <+strict +delete> [exception] ok 5420 - my %x; delete $x{a}->{b} <+strict +delete> [return] ok 5421 - my %x; delete $x{a}->{b} <+strict +delete> [variable] ok 5422 - our %x; local %x; use strict; delete $x{a}->{b} <+strict +delete> [exception] ok 5423 - our %x; local %x; use strict; delete $x{a}->{b} <+strict +delete> [return] ok 5424 - our %x; local %x; use strict; delete $x{a}->{b} <+strict +delete> [variable] ok 5425 - our %x; local %x; no strict; delete $x{a}->{b} <+strict +delete> [exception] ok 5426 - our %x; local %x; no strict; delete $x{a}->{b} <+strict +delete> [return] ok 5427 - our %x; local %x; no strict; delete $x{a}->{b} <+strict +delete> [variable] ok 5428 - my $x; delete $x->{a}->{b} <+strict +store> [exception] ok 5429 - my $x; delete $x->{a}->{b} <+strict +store> [return] ok 5430 - my $x; delete $x->{a}->{b} <+strict +store> [variable] ok 5431 - our $x; local $x; use strict; delete $x->{a}->{b} <+strict +store> [exception] ok 5432 - our $x; local $x; use strict; delete $x->{a}->{b} <+strict +store> [return] ok 5433 - our $x; local $x; use strict; delete $x->{a}->{b} <+strict +store> [variable] ok 5434 - our $x; local $x; no strict; delete $x->{a}->{b} <+strict +store> [exception] ok 5435 - our $x; local $x; no strict; delete $x->{a}->{b} <+strict +store> [return] ok 5436 - our $x; local $x; no strict; delete $x->{a}->{b} <+strict +store> [variable] ok 5437 - my $x; delete $$x{a}->{b} <+strict +store> [exception] ok 5438 - my $x; delete $$x{a}->{b} <+strict +store> [return] ok 5439 - my $x; delete $$x{a}->{b} <+strict +store> [variable] ok 5440 - our $x; local $x; use strict; delete $$x{a}->{b} <+strict +store> [exception] ok 5441 - our $x; local $x; use strict; delete $$x{a}->{b} <+strict +store> [return] ok 5442 - our $x; local $x; use strict; delete $$x{a}->{b} <+strict +store> [variable] ok 5443 - our $x; local $x; no strict; delete $$x{a}->{b} <+strict +store> [exception] ok 5444 - our $x; local $x; no strict; delete $$x{a}->{b} <+strict +store> [return] ok 5445 - our $x; local $x; no strict; delete $$x{a}->{b} <+strict +store> [variable] ok 5446 - my %x; delete $x{a}->{b} <+strict +store> [exception] ok 5447 - my %x; delete $x{a}->{b} <+strict +store> [return] ok 5448 - my %x; delete $x{a}->{b} <+strict +store> [variable] ok 5449 - our %x; local %x; use strict; delete $x{a}->{b} <+strict +store> [exception] ok 5450 - our %x; local %x; use strict; delete $x{a}->{b} <+strict +store> [return] ok 5451 - our %x; local %x; use strict; delete $x{a}->{b} <+strict +store> [variable] ok 5452 - our %x; local %x; no strict; delete $x{a}->{b} <+strict +store> [exception] ok 5453 - our %x; local %x; no strict; delete $x{a}->{b} <+strict +store> [return] ok 5454 - our %x; local %x; no strict; delete $x{a}->{b} <+strict +store> [variable] ok 5455 - my $x; $x->{a} = 1; delete $x->{a} <+fetch> [exception] ok 5456 - my $x; $x->{a} = 1; delete $x->{a} <+fetch> [return] ok 5457 - my $x; $x->{a} = 1; delete $x->{a} <+fetch> [variable] ok 5458 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+fetch> [exception] ok 5459 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+fetch> [return] ok 5460 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+fetch> [variable] ok 5461 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+fetch> [exception] ok 5462 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+fetch> [return] ok 5463 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+fetch> [variable] ok 5464 - my $x; $x->{a} = 1; delete $$x{a} <+fetch> [exception] ok 5465 - my $x; $x->{a} = 1; delete $$x{a} <+fetch> [return] ok 5466 - my $x; $x->{a} = 1; delete $$x{a} <+fetch> [variable] ok 5467 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+fetch> [exception] ok 5468 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+fetch> [return] ok 5469 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+fetch> [variable] ok 5470 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+fetch> [exception] ok 5471 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+fetch> [return] ok 5472 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+fetch> [variable] ok 5473 - my %x; $x{a} = 1; delete $x{a} <+fetch> [exception] ok 5474 - my %x; $x{a} = 1; delete $x{a} <+fetch> [return] ok 5475 - my %x; $x{a} = 1; delete $x{a} <+fetch> [variable] ok 5476 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+fetch> [exception] ok 5477 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+fetch> [return] ok 5478 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+fetch> [variable] ok 5479 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+fetch> [exception] ok 5480 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+fetch> [return] ok 5481 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+fetch> [variable] ok 5482 - my $x; $x->{a} = 1; delete $x->{b} <+fetch> [exception] ok 5483 - my $x; $x->{a} = 1; delete $x->{b} <+fetch> [return] ok 5484 - my $x; $x->{a} = 1; delete $x->{b} <+fetch> [variable] ok 5485 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+fetch> [exception] ok 5486 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+fetch> [return] ok 5487 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+fetch> [variable] ok 5488 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+fetch> [exception] ok 5489 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+fetch> [return] ok 5490 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+fetch> [variable] ok 5491 - my $x; $x->{a} = 1; delete $$x{b} <+fetch> [exception] ok 5492 - my $x; $x->{a} = 1; delete $$x{b} <+fetch> [return] ok 5493 - my $x; $x->{a} = 1; delete $$x{b} <+fetch> [variable] ok 5494 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+fetch> [exception] ok 5495 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+fetch> [return] ok 5496 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+fetch> [variable] ok 5497 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+fetch> [exception] ok 5498 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+fetch> [return] ok 5499 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+fetch> [variable] ok 5500 - my %x; $x{a} = 1; delete $x{b} <+fetch> [exception] ok 5501 - my %x; $x{a} = 1; delete $x{b} <+fetch> [return] ok 5502 - my %x; $x{a} = 1; delete $x{b} <+fetch> [variable] ok 5503 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+fetch> [exception] ok 5504 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+fetch> [return] ok 5505 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+fetch> [variable] ok 5506 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+fetch> [exception] ok 5507 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+fetch> [return] ok 5508 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+fetch> [variable] ok 5509 - my $x; $x->{a} = 1; delete $x->{a} <+exists> [exception] ok 5510 - my $x; $x->{a} = 1; delete $x->{a} <+exists> [return] ok 5511 - my $x; $x->{a} = 1; delete $x->{a} <+exists> [variable] ok 5512 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+exists> [exception] ok 5513 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+exists> [return] ok 5514 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+exists> [variable] ok 5515 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+exists> [exception] ok 5516 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+exists> [return] ok 5517 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+exists> [variable] ok 5518 - my $x; $x->{a} = 1; delete $$x{a} <+exists> [exception] ok 5519 - my $x; $x->{a} = 1; delete $$x{a} <+exists> [return] ok 5520 - my $x; $x->{a} = 1; delete $$x{a} <+exists> [variable] ok 5521 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+exists> [exception] ok 5522 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+exists> [return] ok 5523 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+exists> [variable] ok 5524 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+exists> [exception] ok 5525 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+exists> [return] ok 5526 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+exists> [variable] ok 5527 - my %x; $x{a} = 1; delete $x{a} <+exists> [exception] ok 5528 - my %x; $x{a} = 1; delete $x{a} <+exists> [return] ok 5529 - my %x; $x{a} = 1; delete $x{a} <+exists> [variable] ok 5530 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+exists> [exception] ok 5531 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+exists> [return] ok 5532 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+exists> [variable] ok 5533 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+exists> [exception] ok 5534 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+exists> [return] ok 5535 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+exists> [variable] ok 5536 - my $x; $x->{a} = 1; delete $x->{b} <+exists> [exception] ok 5537 - my $x; $x->{a} = 1; delete $x->{b} <+exists> [return] ok 5538 - my $x; $x->{a} = 1; delete $x->{b} <+exists> [variable] ok 5539 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+exists> [exception] ok 5540 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+exists> [return] ok 5541 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+exists> [variable] ok 5542 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+exists> [exception] ok 5543 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+exists> [return] ok 5544 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+exists> [variable] ok 5545 - my $x; $x->{a} = 1; delete $$x{b} <+exists> [exception] ok 5546 - my $x; $x->{a} = 1; delete $$x{b} <+exists> [return] ok 5547 - my $x; $x->{a} = 1; delete $$x{b} <+exists> [variable] ok 5548 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+exists> [exception] ok 5549 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+exists> [return] ok 5550 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+exists> [variable] ok 5551 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+exists> [exception] ok 5552 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+exists> [return] ok 5553 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+exists> [variable] ok 5554 - my %x; $x{a} = 1; delete $x{b} <+exists> [exception] ok 5555 - my %x; $x{a} = 1; delete $x{b} <+exists> [return] ok 5556 - my %x; $x{a} = 1; delete $x{b} <+exists> [variable] ok 5557 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+exists> [exception] ok 5558 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+exists> [return] ok 5559 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+exists> [variable] ok 5560 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+exists> [exception] ok 5561 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+exists> [return] ok 5562 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+exists> [variable] ok 5563 - my $x; $x->{a} = 1; delete $x->{a} <+delete> [exception] ok 5564 - my $x; $x->{a} = 1; delete $x->{a} <+delete> [return] ok 5565 - my $x; $x->{a} = 1; delete $x->{a} <+delete> [variable] ok 5566 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+delete> [exception] ok 5567 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+delete> [return] ok 5568 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+delete> [variable] ok 5569 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+delete> [exception] ok 5570 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+delete> [return] ok 5571 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+delete> [variable] ok 5572 - my $x; $x->{a} = 1; delete $$x{a} <+delete> [exception] ok 5573 - my $x; $x->{a} = 1; delete $$x{a} <+delete> [return] ok 5574 - my $x; $x->{a} = 1; delete $$x{a} <+delete> [variable] ok 5575 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+delete> [exception] ok 5576 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+delete> [return] ok 5577 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+delete> [variable] ok 5578 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+delete> [exception] ok 5579 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+delete> [return] ok 5580 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+delete> [variable] ok 5581 - my %x; $x{a} = 1; delete $x{a} <+delete> [exception] ok 5582 - my %x; $x{a} = 1; delete $x{a} <+delete> [return] ok 5583 - my %x; $x{a} = 1; delete $x{a} <+delete> [variable] ok 5584 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+delete> [exception] ok 5585 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+delete> [return] ok 5586 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+delete> [variable] ok 5587 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+delete> [exception] ok 5588 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+delete> [return] ok 5589 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+delete> [variable] ok 5590 - my $x; $x->{a} = 1; delete $x->{b} <+delete> [exception] ok 5591 - my $x; $x->{a} = 1; delete $x->{b} <+delete> [return] ok 5592 - my $x; $x->{a} = 1; delete $x->{b} <+delete> [variable] ok 5593 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+delete> [exception] ok 5594 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+delete> [return] ok 5595 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+delete> [variable] ok 5596 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+delete> [exception] ok 5597 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+delete> [return] ok 5598 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+delete> [variable] ok 5599 - my $x; $x->{a} = 1; delete $$x{b} <+delete> [exception] ok 5600 - my $x; $x->{a} = 1; delete $$x{b} <+delete> [return] ok 5601 - my $x; $x->{a} = 1; delete $$x{b} <+delete> [variable] ok 5602 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+delete> [exception] ok 5603 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+delete> [return] ok 5604 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+delete> [variable] ok 5605 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+delete> [exception] ok 5606 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+delete> [return] ok 5607 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+delete> [variable] ok 5608 - my %x; $x{a} = 1; delete $x{b} <+delete> [exception] ok 5609 - my %x; $x{a} = 1; delete $x{b} <+delete> [return] ok 5610 - my %x; $x{a} = 1; delete $x{b} <+delete> [variable] ok 5611 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+delete> [exception] ok 5612 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+delete> [return] ok 5613 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+delete> [variable] ok 5614 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+delete> [exception] ok 5615 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+delete> [return] ok 5616 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+delete> [variable] ok 5617 - my $x; $x->{a} = 1; delete $x->{a} <+store> [exception] ok 5618 - my $x; $x->{a} = 1; delete $x->{a} <+store> [return] ok 5619 - my $x; $x->{a} = 1; delete $x->{a} <+store> [variable] ok 5620 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+store> [exception] ok 5621 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+store> [return] ok 5622 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+store> [variable] ok 5623 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+store> [exception] ok 5624 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+store> [return] ok 5625 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+store> [variable] ok 5626 - my $x; $x->{a} = 1; delete $$x{a} <+store> [exception] ok 5627 - my $x; $x->{a} = 1; delete $$x{a} <+store> [return] ok 5628 - my $x; $x->{a} = 1; delete $$x{a} <+store> [variable] ok 5629 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+store> [exception] ok 5630 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+store> [return] ok 5631 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+store> [variable] ok 5632 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+store> [exception] ok 5633 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+store> [return] ok 5634 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+store> [variable] ok 5635 - my %x; $x{a} = 1; delete $x{a} <+store> [exception] ok 5636 - my %x; $x{a} = 1; delete $x{a} <+store> [return] ok 5637 - my %x; $x{a} = 1; delete $x{a} <+store> [variable] ok 5638 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+store> [exception] ok 5639 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+store> [return] ok 5640 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+store> [variable] ok 5641 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+store> [exception] ok 5642 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+store> [return] ok 5643 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+store> [variable] ok 5644 - my $x; $x->{a} = 1; delete $x->{b} <+store> [exception] ok 5645 - my $x; $x->{a} = 1; delete $x->{b} <+store> [return] ok 5646 - my $x; $x->{a} = 1; delete $x->{b} <+store> [variable] ok 5647 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+store> [exception] ok 5648 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+store> [return] ok 5649 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+store> [variable] ok 5650 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+store> [exception] ok 5651 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+store> [return] ok 5652 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+store> [variable] ok 5653 - my $x; $x->{a} = 1; delete $$x{b} <+store> [exception] ok 5654 - my $x; $x->{a} = 1; delete $$x{b} <+store> [return] ok 5655 - my $x; $x->{a} = 1; delete $$x{b} <+store> [variable] ok 5656 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+store> [exception] ok 5657 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+store> [return] ok 5658 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+store> [variable] ok 5659 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+store> [exception] ok 5660 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+store> [return] ok 5661 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+store> [variable] ok 5662 - my %x; $x{a} = 1; delete $x{b} <+store> [exception] ok 5663 - my %x; $x{a} = 1; delete $x{b} <+store> [return] ok 5664 - my %x; $x{a} = 1; delete $x{b} <+store> [variable] ok 5665 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+store> [exception] ok 5666 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+store> [return] ok 5667 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+store> [variable] ok 5668 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+store> [exception] ok 5669 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+store> [return] ok 5670 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+store> [variable] ok 5671 - my $x; $x->{a} = 1; delete $x->{a} <+strict +fetch> [exception] ok 5672 - my $x; $x->{a} = 1; delete $x->{a} <+strict +fetch> [return] ok 5673 - my $x; $x->{a} = 1; delete $x->{a} <+strict +fetch> [variable] ok 5674 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+strict +fetch> [exception] ok 5675 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+strict +fetch> [return] ok 5676 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+strict +fetch> [variable] ok 5677 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+strict +fetch> [exception] ok 5678 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+strict +fetch> [return] ok 5679 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+strict +fetch> [variable] ok 5680 - my $x; $x->{a} = 1; delete $$x{a} <+strict +fetch> [exception] ok 5681 - my $x; $x->{a} = 1; delete $$x{a} <+strict +fetch> [return] ok 5682 - my $x; $x->{a} = 1; delete $$x{a} <+strict +fetch> [variable] ok 5683 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+strict +fetch> [exception] ok 5684 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+strict +fetch> [return] ok 5685 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+strict +fetch> [variable] ok 5686 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+strict +fetch> [exception] ok 5687 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+strict +fetch> [return] ok 5688 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+strict +fetch> [variable] ok 5689 - my %x; $x{a} = 1; delete $x{a} <+strict +fetch> [exception] ok 5690 - my %x; $x{a} = 1; delete $x{a} <+strict +fetch> [return] ok 5691 - my %x; $x{a} = 1; delete $x{a} <+strict +fetch> [variable] ok 5692 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+strict +fetch> [exception] ok 5693 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+strict +fetch> [return] ok 5694 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+strict +fetch> [variable] ok 5695 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+strict +fetch> [exception] ok 5696 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+strict +fetch> [return] ok 5697 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+strict +fetch> [variable] ok 5698 - my $x; $x->{a} = 1; delete $x->{b} <+strict +fetch> [exception] ok 5699 - my $x; $x->{a} = 1; delete $x->{b} <+strict +fetch> [return] ok 5700 - my $x; $x->{a} = 1; delete $x->{b} <+strict +fetch> [variable] ok 5701 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+strict +fetch> [exception] ok 5702 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+strict +fetch> [return] ok 5703 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+strict +fetch> [variable] ok 5704 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+strict +fetch> [exception] ok 5705 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+strict +fetch> [return] ok 5706 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+strict +fetch> [variable] ok 5707 - my $x; $x->{a} = 1; delete $$x{b} <+strict +fetch> [exception] ok 5708 - my $x; $x->{a} = 1; delete $$x{b} <+strict +fetch> [return] ok 5709 - my $x; $x->{a} = 1; delete $$x{b} <+strict +fetch> [variable] ok 5710 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+strict +fetch> [exception] ok 5711 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+strict +fetch> [return] ok 5712 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+strict +fetch> [variable] ok 5713 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+strict +fetch> [exception] ok 5714 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+strict +fetch> [return] ok 5715 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+strict +fetch> [variable] ok 5716 - my %x; $x{a} = 1; delete $x{b} <+strict +fetch> [exception] ok 5717 - my %x; $x{a} = 1; delete $x{b} <+strict +fetch> [return] ok 5718 - my %x; $x{a} = 1; delete $x{b} <+strict +fetch> [variable] ok 5719 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+strict +fetch> [exception] ok 5720 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+strict +fetch> [return] ok 5721 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+strict +fetch> [variable] ok 5722 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+strict +fetch> [exception] ok 5723 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+strict +fetch> [return] ok 5724 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+strict +fetch> [variable] ok 5725 - my $x; $x->{a} = 1; delete $x->{a} <+strict +exists> [exception] ok 5726 - my $x; $x->{a} = 1; delete $x->{a} <+strict +exists> [return] ok 5727 - my $x; $x->{a} = 1; delete $x->{a} <+strict +exists> [variable] ok 5728 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+strict +exists> [exception] ok 5729 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+strict +exists> [return] ok 5730 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+strict +exists> [variable] ok 5731 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+strict +exists> [exception] ok 5732 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+strict +exists> [return] ok 5733 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+strict +exists> [variable] ok 5734 - my $x; $x->{a} = 1; delete $$x{a} <+strict +exists> [exception] ok 5735 - my $x; $x->{a} = 1; delete $$x{a} <+strict +exists> [return] ok 5736 - my $x; $x->{a} = 1; delete $$x{a} <+strict +exists> [variable] ok 5737 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+strict +exists> [exception] ok 5738 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+strict +exists> [return] ok 5739 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+strict +exists> [variable] ok 5740 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+strict +exists> [exception] ok 5741 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+strict +exists> [return] ok 5742 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+strict +exists> [variable] ok 5743 - my %x; $x{a} = 1; delete $x{a} <+strict +exists> [exception] ok 5744 - my %x; $x{a} = 1; delete $x{a} <+strict +exists> [return] ok 5745 - my %x; $x{a} = 1; delete $x{a} <+strict +exists> [variable] ok 5746 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+strict +exists> [exception] ok 5747 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+strict +exists> [return] ok 5748 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+strict +exists> [variable] ok 5749 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+strict +exists> [exception] ok 5750 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+strict +exists> [return] ok 5751 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+strict +exists> [variable] ok 5752 - my $x; $x->{a} = 1; delete $x->{b} <+strict +exists> [exception] ok 5753 - my $x; $x->{a} = 1; delete $x->{b} <+strict +exists> [return] ok 5754 - my $x; $x->{a} = 1; delete $x->{b} <+strict +exists> [variable] ok 5755 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+strict +exists> [exception] ok 5756 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+strict +exists> [return] ok 5757 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+strict +exists> [variable] ok 5758 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+strict +exists> [exception] ok 5759 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+strict +exists> [return] ok 5760 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+strict +exists> [variable] ok 5761 - my $x; $x->{a} = 1; delete $$x{b} <+strict +exists> [exception] ok 5762 - my $x; $x->{a} = 1; delete $$x{b} <+strict +exists> [return] ok 5763 - my $x; $x->{a} = 1; delete $$x{b} <+strict +exists> [variable] ok 5764 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+strict +exists> [exception] ok 5765 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+strict +exists> [return] ok 5766 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+strict +exists> [variable] ok 5767 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+strict +exists> [exception] ok 5768 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+strict +exists> [return] ok 5769 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+strict +exists> [variable] ok 5770 - my %x; $x{a} = 1; delete $x{b} <+strict +exists> [exception] ok 5771 - my %x; $x{a} = 1; delete $x{b} <+strict +exists> [return] ok 5772 - my %x; $x{a} = 1; delete $x{b} <+strict +exists> [variable] ok 5773 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+strict +exists> [exception] ok 5774 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+strict +exists> [return] ok 5775 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+strict +exists> [variable] ok 5776 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+strict +exists> [exception] ok 5777 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+strict +exists> [return] ok 5778 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+strict +exists> [variable] ok 5779 - my $x; $x->{a} = 1; delete $x->{a} <+strict +delete> [exception] ok 5780 - my $x; $x->{a} = 1; delete $x->{a} <+strict +delete> [return] ok 5781 - my $x; $x->{a} = 1; delete $x->{a} <+strict +delete> [variable] ok 5782 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+strict +delete> [exception] ok 5783 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+strict +delete> [return] ok 5784 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+strict +delete> [variable] ok 5785 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+strict +delete> [exception] ok 5786 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+strict +delete> [return] ok 5787 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+strict +delete> [variable] ok 5788 - my $x; $x->{a} = 1; delete $$x{a} <+strict +delete> [exception] ok 5789 - my $x; $x->{a} = 1; delete $$x{a} <+strict +delete> [return] ok 5790 - my $x; $x->{a} = 1; delete $$x{a} <+strict +delete> [variable] ok 5791 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+strict +delete> [exception] ok 5792 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+strict +delete> [return] ok 5793 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+strict +delete> [variable] ok 5794 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+strict +delete> [exception] ok 5795 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+strict +delete> [return] ok 5796 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+strict +delete> [variable] ok 5797 - my %x; $x{a} = 1; delete $x{a} <+strict +delete> [exception] ok 5798 - my %x; $x{a} = 1; delete $x{a} <+strict +delete> [return] ok 5799 - my %x; $x{a} = 1; delete $x{a} <+strict +delete> [variable] ok 5800 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+strict +delete> [exception] ok 5801 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+strict +delete> [return] ok 5802 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+strict +delete> [variable] ok 5803 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+strict +delete> [exception] ok 5804 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+strict +delete> [return] ok 5805 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+strict +delete> [variable] ok 5806 - my $x; $x->{a} = 1; delete $x->{b} <+strict +delete> [exception] ok 5807 - my $x; $x->{a} = 1; delete $x->{b} <+strict +delete> [return] ok 5808 - my $x; $x->{a} = 1; delete $x->{b} <+strict +delete> [variable] ok 5809 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+strict +delete> [exception] ok 5810 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+strict +delete> [return] ok 5811 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+strict +delete> [variable] ok 5812 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+strict +delete> [exception] ok 5813 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+strict +delete> [return] ok 5814 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+strict +delete> [variable] ok 5815 - my $x; $x->{a} = 1; delete $$x{b} <+strict +delete> [exception] ok 5816 - my $x; $x->{a} = 1; delete $$x{b} <+strict +delete> [return] ok 5817 - my $x; $x->{a} = 1; delete $$x{b} <+strict +delete> [variable] ok 5818 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+strict +delete> [exception] ok 5819 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+strict +delete> [return] ok 5820 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+strict +delete> [variable] ok 5821 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+strict +delete> [exception] ok 5822 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+strict +delete> [return] ok 5823 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+strict +delete> [variable] ok 5824 - my %x; $x{a} = 1; delete $x{b} <+strict +delete> [exception] ok 5825 - my %x; $x{a} = 1; delete $x{b} <+strict +delete> [return] ok 5826 - my %x; $x{a} = 1; delete $x{b} <+strict +delete> [variable] ok 5827 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+strict +delete> [exception] ok 5828 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+strict +delete> [return] ok 5829 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+strict +delete> [variable] ok 5830 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+strict +delete> [exception] ok 5831 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+strict +delete> [return] ok 5832 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+strict +delete> [variable] ok 5833 - my $x; $x->{a} = 1; delete $x->{a} <+strict +store> [exception] ok 5834 - my $x; $x->{a} = 1; delete $x->{a} <+strict +store> [return] ok 5835 - my $x; $x->{a} = 1; delete $x->{a} <+strict +store> [variable] ok 5836 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+strict +store> [exception] ok 5837 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+strict +store> [return] ok 5838 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{a} <+strict +store> [variable] ok 5839 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+strict +store> [exception] ok 5840 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+strict +store> [return] ok 5841 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{a} <+strict +store> [variable] ok 5842 - my $x; $x->{a} = 1; delete $$x{a} <+strict +store> [exception] ok 5843 - my $x; $x->{a} = 1; delete $$x{a} <+strict +store> [return] ok 5844 - my $x; $x->{a} = 1; delete $$x{a} <+strict +store> [variable] ok 5845 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+strict +store> [exception] ok 5846 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+strict +store> [return] ok 5847 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{a} <+strict +store> [variable] ok 5848 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+strict +store> [exception] ok 5849 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+strict +store> [return] ok 5850 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{a} <+strict +store> [variable] ok 5851 - my %x; $x{a} = 1; delete $x{a} <+strict +store> [exception] ok 5852 - my %x; $x{a} = 1; delete $x{a} <+strict +store> [return] ok 5853 - my %x; $x{a} = 1; delete $x{a} <+strict +store> [variable] ok 5854 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+strict +store> [exception] ok 5855 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+strict +store> [return] ok 5856 - our %x; local %x; use strict; $x{a} = 1; delete $x{a} <+strict +store> [variable] ok 5857 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+strict +store> [exception] ok 5858 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+strict +store> [return] ok 5859 - our %x; local %x; no strict; $x{a} = 1; delete $x{a} <+strict +store> [variable] ok 5860 - my $x; $x->{a} = 1; delete $x->{b} <+strict +store> [exception] ok 5861 - my $x; $x->{a} = 1; delete $x->{b} <+strict +store> [return] ok 5862 - my $x; $x->{a} = 1; delete $x->{b} <+strict +store> [variable] ok 5863 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+strict +store> [exception] ok 5864 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+strict +store> [return] ok 5865 - our $x; local $x; use strict; $x->{a} = 1; delete $x->{b} <+strict +store> [variable] ok 5866 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+strict +store> [exception] ok 5867 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+strict +store> [return] ok 5868 - our $x; local $x; no strict; $x->{a} = 1; delete $x->{b} <+strict +store> [variable] ok 5869 - my $x; $x->{a} = 1; delete $$x{b} <+strict +store> [exception] ok 5870 - my $x; $x->{a} = 1; delete $$x{b} <+strict +store> [return] ok 5871 - my $x; $x->{a} = 1; delete $$x{b} <+strict +store> [variable] ok 5872 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+strict +store> [exception] ok 5873 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+strict +store> [return] ok 5874 - our $x; local $x; use strict; $x->{a} = 1; delete $$x{b} <+strict +store> [variable] ok 5875 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+strict +store> [exception] ok 5876 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+strict +store> [return] ok 5877 - our $x; local $x; no strict; $x->{a} = 1; delete $$x{b} <+strict +store> [variable] ok 5878 - my %x; $x{a} = 1; delete $x{b} <+strict +store> [exception] ok 5879 - my %x; $x{a} = 1; delete $x{b} <+strict +store> [return] ok 5880 - my %x; $x{a} = 1; delete $x{b} <+strict +store> [variable] ok 5881 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+strict +store> [exception] ok 5882 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+strict +store> [return] ok 5883 - our %x; local %x; use strict; $x{a} = 1; delete $x{b} <+strict +store> [variable] ok 5884 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+strict +store> [exception] ok 5885 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+strict +store> [return] ok 5886 - our %x; local %x; no strict; $x{a} = 1; delete $x{b} <+strict +store> [variable] ok 5887 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+fetch> [exception] ok 5888 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+fetch> [return] ok 5889 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+fetch> [variable] ok 5890 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+fetch> [exception] ok 5891 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+fetch> [return] ok 5892 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+fetch> [variable] ok 5893 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+fetch> [exception] ok 5894 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+fetch> [return] ok 5895 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+fetch> [variable] ok 5896 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+fetch> [exception] ok 5897 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+fetch> [return] ok 5898 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+fetch> [variable] ok 5899 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+fetch> [exception] ok 5900 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+fetch> [return] ok 5901 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+fetch> [variable] ok 5902 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+fetch> [exception] ok 5903 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+fetch> [return] ok 5904 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+fetch> [variable] ok 5905 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+fetch> [exception] ok 5906 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+fetch> [return] ok 5907 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+fetch> [variable] ok 5908 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+fetch> [exception] ok 5909 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+fetch> [return] ok 5910 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+fetch> [variable] ok 5911 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+fetch> [exception] ok 5912 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+fetch> [return] ok 5913 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+fetch> [variable] ok 5914 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+fetch> [exception] ok 5915 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+fetch> [return] ok 5916 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+fetch> [variable] ok 5917 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+fetch> [exception] ok 5918 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+fetch> [return] ok 5919 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+fetch> [variable] ok 5920 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+fetch> [exception] ok 5921 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+fetch> [return] ok 5922 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+fetch> [variable] ok 5923 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+fetch> [exception] ok 5924 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+fetch> [return] ok 5925 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+fetch> [variable] ok 5926 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+fetch> [exception] ok 5927 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+fetch> [return] ok 5928 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+fetch> [variable] ok 5929 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+fetch> [exception] ok 5930 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+fetch> [return] ok 5931 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+fetch> [variable] ok 5932 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+fetch> [exception] ok 5933 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+fetch> [return] ok 5934 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+fetch> [variable] ok 5935 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+fetch> [exception] ok 5936 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+fetch> [return] ok 5937 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+fetch> [variable] ok 5938 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+fetch> [exception] ok 5939 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+fetch> [return] ok 5940 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+fetch> [variable] ok 5941 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+fetch> [exception] ok 5942 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+fetch> [return] ok 5943 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+fetch> [variable] ok 5944 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+fetch> [exception] ok 5945 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+fetch> [return] ok 5946 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+fetch> [variable] ok 5947 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+fetch> [exception] ok 5948 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+fetch> [return] ok 5949 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+fetch> [variable] ok 5950 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+fetch> [exception] ok 5951 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+fetch> [return] ok 5952 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+fetch> [variable] ok 5953 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+fetch> [exception] ok 5954 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+fetch> [return] ok 5955 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+fetch> [variable] ok 5956 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+fetch> [exception] ok 5957 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+fetch> [return] ok 5958 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+fetch> [variable] ok 5959 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+fetch> [exception] ok 5960 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+fetch> [return] ok 5961 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+fetch> [variable] ok 5962 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+fetch> [exception] ok 5963 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+fetch> [return] ok 5964 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+fetch> [variable] ok 5965 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+fetch> [exception] ok 5966 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+fetch> [return] ok 5967 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+fetch> [variable] ok 5968 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+exists> [exception] ok 5969 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+exists> [return] ok 5970 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+exists> [variable] ok 5971 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+exists> [exception] ok 5972 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+exists> [return] ok 5973 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+exists> [variable] ok 5974 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+exists> [exception] ok 5975 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+exists> [return] ok 5976 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+exists> [variable] ok 5977 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+exists> [exception] ok 5978 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+exists> [return] ok 5979 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+exists> [variable] ok 5980 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+exists> [exception] ok 5981 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+exists> [return] ok 5982 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+exists> [variable] ok 5983 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+exists> [exception] ok 5984 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+exists> [return] ok 5985 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+exists> [variable] ok 5986 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+exists> [exception] ok 5987 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+exists> [return] ok 5988 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+exists> [variable] ok 5989 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+exists> [exception] ok 5990 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+exists> [return] ok 5991 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+exists> [variable] ok 5992 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+exists> [exception] ok 5993 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+exists> [return] ok 5994 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+exists> [variable] ok 5995 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+exists> [exception] ok 5996 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+exists> [return] ok 5997 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+exists> [variable] ok 5998 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+exists> [exception] ok 5999 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+exists> [return] ok 6000 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+exists> [variable] ok 6001 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+exists> [exception] ok 6002 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+exists> [return] ok 6003 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+exists> [variable] ok 6004 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+exists> [exception] ok 6005 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+exists> [return] ok 6006 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+exists> [variable] ok 6007 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+exists> [exception] ok 6008 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+exists> [return] ok 6009 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+exists> [variable] ok 6010 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+exists> [exception] ok 6011 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+exists> [return] ok 6012 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+exists> [variable] ok 6013 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+exists> [exception] ok 6014 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+exists> [return] ok 6015 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+exists> [variable] ok 6016 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+exists> [exception] ok 6017 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+exists> [return] ok 6018 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+exists> [variable] ok 6019 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+exists> [exception] ok 6020 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+exists> [return] ok 6021 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+exists> [variable] ok 6022 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+exists> [exception] ok 6023 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+exists> [return] ok 6024 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+exists> [variable] ok 6025 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+exists> [exception] ok 6026 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+exists> [return] ok 6027 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+exists> [variable] ok 6028 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+exists> [exception] ok 6029 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+exists> [return] ok 6030 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+exists> [variable] ok 6031 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+exists> [exception] ok 6032 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+exists> [return] ok 6033 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+exists> [variable] ok 6034 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+exists> [exception] ok 6035 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+exists> [return] ok 6036 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+exists> [variable] ok 6037 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+exists> [exception] ok 6038 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+exists> [return] ok 6039 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+exists> [variable] ok 6040 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+exists> [exception] ok 6041 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+exists> [return] ok 6042 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+exists> [variable] ok 6043 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+exists> [exception] ok 6044 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+exists> [return] ok 6045 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+exists> [variable] ok 6046 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+exists> [exception] ok 6047 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+exists> [return] ok 6048 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+exists> [variable] ok 6049 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+delete> [exception] ok 6050 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+delete> [return] ok 6051 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+delete> [variable] ok 6052 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+delete> [exception] ok 6053 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+delete> [return] ok 6054 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+delete> [variable] ok 6055 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+delete> [exception] ok 6056 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+delete> [return] ok 6057 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+delete> [variable] ok 6058 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+delete> [exception] ok 6059 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+delete> [return] ok 6060 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+delete> [variable] ok 6061 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+delete> [exception] ok 6062 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+delete> [return] ok 6063 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+delete> [variable] ok 6064 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+delete> [exception] ok 6065 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+delete> [return] ok 6066 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+delete> [variable] ok 6067 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+delete> [exception] ok 6068 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+delete> [return] ok 6069 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+delete> [variable] ok 6070 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+delete> [exception] ok 6071 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+delete> [return] ok 6072 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+delete> [variable] ok 6073 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+delete> [exception] ok 6074 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+delete> [return] ok 6075 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+delete> [variable] ok 6076 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+delete> [exception] ok 6077 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+delete> [return] ok 6078 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+delete> [variable] ok 6079 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+delete> [exception] ok 6080 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+delete> [return] ok 6081 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+delete> [variable] ok 6082 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+delete> [exception] ok 6083 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+delete> [return] ok 6084 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+delete> [variable] ok 6085 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+delete> [exception] ok 6086 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+delete> [return] ok 6087 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+delete> [variable] ok 6088 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+delete> [exception] ok 6089 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+delete> [return] ok 6090 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+delete> [variable] ok 6091 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+delete> [exception] ok 6092 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+delete> [return] ok 6093 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+delete> [variable] ok 6094 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+delete> [exception] ok 6095 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+delete> [return] ok 6096 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+delete> [variable] ok 6097 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+delete> [exception] ok 6098 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+delete> [return] ok 6099 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+delete> [variable] ok 6100 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+delete> [exception] ok 6101 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+delete> [return] ok 6102 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+delete> [variable] ok 6103 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+delete> [exception] ok 6104 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+delete> [return] ok 6105 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+delete> [variable] ok 6106 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+delete> [exception] ok 6107 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+delete> [return] ok 6108 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+delete> [variable] ok 6109 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+delete> [exception] ok 6110 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+delete> [return] ok 6111 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+delete> [variable] ok 6112 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+delete> [exception] ok 6113 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+delete> [return] ok 6114 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+delete> [variable] ok 6115 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+delete> [exception] ok 6116 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+delete> [return] ok 6117 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+delete> [variable] ok 6118 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+delete> [exception] ok 6119 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+delete> [return] ok 6120 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+delete> [variable] ok 6121 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+delete> [exception] ok 6122 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+delete> [return] ok 6123 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+delete> [variable] ok 6124 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+delete> [exception] ok 6125 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+delete> [return] ok 6126 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+delete> [variable] ok 6127 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+delete> [exception] ok 6128 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+delete> [return] ok 6129 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+delete> [variable] ok 6130 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+store> [exception] ok 6131 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+store> [return] ok 6132 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+store> [variable] ok 6133 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+store> [exception] ok 6134 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+store> [return] ok 6135 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+store> [variable] ok 6136 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+store> [exception] ok 6137 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+store> [return] ok 6138 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+store> [variable] ok 6139 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+store> [exception] ok 6140 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+store> [return] ok 6141 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+store> [variable] ok 6142 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+store> [exception] ok 6143 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+store> [return] ok 6144 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+store> [variable] ok 6145 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+store> [exception] ok 6146 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+store> [return] ok 6147 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+store> [variable] ok 6148 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+store> [exception] ok 6149 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+store> [return] ok 6150 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+store> [variable] ok 6151 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+store> [exception] ok 6152 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+store> [return] ok 6153 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+store> [variable] ok 6154 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+store> [exception] ok 6155 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+store> [return] ok 6156 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+store> [variable] ok 6157 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+store> [exception] ok 6158 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+store> [return] ok 6159 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+store> [variable] ok 6160 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+store> [exception] ok 6161 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+store> [return] ok 6162 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+store> [variable] ok 6163 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+store> [exception] ok 6164 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+store> [return] ok 6165 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+store> [variable] ok 6166 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+store> [exception] ok 6167 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+store> [return] ok 6168 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+store> [variable] ok 6169 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+store> [exception] ok 6170 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+store> [return] ok 6171 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+store> [variable] ok 6172 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+store> [exception] ok 6173 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+store> [return] ok 6174 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+store> [variable] ok 6175 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+store> [exception] ok 6176 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+store> [return] ok 6177 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+store> [variable] ok 6178 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+store> [exception] ok 6179 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+store> [return] ok 6180 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+store> [variable] ok 6181 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+store> [exception] ok 6182 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+store> [return] ok 6183 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+store> [variable] ok 6184 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+store> [exception] ok 6185 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+store> [return] ok 6186 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+store> [variable] ok 6187 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+store> [exception] ok 6188 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+store> [return] ok 6189 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+store> [variable] ok 6190 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+store> [exception] ok 6191 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+store> [return] ok 6192 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+store> [variable] ok 6193 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+store> [exception] ok 6194 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+store> [return] ok 6195 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+store> [variable] ok 6196 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+store> [exception] ok 6197 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+store> [return] ok 6198 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+store> [variable] ok 6199 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+store> [exception] ok 6200 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+store> [return] ok 6201 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+store> [variable] ok 6202 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+store> [exception] ok 6203 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+store> [return] ok 6204 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+store> [variable] ok 6205 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+store> [exception] ok 6206 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+store> [return] ok 6207 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+store> [variable] ok 6208 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+store> [exception] ok 6209 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+store> [return] ok 6210 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+store> [variable] ok 6211 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +fetch> [exception] ok 6212 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +fetch> [return] ok 6213 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +fetch> [variable] ok 6214 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +fetch> [exception] ok 6215 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +fetch> [return] ok 6216 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +fetch> [variable] ok 6217 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +fetch> [exception] ok 6218 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +fetch> [return] ok 6219 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +fetch> [variable] ok 6220 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +fetch> [exception] ok 6221 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +fetch> [return] ok 6222 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +fetch> [variable] ok 6223 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +fetch> [exception] ok 6224 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +fetch> [return] ok 6225 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +fetch> [variable] ok 6226 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +fetch> [exception] ok 6227 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +fetch> [return] ok 6228 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +fetch> [variable] ok 6229 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +fetch> [exception] ok 6230 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +fetch> [return] ok 6231 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +fetch> [variable] ok 6232 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +fetch> [exception] ok 6233 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +fetch> [return] ok 6234 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +fetch> [variable] ok 6235 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +fetch> [exception] ok 6236 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +fetch> [return] ok 6237 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +fetch> [variable] ok 6238 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +fetch> [exception] ok 6239 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +fetch> [return] ok 6240 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +fetch> [variable] ok 6241 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +fetch> [exception] ok 6242 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +fetch> [return] ok 6243 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +fetch> [variable] ok 6244 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +fetch> [exception] ok 6245 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +fetch> [return] ok 6246 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +fetch> [variable] ok 6247 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +fetch> [exception] ok 6248 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +fetch> [return] ok 6249 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +fetch> [variable] ok 6250 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +fetch> [exception] ok 6251 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +fetch> [return] ok 6252 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +fetch> [variable] ok 6253 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +fetch> [exception] ok 6254 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +fetch> [return] ok 6255 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +fetch> [variable] ok 6256 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +fetch> [exception] ok 6257 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +fetch> [return] ok 6258 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +fetch> [variable] ok 6259 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +fetch> [exception] ok 6260 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +fetch> [return] ok 6261 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +fetch> [variable] ok 6262 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +fetch> [exception] ok 6263 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +fetch> [return] ok 6264 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +fetch> [variable] ok 6265 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +fetch> [exception] ok 6266 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +fetch> [return] ok 6267 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +fetch> [variable] ok 6268 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +fetch> [exception] ok 6269 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +fetch> [return] ok 6270 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +fetch> [variable] ok 6271 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +fetch> [exception] ok 6272 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +fetch> [return] ok 6273 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +fetch> [variable] ok 6274 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +fetch> [exception] ok 6275 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +fetch> [return] ok 6276 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +fetch> [variable] ok 6277 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +fetch> [exception] ok 6278 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +fetch> [return] ok 6279 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +fetch> [variable] ok 6280 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +fetch> [exception] ok 6281 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +fetch> [return] ok 6282 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +fetch> [variable] ok 6283 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +fetch> [exception] ok 6284 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +fetch> [return] ok 6285 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +fetch> [variable] ok 6286 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +fetch> [exception] ok 6287 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +fetch> [return] ok 6288 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +fetch> [variable] ok 6289 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +fetch> [exception] ok 6290 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +fetch> [return] ok 6291 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +fetch> [variable] ok 6292 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +exists> [exception] ok 6293 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +exists> [return] ok 6294 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +exists> [variable] ok 6295 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +exists> [exception] ok 6296 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +exists> [return] ok 6297 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +exists> [variable] ok 6298 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +exists> [exception] ok 6299 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +exists> [return] ok 6300 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +exists> [variable] ok 6301 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +exists> [exception] ok 6302 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +exists> [return] ok 6303 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +exists> [variable] ok 6304 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +exists> [exception] ok 6305 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +exists> [return] ok 6306 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +exists> [variable] ok 6307 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +exists> [exception] ok 6308 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +exists> [return] ok 6309 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +exists> [variable] ok 6310 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +exists> [exception] ok 6311 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +exists> [return] ok 6312 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +exists> [variable] ok 6313 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +exists> [exception] ok 6314 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +exists> [return] ok 6315 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +exists> [variable] ok 6316 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +exists> [exception] ok 6317 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +exists> [return] ok 6318 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +exists> [variable] ok 6319 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +exists> [exception] ok 6320 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +exists> [return] ok 6321 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +exists> [variable] ok 6322 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +exists> [exception] ok 6323 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +exists> [return] ok 6324 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +exists> [variable] ok 6325 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +exists> [exception] ok 6326 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +exists> [return] ok 6327 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +exists> [variable] ok 6328 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +exists> [exception] ok 6329 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +exists> [return] ok 6330 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +exists> [variable] ok 6331 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +exists> [exception] ok 6332 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +exists> [return] ok 6333 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +exists> [variable] ok 6334 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +exists> [exception] ok 6335 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +exists> [return] ok 6336 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +exists> [variable] ok 6337 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +exists> [exception] ok 6338 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +exists> [return] ok 6339 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +exists> [variable] ok 6340 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +exists> [exception] ok 6341 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +exists> [return] ok 6342 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +exists> [variable] ok 6343 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +exists> [exception] ok 6344 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +exists> [return] ok 6345 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +exists> [variable] ok 6346 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +exists> [exception] ok 6347 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +exists> [return] ok 6348 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +exists> [variable] ok 6349 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +exists> [exception] ok 6350 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +exists> [return] ok 6351 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +exists> [variable] ok 6352 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +exists> [exception] ok 6353 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +exists> [return] ok 6354 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +exists> [variable] ok 6355 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +exists> [exception] ok 6356 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +exists> [return] ok 6357 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +exists> [variable] ok 6358 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +exists> [exception] ok 6359 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +exists> [return] ok 6360 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +exists> [variable] ok 6361 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +exists> [exception] ok 6362 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +exists> [return] ok 6363 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +exists> [variable] ok 6364 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +exists> [exception] ok 6365 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +exists> [return] ok 6366 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +exists> [variable] ok 6367 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +exists> [exception] ok 6368 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +exists> [return] ok 6369 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +exists> [variable] ok 6370 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +exists> [exception] ok 6371 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +exists> [return] ok 6372 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +exists> [variable] ok 6373 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +delete> [exception] ok 6374 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +delete> [return] ok 6375 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +delete> [variable] ok 6376 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +delete> [exception] ok 6377 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +delete> [return] ok 6378 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +delete> [variable] ok 6379 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +delete> [exception] ok 6380 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +delete> [return] ok 6381 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +delete> [variable] ok 6382 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +delete> [exception] ok 6383 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +delete> [return] ok 6384 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +delete> [variable] ok 6385 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +delete> [exception] ok 6386 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +delete> [return] ok 6387 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +delete> [variable] ok 6388 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +delete> [exception] ok 6389 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +delete> [return] ok 6390 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +delete> [variable] ok 6391 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +delete> [exception] ok 6392 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +delete> [return] ok 6393 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +delete> [variable] ok 6394 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +delete> [exception] ok 6395 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +delete> [return] ok 6396 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +delete> [variable] ok 6397 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +delete> [exception] ok 6398 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +delete> [return] ok 6399 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +delete> [variable] ok 6400 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +delete> [exception] ok 6401 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +delete> [return] ok 6402 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +delete> [variable] ok 6403 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +delete> [exception] ok 6404 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +delete> [return] ok 6405 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +delete> [variable] ok 6406 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +delete> [exception] ok 6407 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +delete> [return] ok 6408 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +delete> [variable] ok 6409 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +delete> [exception] ok 6410 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +delete> [return] ok 6411 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +delete> [variable] ok 6412 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +delete> [exception] ok 6413 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +delete> [return] ok 6414 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +delete> [variable] ok 6415 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +delete> [exception] ok 6416 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +delete> [return] ok 6417 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +delete> [variable] ok 6418 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +delete> [exception] ok 6419 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +delete> [return] ok 6420 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +delete> [variable] ok 6421 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +delete> [exception] ok 6422 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +delete> [return] ok 6423 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +delete> [variable] ok 6424 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +delete> [exception] ok 6425 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +delete> [return] ok 6426 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +delete> [variable] ok 6427 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +delete> [exception] ok 6428 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +delete> [return] ok 6429 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +delete> [variable] ok 6430 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +delete> [exception] ok 6431 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +delete> [return] ok 6432 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +delete> [variable] ok 6433 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +delete> [exception] ok 6434 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +delete> [return] ok 6435 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +delete> [variable] ok 6436 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +delete> [exception] ok 6437 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +delete> [return] ok 6438 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +delete> [variable] ok 6439 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +delete> [exception] ok 6440 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +delete> [return] ok 6441 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +delete> [variable] ok 6442 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +delete> [exception] ok 6443 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +delete> [return] ok 6444 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +delete> [variable] ok 6445 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +delete> [exception] ok 6446 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +delete> [return] ok 6447 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +delete> [variable] ok 6448 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +delete> [exception] ok 6449 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +delete> [return] ok 6450 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +delete> [variable] ok 6451 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +delete> [exception] ok 6452 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +delete> [return] ok 6453 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +delete> [variable] ok 6454 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +store> [exception] ok 6455 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +store> [return] ok 6456 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +store> [variable] ok 6457 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +store> [exception] ok 6458 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +store> [return] ok 6459 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +store> [variable] ok 6460 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +store> [exception] ok 6461 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +store> [return] ok 6462 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{b} <+strict +store> [variable] ok 6463 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +store> [exception] ok 6464 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +store> [return] ok 6465 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +store> [variable] ok 6466 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +store> [exception] ok 6467 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +store> [return] ok 6468 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +store> [variable] ok 6469 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +store> [exception] ok 6470 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +store> [return] ok 6471 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{b} <+strict +store> [variable] ok 6472 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +store> [exception] ok 6473 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +store> [return] ok 6474 - my %x; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +store> [variable] ok 6475 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +store> [exception] ok 6476 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +store> [return] ok 6477 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +store> [variable] ok 6478 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +store> [exception] ok 6479 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +store> [return] ok 6480 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{b} <+strict +store> [variable] ok 6481 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +store> [exception] ok 6482 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +store> [return] ok 6483 - my $x; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +store> [variable] ok 6484 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +store> [exception] ok 6485 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +store> [return] ok 6486 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +store> [variable] ok 6487 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +store> [exception] ok 6488 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +store> [return] ok 6489 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{a}->{d} <+strict +store> [variable] ok 6490 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +store> [exception] ok 6491 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +store> [return] ok 6492 - my $x; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +store> [variable] ok 6493 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +store> [exception] ok 6494 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +store> [return] ok 6495 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +store> [variable] ok 6496 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +store> [exception] ok 6497 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +store> [return] ok 6498 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{a}->{d} <+strict +store> [variable] ok 6499 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +store> [exception] ok 6500 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +store> [return] ok 6501 - my %x; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +store> [variable] ok 6502 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +store> [exception] ok 6503 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +store> [return] ok 6504 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +store> [variable] ok 6505 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +store> [exception] ok 6506 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +store> [return] ok 6507 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{a}->{d} <+strict +store> [variable] ok 6508 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +store> [exception] ok 6509 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +store> [return] ok 6510 - my $x; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +store> [variable] ok 6511 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +store> [exception] ok 6512 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +store> [return] ok 6513 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +store> [variable] ok 6514 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +store> [exception] ok 6515 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +store> [return] ok 6516 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $x->{c}->{d} <+strict +store> [variable] ok 6517 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +store> [exception] ok 6518 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +store> [return] ok 6519 - my $x; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +store> [variable] ok 6520 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +store> [exception] ok 6521 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +store> [return] ok 6522 - our $x; local $x; use strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +store> [variable] ok 6523 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +store> [exception] ok 6524 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +store> [return] ok 6525 - our $x; local $x; no strict; $x->{a}->{b} = 1; delete $$x{c}->{d} <+strict +store> [variable] ok 6526 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +store> [exception] ok 6527 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +store> [return] ok 6528 - my %x; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +store> [variable] ok 6529 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +store> [exception] ok 6530 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +store> [return] ok 6531 - our %x; local %x; use strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +store> [variable] ok 6532 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +store> [exception] ok 6533 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +store> [return] ok 6534 - our %x; local %x; no strict; $x{a}->{b} = 1; delete $x{c}->{d} <+strict +store> [variable] ok 6535 - my $x; $x->{a} = 1 [exception] ok 6536 - my $x; $x->{a} = 1 [return] ok 6537 - my $x; $x->{a} = 1 [variable] ok 6538 - our $x; local $x; use strict; $x->{a} = 1 [exception] ok 6539 - our $x; local $x; use strict; $x->{a} = 1 [return] ok 6540 - our $x; local $x; use strict; $x->{a} = 1 [variable] ok 6541 - our $x; local $x; no strict; $x->{a} = 1 [exception] ok 6542 - our $x; local $x; no strict; $x->{a} = 1 [return] ok 6543 - our $x; local $x; no strict; $x->{a} = 1 [variable] ok 6544 - my $x; $$x{a} = 1 [exception] ok 6545 - my $x; $$x{a} = 1 [return] ok 6546 - my $x; $$x{a} = 1 [variable] ok 6547 - our $x; local $x; use strict; $$x{a} = 1 [exception] ok 6548 - our $x; local $x; use strict; $$x{a} = 1 [return] ok 6549 - our $x; local $x; use strict; $$x{a} = 1 [variable] ok 6550 - our $x; local $x; no strict; $$x{a} = 1 [exception] ok 6551 - our $x; local $x; no strict; $$x{a} = 1 [return] ok 6552 - our $x; local $x; no strict; $$x{a} = 1 [variable] ok 6553 - my %x; $x{a} = 1 [exception] ok 6554 - my %x; $x{a} = 1 [return] ok 6555 - my %x; $x{a} = 1 [variable] ok 6556 - our %x; local %x; use strict; $x{a} = 1 [exception] ok 6557 - our %x; local %x; use strict; $x{a} = 1 [return] ok 6558 - our %x; local %x; use strict; $x{a} = 1 [variable] ok 6559 - our %x; local %x; no strict; $x{a} = 1 [exception] ok 6560 - our %x; local %x; no strict; $x{a} = 1 [return] ok 6561 - our %x; local %x; no strict; $x{a} = 1 [variable] ok 6562 - my $x; $x->{a} = 1 [exception] ok 6563 - my $x; $x->{a} = 1 [return] ok 6564 - my $x; $x->{a} = 1 [variable] ok 6565 - our $x; local $x; use strict; $x->{a} = 1 [exception] ok 6566 - our $x; local $x; use strict; $x->{a} = 1 [return] ok 6567 - our $x; local $x; use strict; $x->{a} = 1 [variable] ok 6568 - our $x; local $x; no strict; $x->{a} = 1 [exception] ok 6569 - our $x; local $x; no strict; $x->{a} = 1 [return] ok 6570 - our $x; local $x; no strict; $x->{a} = 1 [variable] ok 6571 - my $x; $$x{a} = 1 [exception] ok 6572 - my $x; $$x{a} = 1 [return] ok 6573 - my $x; $$x{a} = 1 [variable] ok 6574 - our $x; local $x; use strict; $$x{a} = 1 [exception] ok 6575 - our $x; local $x; use strict; $$x{a} = 1 [return] ok 6576 - our $x; local $x; use strict; $$x{a} = 1 [variable] ok 6577 - our $x; local $x; no strict; $$x{a} = 1 [exception] ok 6578 - our $x; local $x; no strict; $$x{a} = 1 [return] ok 6579 - our $x; local $x; no strict; $$x{a} = 1 [variable] ok 6580 - my %x; $x{a} = 1 [exception] ok 6581 - my %x; $x{a} = 1 [return] ok 6582 - my %x; $x{a} = 1 [variable] ok 6583 - our %x; local %x; use strict; $x{a} = 1 [exception] ok 6584 - our %x; local %x; use strict; $x{a} = 1 [return] ok 6585 - our %x; local %x; use strict; $x{a} = 1 [variable] ok 6586 - our %x; local %x; no strict; $x{a} = 1 [exception] ok 6587 - our %x; local %x; no strict; $x{a} = 1 [return] ok 6588 - our %x; local %x; no strict; $x{a} = 1 [variable] ok 6589 - my $x; $x->{a} = 1 <+fetch> [exception] ok 6590 - my $x; $x->{a} = 1 <+fetch> [return] ok 6591 - my $x; $x->{a} = 1 <+fetch> [variable] ok 6592 - our $x; local $x; use strict; $x->{a} = 1 <+fetch> [exception] ok 6593 - our $x; local $x; use strict; $x->{a} = 1 <+fetch> [return] ok 6594 - our $x; local $x; use strict; $x->{a} = 1 <+fetch> [variable] ok 6595 - our $x; local $x; no strict; $x->{a} = 1 <+fetch> [exception] ok 6596 - our $x; local $x; no strict; $x->{a} = 1 <+fetch> [return] ok 6597 - our $x; local $x; no strict; $x->{a} = 1 <+fetch> [variable] ok 6598 - my $x; $$x{a} = 1 <+fetch> [exception] ok 6599 - my $x; $$x{a} = 1 <+fetch> [return] ok 6600 - my $x; $$x{a} = 1 <+fetch> [variable] ok 6601 - our $x; local $x; use strict; $$x{a} = 1 <+fetch> [exception] ok 6602 - our $x; local $x; use strict; $$x{a} = 1 <+fetch> [return] ok 6603 - our $x; local $x; use strict; $$x{a} = 1 <+fetch> [variable] ok 6604 - our $x; local $x; no strict; $$x{a} = 1 <+fetch> [exception] ok 6605 - our $x; local $x; no strict; $$x{a} = 1 <+fetch> [return] ok 6606 - our $x; local $x; no strict; $$x{a} = 1 <+fetch> [variable] ok 6607 - my %x; $x{a} = 1 <+fetch> [exception] ok 6608 - my %x; $x{a} = 1 <+fetch> [return] ok 6609 - my %x; $x{a} = 1 <+fetch> [variable] ok 6610 - our %x; local %x; use strict; $x{a} = 1 <+fetch> [exception] ok 6611 - our %x; local %x; use strict; $x{a} = 1 <+fetch> [return] ok 6612 - our %x; local %x; use strict; $x{a} = 1 <+fetch> [variable] ok 6613 - our %x; local %x; no strict; $x{a} = 1 <+fetch> [exception] ok 6614 - our %x; local %x; no strict; $x{a} = 1 <+fetch> [return] ok 6615 - our %x; local %x; no strict; $x{a} = 1 <+fetch> [variable] ok 6616 - my $x; $x->{a} = 1 <+exists> [exception] ok 6617 - my $x; $x->{a} = 1 <+exists> [return] ok 6618 - my $x; $x->{a} = 1 <+exists> [variable] ok 6619 - our $x; local $x; use strict; $x->{a} = 1 <+exists> [exception] ok 6620 - our $x; local $x; use strict; $x->{a} = 1 <+exists> [return] ok 6621 - our $x; local $x; use strict; $x->{a} = 1 <+exists> [variable] ok 6622 - our $x; local $x; no strict; $x->{a} = 1 <+exists> [exception] ok 6623 - our $x; local $x; no strict; $x->{a} = 1 <+exists> [return] ok 6624 - our $x; local $x; no strict; $x->{a} = 1 <+exists> [variable] ok 6625 - my $x; $$x{a} = 1 <+exists> [exception] ok 6626 - my $x; $$x{a} = 1 <+exists> [return] ok 6627 - my $x; $$x{a} = 1 <+exists> [variable] ok 6628 - our $x; local $x; use strict; $$x{a} = 1 <+exists> [exception] ok 6629 - our $x; local $x; use strict; $$x{a} = 1 <+exists> [return] ok 6630 - our $x; local $x; use strict; $$x{a} = 1 <+exists> [variable] ok 6631 - our $x; local $x; no strict; $$x{a} = 1 <+exists> [exception] ok 6632 - our $x; local $x; no strict; $$x{a} = 1 <+exists> [return] ok 6633 - our $x; local $x; no strict; $$x{a} = 1 <+exists> [variable] ok 6634 - my %x; $x{a} = 1 <+exists> [exception] ok 6635 - my %x; $x{a} = 1 <+exists> [return] ok 6636 - my %x; $x{a} = 1 <+exists> [variable] ok 6637 - our %x; local %x; use strict; $x{a} = 1 <+exists> [exception] ok 6638 - our %x; local %x; use strict; $x{a} = 1 <+exists> [return] ok 6639 - our %x; local %x; use strict; $x{a} = 1 <+exists> [variable] ok 6640 - our %x; local %x; no strict; $x{a} = 1 <+exists> [exception] ok 6641 - our %x; local %x; no strict; $x{a} = 1 <+exists> [return] ok 6642 - our %x; local %x; no strict; $x{a} = 1 <+exists> [variable] ok 6643 - my $x; $x->{a} = 1 <+delete> [exception] ok 6644 - my $x; $x->{a} = 1 <+delete> [return] ok 6645 - my $x; $x->{a} = 1 <+delete> [variable] ok 6646 - our $x; local $x; use strict; $x->{a} = 1 <+delete> [exception] ok 6647 - our $x; local $x; use strict; $x->{a} = 1 <+delete> [return] ok 6648 - our $x; local $x; use strict; $x->{a} = 1 <+delete> [variable] ok 6649 - our $x; local $x; no strict; $x->{a} = 1 <+delete> [exception] ok 6650 - our $x; local $x; no strict; $x->{a} = 1 <+delete> [return] ok 6651 - our $x; local $x; no strict; $x->{a} = 1 <+delete> [variable] ok 6652 - my $x; $$x{a} = 1 <+delete> [exception] ok 6653 - my $x; $$x{a} = 1 <+delete> [return] ok 6654 - my $x; $$x{a} = 1 <+delete> [variable] ok 6655 - our $x; local $x; use strict; $$x{a} = 1 <+delete> [exception] ok 6656 - our $x; local $x; use strict; $$x{a} = 1 <+delete> [return] ok 6657 - our $x; local $x; use strict; $$x{a} = 1 <+delete> [variable] ok 6658 - our $x; local $x; no strict; $$x{a} = 1 <+delete> [exception] ok 6659 - our $x; local $x; no strict; $$x{a} = 1 <+delete> [return] ok 6660 - our $x; local $x; no strict; $$x{a} = 1 <+delete> [variable] ok 6661 - my %x; $x{a} = 1 <+delete> [exception] ok 6662 - my %x; $x{a} = 1 <+delete> [return] ok 6663 - my %x; $x{a} = 1 <+delete> [variable] ok 6664 - our %x; local %x; use strict; $x{a} = 1 <+delete> [exception] ok 6665 - our %x; local %x; use strict; $x{a} = 1 <+delete> [return] ok 6666 - our %x; local %x; use strict; $x{a} = 1 <+delete> [variable] ok 6667 - our %x; local %x; no strict; $x{a} = 1 <+delete> [exception] ok 6668 - our %x; local %x; no strict; $x{a} = 1 <+delete> [return] ok 6669 - our %x; local %x; no strict; $x{a} = 1 <+delete> [variable] ok 6670 - my $x; $x->{a} = 1 <+store> [exception] ok 6671 - my $x; $x->{a} = 1 <+store> [return] ok 6672 - my $x; $x->{a} = 1 <+store> [variable] ok 6673 - our $x; local $x; use strict; $x->{a} = 1 <+store> [exception] ok 6674 - our $x; local $x; use strict; $x->{a} = 1 <+store> [return] ok 6675 - our $x; local $x; use strict; $x->{a} = 1 <+store> [variable] ok 6676 - our $x; local $x; no strict; $x->{a} = 1 <+store> [exception] ok 6677 - our $x; local $x; no strict; $x->{a} = 1 <+store> [return] ok 6678 - our $x; local $x; no strict; $x->{a} = 1 <+store> [variable] ok 6679 - my $x; $$x{a} = 1 <+store> [exception] ok 6680 - my $x; $$x{a} = 1 <+store> [return] ok 6681 - my $x; $$x{a} = 1 <+store> [variable] ok 6682 - our $x; local $x; use strict; $$x{a} = 1 <+store> [exception] ok 6683 - our $x; local $x; use strict; $$x{a} = 1 <+store> [return] ok 6684 - our $x; local $x; use strict; $$x{a} = 1 <+store> [variable] ok 6685 - our $x; local $x; no strict; $$x{a} = 1 <+store> [exception] ok 6686 - our $x; local $x; no strict; $$x{a} = 1 <+store> [return] ok 6687 - our $x; local $x; no strict; $$x{a} = 1 <+store> [variable] ok 6688 - my %x; 1 <+store> [exception] ok 6689 - my %x; 1 <+store> [return] ok 6690 - my %x; 1 <+store> [variable] ok 6691 - our %x; local %x; use strict; 1 <+store> [exception] ok 6692 - our %x; local %x; use strict; 1 <+store> [return] ok 6693 - our %x; local %x; use strict; 1 <+store> [variable] ok 6694 - our %x; local %x; no strict; 1 <+store> [exception] ok 6695 - our %x; local %x; no strict; 1 <+store> [return] ok 6696 - our %x; local %x; no strict; 1 <+store> [variable] ok 6697 - my $x; $x->{a} = 1 <+strict +fetch> [exception] ok 6698 - my $x; $x->{a} = 1 <+strict +fetch> [return] ok 6699 - my $x; $x->{a} = 1 <+strict +fetch> [variable] ok 6700 - our $x; local $x; use strict; $x->{a} = 1 <+strict +fetch> [exception] ok 6701 - our $x; local $x; use strict; $x->{a} = 1 <+strict +fetch> [return] ok 6702 - our $x; local $x; use strict; $x->{a} = 1 <+strict +fetch> [variable] ok 6703 - our $x; local $x; no strict; $x->{a} = 1 <+strict +fetch> [exception] ok 6704 - our $x; local $x; no strict; $x->{a} = 1 <+strict +fetch> [return] ok 6705 - our $x; local $x; no strict; $x->{a} = 1 <+strict +fetch> [variable] ok 6706 - my $x; $$x{a} = 1 <+strict +fetch> [exception] ok 6707 - my $x; $$x{a} = 1 <+strict +fetch> [return] ok 6708 - my $x; $$x{a} = 1 <+strict +fetch> [variable] ok 6709 - our $x; local $x; use strict; $$x{a} = 1 <+strict +fetch> [exception] ok 6710 - our $x; local $x; use strict; $$x{a} = 1 <+strict +fetch> [return] ok 6711 - our $x; local $x; use strict; $$x{a} = 1 <+strict +fetch> [variable] ok 6712 - our $x; local $x; no strict; $$x{a} = 1 <+strict +fetch> [exception] ok 6713 - our $x; local $x; no strict; $$x{a} = 1 <+strict +fetch> [return] ok 6714 - our $x; local $x; no strict; $$x{a} = 1 <+strict +fetch> [variable] ok 6715 - my %x; $x{a} = 1 <+strict +fetch> [exception] ok 6716 - my %x; $x{a} = 1 <+strict +fetch> [return] ok 6717 - my %x; $x{a} = 1 <+strict +fetch> [variable] ok 6718 - our %x; local %x; use strict; $x{a} = 1 <+strict +fetch> [exception] ok 6719 - our %x; local %x; use strict; $x{a} = 1 <+strict +fetch> [return] ok 6720 - our %x; local %x; use strict; $x{a} = 1 <+strict +fetch> [variable] ok 6721 - our %x; local %x; no strict; $x{a} = 1 <+strict +fetch> [exception] ok 6722 - our %x; local %x; no strict; $x{a} = 1 <+strict +fetch> [return] ok 6723 - our %x; local %x; no strict; $x{a} = 1 <+strict +fetch> [variable] ok 6724 - my $x; $x->{a} = 1 <+strict +exists> [exception] ok 6725 - my $x; $x->{a} = 1 <+strict +exists> [return] ok 6726 - my $x; $x->{a} = 1 <+strict +exists> [variable] ok 6727 - our $x; local $x; use strict; $x->{a} = 1 <+strict +exists> [exception] ok 6728 - our $x; local $x; use strict; $x->{a} = 1 <+strict +exists> [return] ok 6729 - our $x; local $x; use strict; $x->{a} = 1 <+strict +exists> [variable] ok 6730 - our $x; local $x; no strict; $x->{a} = 1 <+strict +exists> [exception] ok 6731 - our $x; local $x; no strict; $x->{a} = 1 <+strict +exists> [return] ok 6732 - our $x; local $x; no strict; $x->{a} = 1 <+strict +exists> [variable] ok 6733 - my $x; $$x{a} = 1 <+strict +exists> [exception] ok 6734 - my $x; $$x{a} = 1 <+strict +exists> [return] ok 6735 - my $x; $$x{a} = 1 <+strict +exists> [variable] ok 6736 - our $x; local $x; use strict; $$x{a} = 1 <+strict +exists> [exception] ok 6737 - our $x; local $x; use strict; $$x{a} = 1 <+strict +exists> [return] ok 6738 - our $x; local $x; use strict; $$x{a} = 1 <+strict +exists> [variable] ok 6739 - our $x; local $x; no strict; $$x{a} = 1 <+strict +exists> [exception] ok 6740 - our $x; local $x; no strict; $$x{a} = 1 <+strict +exists> [return] ok 6741 - our $x; local $x; no strict; $$x{a} = 1 <+strict +exists> [variable] ok 6742 - my %x; $x{a} = 1 <+strict +exists> [exception] ok 6743 - my %x; $x{a} = 1 <+strict +exists> [return] ok 6744 - my %x; $x{a} = 1 <+strict +exists> [variable] ok 6745 - our %x; local %x; use strict; $x{a} = 1 <+strict +exists> [exception] ok 6746 - our %x; local %x; use strict; $x{a} = 1 <+strict +exists> [return] ok 6747 - our %x; local %x; use strict; $x{a} = 1 <+strict +exists> [variable] ok 6748 - our %x; local %x; no strict; $x{a} = 1 <+strict +exists> [exception] ok 6749 - our %x; local %x; no strict; $x{a} = 1 <+strict +exists> [return] ok 6750 - our %x; local %x; no strict; $x{a} = 1 <+strict +exists> [variable] ok 6751 - my $x; $x->{a} = 1 <+strict +delete> [exception] ok 6752 - my $x; $x->{a} = 1 <+strict +delete> [return] ok 6753 - my $x; $x->{a} = 1 <+strict +delete> [variable] ok 6754 - our $x; local $x; use strict; $x->{a} = 1 <+strict +delete> [exception] ok 6755 - our $x; local $x; use strict; $x->{a} = 1 <+strict +delete> [return] ok 6756 - our $x; local $x; use strict; $x->{a} = 1 <+strict +delete> [variable] ok 6757 - our $x; local $x; no strict; $x->{a} = 1 <+strict +delete> [exception] ok 6758 - our $x; local $x; no strict; $x->{a} = 1 <+strict +delete> [return] ok 6759 - our $x; local $x; no strict; $x->{a} = 1 <+strict +delete> [variable] ok 6760 - my $x; $$x{a} = 1 <+strict +delete> [exception] ok 6761 - my $x; $$x{a} = 1 <+strict +delete> [return] ok 6762 - my $x; $$x{a} = 1 <+strict +delete> [variable] ok 6763 - our $x; local $x; use strict; $$x{a} = 1 <+strict +delete> [exception] ok 6764 - our $x; local $x; use strict; $$x{a} = 1 <+strict +delete> [return] ok 6765 - our $x; local $x; use strict; $$x{a} = 1 <+strict +delete> [variable] ok 6766 - our $x; local $x; no strict; $$x{a} = 1 <+strict +delete> [exception] ok 6767 - our $x; local $x; no strict; $$x{a} = 1 <+strict +delete> [return] ok 6768 - our $x; local $x; no strict; $$x{a} = 1 <+strict +delete> [variable] ok 6769 - my %x; $x{a} = 1 <+strict +delete> [exception] ok 6770 - my %x; $x{a} = 1 <+strict +delete> [return] ok 6771 - my %x; $x{a} = 1 <+strict +delete> [variable] ok 6772 - our %x; local %x; use strict; $x{a} = 1 <+strict +delete> [exception] ok 6773 - our %x; local %x; use strict; $x{a} = 1 <+strict +delete> [return] ok 6774 - our %x; local %x; use strict; $x{a} = 1 <+strict +delete> [variable] ok 6775 - our %x; local %x; no strict; $x{a} = 1 <+strict +delete> [exception] ok 6776 - our %x; local %x; no strict; $x{a} = 1 <+strict +delete> [return] ok 6777 - our %x; local %x; no strict; $x{a} = 1 <+strict +delete> [variable] ok 6778 - my $x; $x->{a} = 1 <+strict +store> [exception] ok 6779 - my $x; $x->{a} = 1 <+strict +store> [return] ok 6780 - my $x; $x->{a} = 1 <+strict +store> [variable] ok 6781 - our $x; local $x; use strict; $x->{a} = 1 <+strict +store> [exception] ok 6782 - our $x; local $x; use strict; $x->{a} = 1 <+strict +store> [return] ok 6783 - our $x; local $x; use strict; $x->{a} = 1 <+strict +store> [variable] ok 6784 - our $x; local $x; no strict; $x->{a} = 1 <+strict +store> [exception] ok 6785 - our $x; local $x; no strict; $x->{a} = 1 <+strict +store> [return] ok 6786 - our $x; local $x; no strict; $x->{a} = 1 <+strict +store> [variable] ok 6787 - my $x; $$x{a} = 1 <+strict +store> [exception] ok 6788 - my $x; $$x{a} = 1 <+strict +store> [return] ok 6789 - my $x; $$x{a} = 1 <+strict +store> [variable] ok 6790 - our $x; local $x; use strict; $$x{a} = 1 <+strict +store> [exception] ok 6791 - our $x; local $x; use strict; $$x{a} = 1 <+strict +store> [return] ok 6792 - our $x; local $x; use strict; $$x{a} = 1 <+strict +store> [variable] ok 6793 - our $x; local $x; no strict; $$x{a} = 1 <+strict +store> [exception] ok 6794 - our $x; local $x; no strict; $$x{a} = 1 <+strict +store> [return] ok 6795 - our $x; local $x; no strict; $$x{a} = 1 <+strict +store> [variable] ok 6796 - my %x; 1 <+strict +store> [exception] ok 6797 - my %x; 1 <+strict +store> [return] ok 6798 - my %x; 1 <+strict +store> [variable] ok 6799 - our %x; local %x; use strict; 1 <+strict +store> [exception] ok 6800 - our %x; local %x; use strict; 1 <+strict +store> [return] ok 6801 - our %x; local %x; use strict; 1 <+strict +store> [variable] ok 6802 - our %x; local %x; no strict; 1 <+strict +store> [exception] ok 6803 - our %x; local %x; no strict; 1 <+strict +store> [return] ok 6804 - our %x; local %x; no strict; 1 <+strict +store> [variable] ok 6805 - my $x; $x->{a}->{b} = 1 [exception] ok 6806 - my $x; $x->{a}->{b} = 1 [return] ok 6807 - my $x; $x->{a}->{b} = 1 [variable] ok 6808 - our $x; local $x; use strict; $x->{a}->{b} = 1 [exception] ok 6809 - our $x; local $x; use strict; $x->{a}->{b} = 1 [return] ok 6810 - our $x; local $x; use strict; $x->{a}->{b} = 1 [variable] ok 6811 - our $x; local $x; no strict; $x->{a}->{b} = 1 [exception] ok 6812 - our $x; local $x; no strict; $x->{a}->{b} = 1 [return] ok 6813 - our $x; local $x; no strict; $x->{a}->{b} = 1 [variable] ok 6814 - my $x; $$x{a}->{b} = 1 [exception] ok 6815 - my $x; $$x{a}->{b} = 1 [return] ok 6816 - my $x; $$x{a}->{b} = 1 [variable] ok 6817 - our $x; local $x; use strict; $$x{a}->{b} = 1 [exception] ok 6818 - our $x; local $x; use strict; $$x{a}->{b} = 1 [return] ok 6819 - our $x; local $x; use strict; $$x{a}->{b} = 1 [variable] ok 6820 - our $x; local $x; no strict; $$x{a}->{b} = 1 [exception] ok 6821 - our $x; local $x; no strict; $$x{a}->{b} = 1 [return] ok 6822 - our $x; local $x; no strict; $$x{a}->{b} = 1 [variable] ok 6823 - my %x; $x{a}->{b} = 1 [exception] ok 6824 - my %x; $x{a}->{b} = 1 [return] ok 6825 - my %x; $x{a}->{b} = 1 [variable] ok 6826 - our %x; local %x; use strict; $x{a}->{b} = 1 [exception] ok 6827 - our %x; local %x; use strict; $x{a}->{b} = 1 [return] ok 6828 - our %x; local %x; use strict; $x{a}->{b} = 1 [variable] ok 6829 - our %x; local %x; no strict; $x{a}->{b} = 1 [exception] ok 6830 - our %x; local %x; no strict; $x{a}->{b} = 1 [return] ok 6831 - our %x; local %x; no strict; $x{a}->{b} = 1 [variable] ok 6832 - my $x; $x->{a}->{b} = 1 [exception] ok 6833 - my $x; $x->{a}->{b} = 1 [return] ok 6834 - my $x; $x->{a}->{b} = 1 [variable] ok 6835 - our $x; local $x; use strict; $x->{a}->{b} = 1 [exception] ok 6836 - our $x; local $x; use strict; $x->{a}->{b} = 1 [return] ok 6837 - our $x; local $x; use strict; $x->{a}->{b} = 1 [variable] ok 6838 - our $x; local $x; no strict; $x->{a}->{b} = 1 [exception] ok 6839 - our $x; local $x; no strict; $x->{a}->{b} = 1 [return] ok 6840 - our $x; local $x; no strict; $x->{a}->{b} = 1 [variable] ok 6841 - my $x; $$x{a}->{b} = 1 [exception] ok 6842 - my $x; $$x{a}->{b} = 1 [return] ok 6843 - my $x; $$x{a}->{b} = 1 [variable] ok 6844 - our $x; local $x; use strict; $$x{a}->{b} = 1 [exception] ok 6845 - our $x; local $x; use strict; $$x{a}->{b} = 1 [return] ok 6846 - our $x; local $x; use strict; $$x{a}->{b} = 1 [variable] ok 6847 - our $x; local $x; no strict; $$x{a}->{b} = 1 [exception] ok 6848 - our $x; local $x; no strict; $$x{a}->{b} = 1 [return] ok 6849 - our $x; local $x; no strict; $$x{a}->{b} = 1 [variable] ok 6850 - my %x; $x{a}->{b} = 1 [exception] ok 6851 - my %x; $x{a}->{b} = 1 [return] ok 6852 - my %x; $x{a}->{b} = 1 [variable] ok 6853 - our %x; local %x; use strict; $x{a}->{b} = 1 [exception] ok 6854 - our %x; local %x; use strict; $x{a}->{b} = 1 [return] ok 6855 - our %x; local %x; use strict; $x{a}->{b} = 1 [variable] ok 6856 - our %x; local %x; no strict; $x{a}->{b} = 1 [exception] ok 6857 - our %x; local %x; no strict; $x{a}->{b} = 1 [return] ok 6858 - our %x; local %x; no strict; $x{a}->{b} = 1 [variable] ok 6859 - my $x; $x->{a}->{b} = 1 <+fetch> [exception] ok 6860 - my $x; $x->{a}->{b} = 1 <+fetch> [return] ok 6861 - my $x; $x->{a}->{b} = 1 <+fetch> [variable] ok 6862 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+fetch> [exception] ok 6863 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+fetch> [return] ok 6864 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+fetch> [variable] ok 6865 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+fetch> [exception] ok 6866 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+fetch> [return] ok 6867 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+fetch> [variable] ok 6868 - my $x; $$x{a}->{b} = 1 <+fetch> [exception] ok 6869 - my $x; $$x{a}->{b} = 1 <+fetch> [return] ok 6870 - my $x; $$x{a}->{b} = 1 <+fetch> [variable] ok 6871 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+fetch> [exception] ok 6872 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+fetch> [return] ok 6873 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+fetch> [variable] ok 6874 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+fetch> [exception] ok 6875 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+fetch> [return] ok 6876 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+fetch> [variable] ok 6877 - my %x; $x{a}->{b} = 1 <+fetch> [exception] ok 6878 - my %x; $x{a}->{b} = 1 <+fetch> [return] ok 6879 - my %x; $x{a}->{b} = 1 <+fetch> [variable] ok 6880 - our %x; local %x; use strict; $x{a}->{b} = 1 <+fetch> [exception] ok 6881 - our %x; local %x; use strict; $x{a}->{b} = 1 <+fetch> [return] ok 6882 - our %x; local %x; use strict; $x{a}->{b} = 1 <+fetch> [variable] ok 6883 - our %x; local %x; no strict; $x{a}->{b} = 1 <+fetch> [exception] ok 6884 - our %x; local %x; no strict; $x{a}->{b} = 1 <+fetch> [return] ok 6885 - our %x; local %x; no strict; $x{a}->{b} = 1 <+fetch> [variable] ok 6886 - my $x; $x->{a}->{b} = 1 <+exists> [exception] ok 6887 - my $x; $x->{a}->{b} = 1 <+exists> [return] ok 6888 - my $x; $x->{a}->{b} = 1 <+exists> [variable] ok 6889 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+exists> [exception] ok 6890 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+exists> [return] ok 6891 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+exists> [variable] ok 6892 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+exists> [exception] ok 6893 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+exists> [return] ok 6894 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+exists> [variable] ok 6895 - my $x; $$x{a}->{b} = 1 <+exists> [exception] ok 6896 - my $x; $$x{a}->{b} = 1 <+exists> [return] ok 6897 - my $x; $$x{a}->{b} = 1 <+exists> [variable] ok 6898 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+exists> [exception] ok 6899 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+exists> [return] ok 6900 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+exists> [variable] ok 6901 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+exists> [exception] ok 6902 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+exists> [return] ok 6903 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+exists> [variable] ok 6904 - my %x; $x{a}->{b} = 1 <+exists> [exception] ok 6905 - my %x; $x{a}->{b} = 1 <+exists> [return] ok 6906 - my %x; $x{a}->{b} = 1 <+exists> [variable] ok 6907 - our %x; local %x; use strict; $x{a}->{b} = 1 <+exists> [exception] ok 6908 - our %x; local %x; use strict; $x{a}->{b} = 1 <+exists> [return] ok 6909 - our %x; local %x; use strict; $x{a}->{b} = 1 <+exists> [variable] ok 6910 - our %x; local %x; no strict; $x{a}->{b} = 1 <+exists> [exception] ok 6911 - our %x; local %x; no strict; $x{a}->{b} = 1 <+exists> [return] ok 6912 - our %x; local %x; no strict; $x{a}->{b} = 1 <+exists> [variable] ok 6913 - my $x; $x->{a}->{b} = 1 <+delete> [exception] ok 6914 - my $x; $x->{a}->{b} = 1 <+delete> [return] ok 6915 - my $x; $x->{a}->{b} = 1 <+delete> [variable] ok 6916 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+delete> [exception] ok 6917 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+delete> [return] ok 6918 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+delete> [variable] ok 6919 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+delete> [exception] ok 6920 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+delete> [return] ok 6921 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+delete> [variable] ok 6922 - my $x; $$x{a}->{b} = 1 <+delete> [exception] ok 6923 - my $x; $$x{a}->{b} = 1 <+delete> [return] ok 6924 - my $x; $$x{a}->{b} = 1 <+delete> [variable] ok 6925 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+delete> [exception] ok 6926 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+delete> [return] ok 6927 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+delete> [variable] ok 6928 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+delete> [exception] ok 6929 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+delete> [return] ok 6930 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+delete> [variable] ok 6931 - my %x; $x{a}->{b} = 1 <+delete> [exception] ok 6932 - my %x; $x{a}->{b} = 1 <+delete> [return] ok 6933 - my %x; $x{a}->{b} = 1 <+delete> [variable] ok 6934 - our %x; local %x; use strict; $x{a}->{b} = 1 <+delete> [exception] ok 6935 - our %x; local %x; use strict; $x{a}->{b} = 1 <+delete> [return] ok 6936 - our %x; local %x; use strict; $x{a}->{b} = 1 <+delete> [variable] ok 6937 - our %x; local %x; no strict; $x{a}->{b} = 1 <+delete> [exception] ok 6938 - our %x; local %x; no strict; $x{a}->{b} = 1 <+delete> [return] ok 6939 - our %x; local %x; no strict; $x{a}->{b} = 1 <+delete> [variable] ok 6940 - my $x; $x->{a}->{b} = 1 <+store> [exception] ok 6941 - my $x; $x->{a}->{b} = 1 <+store> [return] ok 6942 - my $x; $x->{a}->{b} = 1 <+store> [variable] ok 6943 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+store> [exception] ok 6944 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+store> [return] ok 6945 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+store> [variable] ok 6946 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+store> [exception] ok 6947 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+store> [return] ok 6948 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+store> [variable] ok 6949 - my $x; $$x{a}->{b} = 1 <+store> [exception] ok 6950 - my $x; $$x{a}->{b} = 1 <+store> [return] ok 6951 - my $x; $$x{a}->{b} = 1 <+store> [variable] ok 6952 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+store> [exception] ok 6953 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+store> [return] ok 6954 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+store> [variable] ok 6955 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+store> [exception] ok 6956 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+store> [return] ok 6957 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+store> [variable] ok 6958 - my %x; $x{a}->{b} = 1 <+store> [exception] ok 6959 - my %x; $x{a}->{b} = 1 <+store> [return] ok 6960 - my %x; $x{a}->{b} = 1 <+store> [variable] ok 6961 - our %x; local %x; use strict; $x{a}->{b} = 1 <+store> [exception] ok 6962 - our %x; local %x; use strict; $x{a}->{b} = 1 <+store> [return] ok 6963 - our %x; local %x; use strict; $x{a}->{b} = 1 <+store> [variable] ok 6964 - our %x; local %x; no strict; $x{a}->{b} = 1 <+store> [exception] ok 6965 - our %x; local %x; no strict; $x{a}->{b} = 1 <+store> [return] ok 6966 - our %x; local %x; no strict; $x{a}->{b} = 1 <+store> [variable] ok 6967 - my $x; $x->{a}->{b} = 1 <+strict +fetch> [exception] ok 6968 - my $x; $x->{a}->{b} = 1 <+strict +fetch> [return] ok 6969 - my $x; $x->{a}->{b} = 1 <+strict +fetch> [variable] ok 6970 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+strict +fetch> [exception] ok 6971 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+strict +fetch> [return] ok 6972 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+strict +fetch> [variable] ok 6973 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+strict +fetch> [exception] ok 6974 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+strict +fetch> [return] ok 6975 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+strict +fetch> [variable] ok 6976 - my $x; $$x{a}->{b} = 1 <+strict +fetch> [exception] ok 6977 - my $x; $$x{a}->{b} = 1 <+strict +fetch> [return] ok 6978 - my $x; $$x{a}->{b} = 1 <+strict +fetch> [variable] ok 6979 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+strict +fetch> [exception] ok 6980 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+strict +fetch> [return] ok 6981 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+strict +fetch> [variable] ok 6982 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+strict +fetch> [exception] ok 6983 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+strict +fetch> [return] ok 6984 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+strict +fetch> [variable] ok 6985 - my %x; $x{a}->{b} = 1 <+strict +fetch> [exception] ok 6986 - my %x; $x{a}->{b} = 1 <+strict +fetch> [return] ok 6987 - my %x; $x{a}->{b} = 1 <+strict +fetch> [variable] ok 6988 - our %x; local %x; use strict; $x{a}->{b} = 1 <+strict +fetch> [exception] ok 6989 - our %x; local %x; use strict; $x{a}->{b} = 1 <+strict +fetch> [return] ok 6990 - our %x; local %x; use strict; $x{a}->{b} = 1 <+strict +fetch> [variable] ok 6991 - our %x; local %x; no strict; $x{a}->{b} = 1 <+strict +fetch> [exception] ok 6992 - our %x; local %x; no strict; $x{a}->{b} = 1 <+strict +fetch> [return] ok 6993 - our %x; local %x; no strict; $x{a}->{b} = 1 <+strict +fetch> [variable] ok 6994 - my $x; $x->{a}->{b} = 1 <+strict +exists> [exception] ok 6995 - my $x; $x->{a}->{b} = 1 <+strict +exists> [return] ok 6996 - my $x; $x->{a}->{b} = 1 <+strict +exists> [variable] ok 6997 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+strict +exists> [exception] ok 6998 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+strict +exists> [return] ok 6999 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+strict +exists> [variable] ok 7000 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+strict +exists> [exception] ok 7001 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+strict +exists> [return] ok 7002 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+strict +exists> [variable] ok 7003 - my $x; $$x{a}->{b} = 1 <+strict +exists> [exception] ok 7004 - my $x; $$x{a}->{b} = 1 <+strict +exists> [return] ok 7005 - my $x; $$x{a}->{b} = 1 <+strict +exists> [variable] ok 7006 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+strict +exists> [exception] ok 7007 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+strict +exists> [return] ok 7008 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+strict +exists> [variable] ok 7009 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+strict +exists> [exception] ok 7010 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+strict +exists> [return] ok 7011 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+strict +exists> [variable] ok 7012 - my %x; $x{a}->{b} = 1 <+strict +exists> [exception] ok 7013 - my %x; $x{a}->{b} = 1 <+strict +exists> [return] ok 7014 - my %x; $x{a}->{b} = 1 <+strict +exists> [variable] ok 7015 - our %x; local %x; use strict; $x{a}->{b} = 1 <+strict +exists> [exception] ok 7016 - our %x; local %x; use strict; $x{a}->{b} = 1 <+strict +exists> [return] ok 7017 - our %x; local %x; use strict; $x{a}->{b} = 1 <+strict +exists> [variable] ok 7018 - our %x; local %x; no strict; $x{a}->{b} = 1 <+strict +exists> [exception] ok 7019 - our %x; local %x; no strict; $x{a}->{b} = 1 <+strict +exists> [return] ok 7020 - our %x; local %x; no strict; $x{a}->{b} = 1 <+strict +exists> [variable] ok 7021 - my $x; $x->{a}->{b} = 1 <+strict +delete> [exception] ok 7022 - my $x; $x->{a}->{b} = 1 <+strict +delete> [return] ok 7023 - my $x; $x->{a}->{b} = 1 <+strict +delete> [variable] ok 7024 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+strict +delete> [exception] ok 7025 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+strict +delete> [return] ok 7026 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+strict +delete> [variable] ok 7027 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+strict +delete> [exception] ok 7028 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+strict +delete> [return] ok 7029 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+strict +delete> [variable] ok 7030 - my $x; $$x{a}->{b} = 1 <+strict +delete> [exception] ok 7031 - my $x; $$x{a}->{b} = 1 <+strict +delete> [return] ok 7032 - my $x; $$x{a}->{b} = 1 <+strict +delete> [variable] ok 7033 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+strict +delete> [exception] ok 7034 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+strict +delete> [return] ok 7035 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+strict +delete> [variable] ok 7036 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+strict +delete> [exception] ok 7037 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+strict +delete> [return] ok 7038 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+strict +delete> [variable] ok 7039 - my %x; $x{a}->{b} = 1 <+strict +delete> [exception] ok 7040 - my %x; $x{a}->{b} = 1 <+strict +delete> [return] ok 7041 - my %x; $x{a}->{b} = 1 <+strict +delete> [variable] ok 7042 - our %x; local %x; use strict; $x{a}->{b} = 1 <+strict +delete> [exception] ok 7043 - our %x; local %x; use strict; $x{a}->{b} = 1 <+strict +delete> [return] ok 7044 - our %x; local %x; use strict; $x{a}->{b} = 1 <+strict +delete> [variable] ok 7045 - our %x; local %x; no strict; $x{a}->{b} = 1 <+strict +delete> [exception] ok 7046 - our %x; local %x; no strict; $x{a}->{b} = 1 <+strict +delete> [return] ok 7047 - our %x; local %x; no strict; $x{a}->{b} = 1 <+strict +delete> [variable] ok 7048 - my $x; $x->{a}->{b} = 1 <+strict +store> [exception] ok 7049 - my $x; $x->{a}->{b} = 1 <+strict +store> [return] ok 7050 - my $x; $x->{a}->{b} = 1 <+strict +store> [variable] ok 7051 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+strict +store> [exception] ok 7052 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+strict +store> [return] ok 7053 - our $x; local $x; use strict; $x->{a}->{b} = 1 <+strict +store> [variable] ok 7054 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+strict +store> [exception] ok 7055 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+strict +store> [return] ok 7056 - our $x; local $x; no strict; $x->{a}->{b} = 1 <+strict +store> [variable] ok 7057 - my $x; $$x{a}->{b} = 1 <+strict +store> [exception] ok 7058 - my $x; $$x{a}->{b} = 1 <+strict +store> [return] ok 7059 - my $x; $$x{a}->{b} = 1 <+strict +store> [variable] ok 7060 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+strict +store> [exception] ok 7061 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+strict +store> [return] ok 7062 - our $x; local $x; use strict; $$x{a}->{b} = 1 <+strict +store> [variable] ok 7063 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+strict +store> [exception] ok 7064 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+strict +store> [return] ok 7065 - our $x; local $x; no strict; $$x{a}->{b} = 1 <+strict +store> [variable] ok 7066 - my %x; $x{a}->{b} = 1 <+strict +store> [exception] ok 7067 - my %x; $x{a}->{b} = 1 <+strict +store> [return] ok 7068 - my %x; $x{a}->{b} = 1 <+strict +store> [variable] ok 7069 - our %x; local %x; use strict; $x{a}->{b} = 1 <+strict +store> [exception] ok 7070 - our %x; local %x; use strict; $x{a}->{b} = 1 <+strict +store> [return] ok 7071 - our %x; local %x; use strict; $x{a}->{b} = 1 <+strict +store> [variable] ok 7072 - our %x; local %x; no strict; $x{a}->{b} = 1 <+strict +store> [exception] ok 7073 - our %x; local %x; no strict; $x{a}->{b} = 1 <+strict +store> [return] ok 7074 - our %x; local %x; no strict; $x{a}->{b} = 1 <+strict +store> [variable] ok 7075 - my $x; $x->{a} = 1; $x->{a} = 2 <+fetch> [exception] ok 7076 - my $x; $x->{a} = 1; $x->{a} = 2 <+fetch> [return] ok 7077 - my $x; $x->{a} = 1; $x->{a} = 2 <+fetch> [variable] ok 7078 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+fetch> [exception] ok 7079 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+fetch> [return] ok 7080 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+fetch> [variable] ok 7081 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+fetch> [exception] ok 7082 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+fetch> [return] ok 7083 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+fetch> [variable] ok 7084 - my $x; $x->{a} = 1; $$x{a} = 2 <+fetch> [exception] ok 7085 - my $x; $x->{a} = 1; $$x{a} = 2 <+fetch> [return] ok 7086 - my $x; $x->{a} = 1; $$x{a} = 2 <+fetch> [variable] ok 7087 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+fetch> [exception] ok 7088 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+fetch> [return] ok 7089 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+fetch> [variable] ok 7090 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+fetch> [exception] ok 7091 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+fetch> [return] ok 7092 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+fetch> [variable] ok 7093 - my %x; $x{a} = 1; $x{a} = 2 <+fetch> [exception] ok 7094 - my %x; $x{a} = 1; $x{a} = 2 <+fetch> [return] ok 7095 - my %x; $x{a} = 1; $x{a} = 2 <+fetch> [variable] ok 7096 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+fetch> [exception] ok 7097 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+fetch> [return] ok 7098 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+fetch> [variable] ok 7099 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+fetch> [exception] ok 7100 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+fetch> [return] ok 7101 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+fetch> [variable] ok 7102 - my $x; $x->{a} = 1; $x->{b} = 2 <+fetch> [exception] ok 7103 - my $x; $x->{a} = 1; $x->{b} = 2 <+fetch> [return] ok 7104 - my $x; $x->{a} = 1; $x->{b} = 2 <+fetch> [variable] ok 7105 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+fetch> [exception] ok 7106 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+fetch> [return] ok 7107 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+fetch> [variable] ok 7108 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+fetch> [exception] ok 7109 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+fetch> [return] ok 7110 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+fetch> [variable] ok 7111 - my $x; $x->{a} = 1; $$x{b} = 2 <+fetch> [exception] ok 7112 - my $x; $x->{a} = 1; $$x{b} = 2 <+fetch> [return] ok 7113 - my $x; $x->{a} = 1; $$x{b} = 2 <+fetch> [variable] ok 7114 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+fetch> [exception] ok 7115 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+fetch> [return] ok 7116 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+fetch> [variable] ok 7117 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+fetch> [exception] ok 7118 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+fetch> [return] ok 7119 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+fetch> [variable] ok 7120 - my %x; $x{a} = 1; $x{b} = 2 <+fetch> [exception] ok 7121 - my %x; $x{a} = 1; $x{b} = 2 <+fetch> [return] ok 7122 - my %x; $x{a} = 1; $x{b} = 2 <+fetch> [variable] ok 7123 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+fetch> [exception] ok 7124 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+fetch> [return] ok 7125 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+fetch> [variable] ok 7126 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+fetch> [exception] ok 7127 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+fetch> [return] ok 7128 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+fetch> [variable] ok 7129 - my $x; $x->{a} = 1; $x->{a} = 2 <+exists> [exception] ok 7130 - my $x; $x->{a} = 1; $x->{a} = 2 <+exists> [return] ok 7131 - my $x; $x->{a} = 1; $x->{a} = 2 <+exists> [variable] ok 7132 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+exists> [exception] ok 7133 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+exists> [return] ok 7134 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+exists> [variable] ok 7135 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+exists> [exception] ok 7136 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+exists> [return] ok 7137 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+exists> [variable] ok 7138 - my $x; $x->{a} = 1; $$x{a} = 2 <+exists> [exception] ok 7139 - my $x; $x->{a} = 1; $$x{a} = 2 <+exists> [return] ok 7140 - my $x; $x->{a} = 1; $$x{a} = 2 <+exists> [variable] ok 7141 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+exists> [exception] ok 7142 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+exists> [return] ok 7143 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+exists> [variable] ok 7144 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+exists> [exception] ok 7145 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+exists> [return] ok 7146 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+exists> [variable] ok 7147 - my %x; $x{a} = 1; $x{a} = 2 <+exists> [exception] ok 7148 - my %x; $x{a} = 1; $x{a} = 2 <+exists> [return] ok 7149 - my %x; $x{a} = 1; $x{a} = 2 <+exists> [variable] ok 7150 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+exists> [exception] ok 7151 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+exists> [return] ok 7152 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+exists> [variable] ok 7153 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+exists> [exception] ok 7154 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+exists> [return] ok 7155 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+exists> [variable] ok 7156 - my $x; $x->{a} = 1; $x->{b} = 2 <+exists> [exception] ok 7157 - my $x; $x->{a} = 1; $x->{b} = 2 <+exists> [return] ok 7158 - my $x; $x->{a} = 1; $x->{b} = 2 <+exists> [variable] ok 7159 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+exists> [exception] ok 7160 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+exists> [return] ok 7161 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+exists> [variable] ok 7162 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+exists> [exception] ok 7163 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+exists> [return] ok 7164 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+exists> [variable] ok 7165 - my $x; $x->{a} = 1; $$x{b} = 2 <+exists> [exception] ok 7166 - my $x; $x->{a} = 1; $$x{b} = 2 <+exists> [return] ok 7167 - my $x; $x->{a} = 1; $$x{b} = 2 <+exists> [variable] ok 7168 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+exists> [exception] ok 7169 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+exists> [return] ok 7170 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+exists> [variable] ok 7171 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+exists> [exception] ok 7172 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+exists> [return] ok 7173 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+exists> [variable] ok 7174 - my %x; $x{a} = 1; $x{b} = 2 <+exists> [exception] ok 7175 - my %x; $x{a} = 1; $x{b} = 2 <+exists> [return] ok 7176 - my %x; $x{a} = 1; $x{b} = 2 <+exists> [variable] ok 7177 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+exists> [exception] ok 7178 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+exists> [return] ok 7179 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+exists> [variable] ok 7180 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+exists> [exception] ok 7181 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+exists> [return] ok 7182 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+exists> [variable] ok 7183 - my $x; $x->{a} = 1; $x->{a} = 2 <+delete> [exception] ok 7184 - my $x; $x->{a} = 1; $x->{a} = 2 <+delete> [return] ok 7185 - my $x; $x->{a} = 1; $x->{a} = 2 <+delete> [variable] ok 7186 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+delete> [exception] ok 7187 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+delete> [return] ok 7188 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+delete> [variable] ok 7189 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+delete> [exception] ok 7190 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+delete> [return] ok 7191 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+delete> [variable] ok 7192 - my $x; $x->{a} = 1; $$x{a} = 2 <+delete> [exception] ok 7193 - my $x; $x->{a} = 1; $$x{a} = 2 <+delete> [return] ok 7194 - my $x; $x->{a} = 1; $$x{a} = 2 <+delete> [variable] ok 7195 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+delete> [exception] ok 7196 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+delete> [return] ok 7197 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+delete> [variable] ok 7198 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+delete> [exception] ok 7199 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+delete> [return] ok 7200 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+delete> [variable] ok 7201 - my %x; $x{a} = 1; $x{a} = 2 <+delete> [exception] ok 7202 - my %x; $x{a} = 1; $x{a} = 2 <+delete> [return] ok 7203 - my %x; $x{a} = 1; $x{a} = 2 <+delete> [variable] ok 7204 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+delete> [exception] ok 7205 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+delete> [return] ok 7206 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+delete> [variable] ok 7207 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+delete> [exception] ok 7208 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+delete> [return] ok 7209 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+delete> [variable] ok 7210 - my $x; $x->{a} = 1; $x->{b} = 2 <+delete> [exception] ok 7211 - my $x; $x->{a} = 1; $x->{b} = 2 <+delete> [return] ok 7212 - my $x; $x->{a} = 1; $x->{b} = 2 <+delete> [variable] ok 7213 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+delete> [exception] ok 7214 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+delete> [return] ok 7215 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+delete> [variable] ok 7216 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+delete> [exception] ok 7217 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+delete> [return] ok 7218 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+delete> [variable] ok 7219 - my $x; $x->{a} = 1; $$x{b} = 2 <+delete> [exception] ok 7220 - my $x; $x->{a} = 1; $$x{b} = 2 <+delete> [return] ok 7221 - my $x; $x->{a} = 1; $$x{b} = 2 <+delete> [variable] ok 7222 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+delete> [exception] ok 7223 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+delete> [return] ok 7224 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+delete> [variable] ok 7225 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+delete> [exception] ok 7226 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+delete> [return] ok 7227 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+delete> [variable] ok 7228 - my %x; $x{a} = 1; $x{b} = 2 <+delete> [exception] ok 7229 - my %x; $x{a} = 1; $x{b} = 2 <+delete> [return] ok 7230 - my %x; $x{a} = 1; $x{b} = 2 <+delete> [variable] ok 7231 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+delete> [exception] ok 7232 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+delete> [return] ok 7233 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+delete> [variable] ok 7234 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+delete> [exception] ok 7235 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+delete> [return] ok 7236 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+delete> [variable] ok 7237 - my $x; $x->{a} = 1; $x->{a} = 2 <+store> [exception] ok 7238 - my $x; $x->{a} = 1; $x->{a} = 2 <+store> [return] ok 7239 - my $x; $x->{a} = 1; $x->{a} = 2 <+store> [variable] ok 7240 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+store> [exception] ok 7241 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+store> [return] ok 7242 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+store> [variable] ok 7243 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+store> [exception] ok 7244 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+store> [return] ok 7245 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+store> [variable] ok 7246 - my $x; $x->{a} = 1; $$x{a} = 2 <+store> [exception] ok 7247 - my $x; $x->{a} = 1; $$x{a} = 2 <+store> [return] ok 7248 - my $x; $x->{a} = 1; $$x{a} = 2 <+store> [variable] ok 7249 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+store> [exception] ok 7250 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+store> [return] ok 7251 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+store> [variable] ok 7252 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+store> [exception] ok 7253 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+store> [return] ok 7254 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+store> [variable] ok 7255 - my %x; $x{a} = 1; $x{a} = 2 <+store> [exception] ok 7256 - my %x; $x{a} = 1; $x{a} = 2 <+store> [return] ok 7257 - my %x; $x{a} = 1; $x{a} = 2 <+store> [variable] ok 7258 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+store> [exception] ok 7259 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+store> [return] ok 7260 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+store> [variable] ok 7261 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+store> [exception] ok 7262 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+store> [return] ok 7263 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+store> [variable] ok 7264 - my $x; $x->{a} = 1; $x->{b} = 2 <+store> [exception] ok 7265 - my $x; $x->{a} = 1; $x->{b} = 2 <+store> [return] ok 7266 - my $x; $x->{a} = 1; $x->{b} = 2 <+store> [variable] ok 7267 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+store> [exception] ok 7268 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+store> [return] ok 7269 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+store> [variable] ok 7270 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+store> [exception] ok 7271 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+store> [return] ok 7272 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+store> [variable] ok 7273 - my $x; $x->{a} = 1; $$x{b} = 2 <+store> [exception] ok 7274 - my $x; $x->{a} = 1; $$x{b} = 2 <+store> [return] ok 7275 - my $x; $x->{a} = 1; $$x{b} = 2 <+store> [variable] ok 7276 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+store> [exception] ok 7277 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+store> [return] ok 7278 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+store> [variable] ok 7279 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+store> [exception] ok 7280 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+store> [return] ok 7281 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+store> [variable] ok 7282 - my %x; $x{a} = 1; $x{b} = 2 <+store> [exception] ok 7283 - my %x; $x{a} = 1; $x{b} = 2 <+store> [return] ok 7284 - my %x; $x{a} = 1; $x{b} = 2 <+store> [variable] ok 7285 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+store> [exception] ok 7286 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+store> [return] ok 7287 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+store> [variable] ok 7288 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+store> [exception] ok 7289 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+store> [return] ok 7290 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+store> [variable] ok 7291 - my $x; $x->{a} = 1; $x->{a} = 2 <+strict +fetch> [exception] ok 7292 - my $x; $x->{a} = 1; $x->{a} = 2 <+strict +fetch> [return] ok 7293 - my $x; $x->{a} = 1; $x->{a} = 2 <+strict +fetch> [variable] ok 7294 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+strict +fetch> [exception] ok 7295 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+strict +fetch> [return] ok 7296 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+strict +fetch> [variable] ok 7297 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+strict +fetch> [exception] ok 7298 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+strict +fetch> [return] ok 7299 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+strict +fetch> [variable] ok 7300 - my $x; $x->{a} = 1; $$x{a} = 2 <+strict +fetch> [exception] ok 7301 - my $x; $x->{a} = 1; $$x{a} = 2 <+strict +fetch> [return] ok 7302 - my $x; $x->{a} = 1; $$x{a} = 2 <+strict +fetch> [variable] ok 7303 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+strict +fetch> [exception] ok 7304 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+strict +fetch> [return] ok 7305 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+strict +fetch> [variable] ok 7306 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+strict +fetch> [exception] ok 7307 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+strict +fetch> [return] ok 7308 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+strict +fetch> [variable] ok 7309 - my %x; $x{a} = 1; $x{a} = 2 <+strict +fetch> [exception] ok 7310 - my %x; $x{a} = 1; $x{a} = 2 <+strict +fetch> [return] ok 7311 - my %x; $x{a} = 1; $x{a} = 2 <+strict +fetch> [variable] ok 7312 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+strict +fetch> [exception] ok 7313 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+strict +fetch> [return] ok 7314 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+strict +fetch> [variable] ok 7315 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+strict +fetch> [exception] ok 7316 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+strict +fetch> [return] ok 7317 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+strict +fetch> [variable] ok 7318 - my $x; $x->{a} = 1; $x->{b} = 2 <+strict +fetch> [exception] ok 7319 - my $x; $x->{a} = 1; $x->{b} = 2 <+strict +fetch> [return] ok 7320 - my $x; $x->{a} = 1; $x->{b} = 2 <+strict +fetch> [variable] ok 7321 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+strict +fetch> [exception] ok 7322 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+strict +fetch> [return] ok 7323 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+strict +fetch> [variable] ok 7324 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+strict +fetch> [exception] ok 7325 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+strict +fetch> [return] ok 7326 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+strict +fetch> [variable] ok 7327 - my $x; $x->{a} = 1; $$x{b} = 2 <+strict +fetch> [exception] ok 7328 - my $x; $x->{a} = 1; $$x{b} = 2 <+strict +fetch> [return] ok 7329 - my $x; $x->{a} = 1; $$x{b} = 2 <+strict +fetch> [variable] ok 7330 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+strict +fetch> [exception] ok 7331 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+strict +fetch> [return] ok 7332 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+strict +fetch> [variable] ok 7333 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+strict +fetch> [exception] ok 7334 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+strict +fetch> [return] ok 7335 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+strict +fetch> [variable] ok 7336 - my %x; $x{a} = 1; $x{b} = 2 <+strict +fetch> [exception] ok 7337 - my %x; $x{a} = 1; $x{b} = 2 <+strict +fetch> [return] ok 7338 - my %x; $x{a} = 1; $x{b} = 2 <+strict +fetch> [variable] ok 7339 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+strict +fetch> [exception] ok 7340 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+strict +fetch> [return] ok 7341 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+strict +fetch> [variable] ok 7342 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+strict +fetch> [exception] ok 7343 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+strict +fetch> [return] ok 7344 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+strict +fetch> [variable] ok 7345 - my $x; $x->{a} = 1; $x->{a} = 2 <+strict +exists> [exception] ok 7346 - my $x; $x->{a} = 1; $x->{a} = 2 <+strict +exists> [return] ok 7347 - my $x; $x->{a} = 1; $x->{a} = 2 <+strict +exists> [variable] ok 7348 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+strict +exists> [exception] ok 7349 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+strict +exists> [return] ok 7350 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+strict +exists> [variable] ok 7351 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+strict +exists> [exception] ok 7352 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+strict +exists> [return] ok 7353 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+strict +exists> [variable] ok 7354 - my $x; $x->{a} = 1; $$x{a} = 2 <+strict +exists> [exception] ok 7355 - my $x; $x->{a} = 1; $$x{a} = 2 <+strict +exists> [return] ok 7356 - my $x; $x->{a} = 1; $$x{a} = 2 <+strict +exists> [variable] ok 7357 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+strict +exists> [exception] ok 7358 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+strict +exists> [return] ok 7359 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+strict +exists> [variable] ok 7360 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+strict +exists> [exception] ok 7361 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+strict +exists> [return] ok 7362 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+strict +exists> [variable] ok 7363 - my %x; $x{a} = 1; $x{a} = 2 <+strict +exists> [exception] ok 7364 - my %x; $x{a} = 1; $x{a} = 2 <+strict +exists> [return] ok 7365 - my %x; $x{a} = 1; $x{a} = 2 <+strict +exists> [variable] ok 7366 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+strict +exists> [exception] ok 7367 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+strict +exists> [return] ok 7368 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+strict +exists> [variable] ok 7369 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+strict +exists> [exception] ok 7370 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+strict +exists> [return] ok 7371 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+strict +exists> [variable] ok 7372 - my $x; $x->{a} = 1; $x->{b} = 2 <+strict +exists> [exception] ok 7373 - my $x; $x->{a} = 1; $x->{b} = 2 <+strict +exists> [return] ok 7374 - my $x; $x->{a} = 1; $x->{b} = 2 <+strict +exists> [variable] ok 7375 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+strict +exists> [exception] ok 7376 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+strict +exists> [return] ok 7377 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+strict +exists> [variable] ok 7378 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+strict +exists> [exception] ok 7379 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+strict +exists> [return] ok 7380 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+strict +exists> [variable] ok 7381 - my $x; $x->{a} = 1; $$x{b} = 2 <+strict +exists> [exception] ok 7382 - my $x; $x->{a} = 1; $$x{b} = 2 <+strict +exists> [return] ok 7383 - my $x; $x->{a} = 1; $$x{b} = 2 <+strict +exists> [variable] ok 7384 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+strict +exists> [exception] ok 7385 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+strict +exists> [return] ok 7386 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+strict +exists> [variable] ok 7387 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+strict +exists> [exception] ok 7388 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+strict +exists> [return] ok 7389 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+strict +exists> [variable] ok 7390 - my %x; $x{a} = 1; $x{b} = 2 <+strict +exists> [exception] ok 7391 - my %x; $x{a} = 1; $x{b} = 2 <+strict +exists> [return] ok 7392 - my %x; $x{a} = 1; $x{b} = 2 <+strict +exists> [variable] ok 7393 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+strict +exists> [exception] ok 7394 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+strict +exists> [return] ok 7395 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+strict +exists> [variable] ok 7396 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+strict +exists> [exception] ok 7397 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+strict +exists> [return] ok 7398 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+strict +exists> [variable] ok 7399 - my $x; $x->{a} = 1; $x->{a} = 2 <+strict +delete> [exception] ok 7400 - my $x; $x->{a} = 1; $x->{a} = 2 <+strict +delete> [return] ok 7401 - my $x; $x->{a} = 1; $x->{a} = 2 <+strict +delete> [variable] ok 7402 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+strict +delete> [exception] ok 7403 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+strict +delete> [return] ok 7404 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+strict +delete> [variable] ok 7405 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+strict +delete> [exception] ok 7406 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+strict +delete> [return] ok 7407 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+strict +delete> [variable] ok 7408 - my $x; $x->{a} = 1; $$x{a} = 2 <+strict +delete> [exception] ok 7409 - my $x; $x->{a} = 1; $$x{a} = 2 <+strict +delete> [return] ok 7410 - my $x; $x->{a} = 1; $$x{a} = 2 <+strict +delete> [variable] ok 7411 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+strict +delete> [exception] ok 7412 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+strict +delete> [return] ok 7413 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+strict +delete> [variable] ok 7414 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+strict +delete> [exception] ok 7415 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+strict +delete> [return] ok 7416 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+strict +delete> [variable] ok 7417 - my %x; $x{a} = 1; $x{a} = 2 <+strict +delete> [exception] ok 7418 - my %x; $x{a} = 1; $x{a} = 2 <+strict +delete> [return] ok 7419 - my %x; $x{a} = 1; $x{a} = 2 <+strict +delete> [variable] ok 7420 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+strict +delete> [exception] ok 7421 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+strict +delete> [return] ok 7422 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+strict +delete> [variable] ok 7423 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+strict +delete> [exception] ok 7424 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+strict +delete> [return] ok 7425 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+strict +delete> [variable] ok 7426 - my $x; $x->{a} = 1; $x->{b} = 2 <+strict +delete> [exception] ok 7427 - my $x; $x->{a} = 1; $x->{b} = 2 <+strict +delete> [return] ok 7428 - my $x; $x->{a} = 1; $x->{b} = 2 <+strict +delete> [variable] ok 7429 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+strict +delete> [exception] ok 7430 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+strict +delete> [return] ok 7431 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+strict +delete> [variable] ok 7432 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+strict +delete> [exception] ok 7433 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+strict +delete> [return] ok 7434 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+strict +delete> [variable] ok 7435 - my $x; $x->{a} = 1; $$x{b} = 2 <+strict +delete> [exception] ok 7436 - my $x; $x->{a} = 1; $$x{b} = 2 <+strict +delete> [return] ok 7437 - my $x; $x->{a} = 1; $$x{b} = 2 <+strict +delete> [variable] ok 7438 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+strict +delete> [exception] ok 7439 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+strict +delete> [return] ok 7440 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+strict +delete> [variable] ok 7441 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+strict +delete> [exception] ok 7442 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+strict +delete> [return] ok 7443 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+strict +delete> [variable] ok 7444 - my %x; $x{a} = 1; $x{b} = 2 <+strict +delete> [exception] ok 7445 - my %x; $x{a} = 1; $x{b} = 2 <+strict +delete> [return] ok 7446 - my %x; $x{a} = 1; $x{b} = 2 <+strict +delete> [variable] ok 7447 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+strict +delete> [exception] ok 7448 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+strict +delete> [return] ok 7449 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+strict +delete> [variable] ok 7450 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+strict +delete> [exception] ok 7451 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+strict +delete> [return] ok 7452 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+strict +delete> [variable] ok 7453 - my $x; $x->{a} = 1; $x->{a} = 2 <+strict +store> [exception] ok 7454 - my $x; $x->{a} = 1; $x->{a} = 2 <+strict +store> [return] ok 7455 - my $x; $x->{a} = 1; $x->{a} = 2 <+strict +store> [variable] ok 7456 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+strict +store> [exception] ok 7457 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+strict +store> [return] ok 7458 - our $x; local $x; use strict; $x->{a} = 1; $x->{a} = 2 <+strict +store> [variable] ok 7459 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+strict +store> [exception] ok 7460 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+strict +store> [return] ok 7461 - our $x; local $x; no strict; $x->{a} = 1; $x->{a} = 2 <+strict +store> [variable] ok 7462 - my $x; $x->{a} = 1; $$x{a} = 2 <+strict +store> [exception] ok 7463 - my $x; $x->{a} = 1; $$x{a} = 2 <+strict +store> [return] ok 7464 - my $x; $x->{a} = 1; $$x{a} = 2 <+strict +store> [variable] ok 7465 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+strict +store> [exception] ok 7466 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+strict +store> [return] ok 7467 - our $x; local $x; use strict; $x->{a} = 1; $$x{a} = 2 <+strict +store> [variable] ok 7468 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+strict +store> [exception] ok 7469 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+strict +store> [return] ok 7470 - our $x; local $x; no strict; $x->{a} = 1; $$x{a} = 2 <+strict +store> [variable] ok 7471 - my %x; $x{a} = 1; $x{a} = 2 <+strict +store> [exception] ok 7472 - my %x; $x{a} = 1; $x{a} = 2 <+strict +store> [return] ok 7473 - my %x; $x{a} = 1; $x{a} = 2 <+strict +store> [variable] ok 7474 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+strict +store> [exception] ok 7475 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+strict +store> [return] ok 7476 - our %x; local %x; use strict; $x{a} = 1; $x{a} = 2 <+strict +store> [variable] ok 7477 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+strict +store> [exception] ok 7478 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+strict +store> [return] ok 7479 - our %x; local %x; no strict; $x{a} = 1; $x{a} = 2 <+strict +store> [variable] ok 7480 - my $x; $x->{a} = 1; $x->{b} = 2 <+strict +store> [exception] ok 7481 - my $x; $x->{a} = 1; $x->{b} = 2 <+strict +store> [return] ok 7482 - my $x; $x->{a} = 1; $x->{b} = 2 <+strict +store> [variable] ok 7483 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+strict +store> [exception] ok 7484 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+strict +store> [return] ok 7485 - our $x; local $x; use strict; $x->{a} = 1; $x->{b} = 2 <+strict +store> [variable] ok 7486 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+strict +store> [exception] ok 7487 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+strict +store> [return] ok 7488 - our $x; local $x; no strict; $x->{a} = 1; $x->{b} = 2 <+strict +store> [variable] ok 7489 - my $x; $x->{a} = 1; $$x{b} = 2 <+strict +store> [exception] ok 7490 - my $x; $x->{a} = 1; $$x{b} = 2 <+strict +store> [return] ok 7491 - my $x; $x->{a} = 1; $$x{b} = 2 <+strict +store> [variable] ok 7492 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+strict +store> [exception] ok 7493 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+strict +store> [return] ok 7494 - our $x; local $x; use strict; $x->{a} = 1; $$x{b} = 2 <+strict +store> [variable] ok 7495 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+strict +store> [exception] ok 7496 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+strict +store> [return] ok 7497 - our $x; local $x; no strict; $x->{a} = 1; $$x{b} = 2 <+strict +store> [variable] ok 7498 - my %x; $x{a} = 1; $x{b} = 2 <+strict +store> [exception] ok 7499 - my %x; $x{a} = 1; $x{b} = 2 <+strict +store> [return] ok 7500 - my %x; $x{a} = 1; $x{b} = 2 <+strict +store> [variable] ok 7501 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+strict +store> [exception] ok 7502 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+strict +store> [return] ok 7503 - our %x; local %x; use strict; $x{a} = 1; $x{b} = 2 <+strict +store> [variable] ok 7504 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+strict +store> [exception] ok 7505 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+strict +store> [return] ok 7506 - our %x; local %x; no strict; $x{a} = 1; $x{b} = 2 <+strict +store> [variable] ok 7507 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+fetch> [exception] ok 7508 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+fetch> [return] ok 7509 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+fetch> [variable] ok 7510 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+fetch> [exception] ok 7511 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+fetch> [return] ok 7512 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+fetch> [variable] ok 7513 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+fetch> [exception] ok 7514 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+fetch> [return] ok 7515 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+fetch> [variable] ok 7516 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+fetch> [exception] ok 7517 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+fetch> [return] ok 7518 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+fetch> [variable] ok 7519 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+fetch> [exception] ok 7520 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+fetch> [return] ok 7521 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+fetch> [variable] ok 7522 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+fetch> [exception] ok 7523 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+fetch> [return] ok 7524 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+fetch> [variable] ok 7525 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+fetch> [exception] ok 7526 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+fetch> [return] ok 7527 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+fetch> [variable] ok 7528 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+fetch> [exception] ok 7529 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+fetch> [return] ok 7530 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+fetch> [variable] ok 7531 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+fetch> [exception] ok 7532 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+fetch> [return] ok 7533 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+fetch> [variable] ok 7534 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+fetch> [exception] ok 7535 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+fetch> [return] ok 7536 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+fetch> [variable] ok 7537 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+fetch> [exception] ok 7538 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+fetch> [return] ok 7539 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+fetch> [variable] ok 7540 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+fetch> [exception] ok 7541 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+fetch> [return] ok 7542 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+fetch> [variable] ok 7543 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+fetch> [exception] ok 7544 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+fetch> [return] ok 7545 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+fetch> [variable] ok 7546 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+fetch> [exception] ok 7547 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+fetch> [return] ok 7548 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+fetch> [variable] ok 7549 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+fetch> [exception] ok 7550 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+fetch> [return] ok 7551 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+fetch> [variable] ok 7552 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+fetch> [exception] ok 7553 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+fetch> [return] ok 7554 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+fetch> [variable] ok 7555 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+fetch> [exception] ok 7556 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+fetch> [return] ok 7557 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+fetch> [variable] ok 7558 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+fetch> [exception] ok 7559 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+fetch> [return] ok 7560 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+fetch> [variable] ok 7561 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+fetch> [exception] ok 7562 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+fetch> [return] ok 7563 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+fetch> [variable] ok 7564 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+fetch> [exception] ok 7565 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+fetch> [return] ok 7566 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+fetch> [variable] ok 7567 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+fetch> [exception] ok 7568 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+fetch> [return] ok 7569 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+fetch> [variable] ok 7570 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+fetch> [exception] ok 7571 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+fetch> [return] ok 7572 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+fetch> [variable] ok 7573 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+fetch> [exception] ok 7574 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+fetch> [return] ok 7575 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+fetch> [variable] ok 7576 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+fetch> [exception] ok 7577 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+fetch> [return] ok 7578 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+fetch> [variable] ok 7579 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+fetch> [exception] ok 7580 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+fetch> [return] ok 7581 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+fetch> [variable] ok 7582 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+fetch> [exception] ok 7583 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+fetch> [return] ok 7584 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+fetch> [variable] ok 7585 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+fetch> [exception] ok 7586 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+fetch> [return] ok 7587 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+fetch> [variable] ok 7588 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+exists> [exception] ok 7589 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+exists> [return] ok 7590 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+exists> [variable] ok 7591 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+exists> [exception] ok 7592 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+exists> [return] ok 7593 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+exists> [variable] ok 7594 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+exists> [exception] ok 7595 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+exists> [return] ok 7596 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+exists> [variable] ok 7597 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+exists> [exception] ok 7598 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+exists> [return] ok 7599 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+exists> [variable] ok 7600 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+exists> [exception] ok 7601 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+exists> [return] ok 7602 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+exists> [variable] ok 7603 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+exists> [exception] ok 7604 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+exists> [return] ok 7605 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+exists> [variable] ok 7606 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+exists> [exception] ok 7607 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+exists> [return] ok 7608 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+exists> [variable] ok 7609 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+exists> [exception] ok 7610 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+exists> [return] ok 7611 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+exists> [variable] ok 7612 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+exists> [exception] ok 7613 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+exists> [return] ok 7614 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+exists> [variable] ok 7615 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+exists> [exception] ok 7616 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+exists> [return] ok 7617 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+exists> [variable] ok 7618 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+exists> [exception] ok 7619 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+exists> [return] ok 7620 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+exists> [variable] ok 7621 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+exists> [exception] ok 7622 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+exists> [return] ok 7623 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+exists> [variable] ok 7624 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+exists> [exception] ok 7625 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+exists> [return] ok 7626 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+exists> [variable] ok 7627 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+exists> [exception] ok 7628 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+exists> [return] ok 7629 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+exists> [variable] ok 7630 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+exists> [exception] ok 7631 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+exists> [return] ok 7632 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+exists> [variable] ok 7633 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+exists> [exception] ok 7634 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+exists> [return] ok 7635 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+exists> [variable] ok 7636 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+exists> [exception] ok 7637 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+exists> [return] ok 7638 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+exists> [variable] ok 7639 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+exists> [exception] ok 7640 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+exists> [return] ok 7641 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+exists> [variable] ok 7642 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+exists> [exception] ok 7643 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+exists> [return] ok 7644 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+exists> [variable] ok 7645 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+exists> [exception] ok 7646 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+exists> [return] ok 7647 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+exists> [variable] ok 7648 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+exists> [exception] ok 7649 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+exists> [return] ok 7650 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+exists> [variable] ok 7651 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+exists> [exception] ok 7652 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+exists> [return] ok 7653 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+exists> [variable] ok 7654 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+exists> [exception] ok 7655 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+exists> [return] ok 7656 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+exists> [variable] ok 7657 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+exists> [exception] ok 7658 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+exists> [return] ok 7659 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+exists> [variable] ok 7660 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+exists> [exception] ok 7661 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+exists> [return] ok 7662 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+exists> [variable] ok 7663 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+exists> [exception] ok 7664 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+exists> [return] ok 7665 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+exists> [variable] ok 7666 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+exists> [exception] ok 7667 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+exists> [return] ok 7668 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+exists> [variable] ok 7669 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+delete> [exception] ok 7670 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+delete> [return] ok 7671 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+delete> [variable] ok 7672 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+delete> [exception] ok 7673 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+delete> [return] ok 7674 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+delete> [variable] ok 7675 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+delete> [exception] ok 7676 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+delete> [return] ok 7677 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+delete> [variable] ok 7678 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+delete> [exception] ok 7679 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+delete> [return] ok 7680 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+delete> [variable] ok 7681 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+delete> [exception] ok 7682 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+delete> [return] ok 7683 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+delete> [variable] ok 7684 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+delete> [exception] ok 7685 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+delete> [return] ok 7686 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+delete> [variable] ok 7687 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+delete> [exception] ok 7688 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+delete> [return] ok 7689 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+delete> [variable] ok 7690 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+delete> [exception] ok 7691 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+delete> [return] ok 7692 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+delete> [variable] ok 7693 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+delete> [exception] ok 7694 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+delete> [return] ok 7695 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+delete> [variable] ok 7696 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+delete> [exception] ok 7697 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+delete> [return] ok 7698 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+delete> [variable] ok 7699 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+delete> [exception] ok 7700 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+delete> [return] ok 7701 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+delete> [variable] ok 7702 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+delete> [exception] ok 7703 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+delete> [return] ok 7704 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+delete> [variable] ok 7705 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+delete> [exception] ok 7706 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+delete> [return] ok 7707 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+delete> [variable] ok 7708 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+delete> [exception] ok 7709 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+delete> [return] ok 7710 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+delete> [variable] ok 7711 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+delete> [exception] ok 7712 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+delete> [return] ok 7713 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+delete> [variable] ok 7714 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+delete> [exception] ok 7715 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+delete> [return] ok 7716 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+delete> [variable] ok 7717 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+delete> [exception] ok 7718 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+delete> [return] ok 7719 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+delete> [variable] ok 7720 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+delete> [exception] ok 7721 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+delete> [return] ok 7722 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+delete> [variable] ok 7723 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+delete> [exception] ok 7724 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+delete> [return] ok 7725 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+delete> [variable] ok 7726 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+delete> [exception] ok 7727 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+delete> [return] ok 7728 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+delete> [variable] ok 7729 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+delete> [exception] ok 7730 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+delete> [return] ok 7731 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+delete> [variable] ok 7732 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+delete> [exception] ok 7733 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+delete> [return] ok 7734 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+delete> [variable] ok 7735 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+delete> [exception] ok 7736 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+delete> [return] ok 7737 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+delete> [variable] ok 7738 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+delete> [exception] ok 7739 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+delete> [return] ok 7740 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+delete> [variable] ok 7741 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+delete> [exception] ok 7742 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+delete> [return] ok 7743 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+delete> [variable] ok 7744 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+delete> [exception] ok 7745 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+delete> [return] ok 7746 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+delete> [variable] ok 7747 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+delete> [exception] ok 7748 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+delete> [return] ok 7749 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+delete> [variable] ok 7750 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+store> [exception] ok 7751 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+store> [return] ok 7752 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+store> [variable] ok 7753 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+store> [exception] ok 7754 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+store> [return] ok 7755 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+store> [variable] ok 7756 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+store> [exception] ok 7757 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+store> [return] ok 7758 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+store> [variable] ok 7759 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+store> [exception] ok 7760 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+store> [return] ok 7761 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+store> [variable] ok 7762 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+store> [exception] ok 7763 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+store> [return] ok 7764 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+store> [variable] ok 7765 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+store> [exception] ok 7766 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+store> [return] ok 7767 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+store> [variable] ok 7768 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+store> [exception] ok 7769 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+store> [return] ok 7770 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+store> [variable] ok 7771 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+store> [exception] ok 7772 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+store> [return] ok 7773 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+store> [variable] ok 7774 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+store> [exception] ok 7775 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+store> [return] ok 7776 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+store> [variable] ok 7777 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+store> [exception] ok 7778 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+store> [return] ok 7779 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+store> [variable] ok 7780 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+store> [exception] ok 7781 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+store> [return] ok 7782 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+store> [variable] ok 7783 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+store> [exception] ok 7784 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+store> [return] ok 7785 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+store> [variable] ok 7786 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+store> [exception] ok 7787 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+store> [return] ok 7788 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+store> [variable] ok 7789 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+store> [exception] ok 7790 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+store> [return] ok 7791 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+store> [variable] ok 7792 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+store> [exception] ok 7793 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+store> [return] ok 7794 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+store> [variable] ok 7795 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+store> [exception] ok 7796 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+store> [return] ok 7797 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+store> [variable] ok 7798 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+store> [exception] ok 7799 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+store> [return] ok 7800 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+store> [variable] ok 7801 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+store> [exception] ok 7802 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+store> [return] ok 7803 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+store> [variable] ok 7804 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+store> [exception] ok 7805 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+store> [return] ok 7806 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+store> [variable] ok 7807 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+store> [exception] ok 7808 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+store> [return] ok 7809 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+store> [variable] ok 7810 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+store> [exception] ok 7811 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+store> [return] ok 7812 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+store> [variable] ok 7813 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+store> [exception] ok 7814 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+store> [return] ok 7815 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+store> [variable] ok 7816 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+store> [exception] ok 7817 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+store> [return] ok 7818 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+store> [variable] ok 7819 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+store> [exception] ok 7820 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+store> [return] ok 7821 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+store> [variable] ok 7822 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+store> [exception] ok 7823 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+store> [return] ok 7824 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+store> [variable] ok 7825 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+store> [exception] ok 7826 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+store> [return] ok 7827 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+store> [variable] ok 7828 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+store> [exception] ok 7829 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+store> [return] ok 7830 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+store> [variable] ok 7831 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +fetch> [exception] ok 7832 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +fetch> [return] ok 7833 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +fetch> [variable] ok 7834 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +fetch> [exception] ok 7835 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +fetch> [return] ok 7836 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +fetch> [variable] ok 7837 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +fetch> [exception] ok 7838 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +fetch> [return] ok 7839 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +fetch> [variable] ok 7840 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +fetch> [exception] ok 7841 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +fetch> [return] ok 7842 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +fetch> [variable] ok 7843 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +fetch> [exception] ok 7844 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +fetch> [return] ok 7845 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +fetch> [variable] ok 7846 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +fetch> [exception] ok 7847 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +fetch> [return] ok 7848 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +fetch> [variable] ok 7849 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +fetch> [exception] ok 7850 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +fetch> [return] ok 7851 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +fetch> [variable] ok 7852 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +fetch> [exception] ok 7853 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +fetch> [return] ok 7854 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +fetch> [variable] ok 7855 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +fetch> [exception] ok 7856 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +fetch> [return] ok 7857 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +fetch> [variable] ok 7858 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +fetch> [exception] ok 7859 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +fetch> [return] ok 7860 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +fetch> [variable] ok 7861 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +fetch> [exception] ok 7862 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +fetch> [return] ok 7863 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +fetch> [variable] ok 7864 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +fetch> [exception] ok 7865 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +fetch> [return] ok 7866 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +fetch> [variable] ok 7867 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +fetch> [exception] ok 7868 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +fetch> [return] ok 7869 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +fetch> [variable] ok 7870 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +fetch> [exception] ok 7871 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +fetch> [return] ok 7872 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +fetch> [variable] ok 7873 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +fetch> [exception] ok 7874 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +fetch> [return] ok 7875 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +fetch> [variable] ok 7876 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +fetch> [exception] ok 7877 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +fetch> [return] ok 7878 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +fetch> [variable] ok 7879 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +fetch> [exception] ok 7880 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +fetch> [return] ok 7881 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +fetch> [variable] ok 7882 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +fetch> [exception] ok 7883 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +fetch> [return] ok 7884 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +fetch> [variable] ok 7885 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +fetch> [exception] ok 7886 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +fetch> [return] ok 7887 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +fetch> [variable] ok 7888 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +fetch> [exception] ok 7889 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +fetch> [return] ok 7890 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +fetch> [variable] ok 7891 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +fetch> [exception] ok 7892 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +fetch> [return] ok 7893 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +fetch> [variable] ok 7894 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +fetch> [exception] ok 7895 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +fetch> [return] ok 7896 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +fetch> [variable] ok 7897 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +fetch> [exception] ok 7898 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +fetch> [return] ok 7899 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +fetch> [variable] ok 7900 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +fetch> [exception] ok 7901 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +fetch> [return] ok 7902 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +fetch> [variable] ok 7903 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +fetch> [exception] ok 7904 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +fetch> [return] ok 7905 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +fetch> [variable] ok 7906 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +fetch> [exception] ok 7907 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +fetch> [return] ok 7908 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +fetch> [variable] ok 7909 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +fetch> [exception] ok 7910 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +fetch> [return] ok 7911 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +fetch> [variable] ok 7912 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +exists> [exception] ok 7913 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +exists> [return] ok 7914 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +exists> [variable] ok 7915 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +exists> [exception] ok 7916 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +exists> [return] ok 7917 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +exists> [variable] ok 7918 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +exists> [exception] ok 7919 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +exists> [return] ok 7920 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +exists> [variable] ok 7921 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +exists> [exception] ok 7922 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +exists> [return] ok 7923 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +exists> [variable] ok 7924 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +exists> [exception] ok 7925 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +exists> [return] ok 7926 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +exists> [variable] ok 7927 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +exists> [exception] ok 7928 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +exists> [return] ok 7929 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +exists> [variable] ok 7930 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +exists> [exception] ok 7931 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +exists> [return] ok 7932 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +exists> [variable] ok 7933 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +exists> [exception] ok 7934 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +exists> [return] ok 7935 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +exists> [variable] ok 7936 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +exists> [exception] ok 7937 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +exists> [return] ok 7938 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +exists> [variable] ok 7939 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +exists> [exception] ok 7940 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +exists> [return] ok 7941 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +exists> [variable] ok 7942 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +exists> [exception] ok 7943 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +exists> [return] ok 7944 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +exists> [variable] ok 7945 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +exists> [exception] ok 7946 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +exists> [return] ok 7947 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +exists> [variable] ok 7948 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +exists> [exception] ok 7949 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +exists> [return] ok 7950 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +exists> [variable] ok 7951 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +exists> [exception] ok 7952 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +exists> [return] ok 7953 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +exists> [variable] ok 7954 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +exists> [exception] ok 7955 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +exists> [return] ok 7956 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +exists> [variable] ok 7957 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +exists> [exception] ok 7958 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +exists> [return] ok 7959 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +exists> [variable] ok 7960 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +exists> [exception] ok 7961 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +exists> [return] ok 7962 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +exists> [variable] ok 7963 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +exists> [exception] ok 7964 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +exists> [return] ok 7965 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +exists> [variable] ok 7966 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +exists> [exception] ok 7967 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +exists> [return] ok 7968 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +exists> [variable] ok 7969 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +exists> [exception] ok 7970 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +exists> [return] ok 7971 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +exists> [variable] ok 7972 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +exists> [exception] ok 7973 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +exists> [return] ok 7974 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +exists> [variable] ok 7975 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +exists> [exception] ok 7976 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +exists> [return] ok 7977 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +exists> [variable] ok 7978 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +exists> [exception] ok 7979 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +exists> [return] ok 7980 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +exists> [variable] ok 7981 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +exists> [exception] ok 7982 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +exists> [return] ok 7983 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +exists> [variable] ok 7984 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +exists> [exception] ok 7985 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +exists> [return] ok 7986 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +exists> [variable] ok 7987 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +exists> [exception] ok 7988 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +exists> [return] ok 7989 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +exists> [variable] ok 7990 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +exists> [exception] ok 7991 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +exists> [return] ok 7992 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +exists> [variable] ok 7993 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +delete> [exception] ok 7994 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +delete> [return] ok 7995 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +delete> [variable] ok 7996 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +delete> [exception] ok 7997 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +delete> [return] ok 7998 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +delete> [variable] ok 7999 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +delete> [exception] ok 8000 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +delete> [return] ok 8001 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +delete> [variable] ok 8002 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +delete> [exception] ok 8003 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +delete> [return] ok 8004 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +delete> [variable] ok 8005 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +delete> [exception] ok 8006 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +delete> [return] ok 8007 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +delete> [variable] ok 8008 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +delete> [exception] ok 8009 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +delete> [return] ok 8010 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +delete> [variable] ok 8011 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +delete> [exception] ok 8012 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +delete> [return] ok 8013 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +delete> [variable] ok 8014 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +delete> [exception] ok 8015 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +delete> [return] ok 8016 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +delete> [variable] ok 8017 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +delete> [exception] ok 8018 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +delete> [return] ok 8019 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +delete> [variable] ok 8020 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +delete> [exception] ok 8021 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +delete> [return] ok 8022 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +delete> [variable] ok 8023 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +delete> [exception] ok 8024 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +delete> [return] ok 8025 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +delete> [variable] ok 8026 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +delete> [exception] ok 8027 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +delete> [return] ok 8028 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +delete> [variable] ok 8029 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +delete> [exception] ok 8030 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +delete> [return] ok 8031 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +delete> [variable] ok 8032 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +delete> [exception] ok 8033 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +delete> [return] ok 8034 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +delete> [variable] ok 8035 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +delete> [exception] ok 8036 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +delete> [return] ok 8037 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +delete> [variable] ok 8038 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +delete> [exception] ok 8039 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +delete> [return] ok 8040 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +delete> [variable] ok 8041 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +delete> [exception] ok 8042 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +delete> [return] ok 8043 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +delete> [variable] ok 8044 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +delete> [exception] ok 8045 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +delete> [return] ok 8046 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +delete> [variable] ok 8047 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +delete> [exception] ok 8048 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +delete> [return] ok 8049 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +delete> [variable] ok 8050 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +delete> [exception] ok 8051 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +delete> [return] ok 8052 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +delete> [variable] ok 8053 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +delete> [exception] ok 8054 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +delete> [return] ok 8055 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +delete> [variable] ok 8056 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +delete> [exception] ok 8057 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +delete> [return] ok 8058 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +delete> [variable] ok 8059 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +delete> [exception] ok 8060 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +delete> [return] ok 8061 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +delete> [variable] ok 8062 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +delete> [exception] ok 8063 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +delete> [return] ok 8064 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +delete> [variable] ok 8065 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +delete> [exception] ok 8066 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +delete> [return] ok 8067 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +delete> [variable] ok 8068 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +delete> [exception] ok 8069 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +delete> [return] ok 8070 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +delete> [variable] ok 8071 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +delete> [exception] ok 8072 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +delete> [return] ok 8073 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +delete> [variable] ok 8074 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +store> [exception] ok 8075 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +store> [return] ok 8076 - my $x; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +store> [variable] ok 8077 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +store> [exception] ok 8078 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +store> [return] ok 8079 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +store> [variable] ok 8080 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +store> [exception] ok 8081 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +store> [return] ok 8082 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{b} = 2 <+strict +store> [variable] ok 8083 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +store> [exception] ok 8084 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +store> [return] ok 8085 - my $x; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +store> [variable] ok 8086 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +store> [exception] ok 8087 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +store> [return] ok 8088 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +store> [variable] ok 8089 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +store> [exception] ok 8090 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +store> [return] ok 8091 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{b} = 2 <+strict +store> [variable] ok 8092 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +store> [exception] ok 8093 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +store> [return] ok 8094 - my %x; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +store> [variable] ok 8095 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +store> [exception] ok 8096 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +store> [return] ok 8097 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +store> [variable] ok 8098 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +store> [exception] ok 8099 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +store> [return] ok 8100 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{b} = 2 <+strict +store> [variable] ok 8101 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +store> [exception] ok 8102 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +store> [return] ok 8103 - my $x; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +store> [variable] ok 8104 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +store> [exception] ok 8105 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +store> [return] ok 8106 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +store> [variable] ok 8107 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +store> [exception] ok 8108 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +store> [return] ok 8109 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{a}->{d} = 2 <+strict +store> [variable] ok 8110 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +store> [exception] ok 8111 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +store> [return] ok 8112 - my $x; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +store> [variable] ok 8113 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +store> [exception] ok 8114 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +store> [return] ok 8115 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +store> [variable] ok 8116 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +store> [exception] ok 8117 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +store> [return] ok 8118 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{a}->{d} = 2 <+strict +store> [variable] ok 8119 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +store> [exception] ok 8120 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +store> [return] ok 8121 - my %x; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +store> [variable] ok 8122 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +store> [exception] ok 8123 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +store> [return] ok 8124 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +store> [variable] ok 8125 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +store> [exception] ok 8126 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +store> [return] ok 8127 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{a}->{d} = 2 <+strict +store> [variable] ok 8128 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +store> [exception] ok 8129 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +store> [return] ok 8130 - my $x; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +store> [variable] ok 8131 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +store> [exception] ok 8132 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +store> [return] ok 8133 - our $x; local $x; use strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +store> [variable] ok 8134 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +store> [exception] ok 8135 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +store> [return] ok 8136 - our $x; local $x; no strict; $x->{a}->{b} = 1; $x->{c}->{d} = 2 <+strict +store> [variable] ok 8137 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +store> [exception] ok 8138 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +store> [return] ok 8139 - my $x; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +store> [variable] ok 8140 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +store> [exception] ok 8141 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +store> [return] ok 8142 - our $x; local $x; use strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +store> [variable] ok 8143 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +store> [exception] ok 8144 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +store> [return] ok 8145 - our $x; local $x; no strict; $x->{a}->{b} = 1; $$x{c}->{d} = 2 <+strict +store> [variable] ok 8146 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +store> [exception] ok 8147 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +store> [return] ok 8148 - my %x; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +store> [variable] ok 8149 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +store> [exception] ok 8150 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +store> [return] ok 8151 - our %x; local %x; use strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +store> [variable] ok 8152 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +store> [exception] ok 8153 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +store> [return] ok 8154 - our %x; local %x; no strict; $x{a}->{b} = 1; $x{c}->{d} = 2 <+strict +store> [variable] ok t/22-hash-kv.t ............ 1..1728 ok 1 - my $x; keys %$x [exception] ok 2 - my $x; keys %$x [return] ok 3 - my $x; keys %$x [variable] ok 4 - our $x; local $x; use strict; keys %$x [exception] ok 5 - our $x; local $x; use strict; keys %$x [return] ok 6 - our $x; local $x; use strict; keys %$x [variable] ok 7 - our $x; local $x; no strict; keys %$x [exception] ok 8 - our $x; local $x; no strict; keys %$x [return] ok 9 - our $x; local $x; no strict; keys %$x [variable] ok 10 - my $x; keys %$x [exception] ok 11 - my $x; keys %$x [return] ok 12 - my $x; keys %$x [variable] ok 13 - our $x; local $x; use strict; keys %$x [exception] ok 14 - our $x; local $x; use strict; keys %$x [return] ok 15 - our $x; local $x; use strict; keys %$x [variable] ok 16 - our $x; local $x; no strict; keys %$x [exception] ok 17 - our $x; local $x; no strict; keys %$x [return] ok 18 - our $x; local $x; no strict; keys %$x [variable] ok 19 - my %x; keys %x [exception] ok 20 - my %x; keys %x [return] ok 21 - my %x; keys %x [variable] ok 22 - our %x; local %x; use strict; keys %x [exception] ok 23 - our %x; local %x; use strict; keys %x [return] ok 24 - our %x; local %x; use strict; keys %x [variable] ok 25 - our %x; local %x; no strict; keys %x [exception] ok 26 - our %x; local %x; no strict; keys %x [return] ok 27 - our %x; local %x; no strict; keys %x [variable] ok 28 - my $x; keys %$x [exception] ok 29 - my $x; keys %$x [return] ok 30 - my $x; keys %$x [variable] ok 31 - our $x; local $x; use strict; keys %$x [exception] ok 32 - our $x; local $x; use strict; keys %$x [return] ok 33 - our $x; local $x; use strict; keys %$x [variable] ok 34 - our $x; local $x; no strict; keys %$x [exception] ok 35 - our $x; local $x; no strict; keys %$x [return] ok 36 - our $x; local $x; no strict; keys %$x [variable] ok 37 - my $x; keys %$x [exception] ok 38 - my $x; keys %$x [return] ok 39 - my $x; keys %$x [variable] ok 40 - our $x; local $x; use strict; keys %$x [exception] ok 41 - our $x; local $x; use strict; keys %$x [return] ok 42 - our $x; local $x; use strict; keys %$x [variable] ok 43 - our $x; local $x; no strict; keys %$x [exception] ok 44 - our $x; local $x; no strict; keys %$x [return] ok 45 - our $x; local $x; no strict; keys %$x [variable] ok 46 - my %x; keys %x [exception] ok 47 - my %x; keys %x [return] ok 48 - my %x; keys %x [variable] ok 49 - our %x; local %x; use strict; keys %x [exception] ok 50 - our %x; local %x; use strict; keys %x [return] ok 51 - our %x; local %x; use strict; keys %x [variable] ok 52 - our %x; local %x; no strict; keys %x [exception] ok 53 - our %x; local %x; no strict; keys %x [return] ok 54 - our %x; local %x; no strict; keys %x [variable] ok 55 - my $x; keys %$x <+fetch> [exception] ok 56 - my $x; keys %$x <+fetch> [return] ok 57 - my $x; keys %$x <+fetch> [variable] ok 58 - our $x; local $x; use strict; keys %$x <+fetch> [exception] ok 59 - our $x; local $x; use strict; keys %$x <+fetch> [return] ok 60 - our $x; local $x; use strict; keys %$x <+fetch> [variable] ok 61 - our $x; local $x; no strict; keys %$x <+fetch> [exception] ok 62 - our $x; local $x; no strict; keys %$x <+fetch> [return] ok 63 - our $x; local $x; no strict; keys %$x <+fetch> [variable] ok 64 - my $x; keys %$x <+fetch> [exception] ok 65 - my $x; keys %$x <+fetch> [return] ok 66 - my $x; keys %$x <+fetch> [variable] ok 67 - our $x; local $x; use strict; keys %$x <+fetch> [exception] ok 68 - our $x; local $x; use strict; keys %$x <+fetch> [return] ok 69 - our $x; local $x; use strict; keys %$x <+fetch> [variable] ok 70 - our $x; local $x; no strict; keys %$x <+fetch> [exception] ok 71 - our $x; local $x; no strict; keys %$x <+fetch> [return] ok 72 - our $x; local $x; no strict; keys %$x <+fetch> [variable] ok 73 - my %x; keys %x <+fetch> [exception] ok 74 - my %x; keys %x <+fetch> [return] ok 75 - my %x; keys %x <+fetch> [variable] ok 76 - our %x; local %x; use strict; keys %x <+fetch> [exception] ok 77 - our %x; local %x; use strict; keys %x <+fetch> [return] ok 78 - our %x; local %x; use strict; keys %x <+fetch> [variable] ok 79 - our %x; local %x; no strict; keys %x <+fetch> [exception] ok 80 - our %x; local %x; no strict; keys %x <+fetch> [return] ok 81 - our %x; local %x; no strict; keys %x <+fetch> [variable] ok 82 - my $x; keys %$x <+exists> [exception] ok 83 - my $x; keys %$x <+exists> [return] ok 84 - my $x; keys %$x <+exists> [variable] ok 85 - our $x; local $x; use strict; keys %$x <+exists> [exception] ok 86 - our $x; local $x; use strict; keys %$x <+exists> [return] ok 87 - our $x; local $x; use strict; keys %$x <+exists> [variable] ok 88 - our $x; local $x; no strict; keys %$x <+exists> [exception] ok 89 - our $x; local $x; no strict; keys %$x <+exists> [return] ok 90 - our $x; local $x; no strict; keys %$x <+exists> [variable] ok 91 - my $x; keys %$x <+exists> [exception] ok 92 - my $x; keys %$x <+exists> [return] ok 93 - my $x; keys %$x <+exists> [variable] ok 94 - our $x; local $x; use strict; keys %$x <+exists> [exception] ok 95 - our $x; local $x; use strict; keys %$x <+exists> [return] ok 96 - our $x; local $x; use strict; keys %$x <+exists> [variable] ok 97 - our $x; local $x; no strict; keys %$x <+exists> [exception] ok 98 - our $x; local $x; no strict; keys %$x <+exists> [return] ok 99 - our $x; local $x; no strict; keys %$x <+exists> [variable] ok 100 - my %x; keys %x <+exists> [exception] ok 101 - my %x; keys %x <+exists> [return] ok 102 - my %x; keys %x <+exists> [variable] ok 103 - our %x; local %x; use strict; keys %x <+exists> [exception] ok 104 - our %x; local %x; use strict; keys %x <+exists> [return] ok 105 - our %x; local %x; use strict; keys %x <+exists> [variable] ok 106 - our %x; local %x; no strict; keys %x <+exists> [exception] ok 107 - our %x; local %x; no strict; keys %x <+exists> [return] ok 108 - our %x; local %x; no strict; keys %x <+exists> [variable] ok 109 - my $x; keys %$x <+delete> [exception] ok 110 - my $x; keys %$x <+delete> [return] ok 111 - my $x; keys %$x <+delete> [variable] ok 112 - our $x; local $x; use strict; keys %$x <+delete> [exception] ok 113 - our $x; local $x; use strict; keys %$x <+delete> [return] ok 114 - our $x; local $x; use strict; keys %$x <+delete> [variable] ok 115 - our $x; local $x; no strict; keys %$x <+delete> [exception] ok 116 - our $x; local $x; no strict; keys %$x <+delete> [return] ok 117 - our $x; local $x; no strict; keys %$x <+delete> [variable] ok 118 - my $x; keys %$x <+delete> [exception] ok 119 - my $x; keys %$x <+delete> [return] ok 120 - my $x; keys %$x <+delete> [variable] ok 121 - our $x; local $x; use strict; keys %$x <+delete> [exception] ok 122 - our $x; local $x; use strict; keys %$x <+delete> [return] ok 123 - our $x; local $x; use strict; keys %$x <+delete> [variable] ok 124 - our $x; local $x; no strict; keys %$x <+delete> [exception] ok 125 - our $x; local $x; no strict; keys %$x <+delete> [return] ok 126 - our $x; local $x; no strict; keys %$x <+delete> [variable] ok 127 - my %x; keys %x <+delete> [exception] ok 128 - my %x; keys %x <+delete> [return] ok 129 - my %x; keys %x <+delete> [variable] ok 130 - our %x; local %x; use strict; keys %x <+delete> [exception] ok 131 - our %x; local %x; use strict; keys %x <+delete> [return] ok 132 - our %x; local %x; use strict; keys %x <+delete> [variable] ok 133 - our %x; local %x; no strict; keys %x <+delete> [exception] ok 134 - our %x; local %x; no strict; keys %x <+delete> [return] ok 135 - our %x; local %x; no strict; keys %x <+delete> [variable] ok 136 - my $x; keys %$x <+store> [exception] ok 137 - my $x; keys %$x <+store> [return] ok 138 - my $x; keys %$x <+store> [variable] ok 139 - our $x; local $x; use strict; keys %$x <+store> [exception] ok 140 - our $x; local $x; use strict; keys %$x <+store> [return] ok 141 - our $x; local $x; use strict; keys %$x <+store> [variable] ok 142 - our $x; local $x; no strict; keys %$x <+store> [exception] ok 143 - our $x; local $x; no strict; keys %$x <+store> [return] ok 144 - our $x; local $x; no strict; keys %$x <+store> [variable] ok 145 - my $x; keys %$x <+store> [exception] ok 146 - my $x; keys %$x <+store> [return] ok 147 - my $x; keys %$x <+store> [variable] ok 148 - our $x; local $x; use strict; keys %$x <+store> [exception] ok 149 - our $x; local $x; use strict; keys %$x <+store> [return] ok 150 - our $x; local $x; use strict; keys %$x <+store> [variable] ok 151 - our $x; local $x; no strict; keys %$x <+store> [exception] ok 152 - our $x; local $x; no strict; keys %$x <+store> [return] ok 153 - our $x; local $x; no strict; keys %$x <+store> [variable] ok 154 - my %x; keys %x <+store> [exception] ok 155 - my %x; keys %x <+store> [return] ok 156 - my %x; keys %x <+store> [variable] ok 157 - our %x; local %x; use strict; keys %x <+store> [exception] ok 158 - our %x; local %x; use strict; keys %x <+store> [return] ok 159 - our %x; local %x; use strict; keys %x <+store> [variable] ok 160 - our %x; local %x; no strict; keys %x <+store> [exception] ok 161 - our %x; local %x; no strict; keys %x <+store> [return] ok 162 - our %x; local %x; no strict; keys %x <+store> [variable] ok 163 - my $x; keys %$x <+strict +fetch> [exception] ok 164 - my $x; keys %$x <+strict +fetch> [return] ok 165 - my $x; keys %$x <+strict +fetch> [variable] ok 166 - our $x; local $x; use strict; keys %$x <+strict +fetch> [exception] ok 167 - our $x; local $x; use strict; keys %$x <+strict +fetch> [return] ok 168 - our $x; local $x; use strict; keys %$x <+strict +fetch> [variable] ok 169 - our $x; local $x; no strict; keys %$x <+strict +fetch> [exception] ok 170 - our $x; local $x; no strict; keys %$x <+strict +fetch> [return] ok 171 - our $x; local $x; no strict; keys %$x <+strict +fetch> [variable] ok 172 - my $x; keys %$x <+strict +fetch> [exception] ok 173 - my $x; keys %$x <+strict +fetch> [return] ok 174 - my $x; keys %$x <+strict +fetch> [variable] ok 175 - our $x; local $x; use strict; keys %$x <+strict +fetch> [exception] ok 176 - our $x; local $x; use strict; keys %$x <+strict +fetch> [return] ok 177 - our $x; local $x; use strict; keys %$x <+strict +fetch> [variable] ok 178 - our $x; local $x; no strict; keys %$x <+strict +fetch> [exception] ok 179 - our $x; local $x; no strict; keys %$x <+strict +fetch> [return] ok 180 - our $x; local $x; no strict; keys %$x <+strict +fetch> [variable] ok 181 - my %x; 1 <+strict +fetch> [exception] ok 182 - my %x; 1 <+strict +fetch> [return] ok 183 - my %x; 1 <+strict +fetch> [variable] ok 184 - our %x; local %x; use strict; 1 <+strict +fetch> [exception] ok 185 - our %x; local %x; use strict; 1 <+strict +fetch> [return] ok 186 - our %x; local %x; use strict; 1 <+strict +fetch> [variable] ok 187 - our %x; local %x; no strict; 1 <+strict +fetch> [exception] ok 188 - our %x; local %x; no strict; 1 <+strict +fetch> [return] ok 189 - our %x; local %x; no strict; 1 <+strict +fetch> [variable] ok 190 - my $x; keys %$x <+strict +exists> [exception] ok 191 - my $x; keys %$x <+strict +exists> [return] ok 192 - my $x; keys %$x <+strict +exists> [variable] ok 193 - our $x; local $x; use strict; keys %$x <+strict +exists> [exception] ok 194 - our $x; local $x; use strict; keys %$x <+strict +exists> [return] ok 195 - our $x; local $x; use strict; keys %$x <+strict +exists> [variable] ok 196 - our $x; local $x; no strict; keys %$x <+strict +exists> [exception] ok 197 - our $x; local $x; no strict; keys %$x <+strict +exists> [return] ok 198 - our $x; local $x; no strict; keys %$x <+strict +exists> [variable] ok 199 - my $x; keys %$x <+strict +exists> [exception] ok 200 - my $x; keys %$x <+strict +exists> [return] ok 201 - my $x; keys %$x <+strict +exists> [variable] ok 202 - our $x; local $x; use strict; keys %$x <+strict +exists> [exception] ok 203 - our $x; local $x; use strict; keys %$x <+strict +exists> [return] ok 204 - our $x; local $x; use strict; keys %$x <+strict +exists> [variable] ok 205 - our $x; local $x; no strict; keys %$x <+strict +exists> [exception] ok 206 - our $x; local $x; no strict; keys %$x <+strict +exists> [return] ok 207 - our $x; local $x; no strict; keys %$x <+strict +exists> [variable] ok 208 - my %x; keys %x <+strict +exists> [exception] ok 209 - my %x; keys %x <+strict +exists> [return] ok 210 - my %x; keys %x <+strict +exists> [variable] ok 211 - our %x; local %x; use strict; keys %x <+strict +exists> [exception] ok 212 - our %x; local %x; use strict; keys %x <+strict +exists> [return] ok 213 - our %x; local %x; use strict; keys %x <+strict +exists> [variable] ok 214 - our %x; local %x; no strict; keys %x <+strict +exists> [exception] ok 215 - our %x; local %x; no strict; keys %x <+strict +exists> [return] ok 216 - our %x; local %x; no strict; keys %x <+strict +exists> [variable] ok 217 - my $x; keys %$x <+strict +delete> [exception] ok 218 - my $x; keys %$x <+strict +delete> [return] ok 219 - my $x; keys %$x <+strict +delete> [variable] ok 220 - our $x; local $x; use strict; keys %$x <+strict +delete> [exception] ok 221 - our $x; local $x; use strict; keys %$x <+strict +delete> [return] ok 222 - our $x; local $x; use strict; keys %$x <+strict +delete> [variable] ok 223 - our $x; local $x; no strict; keys %$x <+strict +delete> [exception] ok 224 - our $x; local $x; no strict; keys %$x <+strict +delete> [return] ok 225 - our $x; local $x; no strict; keys %$x <+strict +delete> [variable] ok 226 - my $x; keys %$x <+strict +delete> [exception] ok 227 - my $x; keys %$x <+strict +delete> [return] ok 228 - my $x; keys %$x <+strict +delete> [variable] ok 229 - our $x; local $x; use strict; keys %$x <+strict +delete> [exception] ok 230 - our $x; local $x; use strict; keys %$x <+strict +delete> [return] ok 231 - our $x; local $x; use strict; keys %$x <+strict +delete> [variable] ok 232 - our $x; local $x; no strict; keys %$x <+strict +delete> [exception] ok 233 - our $x; local $x; no strict; keys %$x <+strict +delete> [return] ok 234 - our $x; local $x; no strict; keys %$x <+strict +delete> [variable] ok 235 - my %x; keys %x <+strict +delete> [exception] ok 236 - my %x; keys %x <+strict +delete> [return] ok 237 - my %x; keys %x <+strict +delete> [variable] ok 238 - our %x; local %x; use strict; keys %x <+strict +delete> [exception] ok 239 - our %x; local %x; use strict; keys %x <+strict +delete> [return] ok 240 - our %x; local %x; use strict; keys %x <+strict +delete> [variable] ok 241 - our %x; local %x; no strict; keys %x <+strict +delete> [exception] ok 242 - our %x; local %x; no strict; keys %x <+strict +delete> [return] ok 243 - our %x; local %x; no strict; keys %x <+strict +delete> [variable] ok 244 - my $x; keys %$x <+strict +store> [exception] ok 245 - my $x; keys %$x <+strict +store> [return] ok 246 - my $x; keys %$x <+strict +store> [variable] ok 247 - our $x; local $x; use strict; keys %$x <+strict +store> [exception] ok 248 - our $x; local $x; use strict; keys %$x <+strict +store> [return] ok 249 - our $x; local $x; use strict; keys %$x <+strict +store> [variable] ok 250 - our $x; local $x; no strict; keys %$x <+strict +store> [exception] ok 251 - our $x; local $x; no strict; keys %$x <+strict +store> [return] ok 252 - our $x; local $x; no strict; keys %$x <+strict +store> [variable] ok 253 - my $x; keys %$x <+strict +store> [exception] ok 254 - my $x; keys %$x <+strict +store> [return] ok 255 - my $x; keys %$x <+strict +store> [variable] ok 256 - our $x; local $x; use strict; keys %$x <+strict +store> [exception] ok 257 - our $x; local $x; use strict; keys %$x <+strict +store> [return] ok 258 - our $x; local $x; use strict; keys %$x <+strict +store> [variable] ok 259 - our $x; local $x; no strict; keys %$x <+strict +store> [exception] ok 260 - our $x; local $x; no strict; keys %$x <+strict +store> [return] ok 261 - our $x; local $x; no strict; keys %$x <+strict +store> [variable] ok 262 - my %x; keys %x <+strict +store> [exception] ok 263 - my %x; keys %x <+strict +store> [return] ok 264 - my %x; keys %x <+strict +store> [variable] ok 265 - our %x; local %x; use strict; keys %x <+strict +store> [exception] ok 266 - our %x; local %x; use strict; keys %x <+strict +store> [return] ok 267 - our %x; local %x; use strict; keys %x <+strict +store> [variable] ok 268 - our %x; local %x; no strict; keys %x <+strict +store> [exception] ok 269 - our %x; local %x; no strict; keys %x <+strict +store> [return] ok 270 - our %x; local %x; no strict; keys %x <+strict +store> [variable] ok 271 - my $x; [ keys %$x ] [exception] ok 272 - my $x; [ keys %$x ] [return] ok 273 - my $x; [ keys %$x ] [variable] ok 274 - our $x; local $x; use strict; [ keys %$x ] [exception] ok 275 - our $x; local $x; use strict; [ keys %$x ] [return] ok 276 - our $x; local $x; use strict; [ keys %$x ] [variable] ok 277 - our $x; local $x; no strict; [ keys %$x ] [exception] ok 278 - our $x; local $x; no strict; [ keys %$x ] [return] ok 279 - our $x; local $x; no strict; [ keys %$x ] [variable] ok 280 - my $x; [ keys %$x ] [exception] ok 281 - my $x; [ keys %$x ] [return] ok 282 - my $x; [ keys %$x ] [variable] ok 283 - our $x; local $x; use strict; [ keys %$x ] [exception] ok 284 - our $x; local $x; use strict; [ keys %$x ] [return] ok 285 - our $x; local $x; use strict; [ keys %$x ] [variable] ok 286 - our $x; local $x; no strict; [ keys %$x ] [exception] ok 287 - our $x; local $x; no strict; [ keys %$x ] [return] ok 288 - our $x; local $x; no strict; [ keys %$x ] [variable] ok 289 - my %x; [ keys %x ] [exception] ok 290 - my %x; [ keys %x ] [return] ok 291 - my %x; [ keys %x ] [variable] ok 292 - our %x; local %x; use strict; [ keys %x ] [exception] ok 293 - our %x; local %x; use strict; [ keys %x ] [return] ok 294 - our %x; local %x; use strict; [ keys %x ] [variable] ok 295 - our %x; local %x; no strict; [ keys %x ] [exception] ok 296 - our %x; local %x; no strict; [ keys %x ] [return] ok 297 - our %x; local %x; no strict; [ keys %x ] [variable] ok 298 - my $x; [ keys %$x ] [exception] ok 299 - my $x; [ keys %$x ] [return] ok 300 - my $x; [ keys %$x ] [variable] ok 301 - our $x; local $x; use strict; [ keys %$x ] [exception] ok 302 - our $x; local $x; use strict; [ keys %$x ] [return] ok 303 - our $x; local $x; use strict; [ keys %$x ] [variable] ok 304 - our $x; local $x; no strict; [ keys %$x ] [exception] ok 305 - our $x; local $x; no strict; [ keys %$x ] [return] ok 306 - our $x; local $x; no strict; [ keys %$x ] [variable] ok 307 - my $x; [ keys %$x ] [exception] ok 308 - my $x; [ keys %$x ] [return] ok 309 - my $x; [ keys %$x ] [variable] ok 310 - our $x; local $x; use strict; [ keys %$x ] [exception] ok 311 - our $x; local $x; use strict; [ keys %$x ] [return] ok 312 - our $x; local $x; use strict; [ keys %$x ] [variable] ok 313 - our $x; local $x; no strict; [ keys %$x ] [exception] ok 314 - our $x; local $x; no strict; [ keys %$x ] [return] ok 315 - our $x; local $x; no strict; [ keys %$x ] [variable] ok 316 - my %x; [ keys %x ] [exception] ok 317 - my %x; [ keys %x ] [return] ok 318 - my %x; [ keys %x ] [variable] ok 319 - our %x; local %x; use strict; [ keys %x ] [exception] ok 320 - our %x; local %x; use strict; [ keys %x ] [return] ok 321 - our %x; local %x; use strict; [ keys %x ] [variable] ok 322 - our %x; local %x; no strict; [ keys %x ] [exception] ok 323 - our %x; local %x; no strict; [ keys %x ] [return] ok 324 - our %x; local %x; no strict; [ keys %x ] [variable] ok 325 - my $x; [ keys %$x ] <+fetch> [exception] ok 326 - my $x; [ keys %$x ] <+fetch> [return] ok 327 - my $x; [ keys %$x ] <+fetch> [variable] ok 328 - our $x; local $x; use strict; [ keys %$x ] <+fetch> [exception] ok 329 - our $x; local $x; use strict; [ keys %$x ] <+fetch> [return] ok 330 - our $x; local $x; use strict; [ keys %$x ] <+fetch> [variable] ok 331 - our $x; local $x; no strict; [ keys %$x ] <+fetch> [exception] ok 332 - our $x; local $x; no strict; [ keys %$x ] <+fetch> [return] ok 333 - our $x; local $x; no strict; [ keys %$x ] <+fetch> [variable] ok 334 - my $x; [ keys %$x ] <+fetch> [exception] ok 335 - my $x; [ keys %$x ] <+fetch> [return] ok 336 - my $x; [ keys %$x ] <+fetch> [variable] ok 337 - our $x; local $x; use strict; [ keys %$x ] <+fetch> [exception] ok 338 - our $x; local $x; use strict; [ keys %$x ] <+fetch> [return] ok 339 - our $x; local $x; use strict; [ keys %$x ] <+fetch> [variable] ok 340 - our $x; local $x; no strict; [ keys %$x ] <+fetch> [exception] ok 341 - our $x; local $x; no strict; [ keys %$x ] <+fetch> [return] ok 342 - our $x; local $x; no strict; [ keys %$x ] <+fetch> [variable] ok 343 - my %x; [ keys %x ] <+fetch> [exception] ok 344 - my %x; [ keys %x ] <+fetch> [return] ok 345 - my %x; [ keys %x ] <+fetch> [variable] ok 346 - our %x; local %x; use strict; [ keys %x ] <+fetch> [exception] ok 347 - our %x; local %x; use strict; [ keys %x ] <+fetch> [return] ok 348 - our %x; local %x; use strict; [ keys %x ] <+fetch> [variable] ok 349 - our %x; local %x; no strict; [ keys %x ] <+fetch> [exception] ok 350 - our %x; local %x; no strict; [ keys %x ] <+fetch> [return] ok 351 - our %x; local %x; no strict; [ keys %x ] <+fetch> [variable] ok 352 - my $x; [ keys %$x ] <+exists +delete +store> [exception] ok 353 - my $x; [ keys %$x ] <+exists +delete +store> [return] ok 354 - my $x; [ keys %$x ] <+exists +delete +store> [variable] ok 355 - our $x; local $x; use strict; [ keys %$x ] <+exists +delete +store> [exception] ok 356 - our $x; local $x; use strict; [ keys %$x ] <+exists +delete +store> [return] ok 357 - our $x; local $x; use strict; [ keys %$x ] <+exists +delete +store> [variable] ok 358 - our $x; local $x; no strict; [ keys %$x ] <+exists +delete +store> [exception] ok 359 - our $x; local $x; no strict; [ keys %$x ] <+exists +delete +store> [return] ok 360 - our $x; local $x; no strict; [ keys %$x ] <+exists +delete +store> [variable] ok 361 - my $x; [ keys %$x ] <+exists +delete +store> [exception] ok 362 - my $x; [ keys %$x ] <+exists +delete +store> [return] ok 363 - my $x; [ keys %$x ] <+exists +delete +store> [variable] ok 364 - our $x; local $x; use strict; [ keys %$x ] <+exists +delete +store> [exception] ok 365 - our $x; local $x; use strict; [ keys %$x ] <+exists +delete +store> [return] ok 366 - our $x; local $x; use strict; [ keys %$x ] <+exists +delete +store> [variable] ok 367 - our $x; local $x; no strict; [ keys %$x ] <+exists +delete +store> [exception] ok 368 - our $x; local $x; no strict; [ keys %$x ] <+exists +delete +store> [return] ok 369 - our $x; local $x; no strict; [ keys %$x ] <+exists +delete +store> [variable] ok 370 - my %x; [ keys %x ] <+exists +delete +store> [exception] ok 371 - my %x; [ keys %x ] <+exists +delete +store> [return] ok 372 - my %x; [ keys %x ] <+exists +delete +store> [variable] ok 373 - our %x; local %x; use strict; [ keys %x ] <+exists +delete +store> [exception] ok 374 - our %x; local %x; use strict; [ keys %x ] <+exists +delete +store> [return] ok 375 - our %x; local %x; use strict; [ keys %x ] <+exists +delete +store> [variable] ok 376 - our %x; local %x; no strict; [ keys %x ] <+exists +delete +store> [exception] ok 377 - our %x; local %x; no strict; [ keys %x ] <+exists +delete +store> [return] ok 378 - our %x; local %x; no strict; [ keys %x ] <+exists +delete +store> [variable] ok 379 - my $x; $x->{a} = 1; [ keys %$x ] [exception] ok 380 - my $x; $x->{a} = 1; [ keys %$x ] [return] ok 381 - my $x; $x->{a} = 1; [ keys %$x ] [variable] ok 382 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] [exception] ok 383 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] [return] ok 384 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] [variable] ok 385 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] [exception] ok 386 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] [return] ok 387 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] [variable] ok 388 - my $x; $x->{a} = 1; [ keys %$x ] [exception] ok 389 - my $x; $x->{a} = 1; [ keys %$x ] [return] ok 390 - my $x; $x->{a} = 1; [ keys %$x ] [variable] ok 391 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] [exception] ok 392 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] [return] ok 393 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] [variable] ok 394 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] [exception] ok 395 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] [return] ok 396 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] [variable] ok 397 - my %x; $x{a} = 1; [ keys %x ] [exception] ok 398 - my %x; $x{a} = 1; [ keys %x ] [return] ok 399 - my %x; $x{a} = 1; [ keys %x ] [variable] ok 400 - our %x; local %x; use strict; $x{a} = 1; [ keys %x ] [exception] ok 401 - our %x; local %x; use strict; $x{a} = 1; [ keys %x ] [return] ok 402 - our %x; local %x; use strict; $x{a} = 1; [ keys %x ] [variable] ok 403 - our %x; local %x; no strict; $x{a} = 1; [ keys %x ] [exception] ok 404 - our %x; local %x; no strict; $x{a} = 1; [ keys %x ] [return] ok 405 - our %x; local %x; no strict; $x{a} = 1; [ keys %x ] [variable] ok 406 - my $x; $x->{a} = 1; [ keys %$x ] [exception] ok 407 - my $x; $x->{a} = 1; [ keys %$x ] [return] ok 408 - my $x; $x->{a} = 1; [ keys %$x ] [variable] ok 409 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] [exception] ok 410 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] [return] ok 411 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] [variable] ok 412 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] [exception] ok 413 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] [return] ok 414 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] [variable] ok 415 - my $x; $x->{a} = 1; [ keys %$x ] [exception] ok 416 - my $x; $x->{a} = 1; [ keys %$x ] [return] ok 417 - my $x; $x->{a} = 1; [ keys %$x ] [variable] ok 418 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] [exception] ok 419 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] [return] ok 420 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] [variable] ok 421 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] [exception] ok 422 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] [return] ok 423 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] [variable] ok 424 - my %x; $x{a} = 1; [ keys %x ] [exception] ok 425 - my %x; $x{a} = 1; [ keys %x ] [return] ok 426 - my %x; $x{a} = 1; [ keys %x ] [variable] ok 427 - our %x; local %x; use strict; $x{a} = 1; [ keys %x ] [exception] ok 428 - our %x; local %x; use strict; $x{a} = 1; [ keys %x ] [return] ok 429 - our %x; local %x; use strict; $x{a} = 1; [ keys %x ] [variable] ok 430 - our %x; local %x; no strict; $x{a} = 1; [ keys %x ] [exception] ok 431 - our %x; local %x; no strict; $x{a} = 1; [ keys %x ] [return] ok 432 - our %x; local %x; no strict; $x{a} = 1; [ keys %x ] [variable] ok 433 - my $x; $x->{a} = 1; [ keys %$x ] <+fetch> [exception] ok 434 - my $x; $x->{a} = 1; [ keys %$x ] <+fetch> [return] ok 435 - my $x; $x->{a} = 1; [ keys %$x ] <+fetch> [variable] ok 436 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] <+fetch> [exception] ok 437 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] <+fetch> [return] ok 438 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] <+fetch> [variable] ok 439 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] <+fetch> [exception] ok 440 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] <+fetch> [return] ok 441 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] <+fetch> [variable] ok 442 - my $x; $x->{a} = 1; [ keys %$x ] <+fetch> [exception] ok 443 - my $x; $x->{a} = 1; [ keys %$x ] <+fetch> [return] ok 444 - my $x; $x->{a} = 1; [ keys %$x ] <+fetch> [variable] ok 445 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] <+fetch> [exception] ok 446 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] <+fetch> [return] ok 447 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] <+fetch> [variable] ok 448 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] <+fetch> [exception] ok 449 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] <+fetch> [return] ok 450 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] <+fetch> [variable] ok 451 - my %x; $x{a} = 1; [ keys %x ] <+fetch> [exception] ok 452 - my %x; $x{a} = 1; [ keys %x ] <+fetch> [return] ok 453 - my %x; $x{a} = 1; [ keys %x ] <+fetch> [variable] ok 454 - our %x; local %x; use strict; $x{a} = 1; [ keys %x ] <+fetch> [exception] ok 455 - our %x; local %x; use strict; $x{a} = 1; [ keys %x ] <+fetch> [return] ok 456 - our %x; local %x; use strict; $x{a} = 1; [ keys %x ] <+fetch> [variable] ok 457 - our %x; local %x; no strict; $x{a} = 1; [ keys %x ] <+fetch> [exception] ok 458 - our %x; local %x; no strict; $x{a} = 1; [ keys %x ] <+fetch> [return] ok 459 - our %x; local %x; no strict; $x{a} = 1; [ keys %x ] <+fetch> [variable] ok 460 - my $x; $x->{a} = 1; [ keys %$x ] <+exists +delete +store> [exception] ok 461 - my $x; $x->{a} = 1; [ keys %$x ] <+exists +delete +store> [return] ok 462 - my $x; $x->{a} = 1; [ keys %$x ] <+exists +delete +store> [variable] ok 463 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] <+exists +delete +store> [exception] ok 464 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] <+exists +delete +store> [return] ok 465 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] <+exists +delete +store> [variable] ok 466 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] <+exists +delete +store> [exception] ok 467 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] <+exists +delete +store> [return] ok 468 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] <+exists +delete +store> [variable] ok 469 - my $x; $x->{a} = 1; [ keys %$x ] <+exists +delete +store> [exception] ok 470 - my $x; $x->{a} = 1; [ keys %$x ] <+exists +delete +store> [return] ok 471 - my $x; $x->{a} = 1; [ keys %$x ] <+exists +delete +store> [variable] ok 472 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] <+exists +delete +store> [exception] ok 473 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] <+exists +delete +store> [return] ok 474 - our $x; local $x; use strict; $x->{a} = 1; [ keys %$x ] <+exists +delete +store> [variable] ok 475 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] <+exists +delete +store> [exception] ok 476 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] <+exists +delete +store> [return] ok 477 - our $x; local $x; no strict; $x->{a} = 1; [ keys %$x ] <+exists +delete +store> [variable] ok 478 - my %x; $x{a} = 1; [ keys %x ] <+exists +delete +store> [exception] ok 479 - my %x; $x{a} = 1; [ keys %x ] <+exists +delete +store> [return] ok 480 - my %x; $x{a} = 1; [ keys %x ] <+exists +delete +store> [variable] ok 481 - our %x; local %x; use strict; $x{a} = 1; [ keys %x ] <+exists +delete +store> [exception] ok 482 - our %x; local %x; use strict; $x{a} = 1; [ keys %x ] <+exists +delete +store> [return] ok 483 - our %x; local %x; use strict; $x{a} = 1; [ keys %x ] <+exists +delete +store> [variable] ok 484 - our %x; local %x; no strict; $x{a} = 1; [ keys %x ] <+exists +delete +store> [exception] ok 485 - our %x; local %x; no strict; $x{a} = 1; [ keys %x ] <+exists +delete +store> [return] ok 486 - our %x; local %x; no strict; $x{a} = 1; [ keys %x ] <+exists +delete +store> [variable] ok 487 - my $x; keys %{$x->{a}} [exception] ok 488 - my $x; keys %{$x->{a}} [return] ok 489 - my $x; keys %{$x->{a}} [variable] ok 490 - our $x; local $x; use strict; keys %{$x->{a}} [exception] ok 491 - our $x; local $x; use strict; keys %{$x->{a}} [return] ok 492 - our $x; local $x; use strict; keys %{$x->{a}} [variable] ok 493 - our $x; local $x; no strict; keys %{$x->{a}} [exception] ok 494 - our $x; local $x; no strict; keys %{$x->{a}} [return] ok 495 - our $x; local $x; no strict; keys %{$x->{a}} [variable] ok 496 - my $x; keys %{$$x{a}} [exception] ok 497 - my $x; keys %{$$x{a}} [return] ok 498 - my $x; keys %{$$x{a}} [variable] ok 499 - our $x; local $x; use strict; keys %{$$x{a}} [exception] ok 500 - our $x; local $x; use strict; keys %{$$x{a}} [return] ok 501 - our $x; local $x; use strict; keys %{$$x{a}} [variable] ok 502 - our $x; local $x; no strict; keys %{$$x{a}} [exception] ok 503 - our $x; local $x; no strict; keys %{$$x{a}} [return] ok 504 - our $x; local $x; no strict; keys %{$$x{a}} [variable] ok 505 - my %x; keys %{$x{a}} [exception] ok 506 - my %x; keys %{$x{a}} [return] ok 507 - my %x; keys %{$x{a}} [variable] ok 508 - our %x; local %x; use strict; keys %{$x{a}} [exception] ok 509 - our %x; local %x; use strict; keys %{$x{a}} [return] ok 510 - our %x; local %x; use strict; keys %{$x{a}} [variable] ok 511 - our %x; local %x; no strict; keys %{$x{a}} [exception] ok 512 - our %x; local %x; no strict; keys %{$x{a}} [return] ok 513 - our %x; local %x; no strict; keys %{$x{a}} [variable] ok 514 - my $x; keys %{$x->{a}} [exception] ok 515 - my $x; keys %{$x->{a}} [return] ok 516 - my $x; keys %{$x->{a}} [variable] ok 517 - our $x; local $x; use strict; keys %{$x->{a}} [exception] ok 518 - our $x; local $x; use strict; keys %{$x->{a}} [return] ok 519 - our $x; local $x; use strict; keys %{$x->{a}} [variable] ok 520 - our $x; local $x; no strict; keys %{$x->{a}} [exception] ok 521 - our $x; local $x; no strict; keys %{$x->{a}} [return] ok 522 - our $x; local $x; no strict; keys %{$x->{a}} [variable] ok 523 - my $x; keys %{$$x{a}} [exception] ok 524 - my $x; keys %{$$x{a}} [return] ok 525 - my $x; keys %{$$x{a}} [variable] ok 526 - our $x; local $x; use strict; keys %{$$x{a}} [exception] ok 527 - our $x; local $x; use strict; keys %{$$x{a}} [return] ok 528 - our $x; local $x; use strict; keys %{$$x{a}} [variable] ok 529 - our $x; local $x; no strict; keys %{$$x{a}} [exception] ok 530 - our $x; local $x; no strict; keys %{$$x{a}} [return] ok 531 - our $x; local $x; no strict; keys %{$$x{a}} [variable] ok 532 - my %x; keys %{$x{a}} [exception] ok 533 - my %x; keys %{$x{a}} [return] ok 534 - my %x; keys %{$x{a}} [variable] ok 535 - our %x; local %x; use strict; keys %{$x{a}} [exception] ok 536 - our %x; local %x; use strict; keys %{$x{a}} [return] ok 537 - our %x; local %x; use strict; keys %{$x{a}} [variable] ok 538 - our %x; local %x; no strict; keys %{$x{a}} [exception] ok 539 - our %x; local %x; no strict; keys %{$x{a}} [return] ok 540 - our %x; local %x; no strict; keys %{$x{a}} [variable] ok 541 - my $x; keys %{$x->{a}} <+fetch> [exception] ok 542 - my $x; keys %{$x->{a}} <+fetch> [return] ok 543 - my $x; keys %{$x->{a}} <+fetch> [variable] ok 544 - our $x; local $x; use strict; keys %{$x->{a}} <+fetch> [exception] ok 545 - our $x; local $x; use strict; keys %{$x->{a}} <+fetch> [return] ok 546 - our $x; local $x; use strict; keys %{$x->{a}} <+fetch> [variable] ok 547 - our $x; local $x; no strict; keys %{$x->{a}} <+fetch> [exception] ok 548 - our $x; local $x; no strict; keys %{$x->{a}} <+fetch> [return] ok 549 - our $x; local $x; no strict; keys %{$x->{a}} <+fetch> [variable] ok 550 - my $x; keys %{$$x{a}} <+fetch> [exception] ok 551 - my $x; keys %{$$x{a}} <+fetch> [return] ok 552 - my $x; keys %{$$x{a}} <+fetch> [variable] ok 553 - our $x; local $x; use strict; keys %{$$x{a}} <+fetch> [exception] ok 554 - our $x; local $x; use strict; keys %{$$x{a}} <+fetch> [return] ok 555 - our $x; local $x; use strict; keys %{$$x{a}} <+fetch> [variable] ok 556 - our $x; local $x; no strict; keys %{$$x{a}} <+fetch> [exception] ok 557 - our $x; local $x; no strict; keys %{$$x{a}} <+fetch> [return] ok 558 - our $x; local $x; no strict; keys %{$$x{a}} <+fetch> [variable] ok 559 - my %x; keys %{$x{a}} <+fetch> [exception] ok 560 - my %x; keys %{$x{a}} <+fetch> [return] ok 561 - my %x; keys %{$x{a}} <+fetch> [variable] ok 562 - our %x; local %x; use strict; keys %{$x{a}} <+fetch> [exception] ok 563 - our %x; local %x; use strict; keys %{$x{a}} <+fetch> [return] ok 564 - our %x; local %x; use strict; keys %{$x{a}} <+fetch> [variable] ok 565 - our %x; local %x; no strict; keys %{$x{a}} <+fetch> [exception] ok 566 - our %x; local %x; no strict; keys %{$x{a}} <+fetch> [return] ok 567 - our %x; local %x; no strict; keys %{$x{a}} <+fetch> [variable] ok 568 - my $x; keys %{$x->{a}} <+exists> [exception] ok 569 - my $x; keys %{$x->{a}} <+exists> [return] ok 570 - my $x; keys %{$x->{a}} <+exists> [variable] ok 571 - our $x; local $x; use strict; keys %{$x->{a}} <+exists> [exception] ok 572 - our $x; local $x; use strict; keys %{$x->{a}} <+exists> [return] ok 573 - our $x; local $x; use strict; keys %{$x->{a}} <+exists> [variable] ok 574 - our $x; local $x; no strict; keys %{$x->{a}} <+exists> [exception] ok 575 - our $x; local $x; no strict; keys %{$x->{a}} <+exists> [return] ok 576 - our $x; local $x; no strict; keys %{$x->{a}} <+exists> [variable] ok 577 - my $x; keys %{$$x{a}} <+exists> [exception] ok 578 - my $x; keys %{$$x{a}} <+exists> [return] ok 579 - my $x; keys %{$$x{a}} <+exists> [variable] ok 580 - our $x; local $x; use strict; keys %{$$x{a}} <+exists> [exception] ok 581 - our $x; local $x; use strict; keys %{$$x{a}} <+exists> [return] ok 582 - our $x; local $x; use strict; keys %{$$x{a}} <+exists> [variable] ok 583 - our $x; local $x; no strict; keys %{$$x{a}} <+exists> [exception] ok 584 - our $x; local $x; no strict; keys %{$$x{a}} <+exists> [return] ok 585 - our $x; local $x; no strict; keys %{$$x{a}} <+exists> [variable] ok 586 - my %x; keys %{$x{a}} <+exists> [exception] ok 587 - my %x; keys %{$x{a}} <+exists> [return] ok 588 - my %x; keys %{$x{a}} <+exists> [variable] ok 589 - our %x; local %x; use strict; keys %{$x{a}} <+exists> [exception] ok 590 - our %x; local %x; use strict; keys %{$x{a}} <+exists> [return] ok 591 - our %x; local %x; use strict; keys %{$x{a}} <+exists> [variable] ok 592 - our %x; local %x; no strict; keys %{$x{a}} <+exists> [exception] ok 593 - our %x; local %x; no strict; keys %{$x{a}} <+exists> [return] ok 594 - our %x; local %x; no strict; keys %{$x{a}} <+exists> [variable] ok 595 - my $x; keys %{$x->{a}} <+delete> [exception] ok 596 - my $x; keys %{$x->{a}} <+delete> [return] ok 597 - my $x; keys %{$x->{a}} <+delete> [variable] ok 598 - our $x; local $x; use strict; keys %{$x->{a}} <+delete> [exception] ok 599 - our $x; local $x; use strict; keys %{$x->{a}} <+delete> [return] ok 600 - our $x; local $x; use strict; keys %{$x->{a}} <+delete> [variable] ok 601 - our $x; local $x; no strict; keys %{$x->{a}} <+delete> [exception] ok 602 - our $x; local $x; no strict; keys %{$x->{a}} <+delete> [return] ok 603 - our $x; local $x; no strict; keys %{$x->{a}} <+delete> [variable] ok 604 - my $x; keys %{$$x{a}} <+delete> [exception] ok 605 - my $x; keys %{$$x{a}} <+delete> [return] ok 606 - my $x; keys %{$$x{a}} <+delete> [variable] ok 607 - our $x; local $x; use strict; keys %{$$x{a}} <+delete> [exception] ok 608 - our $x; local $x; use strict; keys %{$$x{a}} <+delete> [return] ok 609 - our $x; local $x; use strict; keys %{$$x{a}} <+delete> [variable] ok 610 - our $x; local $x; no strict; keys %{$$x{a}} <+delete> [exception] ok 611 - our $x; local $x; no strict; keys %{$$x{a}} <+delete> [return] ok 612 - our $x; local $x; no strict; keys %{$$x{a}} <+delete> [variable] ok 613 - my %x; keys %{$x{a}} <+delete> [exception] ok 614 - my %x; keys %{$x{a}} <+delete> [return] ok 615 - my %x; keys %{$x{a}} <+delete> [variable] ok 616 - our %x; local %x; use strict; keys %{$x{a}} <+delete> [exception] ok 617 - our %x; local %x; use strict; keys %{$x{a}} <+delete> [return] ok 618 - our %x; local %x; use strict; keys %{$x{a}} <+delete> [variable] ok 619 - our %x; local %x; no strict; keys %{$x{a}} <+delete> [exception] ok 620 - our %x; local %x; no strict; keys %{$x{a}} <+delete> [return] ok 621 - our %x; local %x; no strict; keys %{$x{a}} <+delete> [variable] ok 622 - my $x; keys %{$x->{a}} <+store> [exception] ok 623 - my $x; keys %{$x->{a}} <+store> [return] ok 624 - my $x; keys %{$x->{a}} <+store> [variable] ok 625 - our $x; local $x; use strict; keys %{$x->{a}} <+store> [exception] ok 626 - our $x; local $x; use strict; keys %{$x->{a}} <+store> [return] ok 627 - our $x; local $x; use strict; keys %{$x->{a}} <+store> [variable] ok 628 - our $x; local $x; no strict; keys %{$x->{a}} <+store> [exception] ok 629 - our $x; local $x; no strict; keys %{$x->{a}} <+store> [return] ok 630 - our $x; local $x; no strict; keys %{$x->{a}} <+store> [variable] ok 631 - my $x; keys %{$$x{a}} <+store> [exception] ok 632 - my $x; keys %{$$x{a}} <+store> [return] ok 633 - my $x; keys %{$$x{a}} <+store> [variable] ok 634 - our $x; local $x; use strict; keys %{$$x{a}} <+store> [exception] ok 635 - our $x; local $x; use strict; keys %{$$x{a}} <+store> [return] ok 636 - our $x; local $x; use strict; keys %{$$x{a}} <+store> [variable] ok 637 - our $x; local $x; no strict; keys %{$$x{a}} <+store> [exception] ok 638 - our $x; local $x; no strict; keys %{$$x{a}} <+store> [return] ok 639 - our $x; local $x; no strict; keys %{$$x{a}} <+store> [variable] ok 640 - my %x; keys %{$x{a}} <+store> [exception] ok 641 - my %x; keys %{$x{a}} <+store> [return] ok 642 - my %x; keys %{$x{a}} <+store> [variable] ok 643 - our %x; local %x; use strict; keys %{$x{a}} <+store> [exception] ok 644 - our %x; local %x; use strict; keys %{$x{a}} <+store> [return] ok 645 - our %x; local %x; use strict; keys %{$x{a}} <+store> [variable] ok 646 - our %x; local %x; no strict; keys %{$x{a}} <+store> [exception] ok 647 - our %x; local %x; no strict; keys %{$x{a}} <+store> [return] ok 648 - our %x; local %x; no strict; keys %{$x{a}} <+store> [variable] ok 649 - my $x; keys %{$x->{a}} <+strict +fetch> [exception] ok 650 - my $x; keys %{$x->{a}} <+strict +fetch> [return] ok 651 - my $x; keys %{$x->{a}} <+strict +fetch> [variable] ok 652 - our $x; local $x; use strict; keys %{$x->{a}} <+strict +fetch> [exception] ok 653 - our $x; local $x; use strict; keys %{$x->{a}} <+strict +fetch> [return] ok 654 - our $x; local $x; use strict; keys %{$x->{a}} <+strict +fetch> [variable] ok 655 - our $x; local $x; no strict; keys %{$x->{a}} <+strict +fetch> [exception] ok 656 - our $x; local $x; no strict; keys %{$x->{a}} <+strict +fetch> [return] ok 657 - our $x; local $x; no strict; keys %{$x->{a}} <+strict +fetch> [variable] ok 658 - my $x; keys %{$$x{a}} <+strict +fetch> [exception] ok 659 - my $x; keys %{$$x{a}} <+strict +fetch> [return] ok 660 - my $x; keys %{$$x{a}} <+strict +fetch> [variable] ok 661 - our $x; local $x; use strict; keys %{$$x{a}} <+strict +fetch> [exception] ok 662 - our $x; local $x; use strict; keys %{$$x{a}} <+strict +fetch> [return] ok 663 - our $x; local $x; use strict; keys %{$$x{a}} <+strict +fetch> [variable] ok 664 - our $x; local $x; no strict; keys %{$$x{a}} <+strict +fetch> [exception] ok 665 - our $x; local $x; no strict; keys %{$$x{a}} <+strict +fetch> [return] ok 666 - our $x; local $x; no strict; keys %{$$x{a}} <+strict +fetch> [variable] ok 667 - my %x; 1 <+strict +fetch> [exception] ok 668 - my %x; 1 <+strict +fetch> [return] ok 669 - my %x; 1 <+strict +fetch> [variable] ok 670 - our %x; local %x; use strict; 1 <+strict +fetch> [exception] ok 671 - our %x; local %x; use strict; 1 <+strict +fetch> [return] ok 672 - our %x; local %x; use strict; 1 <+strict +fetch> [variable] ok 673 - our %x; local %x; no strict; 1 <+strict +fetch> [exception] ok 674 - our %x; local %x; no strict; 1 <+strict +fetch> [return] ok 675 - our %x; local %x; no strict; 1 <+strict +fetch> [variable] ok 676 - my $x; keys %{$x->{a}} <+strict +exists> [exception] ok 677 - my $x; keys %{$x->{a}} <+strict +exists> [return] ok 678 - my $x; keys %{$x->{a}} <+strict +exists> [variable] ok 679 - our $x; local $x; use strict; keys %{$x->{a}} <+strict +exists> [exception] ok 680 - our $x; local $x; use strict; keys %{$x->{a}} <+strict +exists> [return] ok 681 - our $x; local $x; use strict; keys %{$x->{a}} <+strict +exists> [variable] ok 682 - our $x; local $x; no strict; keys %{$x->{a}} <+strict +exists> [exception] ok 683 - our $x; local $x; no strict; keys %{$x->{a}} <+strict +exists> [return] ok 684 - our $x; local $x; no strict; keys %{$x->{a}} <+strict +exists> [variable] ok 685 - my $x; keys %{$$x{a}} <+strict +exists> [exception] ok 686 - my $x; keys %{$$x{a}} <+strict +exists> [return] ok 687 - my $x; keys %{$$x{a}} <+strict +exists> [variable] ok 688 - our $x; local $x; use strict; keys %{$$x{a}} <+strict +exists> [exception] ok 689 - our $x; local $x; use strict; keys %{$$x{a}} <+strict +exists> [return] ok 690 - our $x; local $x; use strict; keys %{$$x{a}} <+strict +exists> [variable] ok 691 - our $x; local $x; no strict; keys %{$$x{a}} <+strict +exists> [exception] ok 692 - our $x; local $x; no strict; keys %{$$x{a}} <+strict +exists> [return] ok 693 - our $x; local $x; no strict; keys %{$$x{a}} <+strict +exists> [variable] ok 694 - my %x; keys %{$x{a}} <+strict +exists> [exception] ok 695 - my %x; keys %{$x{a}} <+strict +exists> [return] ok 696 - my %x; keys %{$x{a}} <+strict +exists> [variable] ok 697 - our %x; local %x; use strict; keys %{$x{a}} <+strict +exists> [exception] ok 698 - our %x; local %x; use strict; keys %{$x{a}} <+strict +exists> [return] ok 699 - our %x; local %x; use strict; keys %{$x{a}} <+strict +exists> [variable] ok 700 - our %x; local %x; no strict; keys %{$x{a}} <+strict +exists> [exception] ok 701 - our %x; local %x; no strict; keys %{$x{a}} <+strict +exists> [return] ok 702 - our %x; local %x; no strict; keys %{$x{a}} <+strict +exists> [variable] ok 703 - my $x; keys %{$x->{a}} <+strict +delete> [exception] ok 704 - my $x; keys %{$x->{a}} <+strict +delete> [return] ok 705 - my $x; keys %{$x->{a}} <+strict +delete> [variable] ok 706 - our $x; local $x; use strict; keys %{$x->{a}} <+strict +delete> [exception] ok 707 - our $x; local $x; use strict; keys %{$x->{a}} <+strict +delete> [return] ok 708 - our $x; local $x; use strict; keys %{$x->{a}} <+strict +delete> [variable] ok 709 - our $x; local $x; no strict; keys %{$x->{a}} <+strict +delete> [exception] ok 710 - our $x; local $x; no strict; keys %{$x->{a}} <+strict +delete> [return] ok 711 - our $x; local $x; no strict; keys %{$x->{a}} <+strict +delete> [variable] ok 712 - my $x; keys %{$$x{a}} <+strict +delete> [exception] ok 713 - my $x; keys %{$$x{a}} <+strict +delete> [return] ok 714 - my $x; keys %{$$x{a}} <+strict +delete> [variable] ok 715 - our $x; local $x; use strict; keys %{$$x{a}} <+strict +delete> [exception] ok 716 - our $x; local $x; use strict; keys %{$$x{a}} <+strict +delete> [return] ok 717 - our $x; local $x; use strict; keys %{$$x{a}} <+strict +delete> [variable] ok 718 - our $x; local $x; no strict; keys %{$$x{a}} <+strict +delete> [exception] ok 719 - our $x; local $x; no strict; keys %{$$x{a}} <+strict +delete> [return] ok 720 - our $x; local $x; no strict; keys %{$$x{a}} <+strict +delete> [variable] ok 721 - my %x; keys %{$x{a}} <+strict +delete> [exception] ok 722 - my %x; keys %{$x{a}} <+strict +delete> [return] ok 723 - my %x; keys %{$x{a}} <+strict +delete> [variable] ok 724 - our %x; local %x; use strict; keys %{$x{a}} <+strict +delete> [exception] ok 725 - our %x; local %x; use strict; keys %{$x{a}} <+strict +delete> [return] ok 726 - our %x; local %x; use strict; keys %{$x{a}} <+strict +delete> [variable] ok 727 - our %x; local %x; no strict; keys %{$x{a}} <+strict +delete> [exception] ok 728 - our %x; local %x; no strict; keys %{$x{a}} <+strict +delete> [return] ok 729 - our %x; local %x; no strict; keys %{$x{a}} <+strict +delete> [variable] ok 730 - my $x; keys %{$x->{a}} <+strict +store> [exception] ok 731 - my $x; keys %{$x->{a}} <+strict +store> [return] ok 732 - my $x; keys %{$x->{a}} <+strict +store> [variable] ok 733 - our $x; local $x; use strict; keys %{$x->{a}} <+strict +store> [exception] ok 734 - our $x; local $x; use strict; keys %{$x->{a}} <+strict +store> [return] ok 735 - our $x; local $x; use strict; keys %{$x->{a}} <+strict +store> [variable] ok 736 - our $x; local $x; no strict; keys %{$x->{a}} <+strict +store> [exception] ok 737 - our $x; local $x; no strict; keys %{$x->{a}} <+strict +store> [return] ok 738 - our $x; local $x; no strict; keys %{$x->{a}} <+strict +store> [variable] ok 739 - my $x; keys %{$$x{a}} <+strict +store> [exception] ok 740 - my $x; keys %{$$x{a}} <+strict +store> [return] ok 741 - my $x; keys %{$$x{a}} <+strict +store> [variable] ok 742 - our $x; local $x; use strict; keys %{$$x{a}} <+strict +store> [exception] ok 743 - our $x; local $x; use strict; keys %{$$x{a}} <+strict +store> [return] ok 744 - our $x; local $x; use strict; keys %{$$x{a}} <+strict +store> [variable] ok 745 - our $x; local $x; no strict; keys %{$$x{a}} <+strict +store> [exception] ok 746 - our $x; local $x; no strict; keys %{$$x{a}} <+strict +store> [return] ok 747 - our $x; local $x; no strict; keys %{$$x{a}} <+strict +store> [variable] ok 748 - my %x; keys %{$x{a}} <+strict +store> [exception] ok 749 - my %x; keys %{$x{a}} <+strict +store> [return] ok 750 - my %x; keys %{$x{a}} <+strict +store> [variable] ok 751 - our %x; local %x; use strict; keys %{$x{a}} <+strict +store> [exception] ok 752 - our %x; local %x; use strict; keys %{$x{a}} <+strict +store> [return] ok 753 - our %x; local %x; use strict; keys %{$x{a}} <+strict +store> [variable] ok 754 - our %x; local %x; no strict; keys %{$x{a}} <+strict +store> [exception] ok 755 - our %x; local %x; no strict; keys %{$x{a}} <+strict +store> [return] ok 756 - our %x; local %x; no strict; keys %{$x{a}} <+strict +store> [variable] ok 757 - my $x; [ keys %{$x->{a}} ] [exception] ok 758 - my $x; [ keys %{$x->{a}} ] [return] ok 759 - my $x; [ keys %{$x->{a}} ] [variable] ok 760 - our $x; local $x; use strict; [ keys %{$x->{a}} ] [exception] ok 761 - our $x; local $x; use strict; [ keys %{$x->{a}} ] [return] ok 762 - our $x; local $x; use strict; [ keys %{$x->{a}} ] [variable] ok 763 - our $x; local $x; no strict; [ keys %{$x->{a}} ] [exception] ok 764 - our $x; local $x; no strict; [ keys %{$x->{a}} ] [return] ok 765 - our $x; local $x; no strict; [ keys %{$x->{a}} ] [variable] ok 766 - my $x; [ keys %{$$x{a}} ] [exception] ok 767 - my $x; [ keys %{$$x{a}} ] [return] ok 768 - my $x; [ keys %{$$x{a}} ] [variable] ok 769 - our $x; local $x; use strict; [ keys %{$$x{a}} ] [exception] ok 770 - our $x; local $x; use strict; [ keys %{$$x{a}} ] [return] ok 771 - our $x; local $x; use strict; [ keys %{$$x{a}} ] [variable] ok 772 - our $x; local $x; no strict; [ keys %{$$x{a}} ] [exception] ok 773 - our $x; local $x; no strict; [ keys %{$$x{a}} ] [return] ok 774 - our $x; local $x; no strict; [ keys %{$$x{a}} ] [variable] ok 775 - my %x; [ keys %{$x{a}} ] [exception] ok 776 - my %x; [ keys %{$x{a}} ] [return] ok 777 - my %x; [ keys %{$x{a}} ] [variable] ok 778 - our %x; local %x; use strict; [ keys %{$x{a}} ] [exception] ok 779 - our %x; local %x; use strict; [ keys %{$x{a}} ] [return] ok 780 - our %x; local %x; use strict; [ keys %{$x{a}} ] [variable] ok 781 - our %x; local %x; no strict; [ keys %{$x{a}} ] [exception] ok 782 - our %x; local %x; no strict; [ keys %{$x{a}} ] [return] ok 783 - our %x; local %x; no strict; [ keys %{$x{a}} ] [variable] ok 784 - my $x; [ keys %{$x->{a}} ] [exception] ok 785 - my $x; [ keys %{$x->{a}} ] [return] ok 786 - my $x; [ keys %{$x->{a}} ] [variable] ok 787 - our $x; local $x; use strict; [ keys %{$x->{a}} ] [exception] ok 788 - our $x; local $x; use strict; [ keys %{$x->{a}} ] [return] ok 789 - our $x; local $x; use strict; [ keys %{$x->{a}} ] [variable] ok 790 - our $x; local $x; no strict; [ keys %{$x->{a}} ] [exception] ok 791 - our $x; local $x; no strict; [ keys %{$x->{a}} ] [return] ok 792 - our $x; local $x; no strict; [ keys %{$x->{a}} ] [variable] ok 793 - my $x; [ keys %{$$x{a}} ] [exception] ok 794 - my $x; [ keys %{$$x{a}} ] [return] ok 795 - my $x; [ keys %{$$x{a}} ] [variable] ok 796 - our $x; local $x; use strict; [ keys %{$$x{a}} ] [exception] ok 797 - our $x; local $x; use strict; [ keys %{$$x{a}} ] [return] ok 798 - our $x; local $x; use strict; [ keys %{$$x{a}} ] [variable] ok 799 - our $x; local $x; no strict; [ keys %{$$x{a}} ] [exception] ok 800 - our $x; local $x; no strict; [ keys %{$$x{a}} ] [return] ok 801 - our $x; local $x; no strict; [ keys %{$$x{a}} ] [variable] ok 802 - my %x; [ keys %{$x{a}} ] [exception] ok 803 - my %x; [ keys %{$x{a}} ] [return] ok 804 - my %x; [ keys %{$x{a}} ] [variable] ok 805 - our %x; local %x; use strict; [ keys %{$x{a}} ] [exception] ok 806 - our %x; local %x; use strict; [ keys %{$x{a}} ] [return] ok 807 - our %x; local %x; use strict; [ keys %{$x{a}} ] [variable] ok 808 - our %x; local %x; no strict; [ keys %{$x{a}} ] [exception] ok 809 - our %x; local %x; no strict; [ keys %{$x{a}} ] [return] ok 810 - our %x; local %x; no strict; [ keys %{$x{a}} ] [variable] ok 811 - my $x; [ keys %{$x->{a}} ] <+fetch> [exception] ok 812 - my $x; [ keys %{$x->{a}} ] <+fetch> [return] ok 813 - my $x; [ keys %{$x->{a}} ] <+fetch> [variable] ok 814 - our $x; local $x; use strict; [ keys %{$x->{a}} ] <+fetch> [exception] ok 815 - our $x; local $x; use strict; [ keys %{$x->{a}} ] <+fetch> [return] ok 816 - our $x; local $x; use strict; [ keys %{$x->{a}} ] <+fetch> [variable] ok 817 - our $x; local $x; no strict; [ keys %{$x->{a}} ] <+fetch> [exception] ok 818 - our $x; local $x; no strict; [ keys %{$x->{a}} ] <+fetch> [return] ok 819 - our $x; local $x; no strict; [ keys %{$x->{a}} ] <+fetch> [variable] ok 820 - my $x; [ keys %{$$x{a}} ] <+fetch> [exception] ok 821 - my $x; [ keys %{$$x{a}} ] <+fetch> [return] ok 822 - my $x; [ keys %{$$x{a}} ] <+fetch> [variable] ok 823 - our $x; local $x; use strict; [ keys %{$$x{a}} ] <+fetch> [exception] ok 824 - our $x; local $x; use strict; [ keys %{$$x{a}} ] <+fetch> [return] ok 825 - our $x; local $x; use strict; [ keys %{$$x{a}} ] <+fetch> [variable] ok 826 - our $x; local $x; no strict; [ keys %{$$x{a}} ] <+fetch> [exception] ok 827 - our $x; local $x; no strict; [ keys %{$$x{a}} ] <+fetch> [return] ok 828 - our $x; local $x; no strict; [ keys %{$$x{a}} ] <+fetch> [variable] ok 829 - my %x; [ keys %{$x{a}} ] <+fetch> [exception] ok 830 - my %x; [ keys %{$x{a}} ] <+fetch> [return] ok 831 - my %x; [ keys %{$x{a}} ] <+fetch> [variable] ok 832 - our %x; local %x; use strict; [ keys %{$x{a}} ] <+fetch> [exception] ok 833 - our %x; local %x; use strict; [ keys %{$x{a}} ] <+fetch> [return] ok 834 - our %x; local %x; use strict; [ keys %{$x{a}} ] <+fetch> [variable] ok 835 - our %x; local %x; no strict; [ keys %{$x{a}} ] <+fetch> [exception] ok 836 - our %x; local %x; no strict; [ keys %{$x{a}} ] <+fetch> [return] ok 837 - our %x; local %x; no strict; [ keys %{$x{a}} ] <+fetch> [variable] ok 838 - my $x; [ keys %{$x->{a}} ] <+exists +delete +store> [exception] ok 839 - my $x; [ keys %{$x->{a}} ] <+exists +delete +store> [return] ok 840 - my $x; [ keys %{$x->{a}} ] <+exists +delete +store> [variable] ok 841 - our $x; local $x; use strict; [ keys %{$x->{a}} ] <+exists +delete +store> [exception] ok 842 - our $x; local $x; use strict; [ keys %{$x->{a}} ] <+exists +delete +store> [return] ok 843 - our $x; local $x; use strict; [ keys %{$x->{a}} ] <+exists +delete +store> [variable] ok 844 - our $x; local $x; no strict; [ keys %{$x->{a}} ] <+exists +delete +store> [exception] ok 845 - our $x; local $x; no strict; [ keys %{$x->{a}} ] <+exists +delete +store> [return] ok 846 - our $x; local $x; no strict; [ keys %{$x->{a}} ] <+exists +delete +store> [variable] ok 847 - my $x; [ keys %{$$x{a}} ] <+exists +delete +store> [exception] ok 848 - my $x; [ keys %{$$x{a}} ] <+exists +delete +store> [return] ok 849 - my $x; [ keys %{$$x{a}} ] <+exists +delete +store> [variable] ok 850 - our $x; local $x; use strict; [ keys %{$$x{a}} ] <+exists +delete +store> [exception] ok 851 - our $x; local $x; use strict; [ keys %{$$x{a}} ] <+exists +delete +store> [return] ok 852 - our $x; local $x; use strict; [ keys %{$$x{a}} ] <+exists +delete +store> [variable] ok 853 - our $x; local $x; no strict; [ keys %{$$x{a}} ] <+exists +delete +store> [exception] ok 854 - our $x; local $x; no strict; [ keys %{$$x{a}} ] <+exists +delete +store> [return] ok 855 - our $x; local $x; no strict; [ keys %{$$x{a}} ] <+exists +delete +store> [variable] ok 856 - my %x; [ keys %{$x{a}} ] <+exists +delete +store> [exception] ok 857 - my %x; [ keys %{$x{a}} ] <+exists +delete +store> [return] ok 858 - my %x; [ keys %{$x{a}} ] <+exists +delete +store> [variable] ok 859 - our %x; local %x; use strict; [ keys %{$x{a}} ] <+exists +delete +store> [exception] ok 860 - our %x; local %x; use strict; [ keys %{$x{a}} ] <+exists +delete +store> [return] ok 861 - our %x; local %x; use strict; [ keys %{$x{a}} ] <+exists +delete +store> [variable] ok 862 - our %x; local %x; no strict; [ keys %{$x{a}} ] <+exists +delete +store> [exception] ok 863 - our %x; local %x; no strict; [ keys %{$x{a}} ] <+exists +delete +store> [return] ok 864 - our %x; local %x; no strict; [ keys %{$x{a}} ] <+exists +delete +store> [variable] ok 865 - my $x; values %$x [exception] ok 866 - my $x; values %$x [return] ok 867 - my $x; values %$x [variable] ok 868 - our $x; local $x; use strict; values %$x [exception] ok 869 - our $x; local $x; use strict; values %$x [return] ok 870 - our $x; local $x; use strict; values %$x [variable] ok 871 - our $x; local $x; no strict; values %$x [exception] ok 872 - our $x; local $x; no strict; values %$x [return] ok 873 - our $x; local $x; no strict; values %$x [variable] ok 874 - my $x; values %$x [exception] ok 875 - my $x; values %$x [return] ok 876 - my $x; values %$x [variable] ok 877 - our $x; local $x; use strict; values %$x [exception] ok 878 - our $x; local $x; use strict; values %$x [return] ok 879 - our $x; local $x; use strict; values %$x [variable] ok 880 - our $x; local $x; no strict; values %$x [exception] ok 881 - our $x; local $x; no strict; values %$x [return] ok 882 - our $x; local $x; no strict; values %$x [variable] ok 883 - my %x; values %x [exception] ok 884 - my %x; values %x [return] ok 885 - my %x; values %x [variable] ok 886 - our %x; local %x; use strict; values %x [exception] ok 887 - our %x; local %x; use strict; values %x [return] ok 888 - our %x; local %x; use strict; values %x [variable] ok 889 - our %x; local %x; no strict; values %x [exception] ok 890 - our %x; local %x; no strict; values %x [return] ok 891 - our %x; local %x; no strict; values %x [variable] ok 892 - my $x; values %$x [exception] ok 893 - my $x; values %$x [return] ok 894 - my $x; values %$x [variable] ok 895 - our $x; local $x; use strict; values %$x [exception] ok 896 - our $x; local $x; use strict; values %$x [return] ok 897 - our $x; local $x; use strict; values %$x [variable] ok 898 - our $x; local $x; no strict; values %$x [exception] ok 899 - our $x; local $x; no strict; values %$x [return] ok 900 - our $x; local $x; no strict; values %$x [variable] ok 901 - my $x; values %$x [exception] ok 902 - my $x; values %$x [return] ok 903 - my $x; values %$x [variable] ok 904 - our $x; local $x; use strict; values %$x [exception] ok 905 - our $x; local $x; use strict; values %$x [return] ok 906 - our $x; local $x; use strict; values %$x [variable] ok 907 - our $x; local $x; no strict; values %$x [exception] ok 908 - our $x; local $x; no strict; values %$x [return] ok 909 - our $x; local $x; no strict; values %$x [variable] ok 910 - my %x; values %x [exception] ok 911 - my %x; values %x [return] ok 912 - my %x; values %x [variable] ok 913 - our %x; local %x; use strict; values %x [exception] ok 914 - our %x; local %x; use strict; values %x [return] ok 915 - our %x; local %x; use strict; values %x [variable] ok 916 - our %x; local %x; no strict; values %x [exception] ok 917 - our %x; local %x; no strict; values %x [return] ok 918 - our %x; local %x; no strict; values %x [variable] ok 919 - my $x; values %$x <+fetch> [exception] ok 920 - my $x; values %$x <+fetch> [return] ok 921 - my $x; values %$x <+fetch> [variable] ok 922 - our $x; local $x; use strict; values %$x <+fetch> [exception] ok 923 - our $x; local $x; use strict; values %$x <+fetch> [return] ok 924 - our $x; local $x; use strict; values %$x <+fetch> [variable] ok 925 - our $x; local $x; no strict; values %$x <+fetch> [exception] ok 926 - our $x; local $x; no strict; values %$x <+fetch> [return] ok 927 - our $x; local $x; no strict; values %$x <+fetch> [variable] ok 928 - my $x; values %$x <+fetch> [exception] ok 929 - my $x; values %$x <+fetch> [return] ok 930 - my $x; values %$x <+fetch> [variable] ok 931 - our $x; local $x; use strict; values %$x <+fetch> [exception] ok 932 - our $x; local $x; use strict; values %$x <+fetch> [return] ok 933 - our $x; local $x; use strict; values %$x <+fetch> [variable] ok 934 - our $x; local $x; no strict; values %$x <+fetch> [exception] ok 935 - our $x; local $x; no strict; values %$x <+fetch> [return] ok 936 - our $x; local $x; no strict; values %$x <+fetch> [variable] ok 937 - my %x; values %x <+fetch> [exception] ok 938 - my %x; values %x <+fetch> [return] ok 939 - my %x; values %x <+fetch> [variable] ok 940 - our %x; local %x; use strict; values %x <+fetch> [exception] ok 941 - our %x; local %x; use strict; values %x <+fetch> [return] ok 942 - our %x; local %x; use strict; values %x <+fetch> [variable] ok 943 - our %x; local %x; no strict; values %x <+fetch> [exception] ok 944 - our %x; local %x; no strict; values %x <+fetch> [return] ok 945 - our %x; local %x; no strict; values %x <+fetch> [variable] ok 946 - my $x; values %$x <+exists> [exception] ok 947 - my $x; values %$x <+exists> [return] ok 948 - my $x; values %$x <+exists> [variable] ok 949 - our $x; local $x; use strict; values %$x <+exists> [exception] ok 950 - our $x; local $x; use strict; values %$x <+exists> [return] ok 951 - our $x; local $x; use strict; values %$x <+exists> [variable] ok 952 - our $x; local $x; no strict; values %$x <+exists> [exception] ok 953 - our $x; local $x; no strict; values %$x <+exists> [return] ok 954 - our $x; local $x; no strict; values %$x <+exists> [variable] ok 955 - my $x; values %$x <+exists> [exception] ok 956 - my $x; values %$x <+exists> [return] ok 957 - my $x; values %$x <+exists> [variable] ok 958 - our $x; local $x; use strict; values %$x <+exists> [exception] ok 959 - our $x; local $x; use strict; values %$x <+exists> [return] ok 960 - our $x; local $x; use strict; values %$x <+exists> [variable] ok 961 - our $x; local $x; no strict; values %$x <+exists> [exception] ok 962 - our $x; local $x; no strict; values %$x <+exists> [return] ok 963 - our $x; local $x; no strict; values %$x <+exists> [variable] ok 964 - my %x; values %x <+exists> [exception] ok 965 - my %x; values %x <+exists> [return] ok 966 - my %x; values %x <+exists> [variable] ok 967 - our %x; local %x; use strict; values %x <+exists> [exception] ok 968 - our %x; local %x; use strict; values %x <+exists> [return] ok 969 - our %x; local %x; use strict; values %x <+exists> [variable] ok 970 - our %x; local %x; no strict; values %x <+exists> [exception] ok 971 - our %x; local %x; no strict; values %x <+exists> [return] ok 972 - our %x; local %x; no strict; values %x <+exists> [variable] ok 973 - my $x; values %$x <+delete> [exception] ok 974 - my $x; values %$x <+delete> [return] ok 975 - my $x; values %$x <+delete> [variable] ok 976 - our $x; local $x; use strict; values %$x <+delete> [exception] ok 977 - our $x; local $x; use strict; values %$x <+delete> [return] ok 978 - our $x; local $x; use strict; values %$x <+delete> [variable] ok 979 - our $x; local $x; no strict; values %$x <+delete> [exception] ok 980 - our $x; local $x; no strict; values %$x <+delete> [return] ok 981 - our $x; local $x; no strict; values %$x <+delete> [variable] ok 982 - my $x; values %$x <+delete> [exception] ok 983 - my $x; values %$x <+delete> [return] ok 984 - my $x; values %$x <+delete> [variable] ok 985 - our $x; local $x; use strict; values %$x <+delete> [exception] ok 986 - our $x; local $x; use strict; values %$x <+delete> [return] ok 987 - our $x; local $x; use strict; values %$x <+delete> [variable] ok 988 - our $x; local $x; no strict; values %$x <+delete> [exception] ok 989 - our $x; local $x; no strict; values %$x <+delete> [return] ok 990 - our $x; local $x; no strict; values %$x <+delete> [variable] ok 991 - my %x; values %x <+delete> [exception] ok 992 - my %x; values %x <+delete> [return] ok 993 - my %x; values %x <+delete> [variable] ok 994 - our %x; local %x; use strict; values %x <+delete> [exception] ok 995 - our %x; local %x; use strict; values %x <+delete> [return] ok 996 - our %x; local %x; use strict; values %x <+delete> [variable] ok 997 - our %x; local %x; no strict; values %x <+delete> [exception] ok 998 - our %x; local %x; no strict; values %x <+delete> [return] ok 999 - our %x; local %x; no strict; values %x <+delete> [variable] ok 1000 - my $x; values %$x <+store> [exception] ok 1001 - my $x; values %$x <+store> [return] ok 1002 - my $x; values %$x <+store> [variable] ok 1003 - our $x; local $x; use strict; values %$x <+store> [exception] ok 1004 - our $x; local $x; use strict; values %$x <+store> [return] ok 1005 - our $x; local $x; use strict; values %$x <+store> [variable] ok 1006 - our $x; local $x; no strict; values %$x <+store> [exception] ok 1007 - our $x; local $x; no strict; values %$x <+store> [return] ok 1008 - our $x; local $x; no strict; values %$x <+store> [variable] ok 1009 - my $x; values %$x <+store> [exception] ok 1010 - my $x; values %$x <+store> [return] ok 1011 - my $x; values %$x <+store> [variable] ok 1012 - our $x; local $x; use strict; values %$x <+store> [exception] ok 1013 - our $x; local $x; use strict; values %$x <+store> [return] ok 1014 - our $x; local $x; use strict; values %$x <+store> [variable] ok 1015 - our $x; local $x; no strict; values %$x <+store> [exception] ok 1016 - our $x; local $x; no strict; values %$x <+store> [return] ok 1017 - our $x; local $x; no strict; values %$x <+store> [variable] ok 1018 - my %x; values %x <+store> [exception] ok 1019 - my %x; values %x <+store> [return] ok 1020 - my %x; values %x <+store> [variable] ok 1021 - our %x; local %x; use strict; values %x <+store> [exception] ok 1022 - our %x; local %x; use strict; values %x <+store> [return] ok 1023 - our %x; local %x; use strict; values %x <+store> [variable] ok 1024 - our %x; local %x; no strict; values %x <+store> [exception] ok 1025 - our %x; local %x; no strict; values %x <+store> [return] ok 1026 - our %x; local %x; no strict; values %x <+store> [variable] ok 1027 - my $x; values %$x <+strict +fetch> [exception] ok 1028 - my $x; values %$x <+strict +fetch> [return] ok 1029 - my $x; values %$x <+strict +fetch> [variable] ok 1030 - our $x; local $x; use strict; values %$x <+strict +fetch> [exception] ok 1031 - our $x; local $x; use strict; values %$x <+strict +fetch> [return] ok 1032 - our $x; local $x; use strict; values %$x <+strict +fetch> [variable] ok 1033 - our $x; local $x; no strict; values %$x <+strict +fetch> [exception] ok 1034 - our $x; local $x; no strict; values %$x <+strict +fetch> [return] ok 1035 - our $x; local $x; no strict; values %$x <+strict +fetch> [variable] ok 1036 - my $x; values %$x <+strict +fetch> [exception] ok 1037 - my $x; values %$x <+strict +fetch> [return] ok 1038 - my $x; values %$x <+strict +fetch> [variable] ok 1039 - our $x; local $x; use strict; values %$x <+strict +fetch> [exception] ok 1040 - our $x; local $x; use strict; values %$x <+strict +fetch> [return] ok 1041 - our $x; local $x; use strict; values %$x <+strict +fetch> [variable] ok 1042 - our $x; local $x; no strict; values %$x <+strict +fetch> [exception] ok 1043 - our $x; local $x; no strict; values %$x <+strict +fetch> [return] ok 1044 - our $x; local $x; no strict; values %$x <+strict +fetch> [variable] ok 1045 - my %x; 1 <+strict +fetch> [exception] ok 1046 - my %x; 1 <+strict +fetch> [return] ok 1047 - my %x; 1 <+strict +fetch> [variable] ok 1048 - our %x; local %x; use strict; 1 <+strict +fetch> [exception] ok 1049 - our %x; local %x; use strict; 1 <+strict +fetch> [return] ok 1050 - our %x; local %x; use strict; 1 <+strict +fetch> [variable] ok 1051 - our %x; local %x; no strict; 1 <+strict +fetch> [exception] ok 1052 - our %x; local %x; no strict; 1 <+strict +fetch> [return] ok 1053 - our %x; local %x; no strict; 1 <+strict +fetch> [variable] ok 1054 - my $x; values %$x <+strict +exists> [exception] ok 1055 - my $x; values %$x <+strict +exists> [return] ok 1056 - my $x; values %$x <+strict +exists> [variable] ok 1057 - our $x; local $x; use strict; values %$x <+strict +exists> [exception] ok 1058 - our $x; local $x; use strict; values %$x <+strict +exists> [return] ok 1059 - our $x; local $x; use strict; values %$x <+strict +exists> [variable] ok 1060 - our $x; local $x; no strict; values %$x <+strict +exists> [exception] ok 1061 - our $x; local $x; no strict; values %$x <+strict +exists> [return] ok 1062 - our $x; local $x; no strict; values %$x <+strict +exists> [variable] ok 1063 - my $x; values %$x <+strict +exists> [exception] ok 1064 - my $x; values %$x <+strict +exists> [return] ok 1065 - my $x; values %$x <+strict +exists> [variable] ok 1066 - our $x; local $x; use strict; values %$x <+strict +exists> [exception] ok 1067 - our $x; local $x; use strict; values %$x <+strict +exists> [return] ok 1068 - our $x; local $x; use strict; values %$x <+strict +exists> [variable] ok 1069 - our $x; local $x; no strict; values %$x <+strict +exists> [exception] ok 1070 - our $x; local $x; no strict; values %$x <+strict +exists> [return] ok 1071 - our $x; local $x; no strict; values %$x <+strict +exists> [variable] ok 1072 - my %x; values %x <+strict +exists> [exception] ok 1073 - my %x; values %x <+strict +exists> [return] ok 1074 - my %x; values %x <+strict +exists> [variable] ok 1075 - our %x; local %x; use strict; values %x <+strict +exists> [exception] ok 1076 - our %x; local %x; use strict; values %x <+strict +exists> [return] ok 1077 - our %x; local %x; use strict; values %x <+strict +exists> [variable] ok 1078 - our %x; local %x; no strict; values %x <+strict +exists> [exception] ok 1079 - our %x; local %x; no strict; values %x <+strict +exists> [return] ok 1080 - our %x; local %x; no strict; values %x <+strict +exists> [variable] ok 1081 - my $x; values %$x <+strict +delete> [exception] ok 1082 - my $x; values %$x <+strict +delete> [return] ok 1083 - my $x; values %$x <+strict +delete> [variable] ok 1084 - our $x; local $x; use strict; values %$x <+strict +delete> [exception] ok 1085 - our $x; local $x; use strict; values %$x <+strict +delete> [return] ok 1086 - our $x; local $x; use strict; values %$x <+strict +delete> [variable] ok 1087 - our $x; local $x; no strict; values %$x <+strict +delete> [exception] ok 1088 - our $x; local $x; no strict; values %$x <+strict +delete> [return] ok 1089 - our $x; local $x; no strict; values %$x <+strict +delete> [variable] ok 1090 - my $x; values %$x <+strict +delete> [exception] ok 1091 - my $x; values %$x <+strict +delete> [return] ok 1092 - my $x; values %$x <+strict +delete> [variable] ok 1093 - our $x; local $x; use strict; values %$x <+strict +delete> [exception] ok 1094 - our $x; local $x; use strict; values %$x <+strict +delete> [return] ok 1095 - our $x; local $x; use strict; values %$x <+strict +delete> [variable] ok 1096 - our $x; local $x; no strict; values %$x <+strict +delete> [exception] ok 1097 - our $x; local $x; no strict; values %$x <+strict +delete> [return] ok 1098 - our $x; local $x; no strict; values %$x <+strict +delete> [variable] ok 1099 - my %x; values %x <+strict +delete> [exception] ok 1100 - my %x; values %x <+strict +delete> [return] ok 1101 - my %x; values %x <+strict +delete> [variable] ok 1102 - our %x; local %x; use strict; values %x <+strict +delete> [exception] ok 1103 - our %x; local %x; use strict; values %x <+strict +delete> [return] ok 1104 - our %x; local %x; use strict; values %x <+strict +delete> [variable] ok 1105 - our %x; local %x; no strict; values %x <+strict +delete> [exception] ok 1106 - our %x; local %x; no strict; values %x <+strict +delete> [return] ok 1107 - our %x; local %x; no strict; values %x <+strict +delete> [variable] ok 1108 - my $x; values %$x <+strict +store> [exception] ok 1109 - my $x; values %$x <+strict +store> [return] ok 1110 - my $x; values %$x <+strict +store> [variable] ok 1111 - our $x; local $x; use strict; values %$x <+strict +store> [exception] ok 1112 - our $x; local $x; use strict; values %$x <+strict +store> [return] ok 1113 - our $x; local $x; use strict; values %$x <+strict +store> [variable] ok 1114 - our $x; local $x; no strict; values %$x <+strict +store> [exception] ok 1115 - our $x; local $x; no strict; values %$x <+strict +store> [return] ok 1116 - our $x; local $x; no strict; values %$x <+strict +store> [variable] ok 1117 - my $x; values %$x <+strict +store> [exception] ok 1118 - my $x; values %$x <+strict +store> [return] ok 1119 - my $x; values %$x <+strict +store> [variable] ok 1120 - our $x; local $x; use strict; values %$x <+strict +store> [exception] ok 1121 - our $x; local $x; use strict; values %$x <+strict +store> [return] ok 1122 - our $x; local $x; use strict; values %$x <+strict +store> [variable] ok 1123 - our $x; local $x; no strict; values %$x <+strict +store> [exception] ok 1124 - our $x; local $x; no strict; values %$x <+strict +store> [return] ok 1125 - our $x; local $x; no strict; values %$x <+strict +store> [variable] ok 1126 - my %x; values %x <+strict +store> [exception] ok 1127 - my %x; values %x <+strict +store> [return] ok 1128 - my %x; values %x <+strict +store> [variable] ok 1129 - our %x; local %x; use strict; values %x <+strict +store> [exception] ok 1130 - our %x; local %x; use strict; values %x <+strict +store> [return] ok 1131 - our %x; local %x; use strict; values %x <+strict +store> [variable] ok 1132 - our %x; local %x; no strict; values %x <+strict +store> [exception] ok 1133 - our %x; local %x; no strict; values %x <+strict +store> [return] ok 1134 - our %x; local %x; no strict; values %x <+strict +store> [variable] ok 1135 - my $x; [ values %$x ] [exception] ok 1136 - my $x; [ values %$x ] [return] ok 1137 - my $x; [ values %$x ] [variable] ok 1138 - our $x; local $x; use strict; [ values %$x ] [exception] ok 1139 - our $x; local $x; use strict; [ values %$x ] [return] ok 1140 - our $x; local $x; use strict; [ values %$x ] [variable] ok 1141 - our $x; local $x; no strict; [ values %$x ] [exception] ok 1142 - our $x; local $x; no strict; [ values %$x ] [return] ok 1143 - our $x; local $x; no strict; [ values %$x ] [variable] ok 1144 - my $x; [ values %$x ] [exception] ok 1145 - my $x; [ values %$x ] [return] ok 1146 - my $x; [ values %$x ] [variable] ok 1147 - our $x; local $x; use strict; [ values %$x ] [exception] ok 1148 - our $x; local $x; use strict; [ values %$x ] [return] ok 1149 - our $x; local $x; use strict; [ values %$x ] [variable] ok 1150 - our $x; local $x; no strict; [ values %$x ] [exception] ok 1151 - our $x; local $x; no strict; [ values %$x ] [return] ok 1152 - our $x; local $x; no strict; [ values %$x ] [variable] ok 1153 - my %x; [ values %x ] [exception] ok 1154 - my %x; [ values %x ] [return] ok 1155 - my %x; [ values %x ] [variable] ok 1156 - our %x; local %x; use strict; [ values %x ] [exception] ok 1157 - our %x; local %x; use strict; [ values %x ] [return] ok 1158 - our %x; local %x; use strict; [ values %x ] [variable] ok 1159 - our %x; local %x; no strict; [ values %x ] [exception] ok 1160 - our %x; local %x; no strict; [ values %x ] [return] ok 1161 - our %x; local %x; no strict; [ values %x ] [variable] ok 1162 - my $x; [ values %$x ] [exception] ok 1163 - my $x; [ values %$x ] [return] ok 1164 - my $x; [ values %$x ] [variable] ok 1165 - our $x; local $x; use strict; [ values %$x ] [exception] ok 1166 - our $x; local $x; use strict; [ values %$x ] [return] ok 1167 - our $x; local $x; use strict; [ values %$x ] [variable] ok 1168 - our $x; local $x; no strict; [ values %$x ] [exception] ok 1169 - our $x; local $x; no strict; [ values %$x ] [return] ok 1170 - our $x; local $x; no strict; [ values %$x ] [variable] ok 1171 - my $x; [ values %$x ] [exception] ok 1172 - my $x; [ values %$x ] [return] ok 1173 - my $x; [ values %$x ] [variable] ok 1174 - our $x; local $x; use strict; [ values %$x ] [exception] ok 1175 - our $x; local $x; use strict; [ values %$x ] [return] ok 1176 - our $x; local $x; use strict; [ values %$x ] [variable] ok 1177 - our $x; local $x; no strict; [ values %$x ] [exception] ok 1178 - our $x; local $x; no strict; [ values %$x ] [return] ok 1179 - our $x; local $x; no strict; [ values %$x ] [variable] ok 1180 - my %x; [ values %x ] [exception] ok 1181 - my %x; [ values %x ] [return] ok 1182 - my %x; [ values %x ] [variable] ok 1183 - our %x; local %x; use strict; [ values %x ] [exception] ok 1184 - our %x; local %x; use strict; [ values %x ] [return] ok 1185 - our %x; local %x; use strict; [ values %x ] [variable] ok 1186 - our %x; local %x; no strict; [ values %x ] [exception] ok 1187 - our %x; local %x; no strict; [ values %x ] [return] ok 1188 - our %x; local %x; no strict; [ values %x ] [variable] ok 1189 - my $x; [ values %$x ] <+fetch> [exception] ok 1190 - my $x; [ values %$x ] <+fetch> [return] ok 1191 - my $x; [ values %$x ] <+fetch> [variable] ok 1192 - our $x; local $x; use strict; [ values %$x ] <+fetch> [exception] ok 1193 - our $x; local $x; use strict; [ values %$x ] <+fetch> [return] ok 1194 - our $x; local $x; use strict; [ values %$x ] <+fetch> [variable] ok 1195 - our $x; local $x; no strict; [ values %$x ] <+fetch> [exception] ok 1196 - our $x; local $x; no strict; [ values %$x ] <+fetch> [return] ok 1197 - our $x; local $x; no strict; [ values %$x ] <+fetch> [variable] ok 1198 - my $x; [ values %$x ] <+fetch> [exception] ok 1199 - my $x; [ values %$x ] <+fetch> [return] ok 1200 - my $x; [ values %$x ] <+fetch> [variable] ok 1201 - our $x; local $x; use strict; [ values %$x ] <+fetch> [exception] ok 1202 - our $x; local $x; use strict; [ values %$x ] <+fetch> [return] ok 1203 - our $x; local $x; use strict; [ values %$x ] <+fetch> [variable] ok 1204 - our $x; local $x; no strict; [ values %$x ] <+fetch> [exception] ok 1205 - our $x; local $x; no strict; [ values %$x ] <+fetch> [return] ok 1206 - our $x; local $x; no strict; [ values %$x ] <+fetch> [variable] ok 1207 - my %x; [ values %x ] <+fetch> [exception] ok 1208 - my %x; [ values %x ] <+fetch> [return] ok 1209 - my %x; [ values %x ] <+fetch> [variable] ok 1210 - our %x; local %x; use strict; [ values %x ] <+fetch> [exception] ok 1211 - our %x; local %x; use strict; [ values %x ] <+fetch> [return] ok 1212 - our %x; local %x; use strict; [ values %x ] <+fetch> [variable] ok 1213 - our %x; local %x; no strict; [ values %x ] <+fetch> [exception] ok 1214 - our %x; local %x; no strict; [ values %x ] <+fetch> [return] ok 1215 - our %x; local %x; no strict; [ values %x ] <+fetch> [variable] ok 1216 - my $x; [ values %$x ] <+exists +delete +store> [exception] ok 1217 - my $x; [ values %$x ] <+exists +delete +store> [return] ok 1218 - my $x; [ values %$x ] <+exists +delete +store> [variable] ok 1219 - our $x; local $x; use strict; [ values %$x ] <+exists +delete +store> [exception] ok 1220 - our $x; local $x; use strict; [ values %$x ] <+exists +delete +store> [return] ok 1221 - our $x; local $x; use strict; [ values %$x ] <+exists +delete +store> [variable] ok 1222 - our $x; local $x; no strict; [ values %$x ] <+exists +delete +store> [exception] ok 1223 - our $x; local $x; no strict; [ values %$x ] <+exists +delete +store> [return] ok 1224 - our $x; local $x; no strict; [ values %$x ] <+exists +delete +store> [variable] ok 1225 - my $x; [ values %$x ] <+exists +delete +store> [exception] ok 1226 - my $x; [ values %$x ] <+exists +delete +store> [return] ok 1227 - my $x; [ values %$x ] <+exists +delete +store> [variable] ok 1228 - our $x; local $x; use strict; [ values %$x ] <+exists +delete +store> [exception] ok 1229 - our $x; local $x; use strict; [ values %$x ] <+exists +delete +store> [return] ok 1230 - our $x; local $x; use strict; [ values %$x ] <+exists +delete +store> [variable] ok 1231 - our $x; local $x; no strict; [ values %$x ] <+exists +delete +store> [exception] ok 1232 - our $x; local $x; no strict; [ values %$x ] <+exists +delete +store> [return] ok 1233 - our $x; local $x; no strict; [ values %$x ] <+exists +delete +store> [variable] ok 1234 - my %x; [ values %x ] <+exists +delete +store> [exception] ok 1235 - my %x; [ values %x ] <+exists +delete +store> [return] ok 1236 - my %x; [ values %x ] <+exists +delete +store> [variable] ok 1237 - our %x; local %x; use strict; [ values %x ] <+exists +delete +store> [exception] ok 1238 - our %x; local %x; use strict; [ values %x ] <+exists +delete +store> [return] ok 1239 - our %x; local %x; use strict; [ values %x ] <+exists +delete +store> [variable] ok 1240 - our %x; local %x; no strict; [ values %x ] <+exists +delete +store> [exception] ok 1241 - our %x; local %x; no strict; [ values %x ] <+exists +delete +store> [return] ok 1242 - our %x; local %x; no strict; [ values %x ] <+exists +delete +store> [variable] ok 1243 - my $x; $x->{a} = 1; [ values %$x ] [exception] ok 1244 - my $x; $x->{a} = 1; [ values %$x ] [return] ok 1245 - my $x; $x->{a} = 1; [ values %$x ] [variable] ok 1246 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] [exception] ok 1247 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] [return] ok 1248 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] [variable] ok 1249 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] [exception] ok 1250 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] [return] ok 1251 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] [variable] ok 1252 - my $x; $x->{a} = 1; [ values %$x ] [exception] ok 1253 - my $x; $x->{a} = 1; [ values %$x ] [return] ok 1254 - my $x; $x->{a} = 1; [ values %$x ] [variable] ok 1255 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] [exception] ok 1256 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] [return] ok 1257 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] [variable] ok 1258 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] [exception] ok 1259 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] [return] ok 1260 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] [variable] ok 1261 - my %x; $x{a} = 1; [ values %x ] [exception] ok 1262 - my %x; $x{a} = 1; [ values %x ] [return] ok 1263 - my %x; $x{a} = 1; [ values %x ] [variable] ok 1264 - our %x; local %x; use strict; $x{a} = 1; [ values %x ] [exception] ok 1265 - our %x; local %x; use strict; $x{a} = 1; [ values %x ] [return] ok 1266 - our %x; local %x; use strict; $x{a} = 1; [ values %x ] [variable] ok 1267 - our %x; local %x; no strict; $x{a} = 1; [ values %x ] [exception] ok 1268 - our %x; local %x; no strict; $x{a} = 1; [ values %x ] [return] ok 1269 - our %x; local %x; no strict; $x{a} = 1; [ values %x ] [variable] ok 1270 - my $x; $x->{a} = 1; [ values %$x ] [exception] ok 1271 - my $x; $x->{a} = 1; [ values %$x ] [return] ok 1272 - my $x; $x->{a} = 1; [ values %$x ] [variable] ok 1273 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] [exception] ok 1274 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] [return] ok 1275 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] [variable] ok 1276 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] [exception] ok 1277 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] [return] ok 1278 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] [variable] ok 1279 - my $x; $x->{a} = 1; [ values %$x ] [exception] ok 1280 - my $x; $x->{a} = 1; [ values %$x ] [return] ok 1281 - my $x; $x->{a} = 1; [ values %$x ] [variable] ok 1282 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] [exception] ok 1283 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] [return] ok 1284 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] [variable] ok 1285 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] [exception] ok 1286 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] [return] ok 1287 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] [variable] ok 1288 - my %x; $x{a} = 1; [ values %x ] [exception] ok 1289 - my %x; $x{a} = 1; [ values %x ] [return] ok 1290 - my %x; $x{a} = 1; [ values %x ] [variable] ok 1291 - our %x; local %x; use strict; $x{a} = 1; [ values %x ] [exception] ok 1292 - our %x; local %x; use strict; $x{a} = 1; [ values %x ] [return] ok 1293 - our %x; local %x; use strict; $x{a} = 1; [ values %x ] [variable] ok 1294 - our %x; local %x; no strict; $x{a} = 1; [ values %x ] [exception] ok 1295 - our %x; local %x; no strict; $x{a} = 1; [ values %x ] [return] ok 1296 - our %x; local %x; no strict; $x{a} = 1; [ values %x ] [variable] ok 1297 - my $x; $x->{a} = 1; [ values %$x ] <+fetch> [exception] ok 1298 - my $x; $x->{a} = 1; [ values %$x ] <+fetch> [return] ok 1299 - my $x; $x->{a} = 1; [ values %$x ] <+fetch> [variable] ok 1300 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] <+fetch> [exception] ok 1301 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] <+fetch> [return] ok 1302 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] <+fetch> [variable] ok 1303 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] <+fetch> [exception] ok 1304 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] <+fetch> [return] ok 1305 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] <+fetch> [variable] ok 1306 - my $x; $x->{a} = 1; [ values %$x ] <+fetch> [exception] ok 1307 - my $x; $x->{a} = 1; [ values %$x ] <+fetch> [return] ok 1308 - my $x; $x->{a} = 1; [ values %$x ] <+fetch> [variable] ok 1309 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] <+fetch> [exception] ok 1310 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] <+fetch> [return] ok 1311 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] <+fetch> [variable] ok 1312 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] <+fetch> [exception] ok 1313 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] <+fetch> [return] ok 1314 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] <+fetch> [variable] ok 1315 - my %x; $x{a} = 1; [ values %x ] <+fetch> [exception] ok 1316 - my %x; $x{a} = 1; [ values %x ] <+fetch> [return] ok 1317 - my %x; $x{a} = 1; [ values %x ] <+fetch> [variable] ok 1318 - our %x; local %x; use strict; $x{a} = 1; [ values %x ] <+fetch> [exception] ok 1319 - our %x; local %x; use strict; $x{a} = 1; [ values %x ] <+fetch> [return] ok 1320 - our %x; local %x; use strict; $x{a} = 1; [ values %x ] <+fetch> [variable] ok 1321 - our %x; local %x; no strict; $x{a} = 1; [ values %x ] <+fetch> [exception] ok 1322 - our %x; local %x; no strict; $x{a} = 1; [ values %x ] <+fetch> [return] ok 1323 - our %x; local %x; no strict; $x{a} = 1; [ values %x ] <+fetch> [variable] ok 1324 - my $x; $x->{a} = 1; [ values %$x ] <+exists +delete +store> [exception] ok 1325 - my $x; $x->{a} = 1; [ values %$x ] <+exists +delete +store> [return] ok 1326 - my $x; $x->{a} = 1; [ values %$x ] <+exists +delete +store> [variable] ok 1327 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] <+exists +delete +store> [exception] ok 1328 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] <+exists +delete +store> [return] ok 1329 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] <+exists +delete +store> [variable] ok 1330 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] <+exists +delete +store> [exception] ok 1331 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] <+exists +delete +store> [return] ok 1332 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] <+exists +delete +store> [variable] ok 1333 - my $x; $x->{a} = 1; [ values %$x ] <+exists +delete +store> [exception] ok 1334 - my $x; $x->{a} = 1; [ values %$x ] <+exists +delete +store> [return] ok 1335 - my $x; $x->{a} = 1; [ values %$x ] <+exists +delete +store> [variable] ok 1336 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] <+exists +delete +store> [exception] ok 1337 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] <+exists +delete +store> [return] ok 1338 - our $x; local $x; use strict; $x->{a} = 1; [ values %$x ] <+exists +delete +store> [variable] ok 1339 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] <+exists +delete +store> [exception] ok 1340 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] <+exists +delete +store> [return] ok 1341 - our $x; local $x; no strict; $x->{a} = 1; [ values %$x ] <+exists +delete +store> [variable] ok 1342 - my %x; $x{a} = 1; [ values %x ] <+exists +delete +store> [exception] ok 1343 - my %x; $x{a} = 1; [ values %x ] <+exists +delete +store> [return] ok 1344 - my %x; $x{a} = 1; [ values %x ] <+exists +delete +store> [variable] ok 1345 - our %x; local %x; use strict; $x{a} = 1; [ values %x ] <+exists +delete +store> [exception] ok 1346 - our %x; local %x; use strict; $x{a} = 1; [ values %x ] <+exists +delete +store> [return] ok 1347 - our %x; local %x; use strict; $x{a} = 1; [ values %x ] <+exists +delete +store> [variable] ok 1348 - our %x; local %x; no strict; $x{a} = 1; [ values %x ] <+exists +delete +store> [exception] ok 1349 - our %x; local %x; no strict; $x{a} = 1; [ values %x ] <+exists +delete +store> [return] ok 1350 - our %x; local %x; no strict; $x{a} = 1; [ values %x ] <+exists +delete +store> [variable] ok 1351 - my $x; values %{$x->{a}} [exception] ok 1352 - my $x; values %{$x->{a}} [return] ok 1353 - my $x; values %{$x->{a}} [variable] ok 1354 - our $x; local $x; use strict; values %{$x->{a}} [exception] ok 1355 - our $x; local $x; use strict; values %{$x->{a}} [return] ok 1356 - our $x; local $x; use strict; values %{$x->{a}} [variable] ok 1357 - our $x; local $x; no strict; values %{$x->{a}} [exception] ok 1358 - our $x; local $x; no strict; values %{$x->{a}} [return] ok 1359 - our $x; local $x; no strict; values %{$x->{a}} [variable] ok 1360 - my $x; values %{$$x{a}} [exception] ok 1361 - my $x; values %{$$x{a}} [return] ok 1362 - my $x; values %{$$x{a}} [variable] ok 1363 - our $x; local $x; use strict; values %{$$x{a}} [exception] ok 1364 - our $x; local $x; use strict; values %{$$x{a}} [return] ok 1365 - our $x; local $x; use strict; values %{$$x{a}} [variable] ok 1366 - our $x; local $x; no strict; values %{$$x{a}} [exception] ok 1367 - our $x; local $x; no strict; values %{$$x{a}} [return] ok 1368 - our $x; local $x; no strict; values %{$$x{a}} [variable] ok 1369 - my %x; values %{$x{a}} [exception] ok 1370 - my %x; values %{$x{a}} [return] ok 1371 - my %x; values %{$x{a}} [variable] ok 1372 - our %x; local %x; use strict; values %{$x{a}} [exception] ok 1373 - our %x; local %x; use strict; values %{$x{a}} [return] ok 1374 - our %x; local %x; use strict; values %{$x{a}} [variable] ok 1375 - our %x; local %x; no strict; values %{$x{a}} [exception] ok 1376 - our %x; local %x; no strict; values %{$x{a}} [return] ok 1377 - our %x; local %x; no strict; values %{$x{a}} [variable] ok 1378 - my $x; values %{$x->{a}} [exception] ok 1379 - my $x; values %{$x->{a}} [return] ok 1380 - my $x; values %{$x->{a}} [variable] ok 1381 - our $x; local $x; use strict; values %{$x->{a}} [exception] ok 1382 - our $x; local $x; use strict; values %{$x->{a}} [return] ok 1383 - our $x; local $x; use strict; values %{$x->{a}} [variable] ok 1384 - our $x; local $x; no strict; values %{$x->{a}} [exception] ok 1385 - our $x; local $x; no strict; values %{$x->{a}} [return] ok 1386 - our $x; local $x; no strict; values %{$x->{a}} [variable] ok 1387 - my $x; values %{$$x{a}} [exception] ok 1388 - my $x; values %{$$x{a}} [return] ok 1389 - my $x; values %{$$x{a}} [variable] ok 1390 - our $x; local $x; use strict; values %{$$x{a}} [exception] ok 1391 - our $x; local $x; use strict; values %{$$x{a}} [return] ok 1392 - our $x; local $x; use strict; values %{$$x{a}} [variable] ok 1393 - our $x; local $x; no strict; values %{$$x{a}} [exception] ok 1394 - our $x; local $x; no strict; values %{$$x{a}} [return] ok 1395 - our $x; local $x; no strict; values %{$$x{a}} [variable] ok 1396 - my %x; values %{$x{a}} [exception] ok 1397 - my %x; values %{$x{a}} [return] ok 1398 - my %x; values %{$x{a}} [variable] ok 1399 - our %x; local %x; use strict; values %{$x{a}} [exception] ok 1400 - our %x; local %x; use strict; values %{$x{a}} [return] ok 1401 - our %x; local %x; use strict; values %{$x{a}} [variable] ok 1402 - our %x; local %x; no strict; values %{$x{a}} [exception] ok 1403 - our %x; local %x; no strict; values %{$x{a}} [return] ok 1404 - our %x; local %x; no strict; values %{$x{a}} [variable] ok 1405 - my $x; values %{$x->{a}} <+fetch> [exception] ok 1406 - my $x; values %{$x->{a}} <+fetch> [return] ok 1407 - my $x; values %{$x->{a}} <+fetch> [variable] ok 1408 - our $x; local $x; use strict; values %{$x->{a}} <+fetch> [exception] ok 1409 - our $x; local $x; use strict; values %{$x->{a}} <+fetch> [return] ok 1410 - our $x; local $x; use strict; values %{$x->{a}} <+fetch> [variable] ok 1411 - our $x; local $x; no strict; values %{$x->{a}} <+fetch> [exception] ok 1412 - our $x; local $x; no strict; values %{$x->{a}} <+fetch> [return] ok 1413 - our $x; local $x; no strict; values %{$x->{a}} <+fetch> [variable] ok 1414 - my $x; values %{$$x{a}} <+fetch> [exception] ok 1415 - my $x; values %{$$x{a}} <+fetch> [return] ok 1416 - my $x; values %{$$x{a}} <+fetch> [variable] ok 1417 - our $x; local $x; use strict; values %{$$x{a}} <+fetch> [exception] ok 1418 - our $x; local $x; use strict; values %{$$x{a}} <+fetch> [return] ok 1419 - our $x; local $x; use strict; values %{$$x{a}} <+fetch> [variable] ok 1420 - our $x; local $x; no strict; values %{$$x{a}} <+fetch> [exception] ok 1421 - our $x; local $x; no strict; values %{$$x{a}} <+fetch> [return] ok 1422 - our $x; local $x; no strict; values %{$$x{a}} <+fetch> [variable] ok 1423 - my %x; values %{$x{a}} <+fetch> [exception] ok 1424 - my %x; values %{$x{a}} <+fetch> [return] ok 1425 - my %x; values %{$x{a}} <+fetch> [variable] ok 1426 - our %x; local %x; use strict; values %{$x{a}} <+fetch> [exception] ok 1427 - our %x; local %x; use strict; values %{$x{a}} <+fetch> [return] ok 1428 - our %x; local %x; use strict; values %{$x{a}} <+fetch> [variable] ok 1429 - our %x; local %x; no strict; values %{$x{a}} <+fetch> [exception] ok 1430 - our %x; local %x; no strict; values %{$x{a}} <+fetch> [return] ok 1431 - our %x; local %x; no strict; values %{$x{a}} <+fetch> [variable] ok 1432 - my $x; values %{$x->{a}} <+exists> [exception] ok 1433 - my $x; values %{$x->{a}} <+exists> [return] ok 1434 - my $x; values %{$x->{a}} <+exists> [variable] ok 1435 - our $x; local $x; use strict; values %{$x->{a}} <+exists> [exception] ok 1436 - our $x; local $x; use strict; values %{$x->{a}} <+exists> [return] ok 1437 - our $x; local $x; use strict; values %{$x->{a}} <+exists> [variable] ok 1438 - our $x; local $x; no strict; values %{$x->{a}} <+exists> [exception] ok 1439 - our $x; local $x; no strict; values %{$x->{a}} <+exists> [return] ok 1440 - our $x; local $x; no strict; values %{$x->{a}} <+exists> [variable] ok 1441 - my $x; values %{$$x{a}} <+exists> [exception] ok 1442 - my $x; values %{$$x{a}} <+exists> [return] ok 1443 - my $x; values %{$$x{a}} <+exists> [variable] ok 1444 - our $x; local $x; use strict; values %{$$x{a}} <+exists> [exception] ok 1445 - our $x; local $x; use strict; values %{$$x{a}} <+exists> [return] ok 1446 - our $x; local $x; use strict; values %{$$x{a}} <+exists> [variable] ok 1447 - our $x; local $x; no strict; values %{$$x{a}} <+exists> [exception] ok 1448 - our $x; local $x; no strict; values %{$$x{a}} <+exists> [return] ok 1449 - our $x; local $x; no strict; values %{$$x{a}} <+exists> [variable] ok 1450 - my %x; values %{$x{a}} <+exists> [exception] ok 1451 - my %x; values %{$x{a}} <+exists> [return] ok 1452 - my %x; values %{$x{a}} <+exists> [variable] ok 1453 - our %x; local %x; use strict; values %{$x{a}} <+exists> [exception] ok 1454 - our %x; local %x; use strict; values %{$x{a}} <+exists> [return] ok 1455 - our %x; local %x; use strict; values %{$x{a}} <+exists> [variable] ok 1456 - our %x; local %x; no strict; values %{$x{a}} <+exists> [exception] ok 1457 - our %x; local %x; no strict; values %{$x{a}} <+exists> [return] ok 1458 - our %x; local %x; no strict; values %{$x{a}} <+exists> [variable] ok 1459 - my $x; values %{$x->{a}} <+delete> [exception] ok 1460 - my $x; values %{$x->{a}} <+delete> [return] ok 1461 - my $x; values %{$x->{a}} <+delete> [variable] ok 1462 - our $x; local $x; use strict; values %{$x->{a}} <+delete> [exception] ok 1463 - our $x; local $x; use strict; values %{$x->{a}} <+delete> [return] ok 1464 - our $x; local $x; use strict; values %{$x->{a}} <+delete> [variable] ok 1465 - our $x; local $x; no strict; values %{$x->{a}} <+delete> [exception] ok 1466 - our $x; local $x; no strict; values %{$x->{a}} <+delete> [return] ok 1467 - our $x; local $x; no strict; values %{$x->{a}} <+delete> [variable] ok 1468 - my $x; values %{$$x{a}} <+delete> [exception] ok 1469 - my $x; values %{$$x{a}} <+delete> [return] ok 1470 - my $x; values %{$$x{a}} <+delete> [variable] ok 1471 - our $x; local $x; use strict; values %{$$x{a}} <+delete> [exception] ok 1472 - our $x; local $x; use strict; values %{$$x{a}} <+delete> [return] ok 1473 - our $x; local $x; use strict; values %{$$x{a}} <+delete> [variable] ok 1474 - our $x; local $x; no strict; values %{$$x{a}} <+delete> [exception] ok 1475 - our $x; local $x; no strict; values %{$$x{a}} <+delete> [return] ok 1476 - our $x; local $x; no strict; values %{$$x{a}} <+delete> [variable] ok 1477 - my %x; values %{$x{a}} <+delete> [exception] ok 1478 - my %x; values %{$x{a}} <+delete> [return] ok 1479 - my %x; values %{$x{a}} <+delete> [variable] ok 1480 - our %x; local %x; use strict; values %{$x{a}} <+delete> [exception] ok 1481 - our %x; local %x; use strict; values %{$x{a}} <+delete> [return] ok 1482 - our %x; local %x; use strict; values %{$x{a}} <+delete> [variable] ok 1483 - our %x; local %x; no strict; values %{$x{a}} <+delete> [exception] ok 1484 - our %x; local %x; no strict; values %{$x{a}} <+delete> [return] ok 1485 - our %x; local %x; no strict; values %{$x{a}} <+delete> [variable] ok 1486 - my $x; values %{$x->{a}} <+store> [exception] ok 1487 - my $x; values %{$x->{a}} <+store> [return] ok 1488 - my $x; values %{$x->{a}} <+store> [variable] ok 1489 - our $x; local $x; use strict; values %{$x->{a}} <+store> [exception] ok 1490 - our $x; local $x; use strict; values %{$x->{a}} <+store> [return] ok 1491 - our $x; local $x; use strict; values %{$x->{a}} <+store> [variable] ok 1492 - our $x; local $x; no strict; values %{$x->{a}} <+store> [exception] ok 1493 - our $x; local $x; no strict; values %{$x->{a}} <+store> [return] ok 1494 - our $x; local $x; no strict; values %{$x->{a}} <+store> [variable] ok 1495 - my $x; values %{$$x{a}} <+store> [exception] ok 1496 - my $x; values %{$$x{a}} <+store> [return] ok 1497 - my $x; values %{$$x{a}} <+store> [variable] ok 1498 - our $x; local $x; use strict; values %{$$x{a}} <+store> [exception] ok 1499 - our $x; local $x; use strict; values %{$$x{a}} <+store> [return] ok 1500 - our $x; local $x; use strict; values %{$$x{a}} <+store> [variable] ok 1501 - our $x; local $x; no strict; values %{$$x{a}} <+store> [exception] ok 1502 - our $x; local $x; no strict; values %{$$x{a}} <+store> [return] ok 1503 - our $x; local $x; no strict; values %{$$x{a}} <+store> [variable] ok 1504 - my %x; values %{$x{a}} <+store> [exception] ok 1505 - my %x; values %{$x{a}} <+store> [return] ok 1506 - my %x; values %{$x{a}} <+store> [variable] ok 1507 - our %x; local %x; use strict; values %{$x{a}} <+store> [exception] ok 1508 - our %x; local %x; use strict; values %{$x{a}} <+store> [return] ok 1509 - our %x; local %x; use strict; values %{$x{a}} <+store> [variable] ok 1510 - our %x; local %x; no strict; values %{$x{a}} <+store> [exception] ok 1511 - our %x; local %x; no strict; values %{$x{a}} <+store> [return] ok 1512 - our %x; local %x; no strict; values %{$x{a}} <+store> [variable] ok 1513 - my $x; values %{$x->{a}} <+strict +fetch> [exception] ok 1514 - my $x; values %{$x->{a}} <+strict +fetch> [return] ok 1515 - my $x; values %{$x->{a}} <+strict +fetch> [variable] ok 1516 - our $x; local $x; use strict; values %{$x->{a}} <+strict +fetch> [exception] ok 1517 - our $x; local $x; use strict; values %{$x->{a}} <+strict +fetch> [return] ok 1518 - our $x; local $x; use strict; values %{$x->{a}} <+strict +fetch> [variable] ok 1519 - our $x; local $x; no strict; values %{$x->{a}} <+strict +fetch> [exception] ok 1520 - our $x; local $x; no strict; values %{$x->{a}} <+strict +fetch> [return] ok 1521 - our $x; local $x; no strict; values %{$x->{a}} <+strict +fetch> [variable] ok 1522 - my $x; values %{$$x{a}} <+strict +fetch> [exception] ok 1523 - my $x; values %{$$x{a}} <+strict +fetch> [return] ok 1524 - my $x; values %{$$x{a}} <+strict +fetch> [variable] ok 1525 - our $x; local $x; use strict; values %{$$x{a}} <+strict +fetch> [exception] ok 1526 - our $x; local $x; use strict; values %{$$x{a}} <+strict +fetch> [return] ok 1527 - our $x; local $x; use strict; values %{$$x{a}} <+strict +fetch> [variable] ok 1528 - our $x; local $x; no strict; values %{$$x{a}} <+strict +fetch> [exception] ok 1529 - our $x; local $x; no strict; values %{$$x{a}} <+strict +fetch> [return] ok 1530 - our $x; local $x; no strict; values %{$$x{a}} <+strict +fetch> [variable] ok 1531 - my %x; 1 <+strict +fetch> [exception] ok 1532 - my %x; 1 <+strict +fetch> [return] ok 1533 - my %x; 1 <+strict +fetch> [variable] ok 1534 - our %x; local %x; use strict; 1 <+strict +fetch> [exception] ok 1535 - our %x; local %x; use strict; 1 <+strict +fetch> [return] ok 1536 - our %x; local %x; use strict; 1 <+strict +fetch> [variable] ok 1537 - our %x; local %x; no strict; 1 <+strict +fetch> [exception] ok 1538 - our %x; local %x; no strict; 1 <+strict +fetch> [return] ok 1539 - our %x; local %x; no strict; 1 <+strict +fetch> [variable] ok 1540 - my $x; values %{$x->{a}} <+strict +exists> [exception] ok 1541 - my $x; values %{$x->{a}} <+strict +exists> [return] ok 1542 - my $x; values %{$x->{a}} <+strict +exists> [variable] ok 1543 - our $x; local $x; use strict; values %{$x->{a}} <+strict +exists> [exception] ok 1544 - our $x; local $x; use strict; values %{$x->{a}} <+strict +exists> [return] ok 1545 - our $x; local $x; use strict; values %{$x->{a}} <+strict +exists> [variable] ok 1546 - our $x; local $x; no strict; values %{$x->{a}} <+strict +exists> [exception] ok 1547 - our $x; local $x; no strict; values %{$x->{a}} <+strict +exists> [return] ok 1548 - our $x; local $x; no strict; values %{$x->{a}} <+strict +exists> [variable] ok 1549 - my $x; values %{$$x{a}} <+strict +exists> [exception] ok 1550 - my $x; values %{$$x{a}} <+strict +exists> [return] ok 1551 - my $x; values %{$$x{a}} <+strict +exists> [variable] ok 1552 - our $x; local $x; use strict; values %{$$x{a}} <+strict +exists> [exception] ok 1553 - our $x; local $x; use strict; values %{$$x{a}} <+strict +exists> [return] ok 1554 - our $x; local $x; use strict; values %{$$x{a}} <+strict +exists> [variable] ok 1555 - our $x; local $x; no strict; values %{$$x{a}} <+strict +exists> [exception] ok 1556 - our $x; local $x; no strict; values %{$$x{a}} <+strict +exists> [return] ok 1557 - our $x; local $x; no strict; values %{$$x{a}} <+strict +exists> [variable] ok 1558 - my %x; values %{$x{a}} <+strict +exists> [exception] ok 1559 - my %x; values %{$x{a}} <+strict +exists> [return] ok 1560 - my %x; values %{$x{a}} <+strict +exists> [variable] ok 1561 - our %x; local %x; use strict; values %{$x{a}} <+strict +exists> [exception] ok 1562 - our %x; local %x; use strict; values %{$x{a}} <+strict +exists> [return] ok 1563 - our %x; local %x; use strict; values %{$x{a}} <+strict +exists> [variable] ok 1564 - our %x; local %x; no strict; values %{$x{a}} <+strict +exists> [exception] ok 1565 - our %x; local %x; no strict; values %{$x{a}} <+strict +exists> [return] ok 1566 - our %x; local %x; no strict; values %{$x{a}} <+strict +exists> [variable] ok 1567 - my $x; values %{$x->{a}} <+strict +delete> [exception] ok 1568 - my $x; values %{$x->{a}} <+strict +delete> [return] ok 1569 - my $x; values %{$x->{a}} <+strict +delete> [variable] ok 1570 - our $x; local $x; use strict; values %{$x->{a}} <+strict +delete> [exception] ok 1571 - our $x; local $x; use strict; values %{$x->{a}} <+strict +delete> [return] ok 1572 - our $x; local $x; use strict; values %{$x->{a}} <+strict +delete> [variable] ok 1573 - our $x; local $x; no strict; values %{$x->{a}} <+strict +delete> [exception] ok 1574 - our $x; local $x; no strict; values %{$x->{a}} <+strict +delete> [return] ok 1575 - our $x; local $x; no strict; values %{$x->{a}} <+strict +delete> [variable] ok 1576 - my $x; values %{$$x{a}} <+strict +delete> [exception] ok 1577 - my $x; values %{$$x{a}} <+strict +delete> [return] ok 1578 - my $x; values %{$$x{a}} <+strict +delete> [variable] ok 1579 - our $x; local $x; use strict; values %{$$x{a}} <+strict +delete> [exception] ok 1580 - our $x; local $x; use strict; values %{$$x{a}} <+strict +delete> [return] ok 1581 - our $x; local $x; use strict; values %{$$x{a}} <+strict +delete> [variable] ok 1582 - our $x; local $x; no strict; values %{$$x{a}} <+strict +delete> [exception] ok 1583 - our $x; local $x; no strict; values %{$$x{a}} <+strict +delete> [return] ok 1584 - our $x; local $x; no strict; values %{$$x{a}} <+strict +delete> [variable] ok 1585 - my %x; values %{$x{a}} <+strict +delete> [exception] ok 1586 - my %x; values %{$x{a}} <+strict +delete> [return] ok 1587 - my %x; values %{$x{a}} <+strict +delete> [variable] ok 1588 - our %x; local %x; use strict; values %{$x{a}} <+strict +delete> [exception] ok 1589 - our %x; local %x; use strict; values %{$x{a}} <+strict +delete> [return] ok 1590 - our %x; local %x; use strict; values %{$x{a}} <+strict +delete> [variable] ok 1591 - our %x; local %x; no strict; values %{$x{a}} <+strict +delete> [exception] ok 1592 - our %x; local %x; no strict; values %{$x{a}} <+strict +delete> [return] ok 1593 - our %x; local %x; no strict; values %{$x{a}} <+strict +delete> [variable] ok 1594 - my $x; values %{$x->{a}} <+strict +store> [exception] ok 1595 - my $x; values %{$x->{a}} <+strict +store> [return] ok 1596 - my $x; values %{$x->{a}} <+strict +store> [variable] ok 1597 - our $x; local $x; use strict; values %{$x->{a}} <+strict +store> [exception] ok 1598 - our $x; local $x; use strict; values %{$x->{a}} <+strict +store> [return] ok 1599 - our $x; local $x; use strict; values %{$x->{a}} <+strict +store> [variable] ok 1600 - our $x; local $x; no strict; values %{$x->{a}} <+strict +store> [exception] ok 1601 - our $x; local $x; no strict; values %{$x->{a}} <+strict +store> [return] ok 1602 - our $x; local $x; no strict; values %{$x->{a}} <+strict +store> [variable] ok 1603 - my $x; values %{$$x{a}} <+strict +store> [exception] ok 1604 - my $x; values %{$$x{a}} <+strict +store> [return] ok 1605 - my $x; values %{$$x{a}} <+strict +store> [variable] ok 1606 - our $x; local $x; use strict; values %{$$x{a}} <+strict +store> [exception] ok 1607 - our $x; local $x; use strict; values %{$$x{a}} <+strict +store> [return] ok 1608 - our $x; local $x; use strict; values %{$$x{a}} <+strict +store> [variable] ok 1609 - our $x; local $x; no strict; values %{$$x{a}} <+strict +store> [exception] ok 1610 - our $x; local $x; no strict; values %{$$x{a}} <+strict +store> [return] ok 1611 - our $x; local $x; no strict; values %{$$x{a}} <+strict +store> [variable] ok 1612 - my %x; values %{$x{a}} <+strict +store> [exception] ok 1613 - my %x; values %{$x{a}} <+strict +store> [return] ok 1614 - my %x; values %{$x{a}} <+strict +store> [variable] ok 1615 - our %x; local %x; use strict; values %{$x{a}} <+strict +store> [exception] ok 1616 - our %x; local %x; use strict; values %{$x{a}} <+strict +store> [return] ok 1617 - our %x; local %x; use strict; values %{$x{a}} <+strict +store> [variable] ok 1618 - our %x; local %x; no strict; values %{$x{a}} <+strict +store> [exception] ok 1619 - our %x; local %x; no strict; values %{$x{a}} <+strict +store> [return] ok 1620 - our %x; local %x; no strict; values %{$x{a}} <+strict +store> [variable] ok 1621 - my $x; [ values %{$x->{a}} ] [exception] ok 1622 - my $x; [ values %{$x->{a}} ] [return] ok 1623 - my $x; [ values %{$x->{a}} ] [variable] ok 1624 - our $x; local $x; use strict; [ values %{$x->{a}} ] [exception] ok 1625 - our $x; local $x; use strict; [ values %{$x->{a}} ] [return] ok 1626 - our $x; local $x; use strict; [ values %{$x->{a}} ] [variable] ok 1627 - our $x; local $x; no strict; [ values %{$x->{a}} ] [exception] ok 1628 - our $x; local $x; no strict; [ values %{$x->{a}} ] [return] ok 1629 - our $x; local $x; no strict; [ values %{$x->{a}} ] [variable] ok 1630 - my $x; [ values %{$$x{a}} ] [exception] ok 1631 - my $x; [ values %{$$x{a}} ] [return] ok 1632 - my $x; [ values %{$$x{a}} ] [variable] ok 1633 - our $x; local $x; use strict; [ values %{$$x{a}} ] [exception] ok 1634 - our $x; local $x; use strict; [ values %{$$x{a}} ] [return] ok 1635 - our $x; local $x; use strict; [ values %{$$x{a}} ] [variable] ok 1636 - our $x; local $x; no strict; [ values %{$$x{a}} ] [exception] ok 1637 - our $x; local $x; no strict; [ values %{$$x{a}} ] [return] ok 1638 - our $x; local $x; no strict; [ values %{$$x{a}} ] [variable] ok 1639 - my %x; [ values %{$x{a}} ] [exception] ok 1640 - my %x; [ values %{$x{a}} ] [return] ok 1641 - my %x; [ values %{$x{a}} ] [variable] ok 1642 - our %x; local %x; use strict; [ values %{$x{a}} ] [exception] ok 1643 - our %x; local %x; use strict; [ values %{$x{a}} ] [return] ok 1644 - our %x; local %x; use strict; [ values %{$x{a}} ] [variable] ok 1645 - our %x; local %x; no strict; [ values %{$x{a}} ] [exception] ok 1646 - our %x; local %x; no strict; [ values %{$x{a}} ] [return] ok 1647 - our %x; local %x; no strict; [ values %{$x{a}} ] [variable] ok 1648 - my $x; [ values %{$x->{a}} ] [exception] ok 1649 - my $x; [ values %{$x->{a}} ] [return] ok 1650 - my $x; [ values %{$x->{a}} ] [variable] ok 1651 - our $x; local $x; use strict; [ values %{$x->{a}} ] [exception] ok 1652 - our $x; local $x; use strict; [ values %{$x->{a}} ] [return] ok 1653 - our $x; local $x; use strict; [ values %{$x->{a}} ] [variable] ok 1654 - our $x; local $x; no strict; [ values %{$x->{a}} ] [exception] ok 1655 - our $x; local $x; no strict; [ values %{$x->{a}} ] [return] ok 1656 - our $x; local $x; no strict; [ values %{$x->{a}} ] [variable] ok 1657 - my $x; [ values %{$$x{a}} ] [exception] ok 1658 - my $x; [ values %{$$x{a}} ] [return] ok 1659 - my $x; [ values %{$$x{a}} ] [variable] ok 1660 - our $x; local $x; use strict; [ values %{$$x{a}} ] [exception] ok 1661 - our $x; local $x; use strict; [ values %{$$x{a}} ] [return] ok 1662 - our $x; local $x; use strict; [ values %{$$x{a}} ] [variable] ok 1663 - our $x; local $x; no strict; [ values %{$$x{a}} ] [exception] ok 1664 - our $x; local $x; no strict; [ values %{$$x{a}} ] [return] ok 1665 - our $x; local $x; no strict; [ values %{$$x{a}} ] [variable] ok 1666 - my %x; [ values %{$x{a}} ] [exception] ok 1667 - my %x; [ values %{$x{a}} ] [return] ok 1668 - my %x; [ values %{$x{a}} ] [variable] ok 1669 - our %x; local %x; use strict; [ values %{$x{a}} ] [exception] ok 1670 - our %x; local %x; use strict; [ values %{$x{a}} ] [return] ok 1671 - our %x; local %x; use strict; [ values %{$x{a}} ] [variable] ok 1672 - our %x; local %x; no strict; [ values %{$x{a}} ] [exception] ok 1673 - our %x; local %x; no strict; [ values %{$x{a}} ] [return] ok 1674 - our %x; local %x; no strict; [ values %{$x{a}} ] [variable] ok 1675 - my $x; [ values %{$x->{a}} ] <+fetch> [exception] ok 1676 - my $x; [ values %{$x->{a}} ] <+fetch> [return] ok 1677 - my $x; [ values %{$x->{a}} ] <+fetch> [variable] ok 1678 - our $x; local $x; use strict; [ values %{$x->{a}} ] <+fetch> [exception] ok 1679 - our $x; local $x; use strict; [ values %{$x->{a}} ] <+fetch> [return] ok 1680 - our $x; local $x; use strict; [ values %{$x->{a}} ] <+fetch> [variable] ok 1681 - our $x; local $x; no strict; [ values %{$x->{a}} ] <+fetch> [exception] ok 1682 - our $x; local $x; no strict; [ values %{$x->{a}} ] <+fetch> [return] ok 1683 - our $x; local $x; no strict; [ values %{$x->{a}} ] <+fetch> [variable] ok 1684 - my $x; [ values %{$$x{a}} ] <+fetch> [exception] ok 1685 - my $x; [ values %{$$x{a}} ] <+fetch> [return] ok 1686 - my $x; [ values %{$$x{a}} ] <+fetch> [variable] ok 1687 - our $x; local $x; use strict; [ values %{$$x{a}} ] <+fetch> [exception] ok 1688 - our $x; local $x; use strict; [ values %{$$x{a}} ] <+fetch> [return] ok 1689 - our $x; local $x; use strict; [ values %{$$x{a}} ] <+fetch> [variable] ok 1690 - our $x; local $x; no strict; [ values %{$$x{a}} ] <+fetch> [exception] ok 1691 - our $x; local $x; no strict; [ values %{$$x{a}} ] <+fetch> [return] ok 1692 - our $x; local $x; no strict; [ values %{$$x{a}} ] <+fetch> [variable] ok 1693 - my %x; [ values %{$x{a}} ] <+fetch> [exception] ok 1694 - my %x; [ values %{$x{a}} ] <+fetch> [return] ok 1695 - my %x; [ values %{$x{a}} ] <+fetch> [variable] ok 1696 - our %x; local %x; use strict; [ values %{$x{a}} ] <+fetch> [exception] ok 1697 - our %x; local %x; use strict; [ values %{$x{a}} ] <+fetch> [return] ok 1698 - our %x; local %x; use strict; [ values %{$x{a}} ] <+fetch> [variable] ok 1699 - our %x; local %x; no strict; [ values %{$x{a}} ] <+fetch> [exception] ok 1700 - our %x; local %x; no strict; [ values %{$x{a}} ] <+fetch> [return] ok 1701 - our %x; local %x; no strict; [ values %{$x{a}} ] <+fetch> [variable] ok 1702 - my $x; [ values %{$x->{a}} ] <+exists +delete +store> [exception] ok 1703 - my $x; [ values %{$x->{a}} ] <+exists +delete +store> [return] ok 1704 - my $x; [ values %{$x->{a}} ] <+exists +delete +store> [variable] ok 1705 - our $x; local $x; use strict; [ values %{$x->{a}} ] <+exists +delete +store> [exception] ok 1706 - our $x; local $x; use strict; [ values %{$x->{a}} ] <+exists +delete +store> [return] ok 1707 - our $x; local $x; use strict; [ values %{$x->{a}} ] <+exists +delete +store> [variable] ok 1708 - our $x; local $x; no strict; [ values %{$x->{a}} ] <+exists +delete +store> [exception] ok 1709 - our $x; local $x; no strict; [ values %{$x->{a}} ] <+exists +delete +store> [return] ok 1710 - our $x; local $x; no strict; [ values %{$x->{a}} ] <+exists +delete +store> [variable] ok 1711 - my $x; [ values %{$$x{a}} ] <+exists +delete +store> [exception] ok 1712 - my $x; [ values %{$$x{a}} ] <+exists +delete +store> [return] ok 1713 - my $x; [ values %{$$x{a}} ] <+exists +delete +store> [variable] ok 1714 - our $x; local $x; use strict; [ values %{$$x{a}} ] <+exists +delete +store> [exception] ok 1715 - our $x; local $x; use strict; [ values %{$$x{a}} ] <+exists +delete +store> [return] ok 1716 - our $x; local $x; use strict; [ values %{$$x{a}} ] <+exists +delete +store> [variable] ok 1717 - our $x; local $x; no strict; [ values %{$$x{a}} ] <+exists +delete +store> [exception] ok 1718 - our $x; local $x; no strict; [ values %{$$x{a}} ] <+exists +delete +store> [return] ok 1719 - our $x; local $x; no strict; [ values %{$$x{a}} ] <+exists +delete +store> [variable] ok 1720 - my %x; [ values %{$x{a}} ] <+exists +delete +store> [exception] ok 1721 - my %x; [ values %{$x{a}} ] <+exists +delete +store> [return] ok 1722 - my %x; [ values %{$x{a}} ] <+exists +delete +store> [variable] ok 1723 - our %x; local %x; use strict; [ values %{$x{a}} ] <+exists +delete +store> [exception] ok 1724 - our %x; local %x; use strict; [ values %{$x{a}} ] <+exists +delete +store> [return] ok 1725 - our %x; local %x; use strict; [ values %{$x{a}} ] <+exists +delete +store> [variable] ok 1726 - our %x; local %x; no strict; [ values %{$x{a}} ] <+exists +delete +store> [exception] ok 1727 - our %x; local %x; no strict; [ values %{$x{a}} ] <+exists +delete +store> [return] ok 1728 - our %x; local %x; no strict; [ values %{$x{a}} ] <+exists +delete +store> [variable] ok # Using Tie::StdHash 1.03 t/23-hash-tied.t .......... 1..1 ok 1 - nested tied hashes ok t/24-hash-numerous.t ...... 1..16 ok 1 - numerous fetches from an undef lexical ok 2 - numerous fetches from a 1-level hashref lexical ok 3 - numerous fetches from an undef global ok 4 - numerous fetches from a 1-level hashref global ok 5 - numerous slices from an undef lexical ok 6 - numerous slices from a 1-level hashref lexical ok 7 - numerous slices from an undef global ok 8 - numerous slices from a 1-level hashref global ok 9 - numerous exists from an undef lexical ok 10 - numerous exists from a 1-level hashref lexical ok 11 - numerous exists from an undef global ok 12 - numerous exists from a 1-level hashref global ok 13 - numerous deletes from an undef lexical ok 14 - numerous deletes from a 1-level hashref lexical ok 15 - numerous deletes from an undef global ok 16 - numerous deletes from a 1-level hashref global ok t/30-array.t .............. 1..8154 ok 1 - my $x; $x->[$N[0]] [exception] ok 2 - my $x; $x->[$N[0]] [return] ok 3 - my $x; $x->[$N[0]] [variable] ok 4 - our $x; local $x; use strict; $x->[$N[0]] [exception] ok 5 - our $x; local $x; use strict; $x->[$N[0]] [return] ok 6 - our $x; local $x; use strict; $x->[$N[0]] [variable] ok 7 - our $x; local $x; no strict; $x->[$N[0]] [exception] ok 8 - our $x; local $x; no strict; $x->[$N[0]] [return] ok 9 - our $x; local $x; no strict; $x->[$N[0]] [variable] ok 10 - my $x; $$x[$N[0]] [exception] ok 11 - my $x; $$x[$N[0]] [return] ok 12 - my $x; $$x[$N[0]] [variable] ok 13 - our $x; local $x; use strict; $$x[$N[0]] [exception] ok 14 - our $x; local $x; use strict; $$x[$N[0]] [return] ok 15 - our $x; local $x; use strict; $$x[$N[0]] [variable] ok 16 - our $x; local $x; no strict; $$x[$N[0]] [exception] ok 17 - our $x; local $x; no strict; $$x[$N[0]] [return] ok 18 - our $x; local $x; no strict; $$x[$N[0]] [variable] ok 19 - my @x; $x[$N[0]] [exception] ok 20 - my @x; $x[$N[0]] [return] ok 21 - my @x; $x[$N[0]] [variable] ok 22 - our @x; local @x; use strict; $x[$N[0]] [exception] ok 23 - our @x; local @x; use strict; $x[$N[0]] [return] ok 24 - our @x; local @x; use strict; $x[$N[0]] [variable] ok 25 - our @x; local @x; no strict; $x[$N[0]] [exception] ok 26 - our @x; local @x; no strict; $x[$N[0]] [return] ok 27 - our @x; local @x; no strict; $x[$N[0]] [variable] ok 28 - my $x; $x->[$N[0]] [exception] ok 29 - my $x; $x->[$N[0]] [return] ok 30 - my $x; $x->[$N[0]] [variable] ok 31 - our $x; local $x; use strict; $x->[$N[0]] [exception] ok 32 - our $x; local $x; use strict; $x->[$N[0]] [return] ok 33 - our $x; local $x; use strict; $x->[$N[0]] [variable] ok 34 - our $x; local $x; no strict; $x->[$N[0]] [exception] ok 35 - our $x; local $x; no strict; $x->[$N[0]] [return] ok 36 - our $x; local $x; no strict; $x->[$N[0]] [variable] ok 37 - my $x; $$x[$N[0]] [exception] ok 38 - my $x; $$x[$N[0]] [return] ok 39 - my $x; $$x[$N[0]] [variable] ok 40 - our $x; local $x; use strict; $$x[$N[0]] [exception] ok 41 - our $x; local $x; use strict; $$x[$N[0]] [return] ok 42 - our $x; local $x; use strict; $$x[$N[0]] [variable] ok 43 - our $x; local $x; no strict; $$x[$N[0]] [exception] ok 44 - our $x; local $x; no strict; $$x[$N[0]] [return] ok 45 - our $x; local $x; no strict; $$x[$N[0]] [variable] ok 46 - my @x; $x[$N[0]] [exception] ok 47 - my @x; $x[$N[0]] [return] ok 48 - my @x; $x[$N[0]] [variable] ok 49 - our @x; local @x; use strict; $x[$N[0]] [exception] ok 50 - our @x; local @x; use strict; $x[$N[0]] [return] ok 51 - our @x; local @x; use strict; $x[$N[0]] [variable] ok 52 - our @x; local @x; no strict; $x[$N[0]] [exception] ok 53 - our @x; local @x; no strict; $x[$N[0]] [return] ok 54 - our @x; local @x; no strict; $x[$N[0]] [variable] ok 55 - my $x; $x->[$N[0]] <+fetch> [exception] ok 56 - my $x; $x->[$N[0]] <+fetch> [return] ok 57 - my $x; $x->[$N[0]] <+fetch> [variable] ok 58 - our $x; local $x; use strict; $x->[$N[0]] <+fetch> [exception] ok 59 - our $x; local $x; use strict; $x->[$N[0]] <+fetch> [return] ok 60 - our $x; local $x; use strict; $x->[$N[0]] <+fetch> [variable] ok 61 - our $x; local $x; no strict; $x->[$N[0]] <+fetch> [exception] ok 62 - our $x; local $x; no strict; $x->[$N[0]] <+fetch> [return] ok 63 - our $x; local $x; no strict; $x->[$N[0]] <+fetch> [variable] ok 64 - my $x; $$x[$N[0]] <+fetch> [exception] ok 65 - my $x; $$x[$N[0]] <+fetch> [return] ok 66 - my $x; $$x[$N[0]] <+fetch> [variable] ok 67 - our $x; local $x; use strict; $$x[$N[0]] <+fetch> [exception] ok 68 - our $x; local $x; use strict; $$x[$N[0]] <+fetch> [return] ok 69 - our $x; local $x; use strict; $$x[$N[0]] <+fetch> [variable] ok 70 - our $x; local $x; no strict; $$x[$N[0]] <+fetch> [exception] ok 71 - our $x; local $x; no strict; $$x[$N[0]] <+fetch> [return] ok 72 - our $x; local $x; no strict; $$x[$N[0]] <+fetch> [variable] ok 73 - my @x; $x[$N[0]] <+fetch> [exception] ok 74 - my @x; $x[$N[0]] <+fetch> [return] ok 75 - my @x; $x[$N[0]] <+fetch> [variable] ok 76 - our @x; local @x; use strict; $x[$N[0]] <+fetch> [exception] ok 77 - our @x; local @x; use strict; $x[$N[0]] <+fetch> [return] ok 78 - our @x; local @x; use strict; $x[$N[0]] <+fetch> [variable] ok 79 - our @x; local @x; no strict; $x[$N[0]] <+fetch> [exception] ok 80 - our @x; local @x; no strict; $x[$N[0]] <+fetch> [return] ok 81 - our @x; local @x; no strict; $x[$N[0]] <+fetch> [variable] ok 82 - my $x; $x->[$N[0]] <+exists> [exception] ok 83 - my $x; $x->[$N[0]] <+exists> [return] ok 84 - my $x; $x->[$N[0]] <+exists> [variable] ok 85 - our $x; local $x; use strict; $x->[$N[0]] <+exists> [exception] ok 86 - our $x; local $x; use strict; $x->[$N[0]] <+exists> [return] ok 87 - our $x; local $x; use strict; $x->[$N[0]] <+exists> [variable] ok 88 - our $x; local $x; no strict; $x->[$N[0]] <+exists> [exception] ok 89 - our $x; local $x; no strict; $x->[$N[0]] <+exists> [return] ok 90 - our $x; local $x; no strict; $x->[$N[0]] <+exists> [variable] ok 91 - my $x; $$x[$N[0]] <+exists> [exception] ok 92 - my $x; $$x[$N[0]] <+exists> [return] ok 93 - my $x; $$x[$N[0]] <+exists> [variable] ok 94 - our $x; local $x; use strict; $$x[$N[0]] <+exists> [exception] ok 95 - our $x; local $x; use strict; $$x[$N[0]] <+exists> [return] ok 96 - our $x; local $x; use strict; $$x[$N[0]] <+exists> [variable] ok 97 - our $x; local $x; no strict; $$x[$N[0]] <+exists> [exception] ok 98 - our $x; local $x; no strict; $$x[$N[0]] <+exists> [return] ok 99 - our $x; local $x; no strict; $$x[$N[0]] <+exists> [variable] ok 100 - my @x; $x[$N[0]] <+exists> [exception] ok 101 - my @x; $x[$N[0]] <+exists> [return] ok 102 - my @x; $x[$N[0]] <+exists> [variable] ok 103 - our @x; local @x; use strict; $x[$N[0]] <+exists> [exception] ok 104 - our @x; local @x; use strict; $x[$N[0]] <+exists> [return] ok 105 - our @x; local @x; use strict; $x[$N[0]] <+exists> [variable] ok 106 - our @x; local @x; no strict; $x[$N[0]] <+exists> [exception] ok 107 - our @x; local @x; no strict; $x[$N[0]] <+exists> [return] ok 108 - our @x; local @x; no strict; $x[$N[0]] <+exists> [variable] ok 109 - my $x; $x->[$N[0]] <+delete> [exception] ok 110 - my $x; $x->[$N[0]] <+delete> [return] ok 111 - my $x; $x->[$N[0]] <+delete> [variable] ok 112 - our $x; local $x; use strict; $x->[$N[0]] <+delete> [exception] ok 113 - our $x; local $x; use strict; $x->[$N[0]] <+delete> [return] ok 114 - our $x; local $x; use strict; $x->[$N[0]] <+delete> [variable] ok 115 - our $x; local $x; no strict; $x->[$N[0]] <+delete> [exception] ok 116 - our $x; local $x; no strict; $x->[$N[0]] <+delete> [return] ok 117 - our $x; local $x; no strict; $x->[$N[0]] <+delete> [variable] ok 118 - my $x; $$x[$N[0]] <+delete> [exception] ok 119 - my $x; $$x[$N[0]] <+delete> [return] ok 120 - my $x; $$x[$N[0]] <+delete> [variable] ok 121 - our $x; local $x; use strict; $$x[$N[0]] <+delete> [exception] ok 122 - our $x; local $x; use strict; $$x[$N[0]] <+delete> [return] ok 123 - our $x; local $x; use strict; $$x[$N[0]] <+delete> [variable] ok 124 - our $x; local $x; no strict; $$x[$N[0]] <+delete> [exception] ok 125 - our $x; local $x; no strict; $$x[$N[0]] <+delete> [return] ok 126 - our $x; local $x; no strict; $$x[$N[0]] <+delete> [variable] ok 127 - my @x; $x[$N[0]] <+delete> [exception] ok 128 - my @x; $x[$N[0]] <+delete> [return] ok 129 - my @x; $x[$N[0]] <+delete> [variable] ok 130 - our @x; local @x; use strict; $x[$N[0]] <+delete> [exception] ok 131 - our @x; local @x; use strict; $x[$N[0]] <+delete> [return] ok 132 - our @x; local @x; use strict; $x[$N[0]] <+delete> [variable] ok 133 - our @x; local @x; no strict; $x[$N[0]] <+delete> [exception] ok 134 - our @x; local @x; no strict; $x[$N[0]] <+delete> [return] ok 135 - our @x; local @x; no strict; $x[$N[0]] <+delete> [variable] ok 136 - my $x; $x->[$N[0]] <+store> [exception] ok 137 - my $x; $x->[$N[0]] <+store> [return] ok 138 - my $x; $x->[$N[0]] <+store> [variable] ok 139 - our $x; local $x; use strict; $x->[$N[0]] <+store> [exception] ok 140 - our $x; local $x; use strict; $x->[$N[0]] <+store> [return] ok 141 - our $x; local $x; use strict; $x->[$N[0]] <+store> [variable] ok 142 - our $x; local $x; no strict; $x->[$N[0]] <+store> [exception] ok 143 - our $x; local $x; no strict; $x->[$N[0]] <+store> [return] ok 144 - our $x; local $x; no strict; $x->[$N[0]] <+store> [variable] ok 145 - my $x; $$x[$N[0]] <+store> [exception] ok 146 - my $x; $$x[$N[0]] <+store> [return] ok 147 - my $x; $$x[$N[0]] <+store> [variable] ok 148 - our $x; local $x; use strict; $$x[$N[0]] <+store> [exception] ok 149 - our $x; local $x; use strict; $$x[$N[0]] <+store> [return] ok 150 - our $x; local $x; use strict; $$x[$N[0]] <+store> [variable] ok 151 - our $x; local $x; no strict; $$x[$N[0]] <+store> [exception] ok 152 - our $x; local $x; no strict; $$x[$N[0]] <+store> [return] ok 153 - our $x; local $x; no strict; $$x[$N[0]] <+store> [variable] ok 154 - my @x; $x[$N[0]] <+store> [exception] ok 155 - my @x; $x[$N[0]] <+store> [return] ok 156 - my @x; $x[$N[0]] <+store> [variable] ok 157 - our @x; local @x; use strict; $x[$N[0]] <+store> [exception] ok 158 - our @x; local @x; use strict; $x[$N[0]] <+store> [return] ok 159 - our @x; local @x; use strict; $x[$N[0]] <+store> [variable] ok 160 - our @x; local @x; no strict; $x[$N[0]] <+store> [exception] ok 161 - our @x; local @x; no strict; $x[$N[0]] <+store> [return] ok 162 - our @x; local @x; no strict; $x[$N[0]] <+store> [variable] ok 163 - my $x; $x->[$N[0]] <-fetch> [exception] ok 164 - my $x; $x->[$N[0]] <-fetch> [return] ok 165 - my $x; $x->[$N[0]] <-fetch> [variable] ok 166 - our $x; local $x; use strict; $x->[$N[0]] <-fetch> [exception] ok 167 - our $x; local $x; use strict; $x->[$N[0]] <-fetch> [return] ok 168 - our $x; local $x; use strict; $x->[$N[0]] <-fetch> [variable] ok 169 - our $x; local $x; no strict; $x->[$N[0]] <-fetch> [exception] ok 170 - our $x; local $x; no strict; $x->[$N[0]] <-fetch> [return] ok 171 - our $x; local $x; no strict; $x->[$N[0]] <-fetch> [variable] ok 172 - my $x; $$x[$N[0]] <-fetch> [exception] ok 173 - my $x; $$x[$N[0]] <-fetch> [return] ok 174 - my $x; $$x[$N[0]] <-fetch> [variable] ok 175 - our $x; local $x; use strict; $$x[$N[0]] <-fetch> [exception] ok 176 - our $x; local $x; use strict; $$x[$N[0]] <-fetch> [return] ok 177 - our $x; local $x; use strict; $$x[$N[0]] <-fetch> [variable] ok 178 - our $x; local $x; no strict; $$x[$N[0]] <-fetch> [exception] ok 179 - our $x; local $x; no strict; $$x[$N[0]] <-fetch> [return] ok 180 - our $x; local $x; no strict; $$x[$N[0]] <-fetch> [variable] ok 181 - my @x; $x[$N[0]] <-fetch> [exception] ok 182 - my @x; $x[$N[0]] <-fetch> [return] ok 183 - my @x; $x[$N[0]] <-fetch> [variable] ok 184 - our @x; local @x; use strict; $x[$N[0]] <-fetch> [exception] ok 185 - our @x; local @x; use strict; $x[$N[0]] <-fetch> [return] ok 186 - our @x; local @x; use strict; $x[$N[0]] <-fetch> [variable] ok 187 - our @x; local @x; no strict; $x[$N[0]] <-fetch> [exception] ok 188 - our @x; local @x; no strict; $x[$N[0]] <-fetch> [return] ok 189 - our @x; local @x; no strict; $x[$N[0]] <-fetch> [variable] ok 190 - my $x; $x->[$N[0]] <+fetch -fetch> [exception] ok 191 - my $x; $x->[$N[0]] <+fetch -fetch> [return] ok 192 - my $x; $x->[$N[0]] <+fetch -fetch> [variable] ok 193 - our $x; local $x; use strict; $x->[$N[0]] <+fetch -fetch> [exception] ok 194 - our $x; local $x; use strict; $x->[$N[0]] <+fetch -fetch> [return] ok 195 - our $x; local $x; use strict; $x->[$N[0]] <+fetch -fetch> [variable] ok 196 - our $x; local $x; no strict; $x->[$N[0]] <+fetch -fetch> [exception] ok 197 - our $x; local $x; no strict; $x->[$N[0]] <+fetch -fetch> [return] ok 198 - our $x; local $x; no strict; $x->[$N[0]] <+fetch -fetch> [variable] ok 199 - my $x; $$x[$N[0]] <+fetch -fetch> [exception] ok 200 - my $x; $$x[$N[0]] <+fetch -fetch> [return] ok 201 - my $x; $$x[$N[0]] <+fetch -fetch> [variable] ok 202 - our $x; local $x; use strict; $$x[$N[0]] <+fetch -fetch> [exception] ok 203 - our $x; local $x; use strict; $$x[$N[0]] <+fetch -fetch> [return] ok 204 - our $x; local $x; use strict; $$x[$N[0]] <+fetch -fetch> [variable] ok 205 - our $x; local $x; no strict; $$x[$N[0]] <+fetch -fetch> [exception] ok 206 - our $x; local $x; no strict; $$x[$N[0]] <+fetch -fetch> [return] ok 207 - our $x; local $x; no strict; $$x[$N[0]] <+fetch -fetch> [variable] ok 208 - my @x; $x[$N[0]] <+fetch -fetch> [exception] ok 209 - my @x; $x[$N[0]] <+fetch -fetch> [return] ok 210 - my @x; $x[$N[0]] <+fetch -fetch> [variable] ok 211 - our @x; local @x; use strict; $x[$N[0]] <+fetch -fetch> [exception] ok 212 - our @x; local @x; use strict; $x[$N[0]] <+fetch -fetch> [return] ok 213 - our @x; local @x; use strict; $x[$N[0]] <+fetch -fetch> [variable] ok 214 - our @x; local @x; no strict; $x[$N[0]] <+fetch -fetch> [exception] ok 215 - our @x; local @x; no strict; $x[$N[0]] <+fetch -fetch> [return] ok 216 - our @x; local @x; no strict; $x[$N[0]] <+fetch -fetch> [variable] ok 217 - my $x; $x->[$N[0]] <-fetch +fetch> [exception] ok 218 - my $x; $x->[$N[0]] <-fetch +fetch> [return] ok 219 - my $x; $x->[$N[0]] <-fetch +fetch> [variable] ok 220 - our $x; local $x; use strict; $x->[$N[0]] <-fetch +fetch> [exception] ok 221 - our $x; local $x; use strict; $x->[$N[0]] <-fetch +fetch> [return] ok 222 - our $x; local $x; use strict; $x->[$N[0]] <-fetch +fetch> [variable] ok 223 - our $x; local $x; no strict; $x->[$N[0]] <-fetch +fetch> [exception] ok 224 - our $x; local $x; no strict; $x->[$N[0]] <-fetch +fetch> [return] ok 225 - our $x; local $x; no strict; $x->[$N[0]] <-fetch +fetch> [variable] ok 226 - my $x; $$x[$N[0]] <-fetch +fetch> [exception] ok 227 - my $x; $$x[$N[0]] <-fetch +fetch> [return] ok 228 - my $x; $$x[$N[0]] <-fetch +fetch> [variable] ok 229 - our $x; local $x; use strict; $$x[$N[0]] <-fetch +fetch> [exception] ok 230 - our $x; local $x; use strict; $$x[$N[0]] <-fetch +fetch> [return] ok 231 - our $x; local $x; use strict; $$x[$N[0]] <-fetch +fetch> [variable] ok 232 - our $x; local $x; no strict; $$x[$N[0]] <-fetch +fetch> [exception] ok 233 - our $x; local $x; no strict; $$x[$N[0]] <-fetch +fetch> [return] ok 234 - our $x; local $x; no strict; $$x[$N[0]] <-fetch +fetch> [variable] ok 235 - my @x; $x[$N[0]] <-fetch +fetch> [exception] ok 236 - my @x; $x[$N[0]] <-fetch +fetch> [return] ok 237 - my @x; $x[$N[0]] <-fetch +fetch> [variable] ok 238 - our @x; local @x; use strict; $x[$N[0]] <-fetch +fetch> [exception] ok 239 - our @x; local @x; use strict; $x[$N[0]] <-fetch +fetch> [return] ok 240 - our @x; local @x; use strict; $x[$N[0]] <-fetch +fetch> [variable] ok 241 - our @x; local @x; no strict; $x[$N[0]] <-fetch +fetch> [exception] ok 242 - our @x; local @x; no strict; $x[$N[0]] <-fetch +fetch> [return] ok 243 - our @x; local @x; no strict; $x[$N[0]] <-fetch +fetch> [variable] ok 244 - my $x; $x->[$N[0]] <+fetch -exists> [exception] ok 245 - my $x; $x->[$N[0]] <+fetch -exists> [return] ok 246 - my $x; $x->[$N[0]] <+fetch -exists> [variable] ok 247 - our $x; local $x; use strict; $x->[$N[0]] <+fetch -exists> [exception] ok 248 - our $x; local $x; use strict; $x->[$N[0]] <+fetch -exists> [return] ok 249 - our $x; local $x; use strict; $x->[$N[0]] <+fetch -exists> [variable] ok 250 - our $x; local $x; no strict; $x->[$N[0]] <+fetch -exists> [exception] ok 251 - our $x; local $x; no strict; $x->[$N[0]] <+fetch -exists> [return] ok 252 - our $x; local $x; no strict; $x->[$N[0]] <+fetch -exists> [variable] ok 253 - my $x; $$x[$N[0]] <+fetch -exists> [exception] ok 254 - my $x; $$x[$N[0]] <+fetch -exists> [return] ok 255 - my $x; $$x[$N[0]] <+fetch -exists> [variable] ok 256 - our $x; local $x; use strict; $$x[$N[0]] <+fetch -exists> [exception] ok 257 - our $x; local $x; use strict; $$x[$N[0]] <+fetch -exists> [return] ok 258 - our $x; local $x; use strict; $$x[$N[0]] <+fetch -exists> [variable] ok 259 - our $x; local $x; no strict; $$x[$N[0]] <+fetch -exists> [exception] ok 260 - our $x; local $x; no strict; $$x[$N[0]] <+fetch -exists> [return] ok 261 - our $x; local $x; no strict; $$x[$N[0]] <+fetch -exists> [variable] ok 262 - my @x; $x[$N[0]] <+fetch -exists> [exception] ok 263 - my @x; $x[$N[0]] <+fetch -exists> [return] ok 264 - my @x; $x[$N[0]] <+fetch -exists> [variable] ok 265 - our @x; local @x; use strict; $x[$N[0]] <+fetch -exists> [exception] ok 266 - our @x; local @x; use strict; $x[$N[0]] <+fetch -exists> [return] ok 267 - our @x; local @x; use strict; $x[$N[0]] <+fetch -exists> [variable] ok 268 - our @x; local @x; no strict; $x[$N[0]] <+fetch -exists> [exception] ok 269 - our @x; local @x; no strict; $x[$N[0]] <+fetch -exists> [return] ok 270 - our @x; local @x; no strict; $x[$N[0]] <+fetch -exists> [variable] ok 271 - my $x; $x->[$N[0]] <+strict +fetch> [exception] ok 272 - my $x; $x->[$N[0]] <+strict +fetch> [return] ok 273 - my $x; $x->[$N[0]] <+strict +fetch> [variable] ok 274 - our $x; local $x; use strict; $x->[$N[0]] <+strict +fetch> [exception] ok 275 - our $x; local $x; use strict; $x->[$N[0]] <+strict +fetch> [return] ok 276 - our $x; local $x; use strict; $x->[$N[0]] <+strict +fetch> [variable] ok 277 - our $x; local $x; no strict; $x->[$N[0]] <+strict +fetch> [exception] ok 278 - our $x; local $x; no strict; $x->[$N[0]] <+strict +fetch> [return] ok 279 - our $x; local $x; no strict; $x->[$N[0]] <+strict +fetch> [variable] ok 280 - my $x; $$x[$N[0]] <+strict +fetch> [exception] ok 281 - my $x; $$x[$N[0]] <+strict +fetch> [return] ok 282 - my $x; $$x[$N[0]] <+strict +fetch> [variable] ok 283 - our $x; local $x; use strict; $$x[$N[0]] <+strict +fetch> [exception] ok 284 - our $x; local $x; use strict; $$x[$N[0]] <+strict +fetch> [return] ok 285 - our $x; local $x; use strict; $$x[$N[0]] <+strict +fetch> [variable] ok 286 - our $x; local $x; no strict; $$x[$N[0]] <+strict +fetch> [exception] ok 287 - our $x; local $x; no strict; $$x[$N[0]] <+strict +fetch> [return] ok 288 - our $x; local $x; no strict; $$x[$N[0]] <+strict +fetch> [variable] ok 289 - my @x; 1 <+strict +fetch> [exception] ok 290 - my @x; 1 <+strict +fetch> [return] ok 291 - my @x; 1 <+strict +fetch> [variable] ok 292 - our @x; local @x; use strict; 1 <+strict +fetch> [exception] ok 293 - our @x; local @x; use strict; 1 <+strict +fetch> [return] ok 294 - our @x; local @x; use strict; 1 <+strict +fetch> [variable] ok 295 - our @x; local @x; no strict; 1 <+strict +fetch> [exception] ok 296 - our @x; local @x; no strict; 1 <+strict +fetch> [return] ok 297 - our @x; local @x; no strict; 1 <+strict +fetch> [variable] ok 298 - my $x; $x->[$N[0]] <+strict +exists> [exception] ok 299 - my $x; $x->[$N[0]] <+strict +exists> [return] ok 300 - my $x; $x->[$N[0]] <+strict +exists> [variable] ok 301 - our $x; local $x; use strict; $x->[$N[0]] <+strict +exists> [exception] ok 302 - our $x; local $x; use strict; $x->[$N[0]] <+strict +exists> [return] ok 303 - our $x; local $x; use strict; $x->[$N[0]] <+strict +exists> [variable] ok 304 - our $x; local $x; no strict; $x->[$N[0]] <+strict +exists> [exception] ok 305 - our $x; local $x; no strict; $x->[$N[0]] <+strict +exists> [return] ok 306 - our $x; local $x; no strict; $x->[$N[0]] <+strict +exists> [variable] ok 307 - my $x; $$x[$N[0]] <+strict +exists> [exception] ok 308 - my $x; $$x[$N[0]] <+strict +exists> [return] ok 309 - my $x; $$x[$N[0]] <+strict +exists> [variable] ok 310 - our $x; local $x; use strict; $$x[$N[0]] <+strict +exists> [exception] ok 311 - our $x; local $x; use strict; $$x[$N[0]] <+strict +exists> [return] ok 312 - our $x; local $x; use strict; $$x[$N[0]] <+strict +exists> [variable] ok 313 - our $x; local $x; no strict; $$x[$N[0]] <+strict +exists> [exception] ok 314 - our $x; local $x; no strict; $$x[$N[0]] <+strict +exists> [return] ok 315 - our $x; local $x; no strict; $$x[$N[0]] <+strict +exists> [variable] ok 316 - my @x; $x[$N[0]] <+strict +exists> [exception] ok 317 - my @x; $x[$N[0]] <+strict +exists> [return] ok 318 - my @x; $x[$N[0]] <+strict +exists> [variable] ok 319 - our @x; local @x; use strict; $x[$N[0]] <+strict +exists> [exception] ok 320 - our @x; local @x; use strict; $x[$N[0]] <+strict +exists> [return] ok 321 - our @x; local @x; use strict; $x[$N[0]] <+strict +exists> [variable] ok 322 - our @x; local @x; no strict; $x[$N[0]] <+strict +exists> [exception] ok 323 - our @x; local @x; no strict; $x[$N[0]] <+strict +exists> [return] ok 324 - our @x; local @x; no strict; $x[$N[0]] <+strict +exists> [variable] ok 325 - my $x; $x->[$N[0]] <+strict +delete> [exception] ok 326 - my $x; $x->[$N[0]] <+strict +delete> [return] ok 327 - my $x; $x->[$N[0]] <+strict +delete> [variable] ok 328 - our $x; local $x; use strict; $x->[$N[0]] <+strict +delete> [exception] ok 329 - our $x; local $x; use strict; $x->[$N[0]] <+strict +delete> [return] ok 330 - our $x; local $x; use strict; $x->[$N[0]] <+strict +delete> [variable] ok 331 - our $x; local $x; no strict; $x->[$N[0]] <+strict +delete> [exception] ok 332 - our $x; local $x; no strict; $x->[$N[0]] <+strict +delete> [return] ok 333 - our $x; local $x; no strict; $x->[$N[0]] <+strict +delete> [variable] ok 334 - my $x; $$x[$N[0]] <+strict +delete> [exception] ok 335 - my $x; $$x[$N[0]] <+strict +delete> [return] ok 336 - my $x; $$x[$N[0]] <+strict +delete> [variable] ok 337 - our $x; local $x; use strict; $$x[$N[0]] <+strict +delete> [exception] ok 338 - our $x; local $x; use strict; $$x[$N[0]] <+strict +delete> [return] ok 339 - our $x; local $x; use strict; $$x[$N[0]] <+strict +delete> [variable] ok 340 - our $x; local $x; no strict; $$x[$N[0]] <+strict +delete> [exception] ok 341 - our $x; local $x; no strict; $$x[$N[0]] <+strict +delete> [return] ok 342 - our $x; local $x; no strict; $$x[$N[0]] <+strict +delete> [variable] ok 343 - my @x; $x[$N[0]] <+strict +delete> [exception] ok 344 - my @x; $x[$N[0]] <+strict +delete> [return] ok 345 - my @x; $x[$N[0]] <+strict +delete> [variable] ok 346 - our @x; local @x; use strict; $x[$N[0]] <+strict +delete> [exception] ok 347 - our @x; local @x; use strict; $x[$N[0]] <+strict +delete> [return] ok 348 - our @x; local @x; use strict; $x[$N[0]] <+strict +delete> [variable] ok 349 - our @x; local @x; no strict; $x[$N[0]] <+strict +delete> [exception] ok 350 - our @x; local @x; no strict; $x[$N[0]] <+strict +delete> [return] ok 351 - our @x; local @x; no strict; $x[$N[0]] <+strict +delete> [variable] ok 352 - my $x; $x->[$N[0]] <+strict +store> [exception] ok 353 - my $x; $x->[$N[0]] <+strict +store> [return] ok 354 - my $x; $x->[$N[0]] <+strict +store> [variable] ok 355 - our $x; local $x; use strict; $x->[$N[0]] <+strict +store> [exception] ok 356 - our $x; local $x; use strict; $x->[$N[0]] <+strict +store> [return] ok 357 - our $x; local $x; use strict; $x->[$N[0]] <+strict +store> [variable] ok 358 - our $x; local $x; no strict; $x->[$N[0]] <+strict +store> [exception] ok 359 - our $x; local $x; no strict; $x->[$N[0]] <+strict +store> [return] ok 360 - our $x; local $x; no strict; $x->[$N[0]] <+strict +store> [variable] ok 361 - my $x; $$x[$N[0]] <+strict +store> [exception] ok 362 - my $x; $$x[$N[0]] <+strict +store> [return] ok 363 - my $x; $$x[$N[0]] <+strict +store> [variable] ok 364 - our $x; local $x; use strict; $$x[$N[0]] <+strict +store> [exception] ok 365 - our $x; local $x; use strict; $$x[$N[0]] <+strict +store> [return] ok 366 - our $x; local $x; use strict; $$x[$N[0]] <+strict +store> [variable] ok 367 - our $x; local $x; no strict; $$x[$N[0]] <+strict +store> [exception] ok 368 - our $x; local $x; no strict; $$x[$N[0]] <+strict +store> [return] ok 369 - our $x; local $x; no strict; $$x[$N[0]] <+strict +store> [variable] ok 370 - my @x; $x[$N[0]] <+strict +store> [exception] ok 371 - my @x; $x[$N[0]] <+strict +store> [return] ok 372 - my @x; $x[$N[0]] <+strict +store> [variable] ok 373 - our @x; local @x; use strict; $x[$N[0]] <+strict +store> [exception] ok 374 - our @x; local @x; use strict; $x[$N[0]] <+strict +store> [return] ok 375 - our @x; local @x; use strict; $x[$N[0]] <+strict +store> [variable] ok 376 - our @x; local @x; no strict; $x[$N[0]] <+strict +store> [exception] ok 377 - our @x; local @x; no strict; $x[$N[0]] <+strict +store> [return] ok 378 - our @x; local @x; no strict; $x[$N[0]] <+strict +store> [variable] ok 379 - my $x; $x->[$N[0]]->[$N[1]] [exception] ok 380 - my $x; $x->[$N[0]]->[$N[1]] [return] ok 381 - my $x; $x->[$N[0]]->[$N[1]] [variable] ok 382 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] [exception] ok 383 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] [return] ok 384 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] [variable] ok 385 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] [exception] ok 386 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] [return] ok 387 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] [variable] ok 388 - my $x; $$x[$N[0]]->[$N[1]] [exception] ok 389 - my $x; $$x[$N[0]]->[$N[1]] [return] ok 390 - my $x; $$x[$N[0]]->[$N[1]] [variable] ok 391 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] [exception] ok 392 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] [return] ok 393 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] [variable] ok 394 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] [exception] ok 395 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] [return] ok 396 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] [variable] ok 397 - my @x; $x[$N[0]]->[$N[1]] [exception] ok 398 - my @x; $x[$N[0]]->[$N[1]] [return] ok 399 - my @x; $x[$N[0]]->[$N[1]] [variable] ok 400 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] [exception] ok 401 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] [return] ok 402 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] [variable] ok 403 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] [exception] ok 404 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] [return] ok 405 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] [variable] ok 406 - my $x; $x->[$N[0]]->[$N[1]] [exception] ok 407 - my $x; $x->[$N[0]]->[$N[1]] [return] ok 408 - my $x; $x->[$N[0]]->[$N[1]] [variable] ok 409 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] [exception] ok 410 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] [return] ok 411 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] [variable] ok 412 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] [exception] ok 413 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] [return] ok 414 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] [variable] ok 415 - my $x; $$x[$N[0]]->[$N[1]] [exception] ok 416 - my $x; $$x[$N[0]]->[$N[1]] [return] ok 417 - my $x; $$x[$N[0]]->[$N[1]] [variable] ok 418 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] [exception] ok 419 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] [return] ok 420 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] [variable] ok 421 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] [exception] ok 422 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] [return] ok 423 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] [variable] ok 424 - my @x; $x[$N[0]]->[$N[1]] [exception] ok 425 - my @x; $x[$N[0]]->[$N[1]] [return] ok 426 - my @x; $x[$N[0]]->[$N[1]] [variable] ok 427 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] [exception] ok 428 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] [return] ok 429 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] [variable] ok 430 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] [exception] ok 431 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] [return] ok 432 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] [variable] ok 433 - my $x; $x->[$N[0]]->[$N[1]] <+fetch> [exception] ok 434 - my $x; $x->[$N[0]]->[$N[1]] <+fetch> [return] ok 435 - my $x; $x->[$N[0]]->[$N[1]] <+fetch> [variable] ok 436 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+fetch> [exception] ok 437 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+fetch> [return] ok 438 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+fetch> [variable] ok 439 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+fetch> [exception] ok 440 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+fetch> [return] ok 441 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+fetch> [variable] ok 442 - my $x; $$x[$N[0]]->[$N[1]] <+fetch> [exception] ok 443 - my $x; $$x[$N[0]]->[$N[1]] <+fetch> [return] ok 444 - my $x; $$x[$N[0]]->[$N[1]] <+fetch> [variable] ok 445 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+fetch> [exception] ok 446 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+fetch> [return] ok 447 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+fetch> [variable] ok 448 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+fetch> [exception] ok 449 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+fetch> [return] ok 450 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+fetch> [variable] ok 451 - my @x; $x[$N[0]]->[$N[1]] <+fetch> [exception] ok 452 - my @x; $x[$N[0]]->[$N[1]] <+fetch> [return] ok 453 - my @x; $x[$N[0]]->[$N[1]] <+fetch> [variable] ok 454 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+fetch> [exception] ok 455 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+fetch> [return] ok 456 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+fetch> [variable] ok 457 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+fetch> [exception] ok 458 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+fetch> [return] ok 459 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+fetch> [variable] ok 460 - my $x; $x->[$N[0]]->[$N[1]] <+exists> [exception] ok 461 - my $x; $x->[$N[0]]->[$N[1]] <+exists> [return] ok 462 - my $x; $x->[$N[0]]->[$N[1]] <+exists> [variable] ok 463 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+exists> [exception] ok 464 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+exists> [return] ok 465 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+exists> [variable] ok 466 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+exists> [exception] ok 467 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+exists> [return] ok 468 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+exists> [variable] ok 469 - my $x; $$x[$N[0]]->[$N[1]] <+exists> [exception] ok 470 - my $x; $$x[$N[0]]->[$N[1]] <+exists> [return] ok 471 - my $x; $$x[$N[0]]->[$N[1]] <+exists> [variable] ok 472 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+exists> [exception] ok 473 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+exists> [return] ok 474 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+exists> [variable] ok 475 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+exists> [exception] ok 476 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+exists> [return] ok 477 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+exists> [variable] ok 478 - my @x; $x[$N[0]]->[$N[1]] <+exists> [exception] ok 479 - my @x; $x[$N[0]]->[$N[1]] <+exists> [return] ok 480 - my @x; $x[$N[0]]->[$N[1]] <+exists> [variable] ok 481 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+exists> [exception] ok 482 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+exists> [return] ok 483 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+exists> [variable] ok 484 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+exists> [exception] ok 485 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+exists> [return] ok 486 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+exists> [variable] ok 487 - my $x; $x->[$N[0]]->[$N[1]] <+delete> [exception] ok 488 - my $x; $x->[$N[0]]->[$N[1]] <+delete> [return] ok 489 - my $x; $x->[$N[0]]->[$N[1]] <+delete> [variable] ok 490 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+delete> [exception] ok 491 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+delete> [return] ok 492 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+delete> [variable] ok 493 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+delete> [exception] ok 494 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+delete> [return] ok 495 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+delete> [variable] ok 496 - my $x; $$x[$N[0]]->[$N[1]] <+delete> [exception] ok 497 - my $x; $$x[$N[0]]->[$N[1]] <+delete> [return] ok 498 - my $x; $$x[$N[0]]->[$N[1]] <+delete> [variable] ok 499 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+delete> [exception] ok 500 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+delete> [return] ok 501 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+delete> [variable] ok 502 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+delete> [exception] ok 503 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+delete> [return] ok 504 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+delete> [variable] ok 505 - my @x; $x[$N[0]]->[$N[1]] <+delete> [exception] ok 506 - my @x; $x[$N[0]]->[$N[1]] <+delete> [return] ok 507 - my @x; $x[$N[0]]->[$N[1]] <+delete> [variable] ok 508 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+delete> [exception] ok 509 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+delete> [return] ok 510 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+delete> [variable] ok 511 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+delete> [exception] ok 512 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+delete> [return] ok 513 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+delete> [variable] ok 514 - my $x; $x->[$N[0]]->[$N[1]] <+store> [exception] ok 515 - my $x; $x->[$N[0]]->[$N[1]] <+store> [return] ok 516 - my $x; $x->[$N[0]]->[$N[1]] <+store> [variable] ok 517 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+store> [exception] ok 518 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+store> [return] ok 519 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+store> [variable] ok 520 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+store> [exception] ok 521 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+store> [return] ok 522 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+store> [variable] ok 523 - my $x; $$x[$N[0]]->[$N[1]] <+store> [exception] ok 524 - my $x; $$x[$N[0]]->[$N[1]] <+store> [return] ok 525 - my $x; $$x[$N[0]]->[$N[1]] <+store> [variable] ok 526 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+store> [exception] ok 527 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+store> [return] ok 528 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+store> [variable] ok 529 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+store> [exception] ok 530 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+store> [return] ok 531 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+store> [variable] ok 532 - my @x; $x[$N[0]]->[$N[1]] <+store> [exception] ok 533 - my @x; $x[$N[0]]->[$N[1]] <+store> [return] ok 534 - my @x; $x[$N[0]]->[$N[1]] <+store> [variable] ok 535 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+store> [exception] ok 536 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+store> [return] ok 537 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+store> [variable] ok 538 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+store> [exception] ok 539 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+store> [return] ok 540 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+store> [variable] ok 541 - my $x; $x->[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 542 - my $x; $x->[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 543 - my $x; $x->[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 544 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 545 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 546 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 547 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 548 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 549 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 550 - my $x; $$x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 551 - my $x; $$x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 552 - my $x; $$x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 553 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 554 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 555 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 556 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 557 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 558 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 559 - my @x; $x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 560 - my @x; $x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 561 - my @x; $x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 562 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 563 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 564 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 565 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 566 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 567 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 568 - my $x; $x->[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 569 - my $x; $x->[$N[0]]->[$N[1]] <+strict +exists> [return] ok 570 - my $x; $x->[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 571 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 572 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+strict +exists> [return] ok 573 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 574 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 575 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+strict +exists> [return] ok 576 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 577 - my $x; $$x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 578 - my $x; $$x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 579 - my $x; $$x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 580 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 581 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 582 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 583 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 584 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 585 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 586 - my @x; $x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 587 - my @x; $x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 588 - my @x; $x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 589 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 590 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 591 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 592 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 593 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 594 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 595 - my $x; $x->[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 596 - my $x; $x->[$N[0]]->[$N[1]] <+strict +delete> [return] ok 597 - my $x; $x->[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 598 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 599 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+strict +delete> [return] ok 600 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 601 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 602 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+strict +delete> [return] ok 603 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 604 - my $x; $$x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 605 - my $x; $$x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 606 - my $x; $$x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 607 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 608 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 609 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 610 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 611 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 612 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 613 - my @x; $x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 614 - my @x; $x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 615 - my @x; $x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 616 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 617 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 618 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 619 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 620 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 621 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 622 - my $x; $x->[$N[0]]->[$N[1]] <+strict +store> [exception] ok 623 - my $x; $x->[$N[0]]->[$N[1]] <+strict +store> [return] ok 624 - my $x; $x->[$N[0]]->[$N[1]] <+strict +store> [variable] ok 625 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+strict +store> [exception] ok 626 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+strict +store> [return] ok 627 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] <+strict +store> [variable] ok 628 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+strict +store> [exception] ok 629 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+strict +store> [return] ok 630 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] <+strict +store> [variable] ok 631 - my $x; $$x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 632 - my $x; $$x[$N[0]]->[$N[1]] <+strict +store> [return] ok 633 - my $x; $$x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 634 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 635 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+strict +store> [return] ok 636 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 637 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 638 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+strict +store> [return] ok 639 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 640 - my @x; $x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 641 - my @x; $x[$N[0]]->[$N[1]] <+strict +store> [return] ok 642 - my @x; $x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 643 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 644 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+strict +store> [return] ok 645 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 646 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 647 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+strict +store> [return] ok 648 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 649 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+fetch> [exception] ok 650 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+fetch> [return] ok 651 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+fetch> [variable] ok 652 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+fetch> [exception] ok 653 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+fetch> [return] ok 654 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+fetch> [variable] ok 655 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+fetch> [exception] ok 656 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+fetch> [return] ok 657 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+fetch> [variable] ok 658 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+fetch> [exception] ok 659 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+fetch> [return] ok 660 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+fetch> [variable] ok 661 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+fetch> [exception] ok 662 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+fetch> [return] ok 663 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+fetch> [variable] ok 664 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+fetch> [exception] ok 665 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+fetch> [return] ok 666 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+fetch> [variable] ok 667 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+fetch> [exception] ok 668 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+fetch> [return] ok 669 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+fetch> [variable] ok 670 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+fetch> [exception] ok 671 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+fetch> [return] ok 672 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+fetch> [variable] ok 673 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+fetch> [exception] ok 674 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+fetch> [return] ok 675 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+fetch> [variable] ok 676 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+fetch> [exception] ok 677 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+fetch> [return] ok 678 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+fetch> [variable] ok 679 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+fetch> [exception] ok 680 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+fetch> [return] ok 681 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+fetch> [variable] ok 682 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+fetch> [exception] ok 683 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+fetch> [return] ok 684 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+fetch> [variable] ok 685 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+fetch> [exception] ok 686 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+fetch> [return] ok 687 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+fetch> [variable] ok 688 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+fetch> [exception] ok 689 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+fetch> [return] ok 690 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+fetch> [variable] ok 691 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+fetch> [exception] ok 692 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+fetch> [return] ok 693 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+fetch> [variable] ok 694 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+fetch> [exception] ok 695 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+fetch> [return] ok 696 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+fetch> [variable] ok 697 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+fetch> [exception] ok 698 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+fetch> [return] ok 699 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+fetch> [variable] ok 700 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+fetch> [exception] ok 701 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+fetch> [return] ok 702 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+fetch> [variable] ok 703 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+exists> [exception] ok 704 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+exists> [return] ok 705 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+exists> [variable] ok 706 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+exists> [exception] ok 707 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+exists> [return] ok 708 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+exists> [variable] ok 709 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+exists> [exception] ok 710 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+exists> [return] ok 711 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+exists> [variable] ok 712 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+exists> [exception] ok 713 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+exists> [return] ok 714 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+exists> [variable] ok 715 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+exists> [exception] ok 716 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+exists> [return] ok 717 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+exists> [variable] ok 718 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+exists> [exception] ok 719 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+exists> [return] ok 720 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+exists> [variable] ok 721 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+exists> [exception] ok 722 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+exists> [return] ok 723 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+exists> [variable] ok 724 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+exists> [exception] ok 725 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+exists> [return] ok 726 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+exists> [variable] ok 727 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+exists> [exception] ok 728 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+exists> [return] ok 729 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+exists> [variable] ok 730 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+exists> [exception] ok 731 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+exists> [return] ok 732 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+exists> [variable] ok 733 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+exists> [exception] ok 734 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+exists> [return] ok 735 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+exists> [variable] ok 736 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+exists> [exception] ok 737 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+exists> [return] ok 738 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+exists> [variable] ok 739 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+exists> [exception] ok 740 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+exists> [return] ok 741 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+exists> [variable] ok 742 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+exists> [exception] ok 743 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+exists> [return] ok 744 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+exists> [variable] ok 745 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+exists> [exception] ok 746 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+exists> [return] ok 747 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+exists> [variable] ok 748 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+exists> [exception] ok 749 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+exists> [return] ok 750 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+exists> [variable] ok 751 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+exists> [exception] ok 752 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+exists> [return] ok 753 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+exists> [variable] ok 754 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+exists> [exception] ok 755 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+exists> [return] ok 756 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+exists> [variable] ok 757 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+delete> [exception] ok 758 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+delete> [return] ok 759 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+delete> [variable] ok 760 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+delete> [exception] ok 761 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+delete> [return] ok 762 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+delete> [variable] ok 763 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+delete> [exception] ok 764 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+delete> [return] ok 765 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+delete> [variable] ok 766 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+delete> [exception] ok 767 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+delete> [return] ok 768 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+delete> [variable] ok 769 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+delete> [exception] ok 770 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+delete> [return] ok 771 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+delete> [variable] ok 772 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+delete> [exception] ok 773 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+delete> [return] ok 774 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+delete> [variable] ok 775 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+delete> [exception] ok 776 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+delete> [return] ok 777 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+delete> [variable] ok 778 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+delete> [exception] ok 779 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+delete> [return] ok 780 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+delete> [variable] ok 781 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+delete> [exception] ok 782 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+delete> [return] ok 783 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+delete> [variable] ok 784 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+delete> [exception] ok 785 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+delete> [return] ok 786 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+delete> [variable] ok 787 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+delete> [exception] ok 788 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+delete> [return] ok 789 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+delete> [variable] ok 790 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+delete> [exception] ok 791 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+delete> [return] ok 792 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+delete> [variable] ok 793 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+delete> [exception] ok 794 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+delete> [return] ok 795 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+delete> [variable] ok 796 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+delete> [exception] ok 797 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+delete> [return] ok 798 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+delete> [variable] ok 799 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+delete> [exception] ok 800 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+delete> [return] ok 801 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+delete> [variable] ok 802 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+delete> [exception] ok 803 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+delete> [return] ok 804 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+delete> [variable] ok 805 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+delete> [exception] ok 806 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+delete> [return] ok 807 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+delete> [variable] ok 808 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+delete> [exception] ok 809 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+delete> [return] ok 810 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+delete> [variable] ok 811 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+store> [exception] ok 812 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+store> [return] ok 813 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+store> [variable] ok 814 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+store> [exception] ok 815 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+store> [return] ok 816 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+store> [variable] ok 817 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+store> [exception] ok 818 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+store> [return] ok 819 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+store> [variable] ok 820 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+store> [exception] ok 821 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+store> [return] ok 822 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+store> [variable] ok 823 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+store> [exception] ok 824 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+store> [return] ok 825 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+store> [variable] ok 826 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+store> [exception] ok 827 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+store> [return] ok 828 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+store> [variable] ok 829 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+store> [exception] ok 830 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+store> [return] ok 831 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+store> [variable] ok 832 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+store> [exception] ok 833 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+store> [return] ok 834 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+store> [variable] ok 835 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+store> [exception] ok 836 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+store> [return] ok 837 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+store> [variable] ok 838 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+store> [exception] ok 839 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+store> [return] ok 840 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+store> [variable] ok 841 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+store> [exception] ok 842 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+store> [return] ok 843 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+store> [variable] ok 844 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+store> [exception] ok 845 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+store> [return] ok 846 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+store> [variable] ok 847 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+store> [exception] ok 848 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+store> [return] ok 849 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+store> [variable] ok 850 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+store> [exception] ok 851 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+store> [return] ok 852 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+store> [variable] ok 853 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+store> [exception] ok 854 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+store> [return] ok 855 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+store> [variable] ok 856 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+store> [exception] ok 857 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+store> [return] ok 858 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+store> [variable] ok 859 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+store> [exception] ok 860 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+store> [return] ok 861 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+store> [variable] ok 862 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+store> [exception] ok 863 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+store> [return] ok 864 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+store> [variable] ok 865 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +fetch> [exception] ok 866 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +fetch> [return] ok 867 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +fetch> [variable] ok 868 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +fetch> [exception] ok 869 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +fetch> [return] ok 870 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +fetch> [variable] ok 871 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +fetch> [exception] ok 872 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +fetch> [return] ok 873 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +fetch> [variable] ok 874 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +fetch> [exception] ok 875 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +fetch> [return] ok 876 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +fetch> [variable] ok 877 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +fetch> [exception] ok 878 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +fetch> [return] ok 879 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +fetch> [variable] ok 880 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +fetch> [exception] ok 881 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +fetch> [return] ok 882 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +fetch> [variable] ok 883 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+strict +fetch> [exception] ok 884 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+strict +fetch> [return] ok 885 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+strict +fetch> [variable] ok 886 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +fetch> [exception] ok 887 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +fetch> [return] ok 888 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +fetch> [variable] ok 889 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +fetch> [exception] ok 890 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +fetch> [return] ok 891 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +fetch> [variable] ok 892 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +fetch> [exception] ok 893 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +fetch> [return] ok 894 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +fetch> [variable] ok 895 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +fetch> [exception] ok 896 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +fetch> [return] ok 897 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +fetch> [variable] ok 898 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +fetch> [exception] ok 899 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +fetch> [return] ok 900 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +fetch> [variable] ok 901 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +fetch> [exception] ok 902 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +fetch> [return] ok 903 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +fetch> [variable] ok 904 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +fetch> [exception] ok 905 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +fetch> [return] ok 906 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +fetch> [variable] ok 907 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +fetch> [exception] ok 908 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +fetch> [return] ok 909 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +fetch> [variable] ok 910 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+strict +fetch> [exception] ok 911 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+strict +fetch> [return] ok 912 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+strict +fetch> [variable] ok 913 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +fetch> [exception] ok 914 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +fetch> [return] ok 915 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +fetch> [variable] ok 916 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +fetch> [exception] ok 917 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +fetch> [return] ok 918 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +fetch> [variable] ok 919 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +exists> [exception] ok 920 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +exists> [return] ok 921 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +exists> [variable] ok 922 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +exists> [exception] ok 923 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +exists> [return] ok 924 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +exists> [variable] ok 925 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +exists> [exception] ok 926 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +exists> [return] ok 927 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +exists> [variable] ok 928 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +exists> [exception] ok 929 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +exists> [return] ok 930 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +exists> [variable] ok 931 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +exists> [exception] ok 932 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +exists> [return] ok 933 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +exists> [variable] ok 934 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +exists> [exception] ok 935 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +exists> [return] ok 936 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +exists> [variable] ok 937 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+strict +exists> [exception] ok 938 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+strict +exists> [return] ok 939 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+strict +exists> [variable] ok 940 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +exists> [exception] ok 941 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +exists> [return] ok 942 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +exists> [variable] ok 943 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +exists> [exception] ok 944 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +exists> [return] ok 945 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +exists> [variable] ok 946 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +exists> [exception] ok 947 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +exists> [return] ok 948 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +exists> [variable] ok 949 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +exists> [exception] ok 950 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +exists> [return] ok 951 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +exists> [variable] ok 952 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +exists> [exception] ok 953 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +exists> [return] ok 954 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +exists> [variable] ok 955 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +exists> [exception] ok 956 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +exists> [return] ok 957 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +exists> [variable] ok 958 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +exists> [exception] ok 959 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +exists> [return] ok 960 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +exists> [variable] ok 961 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +exists> [exception] ok 962 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +exists> [return] ok 963 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +exists> [variable] ok 964 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+strict +exists> [exception] ok 965 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+strict +exists> [return] ok 966 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+strict +exists> [variable] ok 967 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +exists> [exception] ok 968 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +exists> [return] ok 969 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +exists> [variable] ok 970 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +exists> [exception] ok 971 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +exists> [return] ok 972 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +exists> [variable] ok 973 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +delete> [exception] ok 974 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +delete> [return] ok 975 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +delete> [variable] ok 976 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +delete> [exception] ok 977 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +delete> [return] ok 978 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +delete> [variable] ok 979 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +delete> [exception] ok 980 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +delete> [return] ok 981 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +delete> [variable] ok 982 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +delete> [exception] ok 983 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +delete> [return] ok 984 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +delete> [variable] ok 985 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +delete> [exception] ok 986 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +delete> [return] ok 987 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +delete> [variable] ok 988 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +delete> [exception] ok 989 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +delete> [return] ok 990 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +delete> [variable] ok 991 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+strict +delete> [exception] ok 992 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+strict +delete> [return] ok 993 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+strict +delete> [variable] ok 994 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +delete> [exception] ok 995 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +delete> [return] ok 996 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +delete> [variable] ok 997 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +delete> [exception] ok 998 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +delete> [return] ok 999 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +delete> [variable] ok 1000 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +delete> [exception] ok 1001 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +delete> [return] ok 1002 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +delete> [variable] ok 1003 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +delete> [exception] ok 1004 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +delete> [return] ok 1005 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +delete> [variable] ok 1006 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +delete> [exception] ok 1007 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +delete> [return] ok 1008 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +delete> [variable] ok 1009 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +delete> [exception] ok 1010 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +delete> [return] ok 1011 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +delete> [variable] ok 1012 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +delete> [exception] ok 1013 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +delete> [return] ok 1014 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +delete> [variable] ok 1015 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +delete> [exception] ok 1016 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +delete> [return] ok 1017 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +delete> [variable] ok 1018 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+strict +delete> [exception] ok 1019 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+strict +delete> [return] ok 1020 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+strict +delete> [variable] ok 1021 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +delete> [exception] ok 1022 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +delete> [return] ok 1023 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +delete> [variable] ok 1024 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +delete> [exception] ok 1025 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +delete> [return] ok 1026 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +delete> [variable] ok 1027 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +store> [exception] ok 1028 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +store> [return] ok 1029 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +store> [variable] ok 1030 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +store> [exception] ok 1031 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +store> [return] ok 1032 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +store> [variable] ok 1033 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +store> [exception] ok 1034 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +store> [return] ok 1035 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] <+strict +store> [variable] ok 1036 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +store> [exception] ok 1037 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +store> [return] ok 1038 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +store> [variable] ok 1039 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +store> [exception] ok 1040 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +store> [return] ok 1041 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +store> [variable] ok 1042 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +store> [exception] ok 1043 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +store> [return] ok 1044 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] <+strict +store> [variable] ok 1045 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+strict +store> [exception] ok 1046 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+strict +store> [return] ok 1047 - my @x; $x[$N[0]] = 1; $x[$N[0]] <+strict +store> [variable] ok 1048 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +store> [exception] ok 1049 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +store> [return] ok 1050 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +store> [variable] ok 1051 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +store> [exception] ok 1052 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +store> [return] ok 1053 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] <+strict +store> [variable] ok 1054 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +store> [exception] ok 1055 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +store> [return] ok 1056 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +store> [variable] ok 1057 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +store> [exception] ok 1058 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +store> [return] ok 1059 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +store> [variable] ok 1060 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +store> [exception] ok 1061 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +store> [return] ok 1062 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] <+strict +store> [variable] ok 1063 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +store> [exception] ok 1064 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +store> [return] ok 1065 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +store> [variable] ok 1066 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +store> [exception] ok 1067 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +store> [return] ok 1068 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +store> [variable] ok 1069 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +store> [exception] ok 1070 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +store> [return] ok 1071 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] <+strict +store> [variable] ok 1072 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+strict +store> [exception] ok 1073 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+strict +store> [return] ok 1074 - my @x; $x[$N[0]] = 1; $x[$N[1]] <+strict +store> [variable] ok 1075 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +store> [exception] ok 1076 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +store> [return] ok 1077 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +store> [variable] ok 1078 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +store> [exception] ok 1079 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +store> [return] ok 1080 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] <+strict +store> [variable] ok 1081 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+fetch> [exception] ok 1082 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+fetch> [return] ok 1083 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+fetch> [variable] ok 1084 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+fetch> [exception] ok 1085 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+fetch> [return] ok 1086 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+fetch> [variable] ok 1087 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+fetch> [exception] ok 1088 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+fetch> [return] ok 1089 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+fetch> [variable] ok 1090 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+fetch> [exception] ok 1091 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+fetch> [return] ok 1092 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+fetch> [variable] ok 1093 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+fetch> [exception] ok 1094 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+fetch> [return] ok 1095 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+fetch> [variable] ok 1096 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+fetch> [exception] ok 1097 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+fetch> [return] ok 1098 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+fetch> [variable] ok 1099 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+fetch> [exception] ok 1100 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+fetch> [return] ok 1101 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+fetch> [variable] ok 1102 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+fetch> [exception] ok 1103 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+fetch> [return] ok 1104 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+fetch> [variable] ok 1105 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+fetch> [exception] ok 1106 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+fetch> [return] ok 1107 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+fetch> [variable] ok 1108 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+fetch> [exception] ok 1109 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+fetch> [return] ok 1110 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+fetch> [variable] ok 1111 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+fetch> [exception] ok 1112 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+fetch> [return] ok 1113 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+fetch> [variable] ok 1114 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+fetch> [exception] ok 1115 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+fetch> [return] ok 1116 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+fetch> [variable] ok 1117 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+fetch> [exception] ok 1118 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+fetch> [return] ok 1119 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+fetch> [variable] ok 1120 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+fetch> [exception] ok 1121 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+fetch> [return] ok 1122 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+fetch> [variable] ok 1123 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+fetch> [exception] ok 1124 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+fetch> [return] ok 1125 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+fetch> [variable] ok 1126 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+fetch> [exception] ok 1127 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+fetch> [return] ok 1128 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+fetch> [variable] ok 1129 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+fetch> [exception] ok 1130 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+fetch> [return] ok 1131 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+fetch> [variable] ok 1132 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+fetch> [exception] ok 1133 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+fetch> [return] ok 1134 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+fetch> [variable] ok 1135 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+fetch> [exception] ok 1136 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+fetch> [return] ok 1137 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+fetch> [variable] ok 1138 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+fetch> [exception] ok 1139 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+fetch> [return] ok 1140 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+fetch> [variable] ok 1141 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+fetch> [exception] ok 1142 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+fetch> [return] ok 1143 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+fetch> [variable] ok 1144 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+fetch> [exception] ok 1145 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+fetch> [return] ok 1146 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+fetch> [variable] ok 1147 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+fetch> [exception] ok 1148 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+fetch> [return] ok 1149 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+fetch> [variable] ok 1150 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+fetch> [exception] ok 1151 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+fetch> [return] ok 1152 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+fetch> [variable] ok 1153 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+fetch> [exception] ok 1154 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+fetch> [return] ok 1155 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+fetch> [variable] ok 1156 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+fetch> [exception] ok 1157 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+fetch> [return] ok 1158 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+fetch> [variable] ok 1159 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+fetch> [exception] ok 1160 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+fetch> [return] ok 1161 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+fetch> [variable] ok 1162 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+exists> [exception] ok 1163 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+exists> [return] ok 1164 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+exists> [variable] ok 1165 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+exists> [exception] ok 1166 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+exists> [return] ok 1167 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+exists> [variable] ok 1168 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+exists> [exception] ok 1169 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+exists> [return] ok 1170 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+exists> [variable] ok 1171 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+exists> [exception] ok 1172 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+exists> [return] ok 1173 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+exists> [variable] ok 1174 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+exists> [exception] ok 1175 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+exists> [return] ok 1176 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+exists> [variable] ok 1177 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+exists> [exception] ok 1178 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+exists> [return] ok 1179 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+exists> [variable] ok 1180 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+exists> [exception] ok 1181 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+exists> [return] ok 1182 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+exists> [variable] ok 1183 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+exists> [exception] ok 1184 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+exists> [return] ok 1185 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+exists> [variable] ok 1186 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+exists> [exception] ok 1187 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+exists> [return] ok 1188 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+exists> [variable] ok 1189 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+exists> [exception] ok 1190 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+exists> [return] ok 1191 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+exists> [variable] ok 1192 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+exists> [exception] ok 1193 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+exists> [return] ok 1194 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+exists> [variable] ok 1195 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+exists> [exception] ok 1196 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+exists> [return] ok 1197 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+exists> [variable] ok 1198 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+exists> [exception] ok 1199 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+exists> [return] ok 1200 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+exists> [variable] ok 1201 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+exists> [exception] ok 1202 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+exists> [return] ok 1203 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+exists> [variable] ok 1204 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+exists> [exception] ok 1205 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+exists> [return] ok 1206 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+exists> [variable] ok 1207 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+exists> [exception] ok 1208 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+exists> [return] ok 1209 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+exists> [variable] ok 1210 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+exists> [exception] ok 1211 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+exists> [return] ok 1212 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+exists> [variable] ok 1213 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+exists> [exception] ok 1214 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+exists> [return] ok 1215 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+exists> [variable] ok 1216 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+exists> [exception] ok 1217 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+exists> [return] ok 1218 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+exists> [variable] ok 1219 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+exists> [exception] ok 1220 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+exists> [return] ok 1221 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+exists> [variable] ok 1222 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+exists> [exception] ok 1223 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+exists> [return] ok 1224 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+exists> [variable] ok 1225 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+exists> [exception] ok 1226 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+exists> [return] ok 1227 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+exists> [variable] ok 1228 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+exists> [exception] ok 1229 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+exists> [return] ok 1230 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+exists> [variable] ok 1231 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+exists> [exception] ok 1232 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+exists> [return] ok 1233 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+exists> [variable] ok 1234 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+exists> [exception] ok 1235 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+exists> [return] ok 1236 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+exists> [variable] ok 1237 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+exists> [exception] ok 1238 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+exists> [return] ok 1239 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+exists> [variable] ok 1240 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+exists> [exception] ok 1241 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+exists> [return] ok 1242 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+exists> [variable] ok 1243 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+delete> [exception] ok 1244 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+delete> [return] ok 1245 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+delete> [variable] ok 1246 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+delete> [exception] ok 1247 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+delete> [return] ok 1248 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+delete> [variable] ok 1249 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+delete> [exception] ok 1250 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+delete> [return] ok 1251 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+delete> [variable] ok 1252 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+delete> [exception] ok 1253 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+delete> [return] ok 1254 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+delete> [variable] ok 1255 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+delete> [exception] ok 1256 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+delete> [return] ok 1257 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+delete> [variable] ok 1258 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+delete> [exception] ok 1259 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+delete> [return] ok 1260 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+delete> [variable] ok 1261 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+delete> [exception] ok 1262 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+delete> [return] ok 1263 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+delete> [variable] ok 1264 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+delete> [exception] ok 1265 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+delete> [return] ok 1266 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+delete> [variable] ok 1267 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+delete> [exception] ok 1268 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+delete> [return] ok 1269 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+delete> [variable] ok 1270 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+delete> [exception] ok 1271 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+delete> [return] ok 1272 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+delete> [variable] ok 1273 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+delete> [exception] ok 1274 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+delete> [return] ok 1275 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+delete> [variable] ok 1276 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+delete> [exception] ok 1277 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+delete> [return] ok 1278 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+delete> [variable] ok 1279 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+delete> [exception] ok 1280 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+delete> [return] ok 1281 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+delete> [variable] ok 1282 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+delete> [exception] ok 1283 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+delete> [return] ok 1284 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+delete> [variable] ok 1285 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+delete> [exception] ok 1286 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+delete> [return] ok 1287 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+delete> [variable] ok 1288 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+delete> [exception] ok 1289 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+delete> [return] ok 1290 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+delete> [variable] ok 1291 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+delete> [exception] ok 1292 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+delete> [return] ok 1293 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+delete> [variable] ok 1294 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+delete> [exception] ok 1295 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+delete> [return] ok 1296 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+delete> [variable] ok 1297 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+delete> [exception] ok 1298 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+delete> [return] ok 1299 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+delete> [variable] ok 1300 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+delete> [exception] ok 1301 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+delete> [return] ok 1302 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+delete> [variable] ok 1303 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+delete> [exception] ok 1304 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+delete> [return] ok 1305 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+delete> [variable] ok 1306 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+delete> [exception] ok 1307 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+delete> [return] ok 1308 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+delete> [variable] ok 1309 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+delete> [exception] ok 1310 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+delete> [return] ok 1311 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+delete> [variable] ok 1312 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+delete> [exception] ok 1313 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+delete> [return] ok 1314 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+delete> [variable] ok 1315 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+delete> [exception] ok 1316 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+delete> [return] ok 1317 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+delete> [variable] ok 1318 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+delete> [exception] ok 1319 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+delete> [return] ok 1320 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+delete> [variable] ok 1321 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+delete> [exception] ok 1322 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+delete> [return] ok 1323 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+delete> [variable] ok 1324 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+store> [exception] ok 1325 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+store> [return] ok 1326 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+store> [variable] ok 1327 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+store> [exception] ok 1328 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+store> [return] ok 1329 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+store> [variable] ok 1330 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+store> [exception] ok 1331 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+store> [return] ok 1332 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+store> [variable] ok 1333 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+store> [exception] ok 1334 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+store> [return] ok 1335 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+store> [variable] ok 1336 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+store> [exception] ok 1337 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+store> [return] ok 1338 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+store> [variable] ok 1339 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+store> [exception] ok 1340 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+store> [return] ok 1341 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+store> [variable] ok 1342 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+store> [exception] ok 1343 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+store> [return] ok 1344 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+store> [variable] ok 1345 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+store> [exception] ok 1346 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+store> [return] ok 1347 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+store> [variable] ok 1348 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+store> [exception] ok 1349 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+store> [return] ok 1350 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+store> [variable] ok 1351 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+store> [exception] ok 1352 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+store> [return] ok 1353 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+store> [variable] ok 1354 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+store> [exception] ok 1355 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+store> [return] ok 1356 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+store> [variable] ok 1357 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+store> [exception] ok 1358 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+store> [return] ok 1359 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+store> [variable] ok 1360 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+store> [exception] ok 1361 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+store> [return] ok 1362 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+store> [variable] ok 1363 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+store> [exception] ok 1364 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+store> [return] ok 1365 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+store> [variable] ok 1366 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+store> [exception] ok 1367 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+store> [return] ok 1368 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+store> [variable] ok 1369 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+store> [exception] ok 1370 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+store> [return] ok 1371 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+store> [variable] ok 1372 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+store> [exception] ok 1373 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+store> [return] ok 1374 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+store> [variable] ok 1375 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+store> [exception] ok 1376 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+store> [return] ok 1377 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+store> [variable] ok 1378 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+store> [exception] ok 1379 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+store> [return] ok 1380 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+store> [variable] ok 1381 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+store> [exception] ok 1382 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+store> [return] ok 1383 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+store> [variable] ok 1384 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+store> [exception] ok 1385 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+store> [return] ok 1386 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+store> [variable] ok 1387 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+store> [exception] ok 1388 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+store> [return] ok 1389 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+store> [variable] ok 1390 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+store> [exception] ok 1391 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+store> [return] ok 1392 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+store> [variable] ok 1393 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+store> [exception] ok 1394 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+store> [return] ok 1395 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+store> [variable] ok 1396 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+store> [exception] ok 1397 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+store> [return] ok 1398 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+store> [variable] ok 1399 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+store> [exception] ok 1400 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+store> [return] ok 1401 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+store> [variable] ok 1402 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+store> [exception] ok 1403 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+store> [return] ok 1404 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+store> [variable] ok 1405 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 1406 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 1407 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 1408 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 1409 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 1410 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 1411 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 1412 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 1413 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 1414 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 1415 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 1416 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 1417 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 1418 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 1419 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 1420 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 1421 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 1422 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 1423 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 1424 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 1425 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 1426 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 1427 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 1428 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 1429 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 1430 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 1431 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 1432 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 1433 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 1434 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 1435 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 1436 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 1437 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 1438 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 1439 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 1440 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 1441 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 1442 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 1443 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 1444 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 1445 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 1446 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 1447 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 1448 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 1449 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 1450 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 1451 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 1452 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 1453 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 1454 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 1455 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 1456 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 1457 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 1458 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 1459 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 1460 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 1461 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 1462 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 1463 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 1464 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 1465 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 1466 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 1467 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 1468 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 1469 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 1470 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 1471 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 1472 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 1473 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 1474 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 1475 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 1476 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 1477 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 1478 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 1479 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 1480 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 1481 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 1482 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 1483 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 1484 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 1485 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 1486 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 1487 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +exists> [return] ok 1488 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 1489 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 1490 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +exists> [return] ok 1491 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 1492 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 1493 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +exists> [return] ok 1494 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 1495 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 1496 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 1497 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 1498 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 1499 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 1500 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 1501 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 1502 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 1503 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 1504 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 1505 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 1506 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 1507 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 1508 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 1509 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 1510 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 1511 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 1512 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 1513 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 1514 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +exists> [return] ok 1515 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 1516 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 1517 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +exists> [return] ok 1518 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 1519 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 1520 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +exists> [return] ok 1521 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 1522 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 1523 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +exists> [return] ok 1524 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 1525 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 1526 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +exists> [return] ok 1527 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 1528 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 1529 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +exists> [return] ok 1530 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 1531 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 1532 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +exists> [return] ok 1533 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 1534 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 1535 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +exists> [return] ok 1536 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 1537 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 1538 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +exists> [return] ok 1539 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 1540 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 1541 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +exists> [return] ok 1542 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 1543 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 1544 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +exists> [return] ok 1545 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 1546 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 1547 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +exists> [return] ok 1548 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 1549 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 1550 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +exists> [return] ok 1551 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 1552 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 1553 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +exists> [return] ok 1554 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 1555 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 1556 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +exists> [return] ok 1557 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 1558 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 1559 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +exists> [return] ok 1560 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 1561 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 1562 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +exists> [return] ok 1563 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 1564 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 1565 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +exists> [return] ok 1566 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 1567 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 1568 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +delete> [return] ok 1569 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 1570 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 1571 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +delete> [return] ok 1572 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 1573 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 1574 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +delete> [return] ok 1575 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 1576 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 1577 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 1578 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 1579 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 1580 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 1581 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 1582 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 1583 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 1584 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 1585 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 1586 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 1587 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 1588 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 1589 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 1590 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 1591 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 1592 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 1593 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 1594 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 1595 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +delete> [return] ok 1596 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 1597 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 1598 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +delete> [return] ok 1599 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 1600 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 1601 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +delete> [return] ok 1602 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 1603 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 1604 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +delete> [return] ok 1605 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 1606 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 1607 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +delete> [return] ok 1608 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 1609 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 1610 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +delete> [return] ok 1611 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 1612 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 1613 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +delete> [return] ok 1614 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 1615 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 1616 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +delete> [return] ok 1617 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 1618 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 1619 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +delete> [return] ok 1620 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 1621 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 1622 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +delete> [return] ok 1623 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 1624 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 1625 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +delete> [return] ok 1626 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 1627 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 1628 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +delete> [return] ok 1629 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 1630 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 1631 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +delete> [return] ok 1632 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 1633 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 1634 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +delete> [return] ok 1635 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 1636 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 1637 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +delete> [return] ok 1638 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 1639 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 1640 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +delete> [return] ok 1641 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 1642 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 1643 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +delete> [return] ok 1644 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 1645 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 1646 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +delete> [return] ok 1647 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 1648 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +store> [exception] ok 1649 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +store> [return] ok 1650 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +store> [variable] ok 1651 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +store> [exception] ok 1652 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +store> [return] ok 1653 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +store> [variable] ok 1654 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +store> [exception] ok 1655 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +store> [return] ok 1656 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] <+strict +store> [variable] ok 1657 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 1658 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +store> [return] ok 1659 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 1660 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 1661 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +store> [return] ok 1662 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 1663 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 1664 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +store> [return] ok 1665 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 1666 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 1667 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +store> [return] ok 1668 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 1669 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 1670 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +store> [return] ok 1671 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 1672 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 1673 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +store> [return] ok 1674 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 1675 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +store> [exception] ok 1676 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +store> [return] ok 1677 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +store> [variable] ok 1678 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +store> [exception] ok 1679 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +store> [return] ok 1680 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +store> [variable] ok 1681 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +store> [exception] ok 1682 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +store> [return] ok 1683 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] <+strict +store> [variable] ok 1684 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +store> [exception] ok 1685 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +store> [return] ok 1686 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +store> [variable] ok 1687 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +store> [exception] ok 1688 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +store> [return] ok 1689 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +store> [variable] ok 1690 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +store> [exception] ok 1691 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +store> [return] ok 1692 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] <+strict +store> [variable] ok 1693 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +store> [exception] ok 1694 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +store> [return] ok 1695 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +store> [variable] ok 1696 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +store> [exception] ok 1697 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +store> [return] ok 1698 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +store> [variable] ok 1699 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +store> [exception] ok 1700 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +store> [return] ok 1701 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] <+strict +store> [variable] ok 1702 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +store> [exception] ok 1703 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +store> [return] ok 1704 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +store> [variable] ok 1705 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +store> [exception] ok 1706 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +store> [return] ok 1707 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +store> [variable] ok 1708 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +store> [exception] ok 1709 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +store> [return] ok 1710 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] <+strict +store> [variable] ok 1711 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +store> [exception] ok 1712 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +store> [return] ok 1713 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +store> [variable] ok 1714 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +store> [exception] ok 1715 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +store> [return] ok 1716 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +store> [variable] ok 1717 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +store> [exception] ok 1718 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +store> [return] ok 1719 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] <+strict +store> [variable] ok 1720 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +store> [exception] ok 1721 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +store> [return] ok 1722 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +store> [variable] ok 1723 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +store> [exception] ok 1724 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +store> [return] ok 1725 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +store> [variable] ok 1726 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +store> [exception] ok 1727 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +store> [return] ok 1728 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] <+strict +store> [variable] ok 1729 - my $x; 1 for $x->[$N[0]]; () [exception] ok 1730 - my $x; 1 for $x->[$N[0]]; () [return] ok 1731 - my $x; 1 for $x->[$N[0]]; () [variable] ok 1732 - our $x; local $x; use strict; 1 for $x->[$N[0]]; () [exception] ok 1733 - our $x; local $x; use strict; 1 for $x->[$N[0]]; () [return] ok 1734 - our $x; local $x; use strict; 1 for $x->[$N[0]]; () [variable] ok 1735 - our $x; local $x; no strict; 1 for $x->[$N[0]]; () [exception] ok 1736 - our $x; local $x; no strict; 1 for $x->[$N[0]]; () [return] ok 1737 - our $x; local $x; no strict; 1 for $x->[$N[0]]; () [variable] ok 1738 - my $x; 1 for $$x[$N[0]]; () [exception] ok 1739 - my $x; 1 for $$x[$N[0]]; () [return] ok 1740 - my $x; 1 for $$x[$N[0]]; () [variable] ok 1741 - our $x; local $x; use strict; 1 for $$x[$N[0]]; () [exception] ok 1742 - our $x; local $x; use strict; 1 for $$x[$N[0]]; () [return] ok 1743 - our $x; local $x; use strict; 1 for $$x[$N[0]]; () [variable] ok 1744 - our $x; local $x; no strict; 1 for $$x[$N[0]]; () [exception] ok 1745 - our $x; local $x; no strict; 1 for $$x[$N[0]]; () [return] ok 1746 - our $x; local $x; no strict; 1 for $$x[$N[0]]; () [variable] ok 1747 - my @x; 1 for $x[$N[0]]; () [exception] ok 1748 - my @x; 1 for $x[$N[0]]; () [return] ok 1749 - my @x; 1 for $x[$N[0]]; () [variable] ok 1750 - our @x; local @x; use strict; 1 for $x[$N[0]]; () [exception] ok 1751 - our @x; local @x; use strict; 1 for $x[$N[0]]; () [return] ok 1752 - our @x; local @x; use strict; 1 for $x[$N[0]]; () [variable] ok 1753 - our @x; local @x; no strict; 1 for $x[$N[0]]; () [exception] ok 1754 - our @x; local @x; no strict; 1 for $x[$N[0]]; () [return] ok 1755 - our @x; local @x; no strict; 1 for $x[$N[0]]; () [variable] ok 1756 - my $x; 1 for $x->[$N[0]]; () [exception] ok 1757 - my $x; 1 for $x->[$N[0]]; () [return] ok 1758 - my $x; 1 for $x->[$N[0]]; () [variable] ok 1759 - our $x; local $x; use strict; 1 for $x->[$N[0]]; () [exception] ok 1760 - our $x; local $x; use strict; 1 for $x->[$N[0]]; () [return] ok 1761 - our $x; local $x; use strict; 1 for $x->[$N[0]]; () [variable] ok 1762 - our $x; local $x; no strict; 1 for $x->[$N[0]]; () [exception] ok 1763 - our $x; local $x; no strict; 1 for $x->[$N[0]]; () [return] ok 1764 - our $x; local $x; no strict; 1 for $x->[$N[0]]; () [variable] ok 1765 - my $x; 1 for $$x[$N[0]]; () [exception] ok 1766 - my $x; 1 for $$x[$N[0]]; () [return] ok 1767 - my $x; 1 for $$x[$N[0]]; () [variable] ok 1768 - our $x; local $x; use strict; 1 for $$x[$N[0]]; () [exception] ok 1769 - our $x; local $x; use strict; 1 for $$x[$N[0]]; () [return] ok 1770 - our $x; local $x; use strict; 1 for $$x[$N[0]]; () [variable] ok 1771 - our $x; local $x; no strict; 1 for $$x[$N[0]]; () [exception] ok 1772 - our $x; local $x; no strict; 1 for $$x[$N[0]]; () [return] ok 1773 - our $x; local $x; no strict; 1 for $$x[$N[0]]; () [variable] ok 1774 - my @x; 1 for $x[$N[0]]; () [exception] ok 1775 - my @x; 1 for $x[$N[0]]; () [return] ok 1776 - my @x; 1 for $x[$N[0]]; () [variable] ok 1777 - our @x; local @x; use strict; 1 for $x[$N[0]]; () [exception] ok 1778 - our @x; local @x; use strict; 1 for $x[$N[0]]; () [return] ok 1779 - our @x; local @x; use strict; 1 for $x[$N[0]]; () [variable] ok 1780 - our @x; local @x; no strict; 1 for $x[$N[0]]; () [exception] ok 1781 - our @x; local @x; no strict; 1 for $x[$N[0]]; () [return] ok 1782 - our @x; local @x; no strict; 1 for $x[$N[0]]; () [variable] ok 1783 - my $x; 1 for $x->[$N[0]]; () <+fetch> [exception] ok 1784 - my $x; 1 for $x->[$N[0]]; () <+fetch> [return] ok 1785 - my $x; 1 for $x->[$N[0]]; () <+fetch> [variable] ok 1786 - our $x; local $x; use strict; 1 for $x->[$N[0]]; () <+fetch> [exception] ok 1787 - our $x; local $x; use strict; 1 for $x->[$N[0]]; () <+fetch> [return] ok 1788 - our $x; local $x; use strict; 1 for $x->[$N[0]]; () <+fetch> [variable] ok 1789 - our $x; local $x; no strict; 1 for $x->[$N[0]]; () <+fetch> [exception] ok 1790 - our $x; local $x; no strict; 1 for $x->[$N[0]]; () <+fetch> [return] ok 1791 - our $x; local $x; no strict; 1 for $x->[$N[0]]; () <+fetch> [variable] ok 1792 - my $x; 1 for $$x[$N[0]]; () <+fetch> [exception] ok 1793 - my $x; 1 for $$x[$N[0]]; () <+fetch> [return] ok 1794 - my $x; 1 for $$x[$N[0]]; () <+fetch> [variable] ok 1795 - our $x; local $x; use strict; 1 for $$x[$N[0]]; () <+fetch> [exception] ok 1796 - our $x; local $x; use strict; 1 for $$x[$N[0]]; () <+fetch> [return] ok 1797 - our $x; local $x; use strict; 1 for $$x[$N[0]]; () <+fetch> [variable] ok 1798 - our $x; local $x; no strict; 1 for $$x[$N[0]]; () <+fetch> [exception] ok 1799 - our $x; local $x; no strict; 1 for $$x[$N[0]]; () <+fetch> [return] ok 1800 - our $x; local $x; no strict; 1 for $$x[$N[0]]; () <+fetch> [variable] ok 1801 - my @x; 1 for $x[$N[0]]; () <+fetch> [exception] ok 1802 - my @x; 1 for $x[$N[0]]; () <+fetch> [return] ok 1803 - my @x; 1 for $x[$N[0]]; () <+fetch> [variable] ok 1804 - our @x; local @x; use strict; 1 for $x[$N[0]]; () <+fetch> [exception] ok 1805 - our @x; local @x; use strict; 1 for $x[$N[0]]; () <+fetch> [return] ok 1806 - our @x; local @x; use strict; 1 for $x[$N[0]]; () <+fetch> [variable] ok 1807 - our @x; local @x; no strict; 1 for $x[$N[0]]; () <+fetch> [exception] ok 1808 - our @x; local @x; no strict; 1 for $x[$N[0]]; () <+fetch> [return] ok 1809 - our @x; local @x; no strict; 1 for $x[$N[0]]; () <+fetch> [variable] ok 1810 - my $x; 1 for $x->[$N[0]]; () <+exists> [exception] ok 1811 - my $x; 1 for $x->[$N[0]]; () <+exists> [return] ok 1812 - my $x; 1 for $x->[$N[0]]; () <+exists> [variable] ok 1813 - our $x; local $x; use strict; 1 for $x->[$N[0]]; () <+exists> [exception] ok 1814 - our $x; local $x; use strict; 1 for $x->[$N[0]]; () <+exists> [return] ok 1815 - our $x; local $x; use strict; 1 for $x->[$N[0]]; () <+exists> [variable] ok 1816 - our $x; local $x; no strict; 1 for $x->[$N[0]]; () <+exists> [exception] ok 1817 - our $x; local $x; no strict; 1 for $x->[$N[0]]; () <+exists> [return] ok 1818 - our $x; local $x; no strict; 1 for $x->[$N[0]]; () <+exists> [variable] ok 1819 - my $x; 1 for $$x[$N[0]]; () <+exists> [exception] ok 1820 - my $x; 1 for $$x[$N[0]]; () <+exists> [return] ok 1821 - my $x; 1 for $$x[$N[0]]; () <+exists> [variable] ok 1822 - our $x; local $x; use strict; 1 for $$x[$N[0]]; () <+exists> [exception] ok 1823 - our $x; local $x; use strict; 1 for $$x[$N[0]]; () <+exists> [return] ok 1824 - our $x; local $x; use strict; 1 for $$x[$N[0]]; () <+exists> [variable] ok 1825 - our $x; local $x; no strict; 1 for $$x[$N[0]]; () <+exists> [exception] ok 1826 - our $x; local $x; no strict; 1 for $$x[$N[0]]; () <+exists> [return] ok 1827 - our $x; local $x; no strict; 1 for $$x[$N[0]]; () <+exists> [variable] ok 1828 - my @x; 1 for $x[$N[0]]; () <+exists> [exception] ok 1829 - my @x; 1 for $x[$N[0]]; () <+exists> [return] ok 1830 - my @x; 1 for $x[$N[0]]; () <+exists> [variable] ok 1831 - our @x; local @x; use strict; 1 for $x[$N[0]]; () <+exists> [exception] ok 1832 - our @x; local @x; use strict; 1 for $x[$N[0]]; () <+exists> [return] ok 1833 - our @x; local @x; use strict; 1 for $x[$N[0]]; () <+exists> [variable] ok 1834 - our @x; local @x; no strict; 1 for $x[$N[0]]; () <+exists> [exception] ok 1835 - our @x; local @x; no strict; 1 for $x[$N[0]]; () <+exists> [return] ok 1836 - our @x; local @x; no strict; 1 for $x[$N[0]]; () <+exists> [variable] ok 1837 - my $x; 1 for $x->[$N[0]]; () <+delete> [exception] ok 1838 - my $x; 1 for $x->[$N[0]]; () <+delete> [return] ok 1839 - my $x; 1 for $x->[$N[0]]; () <+delete> [variable] ok 1840 - our $x; local $x; use strict; 1 for $x->[$N[0]]; () <+delete> [exception] ok 1841 - our $x; local $x; use strict; 1 for $x->[$N[0]]; () <+delete> [return] ok 1842 - our $x; local $x; use strict; 1 for $x->[$N[0]]; () <+delete> [variable] ok 1843 - our $x; local $x; no strict; 1 for $x->[$N[0]]; () <+delete> [exception] ok 1844 - our $x; local $x; no strict; 1 for $x->[$N[0]]; () <+delete> [return] ok 1845 - our $x; local $x; no strict; 1 for $x->[$N[0]]; () <+delete> [variable] ok 1846 - my $x; 1 for $$x[$N[0]]; () <+delete> [exception] ok 1847 - my $x; 1 for $$x[$N[0]]; () <+delete> [return] ok 1848 - my $x; 1 for $$x[$N[0]]; () <+delete> [variable] ok 1849 - our $x; local $x; use strict; 1 for $$x[$N[0]]; () <+delete> [exception] ok 1850 - our $x; local $x; use strict; 1 for $$x[$N[0]]; () <+delete> [return] ok 1851 - our $x; local $x; use strict; 1 for $$x[$N[0]]; () <+delete> [variable] ok 1852 - our $x; local $x; no strict; 1 for $$x[$N[0]]; () <+delete> [exception] ok 1853 - our $x; local $x; no strict; 1 for $$x[$N[0]]; () <+delete> [return] ok 1854 - our $x; local $x; no strict; 1 for $$x[$N[0]]; () <+delete> [variable] ok 1855 - my @x; 1 for $x[$N[0]]; () <+delete> [exception] ok 1856 - my @x; 1 for $x[$N[0]]; () <+delete> [return] ok 1857 - my @x; 1 for $x[$N[0]]; () <+delete> [variable] ok 1858 - our @x; local @x; use strict; 1 for $x[$N[0]]; () <+delete> [exception] ok 1859 - our @x; local @x; use strict; 1 for $x[$N[0]]; () <+delete> [return] ok 1860 - our @x; local @x; use strict; 1 for $x[$N[0]]; () <+delete> [variable] ok 1861 - our @x; local @x; no strict; 1 for $x[$N[0]]; () <+delete> [exception] ok 1862 - our @x; local @x; no strict; 1 for $x[$N[0]]; () <+delete> [return] ok 1863 - our @x; local @x; no strict; 1 for $x[$N[0]]; () <+delete> [variable] ok 1864 - my $x; 1 for $x->[$N[0]]; () <+store> [exception] ok 1865 - my $x; 1 for $x->[$N[0]]; () <+store> [return] ok 1866 - my $x; 1 for $x->[$N[0]]; () <+store> [variable] ok 1867 - our $x; local $x; use strict; 1 for $x->[$N[0]]; () <+store> [exception] ok 1868 - our $x; local $x; use strict; 1 for $x->[$N[0]]; () <+store> [return] ok 1869 - our $x; local $x; use strict; 1 for $x->[$N[0]]; () <+store> [variable] ok 1870 - our $x; local $x; no strict; 1 for $x->[$N[0]]; () <+store> [exception] ok 1871 - our $x; local $x; no strict; 1 for $x->[$N[0]]; () <+store> [return] ok 1872 - our $x; local $x; no strict; 1 for $x->[$N[0]]; () <+store> [variable] ok 1873 - my $x; 1 for $$x[$N[0]]; () <+store> [exception] ok 1874 - my $x; 1 for $$x[$N[0]]; () <+store> [return] ok 1875 - my $x; 1 for $$x[$N[0]]; () <+store> [variable] ok 1876 - our $x; local $x; use strict; 1 for $$x[$N[0]]; () <+store> [exception] ok 1877 - our $x; local $x; use strict; 1 for $$x[$N[0]]; () <+store> [return] ok 1878 - our $x; local $x; use strict; 1 for $$x[$N[0]]; () <+store> [variable] ok 1879 - our $x; local $x; no strict; 1 for $$x[$N[0]]; () <+store> [exception] ok 1880 - our $x; local $x; no strict; 1 for $$x[$N[0]]; () <+store> [return] ok 1881 - our $x; local $x; no strict; 1 for $$x[$N[0]]; () <+store> [variable] ok 1882 - my @x; 1 <+store> [exception] ok 1883 - my @x; 1 <+store> [return] ok 1884 - my @x; 1 <+store> [variable] ok 1885 - our @x; local @x; use strict; 1 <+store> [exception] ok 1886 - our @x; local @x; use strict; 1 <+store> [return] ok 1887 - our @x; local @x; use strict; 1 <+store> [variable] ok 1888 - our @x; local @x; no strict; 1 <+store> [exception] ok 1889 - our @x; local @x; no strict; 1 <+store> [return] ok 1890 - our @x; local @x; no strict; 1 <+store> [variable] ok 1891 - my $x; $_ = 1 for $x->[$N[0]]; () [exception] ok 1892 - my $x; $_ = 1 for $x->[$N[0]]; () [return] ok 1893 - my $x; $_ = 1 for $x->[$N[0]]; () [variable] ok 1894 - our $x; local $x; use strict; $_ = 1 for $x->[$N[0]]; () [exception] ok 1895 - our $x; local $x; use strict; $_ = 1 for $x->[$N[0]]; () [return] ok 1896 - our $x; local $x; use strict; $_ = 1 for $x->[$N[0]]; () [variable] ok 1897 - our $x; local $x; no strict; $_ = 1 for $x->[$N[0]]; () [exception] ok 1898 - our $x; local $x; no strict; $_ = 1 for $x->[$N[0]]; () [return] ok 1899 - our $x; local $x; no strict; $_ = 1 for $x->[$N[0]]; () [variable] ok 1900 - my $x; $_ = 1 for $$x[$N[0]]; () [exception] ok 1901 - my $x; $_ = 1 for $$x[$N[0]]; () [return] ok 1902 - my $x; $_ = 1 for $$x[$N[0]]; () [variable] ok 1903 - our $x; local $x; use strict; $_ = 1 for $$x[$N[0]]; () [exception] ok 1904 - our $x; local $x; use strict; $_ = 1 for $$x[$N[0]]; () [return] ok 1905 - our $x; local $x; use strict; $_ = 1 for $$x[$N[0]]; () [variable] ok 1906 - our $x; local $x; no strict; $_ = 1 for $$x[$N[0]]; () [exception] ok 1907 - our $x; local $x; no strict; $_ = 1 for $$x[$N[0]]; () [return] ok 1908 - our $x; local $x; no strict; $_ = 1 for $$x[$N[0]]; () [variable] ok 1909 - my @x; $_ = 1 for $x[$N[0]]; () [exception] ok 1910 - my @x; $_ = 1 for $x[$N[0]]; () [return] ok 1911 - my @x; $_ = 1 for $x[$N[0]]; () [variable] ok 1912 - our @x; local @x; use strict; $_ = 1 for $x[$N[0]]; () [exception] ok 1913 - our @x; local @x; use strict; $_ = 1 for $x[$N[0]]; () [return] ok 1914 - our @x; local @x; use strict; $_ = 1 for $x[$N[0]]; () [variable] ok 1915 - our @x; local @x; no strict; $_ = 1 for $x[$N[0]]; () [exception] ok 1916 - our @x; local @x; no strict; $_ = 1 for $x[$N[0]]; () [return] ok 1917 - our @x; local @x; no strict; $_ = 1 for $x[$N[0]]; () [variable] ok 1918 - my $x; $_ = 1 for $x->[$N[0]]; () [exception] ok 1919 - my $x; $_ = 1 for $x->[$N[0]]; () [return] ok 1920 - my $x; $_ = 1 for $x->[$N[0]]; () [variable] ok 1921 - our $x; local $x; use strict; $_ = 1 for $x->[$N[0]]; () [exception] ok 1922 - our $x; local $x; use strict; $_ = 1 for $x->[$N[0]]; () [return] ok 1923 - our $x; local $x; use strict; $_ = 1 for $x->[$N[0]]; () [variable] ok 1924 - our $x; local $x; no strict; $_ = 1 for $x->[$N[0]]; () [exception] ok 1925 - our $x; local $x; no strict; $_ = 1 for $x->[$N[0]]; () [return] ok 1926 - our $x; local $x; no strict; $_ = 1 for $x->[$N[0]]; () [variable] ok 1927 - my $x; $_ = 1 for $$x[$N[0]]; () [exception] ok 1928 - my $x; $_ = 1 for $$x[$N[0]]; () [return] ok 1929 - my $x; $_ = 1 for $$x[$N[0]]; () [variable] ok 1930 - our $x; local $x; use strict; $_ = 1 for $$x[$N[0]]; () [exception] ok 1931 - our $x; local $x; use strict; $_ = 1 for $$x[$N[0]]; () [return] ok 1932 - our $x; local $x; use strict; $_ = 1 for $$x[$N[0]]; () [variable] ok 1933 - our $x; local $x; no strict; $_ = 1 for $$x[$N[0]]; () [exception] ok 1934 - our $x; local $x; no strict; $_ = 1 for $$x[$N[0]]; () [return] ok 1935 - our $x; local $x; no strict; $_ = 1 for $$x[$N[0]]; () [variable] ok 1936 - my @x; $_ = 1 for $x[$N[0]]; () [exception] ok 1937 - my @x; $_ = 1 for $x[$N[0]]; () [return] ok 1938 - my @x; $_ = 1 for $x[$N[0]]; () [variable] ok 1939 - our @x; local @x; use strict; $_ = 1 for $x[$N[0]]; () [exception] ok 1940 - our @x; local @x; use strict; $_ = 1 for $x[$N[0]]; () [return] ok 1941 - our @x; local @x; use strict; $_ = 1 for $x[$N[0]]; () [variable] ok 1942 - our @x; local @x; no strict; $_ = 1 for $x[$N[0]]; () [exception] ok 1943 - our @x; local @x; no strict; $_ = 1 for $x[$N[0]]; () [return] ok 1944 - our @x; local @x; no strict; $_ = 1 for $x[$N[0]]; () [variable] ok 1945 - my $x; $_ = 1 for $x->[$N[0]]; () <+fetch> [exception] ok 1946 - my $x; $_ = 1 for $x->[$N[0]]; () <+fetch> [return] ok 1947 - my $x; $_ = 1 for $x->[$N[0]]; () <+fetch> [variable] ok 1948 - our $x; local $x; use strict; $_ = 1 for $x->[$N[0]]; () <+fetch> [exception] ok 1949 - our $x; local $x; use strict; $_ = 1 for $x->[$N[0]]; () <+fetch> [return] ok 1950 - our $x; local $x; use strict; $_ = 1 for $x->[$N[0]]; () <+fetch> [variable] ok 1951 - our $x; local $x; no strict; $_ = 1 for $x->[$N[0]]; () <+fetch> [exception] ok 1952 - our $x; local $x; no strict; $_ = 1 for $x->[$N[0]]; () <+fetch> [return] ok 1953 - our $x; local $x; no strict; $_ = 1 for $x->[$N[0]]; () <+fetch> [variable] ok 1954 - my $x; $_ = 1 for $$x[$N[0]]; () <+fetch> [exception] ok 1955 - my $x; $_ = 1 for $$x[$N[0]]; () <+fetch> [return] ok 1956 - my $x; $_ = 1 for $$x[$N[0]]; () <+fetch> [variable] ok 1957 - our $x; local $x; use strict; $_ = 1 for $$x[$N[0]]; () <+fetch> [exception] ok 1958 - our $x; local $x; use strict; $_ = 1 for $$x[$N[0]]; () <+fetch> [return] ok 1959 - our $x; local $x; use strict; $_ = 1 for $$x[$N[0]]; () <+fetch> [variable] ok 1960 - our $x; local $x; no strict; $_ = 1 for $$x[$N[0]]; () <+fetch> [exception] ok 1961 - our $x; local $x; no strict; $_ = 1 for $$x[$N[0]]; () <+fetch> [return] ok 1962 - our $x; local $x; no strict; $_ = 1 for $$x[$N[0]]; () <+fetch> [variable] ok 1963 - my @x; $_ = 1 for $x[$N[0]]; () <+fetch> [exception] ok 1964 - my @x; $_ = 1 for $x[$N[0]]; () <+fetch> [return] ok 1965 - my @x; $_ = 1 for $x[$N[0]]; () <+fetch> [variable] ok 1966 - our @x; local @x; use strict; $_ = 1 for $x[$N[0]]; () <+fetch> [exception] ok 1967 - our @x; local @x; use strict; $_ = 1 for $x[$N[0]]; () <+fetch> [return] ok 1968 - our @x; local @x; use strict; $_ = 1 for $x[$N[0]]; () <+fetch> [variable] ok 1969 - our @x; local @x; no strict; $_ = 1 for $x[$N[0]]; () <+fetch> [exception] ok 1970 - our @x; local @x; no strict; $_ = 1 for $x[$N[0]]; () <+fetch> [return] ok 1971 - our @x; local @x; no strict; $_ = 1 for $x[$N[0]]; () <+fetch> [variable] ok 1972 - my $x; $_ = 1 for $x->[$N[0]]; () <+exists> [exception] ok 1973 - my $x; $_ = 1 for $x->[$N[0]]; () <+exists> [return] ok 1974 - my $x; $_ = 1 for $x->[$N[0]]; () <+exists> [variable] ok 1975 - our $x; local $x; use strict; $_ = 1 for $x->[$N[0]]; () <+exists> [exception] ok 1976 - our $x; local $x; use strict; $_ = 1 for $x->[$N[0]]; () <+exists> [return] ok 1977 - our $x; local $x; use strict; $_ = 1 for $x->[$N[0]]; () <+exists> [variable] ok 1978 - our $x; local $x; no strict; $_ = 1 for $x->[$N[0]]; () <+exists> [exception] ok 1979 - our $x; local $x; no strict; $_ = 1 for $x->[$N[0]]; () <+exists> [return] ok 1980 - our $x; local $x; no strict; $_ = 1 for $x->[$N[0]]; () <+exists> [variable] ok 1981 - my $x; $_ = 1 for $$x[$N[0]]; () <+exists> [exception] ok 1982 - my $x; $_ = 1 for $$x[$N[0]]; () <+exists> [return] ok 1983 - my $x; $_ = 1 for $$x[$N[0]]; () <+exists> [variable] ok 1984 - our $x; local $x; use strict; $_ = 1 for $$x[$N[0]]; () <+exists> [exception] ok 1985 - our $x; local $x; use strict; $_ = 1 for $$x[$N[0]]; () <+exists> [return] ok 1986 - our $x; local $x; use strict; $_ = 1 for $$x[$N[0]]; () <+exists> [variable] ok 1987 - our $x; local $x; no strict; $_ = 1 for $$x[$N[0]]; () <+exists> [exception] ok 1988 - our $x; local $x; no strict; $_ = 1 for $$x[$N[0]]; () <+exists> [return] ok 1989 - our $x; local $x; no strict; $_ = 1 for $$x[$N[0]]; () <+exists> [variable] ok 1990 - my @x; $_ = 1 for $x[$N[0]]; () <+exists> [exception] ok 1991 - my @x; $_ = 1 for $x[$N[0]]; () <+exists> [return] ok 1992 - my @x; $_ = 1 for $x[$N[0]]; () <+exists> [variable] ok 1993 - our @x; local @x; use strict; $_ = 1 for $x[$N[0]]; () <+exists> [exception] ok 1994 - our @x; local @x; use strict; $_ = 1 for $x[$N[0]]; () <+exists> [return] ok 1995 - our @x; local @x; use strict; $_ = 1 for $x[$N[0]]; () <+exists> [variable] ok 1996 - our @x; local @x; no strict; $_ = 1 for $x[$N[0]]; () <+exists> [exception] ok 1997 - our @x; local @x; no strict; $_ = 1 for $x[$N[0]]; () <+exists> [return] ok 1998 - our @x; local @x; no strict; $_ = 1 for $x[$N[0]]; () <+exists> [variable] ok 1999 - my $x; $_ = 1 for $x->[$N[0]]; () <+delete> [exception] ok 2000 - my $x; $_ = 1 for $x->[$N[0]]; () <+delete> [return] ok 2001 - my $x; $_ = 1 for $x->[$N[0]]; () <+delete> [variable] ok 2002 - our $x; local $x; use strict; $_ = 1 for $x->[$N[0]]; () <+delete> [exception] ok 2003 - our $x; local $x; use strict; $_ = 1 for $x->[$N[0]]; () <+delete> [return] ok 2004 - our $x; local $x; use strict; $_ = 1 for $x->[$N[0]]; () <+delete> [variable] ok 2005 - our $x; local $x; no strict; $_ = 1 for $x->[$N[0]]; () <+delete> [exception] ok 2006 - our $x; local $x; no strict; $_ = 1 for $x->[$N[0]]; () <+delete> [return] ok 2007 - our $x; local $x; no strict; $_ = 1 for $x->[$N[0]]; () <+delete> [variable] ok 2008 - my $x; $_ = 1 for $$x[$N[0]]; () <+delete> [exception] ok 2009 - my $x; $_ = 1 for $$x[$N[0]]; () <+delete> [return] ok 2010 - my $x; $_ = 1 for $$x[$N[0]]; () <+delete> [variable] ok 2011 - our $x; local $x; use strict; $_ = 1 for $$x[$N[0]]; () <+delete> [exception] ok 2012 - our $x; local $x; use strict; $_ = 1 for $$x[$N[0]]; () <+delete> [return] ok 2013 - our $x; local $x; use strict; $_ = 1 for $$x[$N[0]]; () <+delete> [variable] ok 2014 - our $x; local $x; no strict; $_ = 1 for $$x[$N[0]]; () <+delete> [exception] ok 2015 - our $x; local $x; no strict; $_ = 1 for $$x[$N[0]]; () <+delete> [return] ok 2016 - our $x; local $x; no strict; $_ = 1 for $$x[$N[0]]; () <+delete> [variable] ok 2017 - my @x; $_ = 1 for $x[$N[0]]; () <+delete> [exception] ok 2018 - my @x; $_ = 1 for $x[$N[0]]; () <+delete> [return] ok 2019 - my @x; $_ = 1 for $x[$N[0]]; () <+delete> [variable] ok 2020 - our @x; local @x; use strict; $_ = 1 for $x[$N[0]]; () <+delete> [exception] ok 2021 - our @x; local @x; use strict; $_ = 1 for $x[$N[0]]; () <+delete> [return] ok 2022 - our @x; local @x; use strict; $_ = 1 for $x[$N[0]]; () <+delete> [variable] ok 2023 - our @x; local @x; no strict; $_ = 1 for $x[$N[0]]; () <+delete> [exception] ok 2024 - our @x; local @x; no strict; $_ = 1 for $x[$N[0]]; () <+delete> [return] ok 2025 - our @x; local @x; no strict; $_ = 1 for $x[$N[0]]; () <+delete> [variable] ok 2026 - my $x; $_ = 1 for $x->[$N[0]]; () <+store> [exception] ok 2027 - my $x; $_ = 1 for $x->[$N[0]]; () <+store> [return] ok 2028 - my $x; $_ = 1 for $x->[$N[0]]; () <+store> [variable] ok 2029 - our $x; local $x; use strict; $_ = 1 for $x->[$N[0]]; () <+store> [exception] ok 2030 - our $x; local $x; use strict; $_ = 1 for $x->[$N[0]]; () <+store> [return] ok 2031 - our $x; local $x; use strict; $_ = 1 for $x->[$N[0]]; () <+store> [variable] ok 2032 - our $x; local $x; no strict; $_ = 1 for $x->[$N[0]]; () <+store> [exception] ok 2033 - our $x; local $x; no strict; $_ = 1 for $x->[$N[0]]; () <+store> [return] ok 2034 - our $x; local $x; no strict; $_ = 1 for $x->[$N[0]]; () <+store> [variable] ok 2035 - my $x; $_ = 1 for $$x[$N[0]]; () <+store> [exception] ok 2036 - my $x; $_ = 1 for $$x[$N[0]]; () <+store> [return] ok 2037 - my $x; $_ = 1 for $$x[$N[0]]; () <+store> [variable] ok 2038 - our $x; local $x; use strict; $_ = 1 for $$x[$N[0]]; () <+store> [exception] ok 2039 - our $x; local $x; use strict; $_ = 1 for $$x[$N[0]]; () <+store> [return] ok 2040 - our $x; local $x; use strict; $_ = 1 for $$x[$N[0]]; () <+store> [variable] ok 2041 - our $x; local $x; no strict; $_ = 1 for $$x[$N[0]]; () <+store> [exception] ok 2042 - our $x; local $x; no strict; $_ = 1 for $$x[$N[0]]; () <+store> [return] ok 2043 - our $x; local $x; no strict; $_ = 1 for $$x[$N[0]]; () <+store> [variable] ok 2044 - my @x; 1 <+store> [exception] ok 2045 - my @x; 1 <+store> [return] ok 2046 - my @x; 1 <+store> [variable] ok 2047 - our @x; local @x; use strict; 1 <+store> [exception] ok 2048 - our @x; local @x; use strict; 1 <+store> [return] ok 2049 - our @x; local @x; use strict; 1 <+store> [variable] ok 2050 - our @x; local @x; no strict; 1 <+store> [exception] ok 2051 - our @x; local @x; no strict; 1 <+store> [return] ok 2052 - our @x; local @x; no strict; 1 <+store> [variable] ok 2053 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+fetch> [exception] ok 2054 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+fetch> [return] ok 2055 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+fetch> [variable] ok 2056 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+fetch> [exception] ok 2057 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+fetch> [return] ok 2058 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+fetch> [variable] ok 2059 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+fetch> [exception] ok 2060 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+fetch> [return] ok 2061 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+fetch> [variable] ok 2062 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+fetch> [exception] ok 2063 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+fetch> [return] ok 2064 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+fetch> [variable] ok 2065 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+fetch> [exception] ok 2066 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+fetch> [return] ok 2067 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+fetch> [variable] ok 2068 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+fetch> [exception] ok 2069 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+fetch> [return] ok 2070 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+fetch> [variable] ok 2071 - my @x; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+fetch> [exception] ok 2072 - my @x; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+fetch> [return] ok 2073 - my @x; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+fetch> [variable] ok 2074 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+fetch> [exception] ok 2075 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+fetch> [return] ok 2076 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+fetch> [variable] ok 2077 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+fetch> [exception] ok 2078 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+fetch> [return] ok 2079 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+fetch> [variable] ok 2080 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+fetch> [exception] ok 2081 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+fetch> [return] ok 2082 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+fetch> [variable] ok 2083 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+fetch> [exception] ok 2084 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+fetch> [return] ok 2085 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+fetch> [variable] ok 2086 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+fetch> [exception] ok 2087 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+fetch> [return] ok 2088 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+fetch> [variable] ok 2089 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+fetch> [exception] ok 2090 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+fetch> [return] ok 2091 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+fetch> [variable] ok 2092 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+fetch> [exception] ok 2093 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+fetch> [return] ok 2094 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+fetch> [variable] ok 2095 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+fetch> [exception] ok 2096 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+fetch> [return] ok 2097 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+fetch> [variable] ok 2098 - my @x; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+fetch> [exception] ok 2099 - my @x; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+fetch> [return] ok 2100 - my @x; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+fetch> [variable] ok 2101 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+fetch> [exception] ok 2102 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+fetch> [return] ok 2103 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+fetch> [variable] ok 2104 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+fetch> [exception] ok 2105 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+fetch> [return] ok 2106 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+fetch> [variable] ok 2107 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+exists> [exception] ok 2108 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+exists> [return] ok 2109 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+exists> [variable] ok 2110 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+exists> [exception] ok 2111 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+exists> [return] ok 2112 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+exists> [variable] ok 2113 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+exists> [exception] ok 2114 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+exists> [return] ok 2115 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+exists> [variable] ok 2116 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+exists> [exception] ok 2117 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+exists> [return] ok 2118 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+exists> [variable] ok 2119 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+exists> [exception] ok 2120 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+exists> [return] ok 2121 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+exists> [variable] ok 2122 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+exists> [exception] ok 2123 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+exists> [return] ok 2124 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+exists> [variable] ok 2125 - my @x; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+exists> [exception] ok 2126 - my @x; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+exists> [return] ok 2127 - my @x; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+exists> [variable] ok 2128 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+exists> [exception] ok 2129 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+exists> [return] ok 2130 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+exists> [variable] ok 2131 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+exists> [exception] ok 2132 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+exists> [return] ok 2133 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+exists> [variable] ok 2134 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+exists> [exception] ok 2135 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+exists> [return] ok 2136 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+exists> [variable] ok 2137 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+exists> [exception] ok 2138 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+exists> [return] ok 2139 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+exists> [variable] ok 2140 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+exists> [exception] ok 2141 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+exists> [return] ok 2142 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+exists> [variable] ok 2143 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+exists> [exception] ok 2144 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+exists> [return] ok 2145 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+exists> [variable] ok 2146 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+exists> [exception] ok 2147 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+exists> [return] ok 2148 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+exists> [variable] ok 2149 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+exists> [exception] ok 2150 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+exists> [return] ok 2151 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+exists> [variable] ok 2152 - my @x; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+exists> [exception] ok 2153 - my @x; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+exists> [return] ok 2154 - my @x; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+exists> [variable] ok 2155 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+exists> [exception] ok 2156 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+exists> [return] ok 2157 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+exists> [variable] ok 2158 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+exists> [exception] ok 2159 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+exists> [return] ok 2160 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+exists> [variable] ok 2161 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+delete> [exception] ok 2162 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+delete> [return] ok 2163 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+delete> [variable] ok 2164 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+delete> [exception] ok 2165 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+delete> [return] ok 2166 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+delete> [variable] ok 2167 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+delete> [exception] ok 2168 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+delete> [return] ok 2169 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+delete> [variable] ok 2170 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+delete> [exception] ok 2171 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+delete> [return] ok 2172 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+delete> [variable] ok 2173 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+delete> [exception] ok 2174 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+delete> [return] ok 2175 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+delete> [variable] ok 2176 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+delete> [exception] ok 2177 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+delete> [return] ok 2178 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+delete> [variable] ok 2179 - my @x; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+delete> [exception] ok 2180 - my @x; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+delete> [return] ok 2181 - my @x; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+delete> [variable] ok 2182 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+delete> [exception] ok 2183 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+delete> [return] ok 2184 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+delete> [variable] ok 2185 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+delete> [exception] ok 2186 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+delete> [return] ok 2187 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+delete> [variable] ok 2188 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+delete> [exception] ok 2189 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+delete> [return] ok 2190 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+delete> [variable] ok 2191 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+delete> [exception] ok 2192 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+delete> [return] ok 2193 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+delete> [variable] ok 2194 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+delete> [exception] ok 2195 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+delete> [return] ok 2196 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+delete> [variable] ok 2197 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+delete> [exception] ok 2198 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+delete> [return] ok 2199 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+delete> [variable] ok 2200 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+delete> [exception] ok 2201 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+delete> [return] ok 2202 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+delete> [variable] ok 2203 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+delete> [exception] ok 2204 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+delete> [return] ok 2205 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+delete> [variable] ok 2206 - my @x; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+delete> [exception] ok 2207 - my @x; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+delete> [return] ok 2208 - my @x; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+delete> [variable] ok 2209 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+delete> [exception] ok 2210 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+delete> [return] ok 2211 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+delete> [variable] ok 2212 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+delete> [exception] ok 2213 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+delete> [return] ok 2214 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+delete> [variable] ok 2215 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+store> [exception] ok 2216 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+store> [return] ok 2217 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+store> [variable] ok 2218 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+store> [exception] ok 2219 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+store> [return] ok 2220 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+store> [variable] ok 2221 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+store> [exception] ok 2222 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+store> [return] ok 2223 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[0]]; () <+store> [variable] ok 2224 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+store> [exception] ok 2225 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+store> [return] ok 2226 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+store> [variable] ok 2227 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+store> [exception] ok 2228 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+store> [return] ok 2229 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+store> [variable] ok 2230 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+store> [exception] ok 2231 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+store> [return] ok 2232 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[0]]; () <+store> [variable] ok 2233 - my @x; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+store> [exception] ok 2234 - my @x; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+store> [return] ok 2235 - my @x; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+store> [variable] ok 2236 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+store> [exception] ok 2237 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+store> [return] ok 2238 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+store> [variable] ok 2239 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+store> [exception] ok 2240 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+store> [return] ok 2241 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[0]]; () <+store> [variable] ok 2242 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+store> [exception] ok 2243 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+store> [return] ok 2244 - my $x; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+store> [variable] ok 2245 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+store> [exception] ok 2246 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+store> [return] ok 2247 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+store> [variable] ok 2248 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+store> [exception] ok 2249 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+store> [return] ok 2250 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $x->[$N[1]]; () <+store> [variable] ok 2251 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+store> [exception] ok 2252 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+store> [return] ok 2253 - my $x; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+store> [variable] ok 2254 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+store> [exception] ok 2255 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+store> [return] ok 2256 - our $x; local $x; use strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+store> [variable] ok 2257 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+store> [exception] ok 2258 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+store> [return] ok 2259 - our $x; local $x; no strict; $x->[$N[0]] = 1; 1 for $$x[$N[1]]; () <+store> [variable] ok 2260 - my @x; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+store> [exception] ok 2261 - my @x; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+store> [return] ok 2262 - my @x; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+store> [variable] ok 2263 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+store> [exception] ok 2264 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+store> [return] ok 2265 - our @x; local @x; use strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+store> [variable] ok 2266 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+store> [exception] ok 2267 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+store> [return] ok 2268 - our @x; local @x; no strict; $x[$N[0]] = 1; 1 for $x[$N[1]]; () <+store> [variable] ok 2269 - my $x; do_nothing($x->[$N[0]]); () [exception] ok 2270 - my $x; do_nothing($x->[$N[0]]); () [return] ok 2271 - my $x; do_nothing($x->[$N[0]]); () [variable] ok 2272 - our $x; local $x; use strict; do_nothing($x->[$N[0]]); () [exception] ok 2273 - our $x; local $x; use strict; do_nothing($x->[$N[0]]); () [return] ok 2274 - our $x; local $x; use strict; do_nothing($x->[$N[0]]); () [variable] ok 2275 - our $x; local $x; no strict; do_nothing($x->[$N[0]]); () [exception] ok 2276 - our $x; local $x; no strict; do_nothing($x->[$N[0]]); () [return] ok 2277 - our $x; local $x; no strict; do_nothing($x->[$N[0]]); () [variable] ok 2278 - my $x; do_nothing($$x[$N[0]]); () [exception] ok 2279 - my $x; do_nothing($$x[$N[0]]); () [return] ok 2280 - my $x; do_nothing($$x[$N[0]]); () [variable] ok 2281 - our $x; local $x; use strict; do_nothing($$x[$N[0]]); () [exception] ok 2282 - our $x; local $x; use strict; do_nothing($$x[$N[0]]); () [return] ok 2283 - our $x; local $x; use strict; do_nothing($$x[$N[0]]); () [variable] ok 2284 - our $x; local $x; no strict; do_nothing($$x[$N[0]]); () [exception] ok 2285 - our $x; local $x; no strict; do_nothing($$x[$N[0]]); () [return] ok 2286 - our $x; local $x; no strict; do_nothing($$x[$N[0]]); () [variable] ok 2287 - my @x; do_nothing($x[$N[0]]); () [exception] ok 2288 - my @x; do_nothing($x[$N[0]]); () [return] ok 2289 - my @x; do_nothing($x[$N[0]]); () [variable] ok 2290 - our @x; local @x; use strict; do_nothing($x[$N[0]]); () [exception] ok 2291 - our @x; local @x; use strict; do_nothing($x[$N[0]]); () [return] ok 2292 - our @x; local @x; use strict; do_nothing($x[$N[0]]); () [variable] ok 2293 - our @x; local @x; no strict; do_nothing($x[$N[0]]); () [exception] ok 2294 - our @x; local @x; no strict; do_nothing($x[$N[0]]); () [return] ok 2295 - our @x; local @x; no strict; do_nothing($x[$N[0]]); () [variable] ok 2296 - my $x; do_nothing($x->[$N[0]]); () [exception] ok 2297 - my $x; do_nothing($x->[$N[0]]); () [return] ok 2298 - my $x; do_nothing($x->[$N[0]]); () [variable] ok 2299 - our $x; local $x; use strict; do_nothing($x->[$N[0]]); () [exception] ok 2300 - our $x; local $x; use strict; do_nothing($x->[$N[0]]); () [return] ok 2301 - our $x; local $x; use strict; do_nothing($x->[$N[0]]); () [variable] ok 2302 - our $x; local $x; no strict; do_nothing($x->[$N[0]]); () [exception] ok 2303 - our $x; local $x; no strict; do_nothing($x->[$N[0]]); () [return] ok 2304 - our $x; local $x; no strict; do_nothing($x->[$N[0]]); () [variable] ok 2305 - my $x; do_nothing($$x[$N[0]]); () [exception] ok 2306 - my $x; do_nothing($$x[$N[0]]); () [return] ok 2307 - my $x; do_nothing($$x[$N[0]]); () [variable] ok 2308 - our $x; local $x; use strict; do_nothing($$x[$N[0]]); () [exception] ok 2309 - our $x; local $x; use strict; do_nothing($$x[$N[0]]); () [return] ok 2310 - our $x; local $x; use strict; do_nothing($$x[$N[0]]); () [variable] ok 2311 - our $x; local $x; no strict; do_nothing($$x[$N[0]]); () [exception] ok 2312 - our $x; local $x; no strict; do_nothing($$x[$N[0]]); () [return] ok 2313 - our $x; local $x; no strict; do_nothing($$x[$N[0]]); () [variable] ok 2314 - my @x; do_nothing($x[$N[0]]); () [exception] ok 2315 - my @x; do_nothing($x[$N[0]]); () [return] ok 2316 - my @x; do_nothing($x[$N[0]]); () [variable] ok 2317 - our @x; local @x; use strict; do_nothing($x[$N[0]]); () [exception] ok 2318 - our @x; local @x; use strict; do_nothing($x[$N[0]]); () [return] ok 2319 - our @x; local @x; use strict; do_nothing($x[$N[0]]); () [variable] ok 2320 - our @x; local @x; no strict; do_nothing($x[$N[0]]); () [exception] ok 2321 - our @x; local @x; no strict; do_nothing($x[$N[0]]); () [return] ok 2322 - our @x; local @x; no strict; do_nothing($x[$N[0]]); () [variable] ok 2323 - my $x; do_nothing($x->[$N[0]]); () <+fetch> [exception] ok 2324 - my $x; do_nothing($x->[$N[0]]); () <+fetch> [return] ok 2325 - my $x; do_nothing($x->[$N[0]]); () <+fetch> [variable] ok 2326 - our $x; local $x; use strict; do_nothing($x->[$N[0]]); () <+fetch> [exception] ok 2327 - our $x; local $x; use strict; do_nothing($x->[$N[0]]); () <+fetch> [return] ok 2328 - our $x; local $x; use strict; do_nothing($x->[$N[0]]); () <+fetch> [variable] ok 2329 - our $x; local $x; no strict; do_nothing($x->[$N[0]]); () <+fetch> [exception] ok 2330 - our $x; local $x; no strict; do_nothing($x->[$N[0]]); () <+fetch> [return] ok 2331 - our $x; local $x; no strict; do_nothing($x->[$N[0]]); () <+fetch> [variable] ok 2332 - my $x; do_nothing($$x[$N[0]]); () <+fetch> [exception] ok 2333 - my $x; do_nothing($$x[$N[0]]); () <+fetch> [return] ok 2334 - my $x; do_nothing($$x[$N[0]]); () <+fetch> [variable] ok 2335 - our $x; local $x; use strict; do_nothing($$x[$N[0]]); () <+fetch> [exception] ok 2336 - our $x; local $x; use strict; do_nothing($$x[$N[0]]); () <+fetch> [return] ok 2337 - our $x; local $x; use strict; do_nothing($$x[$N[0]]); () <+fetch> [variable] ok 2338 - our $x; local $x; no strict; do_nothing($$x[$N[0]]); () <+fetch> [exception] ok 2339 - our $x; local $x; no strict; do_nothing($$x[$N[0]]); () <+fetch> [return] ok 2340 - our $x; local $x; no strict; do_nothing($$x[$N[0]]); () <+fetch> [variable] ok 2341 - my @x; do_nothing($x[$N[0]]); () <+fetch> [exception] ok 2342 - my @x; do_nothing($x[$N[0]]); () <+fetch> [return] ok 2343 - my @x; do_nothing($x[$N[0]]); () <+fetch> [variable] ok 2344 - our @x; local @x; use strict; do_nothing($x[$N[0]]); () <+fetch> [exception] ok 2345 - our @x; local @x; use strict; do_nothing($x[$N[0]]); () <+fetch> [return] ok 2346 - our @x; local @x; use strict; do_nothing($x[$N[0]]); () <+fetch> [variable] ok 2347 - our @x; local @x; no strict; do_nothing($x[$N[0]]); () <+fetch> [exception] ok 2348 - our @x; local @x; no strict; do_nothing($x[$N[0]]); () <+fetch> [return] ok 2349 - our @x; local @x; no strict; do_nothing($x[$N[0]]); () <+fetch> [variable] ok 2350 - my $x; do_nothing($x->[$N[0]]); () <+exists> [exception] ok 2351 - my $x; do_nothing($x->[$N[0]]); () <+exists> [return] ok 2352 - my $x; do_nothing($x->[$N[0]]); () <+exists> [variable] ok 2353 - our $x; local $x; use strict; do_nothing($x->[$N[0]]); () <+exists> [exception] ok 2354 - our $x; local $x; use strict; do_nothing($x->[$N[0]]); () <+exists> [return] ok 2355 - our $x; local $x; use strict; do_nothing($x->[$N[0]]); () <+exists> [variable] ok 2356 - our $x; local $x; no strict; do_nothing($x->[$N[0]]); () <+exists> [exception] ok 2357 - our $x; local $x; no strict; do_nothing($x->[$N[0]]); () <+exists> [return] ok 2358 - our $x; local $x; no strict; do_nothing($x->[$N[0]]); () <+exists> [variable] ok 2359 - my $x; do_nothing($$x[$N[0]]); () <+exists> [exception] ok 2360 - my $x; do_nothing($$x[$N[0]]); () <+exists> [return] ok 2361 - my $x; do_nothing($$x[$N[0]]); () <+exists> [variable] ok 2362 - our $x; local $x; use strict; do_nothing($$x[$N[0]]); () <+exists> [exception] ok 2363 - our $x; local $x; use strict; do_nothing($$x[$N[0]]); () <+exists> [return] ok 2364 - our $x; local $x; use strict; do_nothing($$x[$N[0]]); () <+exists> [variable] ok 2365 - our $x; local $x; no strict; do_nothing($$x[$N[0]]); () <+exists> [exception] ok 2366 - our $x; local $x; no strict; do_nothing($$x[$N[0]]); () <+exists> [return] ok 2367 - our $x; local $x; no strict; do_nothing($$x[$N[0]]); () <+exists> [variable] ok 2368 - my @x; do_nothing($x[$N[0]]); () <+exists> [exception] ok 2369 - my @x; do_nothing($x[$N[0]]); () <+exists> [return] ok 2370 - my @x; do_nothing($x[$N[0]]); () <+exists> [variable] ok 2371 - our @x; local @x; use strict; do_nothing($x[$N[0]]); () <+exists> [exception] ok 2372 - our @x; local @x; use strict; do_nothing($x[$N[0]]); () <+exists> [return] ok 2373 - our @x; local @x; use strict; do_nothing($x[$N[0]]); () <+exists> [variable] ok 2374 - our @x; local @x; no strict; do_nothing($x[$N[0]]); () <+exists> [exception] ok 2375 - our @x; local @x; no strict; do_nothing($x[$N[0]]); () <+exists> [return] ok 2376 - our @x; local @x; no strict; do_nothing($x[$N[0]]); () <+exists> [variable] ok 2377 - my $x; do_nothing($x->[$N[0]]); () <+delete> [exception] ok 2378 - my $x; do_nothing($x->[$N[0]]); () <+delete> [return] ok 2379 - my $x; do_nothing($x->[$N[0]]); () <+delete> [variable] ok 2380 - our $x; local $x; use strict; do_nothing($x->[$N[0]]); () <+delete> [exception] ok 2381 - our $x; local $x; use strict; do_nothing($x->[$N[0]]); () <+delete> [return] ok 2382 - our $x; local $x; use strict; do_nothing($x->[$N[0]]); () <+delete> [variable] ok 2383 - our $x; local $x; no strict; do_nothing($x->[$N[0]]); () <+delete> [exception] ok 2384 - our $x; local $x; no strict; do_nothing($x->[$N[0]]); () <+delete> [return] ok 2385 - our $x; local $x; no strict; do_nothing($x->[$N[0]]); () <+delete> [variable] ok 2386 - my $x; do_nothing($$x[$N[0]]); () <+delete> [exception] ok 2387 - my $x; do_nothing($$x[$N[0]]); () <+delete> [return] ok 2388 - my $x; do_nothing($$x[$N[0]]); () <+delete> [variable] ok 2389 - our $x; local $x; use strict; do_nothing($$x[$N[0]]); () <+delete> [exception] ok 2390 - our $x; local $x; use strict; do_nothing($$x[$N[0]]); () <+delete> [return] ok 2391 - our $x; local $x; use strict; do_nothing($$x[$N[0]]); () <+delete> [variable] ok 2392 - our $x; local $x; no strict; do_nothing($$x[$N[0]]); () <+delete> [exception] ok 2393 - our $x; local $x; no strict; do_nothing($$x[$N[0]]); () <+delete> [return] ok 2394 - our $x; local $x; no strict; do_nothing($$x[$N[0]]); () <+delete> [variable] ok 2395 - my @x; do_nothing($x[$N[0]]); () <+delete> [exception] ok 2396 - my @x; do_nothing($x[$N[0]]); () <+delete> [return] ok 2397 - my @x; do_nothing($x[$N[0]]); () <+delete> [variable] ok 2398 - our @x; local @x; use strict; do_nothing($x[$N[0]]); () <+delete> [exception] ok 2399 - our @x; local @x; use strict; do_nothing($x[$N[0]]); () <+delete> [return] ok 2400 - our @x; local @x; use strict; do_nothing($x[$N[0]]); () <+delete> [variable] ok 2401 - our @x; local @x; no strict; do_nothing($x[$N[0]]); () <+delete> [exception] ok 2402 - our @x; local @x; no strict; do_nothing($x[$N[0]]); () <+delete> [return] ok 2403 - our @x; local @x; no strict; do_nothing($x[$N[0]]); () <+delete> [variable] ok 2404 - my $x; do_nothing($x->[$N[0]]); () <+store> [exception] ok 2405 - my $x; do_nothing($x->[$N[0]]); () <+store> [return] ok 2406 - my $x; do_nothing($x->[$N[0]]); () <+store> [variable] ok 2407 - our $x; local $x; use strict; do_nothing($x->[$N[0]]); () <+store> [exception] ok 2408 - our $x; local $x; use strict; do_nothing($x->[$N[0]]); () <+store> [return] ok 2409 - our $x; local $x; use strict; do_nothing($x->[$N[0]]); () <+store> [variable] ok 2410 - our $x; local $x; no strict; do_nothing($x->[$N[0]]); () <+store> [exception] ok 2411 - our $x; local $x; no strict; do_nothing($x->[$N[0]]); () <+store> [return] ok 2412 - our $x; local $x; no strict; do_nothing($x->[$N[0]]); () <+store> [variable] ok 2413 - my $x; do_nothing($$x[$N[0]]); () <+store> [exception] ok 2414 - my $x; do_nothing($$x[$N[0]]); () <+store> [return] ok 2415 - my $x; do_nothing($$x[$N[0]]); () <+store> [variable] ok 2416 - our $x; local $x; use strict; do_nothing($$x[$N[0]]); () <+store> [exception] ok 2417 - our $x; local $x; use strict; do_nothing($$x[$N[0]]); () <+store> [return] ok 2418 - our $x; local $x; use strict; do_nothing($$x[$N[0]]); () <+store> [variable] ok 2419 - our $x; local $x; no strict; do_nothing($$x[$N[0]]); () <+store> [exception] ok 2420 - our $x; local $x; no strict; do_nothing($$x[$N[0]]); () <+store> [return] ok 2421 - our $x; local $x; no strict; do_nothing($$x[$N[0]]); () <+store> [variable] ok 2422 - my @x; 1 <+store> [exception] ok 2423 - my @x; 1 <+store> [return] ok 2424 - my @x; 1 <+store> [variable] ok 2425 - our @x; local @x; use strict; 1 <+store> [exception] ok 2426 - our @x; local @x; use strict; 1 <+store> [return] ok 2427 - our @x; local @x; use strict; 1 <+store> [variable] ok 2428 - our @x; local @x; no strict; 1 <+store> [exception] ok 2429 - our @x; local @x; no strict; 1 <+store> [return] ok 2430 - our @x; local @x; no strict; 1 <+store> [variable] ok 2431 - my $x; set_arg($x->[$N[0]]); () [exception] ok 2432 - my $x; set_arg($x->[$N[0]]); () [return] ok 2433 - my $x; set_arg($x->[$N[0]]); () [variable] ok 2434 - our $x; local $x; use strict; set_arg($x->[$N[0]]); () [exception] ok 2435 - our $x; local $x; use strict; set_arg($x->[$N[0]]); () [return] ok 2436 - our $x; local $x; use strict; set_arg($x->[$N[0]]); () [variable] ok 2437 - our $x; local $x; no strict; set_arg($x->[$N[0]]); () [exception] ok 2438 - our $x; local $x; no strict; set_arg($x->[$N[0]]); () [return] ok 2439 - our $x; local $x; no strict; set_arg($x->[$N[0]]); () [variable] ok 2440 - my $x; set_arg($$x[$N[0]]); () [exception] ok 2441 - my $x; set_arg($$x[$N[0]]); () [return] ok 2442 - my $x; set_arg($$x[$N[0]]); () [variable] ok 2443 - our $x; local $x; use strict; set_arg($$x[$N[0]]); () [exception] ok 2444 - our $x; local $x; use strict; set_arg($$x[$N[0]]); () [return] ok 2445 - our $x; local $x; use strict; set_arg($$x[$N[0]]); () [variable] ok 2446 - our $x; local $x; no strict; set_arg($$x[$N[0]]); () [exception] ok 2447 - our $x; local $x; no strict; set_arg($$x[$N[0]]); () [return] ok 2448 - our $x; local $x; no strict; set_arg($$x[$N[0]]); () [variable] ok 2449 - my @x; set_arg($x[$N[0]]); () [exception] ok 2450 - my @x; set_arg($x[$N[0]]); () [return] ok 2451 - my @x; set_arg($x[$N[0]]); () [variable] ok 2452 - our @x; local @x; use strict; set_arg($x[$N[0]]); () [exception] ok 2453 - our @x; local @x; use strict; set_arg($x[$N[0]]); () [return] ok 2454 - our @x; local @x; use strict; set_arg($x[$N[0]]); () [variable] ok 2455 - our @x; local @x; no strict; set_arg($x[$N[0]]); () [exception] ok 2456 - our @x; local @x; no strict; set_arg($x[$N[0]]); () [return] ok 2457 - our @x; local @x; no strict; set_arg($x[$N[0]]); () [variable] ok 2458 - my $x; set_arg($x->[$N[0]]); () [exception] ok 2459 - my $x; set_arg($x->[$N[0]]); () [return] ok 2460 - my $x; set_arg($x->[$N[0]]); () [variable] ok 2461 - our $x; local $x; use strict; set_arg($x->[$N[0]]); () [exception] ok 2462 - our $x; local $x; use strict; set_arg($x->[$N[0]]); () [return] ok 2463 - our $x; local $x; use strict; set_arg($x->[$N[0]]); () [variable] ok 2464 - our $x; local $x; no strict; set_arg($x->[$N[0]]); () [exception] ok 2465 - our $x; local $x; no strict; set_arg($x->[$N[0]]); () [return] ok 2466 - our $x; local $x; no strict; set_arg($x->[$N[0]]); () [variable] ok 2467 - my $x; set_arg($$x[$N[0]]); () [exception] ok 2468 - my $x; set_arg($$x[$N[0]]); () [return] ok 2469 - my $x; set_arg($$x[$N[0]]); () [variable] ok 2470 - our $x; local $x; use strict; set_arg($$x[$N[0]]); () [exception] ok 2471 - our $x; local $x; use strict; set_arg($$x[$N[0]]); () [return] ok 2472 - our $x; local $x; use strict; set_arg($$x[$N[0]]); () [variable] ok 2473 - our $x; local $x; no strict; set_arg($$x[$N[0]]); () [exception] ok 2474 - our $x; local $x; no strict; set_arg($$x[$N[0]]); () [return] ok 2475 - our $x; local $x; no strict; set_arg($$x[$N[0]]); () [variable] ok 2476 - my @x; set_arg($x[$N[0]]); () [exception] ok 2477 - my @x; set_arg($x[$N[0]]); () [return] ok 2478 - my @x; set_arg($x[$N[0]]); () [variable] ok 2479 - our @x; local @x; use strict; set_arg($x[$N[0]]); () [exception] ok 2480 - our @x; local @x; use strict; set_arg($x[$N[0]]); () [return] ok 2481 - our @x; local @x; use strict; set_arg($x[$N[0]]); () [variable] ok 2482 - our @x; local @x; no strict; set_arg($x[$N[0]]); () [exception] ok 2483 - our @x; local @x; no strict; set_arg($x[$N[0]]); () [return] ok 2484 - our @x; local @x; no strict; set_arg($x[$N[0]]); () [variable] ok 2485 - my $x; set_arg($x->[$N[0]]); () <+fetch> [exception] ok 2486 - my $x; set_arg($x->[$N[0]]); () <+fetch> [return] ok 2487 - my $x; set_arg($x->[$N[0]]); () <+fetch> [variable] ok 2488 - our $x; local $x; use strict; set_arg($x->[$N[0]]); () <+fetch> [exception] ok 2489 - our $x; local $x; use strict; set_arg($x->[$N[0]]); () <+fetch> [return] ok 2490 - our $x; local $x; use strict; set_arg($x->[$N[0]]); () <+fetch> [variable] ok 2491 - our $x; local $x; no strict; set_arg($x->[$N[0]]); () <+fetch> [exception] ok 2492 - our $x; local $x; no strict; set_arg($x->[$N[0]]); () <+fetch> [return] ok 2493 - our $x; local $x; no strict; set_arg($x->[$N[0]]); () <+fetch> [variable] ok 2494 - my $x; set_arg($$x[$N[0]]); () <+fetch> [exception] ok 2495 - my $x; set_arg($$x[$N[0]]); () <+fetch> [return] ok 2496 - my $x; set_arg($$x[$N[0]]); () <+fetch> [variable] ok 2497 - our $x; local $x; use strict; set_arg($$x[$N[0]]); () <+fetch> [exception] ok 2498 - our $x; local $x; use strict; set_arg($$x[$N[0]]); () <+fetch> [return] ok 2499 - our $x; local $x; use strict; set_arg($$x[$N[0]]); () <+fetch> [variable] ok 2500 - our $x; local $x; no strict; set_arg($$x[$N[0]]); () <+fetch> [exception] ok 2501 - our $x; local $x; no strict; set_arg($$x[$N[0]]); () <+fetch> [return] ok 2502 - our $x; local $x; no strict; set_arg($$x[$N[0]]); () <+fetch> [variable] ok 2503 - my @x; set_arg($x[$N[0]]); () <+fetch> [exception] ok 2504 - my @x; set_arg($x[$N[0]]); () <+fetch> [return] ok 2505 - my @x; set_arg($x[$N[0]]); () <+fetch> [variable] ok 2506 - our @x; local @x; use strict; set_arg($x[$N[0]]); () <+fetch> [exception] ok 2507 - our @x; local @x; use strict; set_arg($x[$N[0]]); () <+fetch> [return] ok 2508 - our @x; local @x; use strict; set_arg($x[$N[0]]); () <+fetch> [variable] ok 2509 - our @x; local @x; no strict; set_arg($x[$N[0]]); () <+fetch> [exception] ok 2510 - our @x; local @x; no strict; set_arg($x[$N[0]]); () <+fetch> [return] ok 2511 - our @x; local @x; no strict; set_arg($x[$N[0]]); () <+fetch> [variable] ok 2512 - my $x; set_arg($x->[$N[0]]); () <+exists> [exception] ok 2513 - my $x; set_arg($x->[$N[0]]); () <+exists> [return] ok 2514 - my $x; set_arg($x->[$N[0]]); () <+exists> [variable] ok 2515 - our $x; local $x; use strict; set_arg($x->[$N[0]]); () <+exists> [exception] ok 2516 - our $x; local $x; use strict; set_arg($x->[$N[0]]); () <+exists> [return] ok 2517 - our $x; local $x; use strict; set_arg($x->[$N[0]]); () <+exists> [variable] ok 2518 - our $x; local $x; no strict; set_arg($x->[$N[0]]); () <+exists> [exception] ok 2519 - our $x; local $x; no strict; set_arg($x->[$N[0]]); () <+exists> [return] ok 2520 - our $x; local $x; no strict; set_arg($x->[$N[0]]); () <+exists> [variable] ok 2521 - my $x; set_arg($$x[$N[0]]); () <+exists> [exception] ok 2522 - my $x; set_arg($$x[$N[0]]); () <+exists> [return] ok 2523 - my $x; set_arg($$x[$N[0]]); () <+exists> [variable] ok 2524 - our $x; local $x; use strict; set_arg($$x[$N[0]]); () <+exists> [exception] ok 2525 - our $x; local $x; use strict; set_arg($$x[$N[0]]); () <+exists> [return] ok 2526 - our $x; local $x; use strict; set_arg($$x[$N[0]]); () <+exists> [variable] ok 2527 - our $x; local $x; no strict; set_arg($$x[$N[0]]); () <+exists> [exception] ok 2528 - our $x; local $x; no strict; set_arg($$x[$N[0]]); () <+exists> [return] ok 2529 - our $x; local $x; no strict; set_arg($$x[$N[0]]); () <+exists> [variable] ok 2530 - my @x; set_arg($x[$N[0]]); () <+exists> [exception] ok 2531 - my @x; set_arg($x[$N[0]]); () <+exists> [return] ok 2532 - my @x; set_arg($x[$N[0]]); () <+exists> [variable] ok 2533 - our @x; local @x; use strict; set_arg($x[$N[0]]); () <+exists> [exception] ok 2534 - our @x; local @x; use strict; set_arg($x[$N[0]]); () <+exists> [return] ok 2535 - our @x; local @x; use strict; set_arg($x[$N[0]]); () <+exists> [variable] ok 2536 - our @x; local @x; no strict; set_arg($x[$N[0]]); () <+exists> [exception] ok 2537 - our @x; local @x; no strict; set_arg($x[$N[0]]); () <+exists> [return] ok 2538 - our @x; local @x; no strict; set_arg($x[$N[0]]); () <+exists> [variable] ok 2539 - my $x; set_arg($x->[$N[0]]); () <+delete> [exception] ok 2540 - my $x; set_arg($x->[$N[0]]); () <+delete> [return] ok 2541 - my $x; set_arg($x->[$N[0]]); () <+delete> [variable] ok 2542 - our $x; local $x; use strict; set_arg($x->[$N[0]]); () <+delete> [exception] ok 2543 - our $x; local $x; use strict; set_arg($x->[$N[0]]); () <+delete> [return] ok 2544 - our $x; local $x; use strict; set_arg($x->[$N[0]]); () <+delete> [variable] ok 2545 - our $x; local $x; no strict; set_arg($x->[$N[0]]); () <+delete> [exception] ok 2546 - our $x; local $x; no strict; set_arg($x->[$N[0]]); () <+delete> [return] ok 2547 - our $x; local $x; no strict; set_arg($x->[$N[0]]); () <+delete> [variable] ok 2548 - my $x; set_arg($$x[$N[0]]); () <+delete> [exception] ok 2549 - my $x; set_arg($$x[$N[0]]); () <+delete> [return] ok 2550 - my $x; set_arg($$x[$N[0]]); () <+delete> [variable] ok 2551 - our $x; local $x; use strict; set_arg($$x[$N[0]]); () <+delete> [exception] ok 2552 - our $x; local $x; use strict; set_arg($$x[$N[0]]); () <+delete> [return] ok 2553 - our $x; local $x; use strict; set_arg($$x[$N[0]]); () <+delete> [variable] ok 2554 - our $x; local $x; no strict; set_arg($$x[$N[0]]); () <+delete> [exception] ok 2555 - our $x; local $x; no strict; set_arg($$x[$N[0]]); () <+delete> [return] ok 2556 - our $x; local $x; no strict; set_arg($$x[$N[0]]); () <+delete> [variable] ok 2557 - my @x; set_arg($x[$N[0]]); () <+delete> [exception] ok 2558 - my @x; set_arg($x[$N[0]]); () <+delete> [return] ok 2559 - my @x; set_arg($x[$N[0]]); () <+delete> [variable] ok 2560 - our @x; local @x; use strict; set_arg($x[$N[0]]); () <+delete> [exception] ok 2561 - our @x; local @x; use strict; set_arg($x[$N[0]]); () <+delete> [return] ok 2562 - our @x; local @x; use strict; set_arg($x[$N[0]]); () <+delete> [variable] ok 2563 - our @x; local @x; no strict; set_arg($x[$N[0]]); () <+delete> [exception] ok 2564 - our @x; local @x; no strict; set_arg($x[$N[0]]); () <+delete> [return] ok 2565 - our @x; local @x; no strict; set_arg($x[$N[0]]); () <+delete> [variable] ok 2566 - my $x; set_arg($x->[$N[0]]); () <+store> [exception] ok 2567 - my $x; set_arg($x->[$N[0]]); () <+store> [return] ok 2568 - my $x; set_arg($x->[$N[0]]); () <+store> [variable] ok 2569 - our $x; local $x; use strict; set_arg($x->[$N[0]]); () <+store> [exception] ok 2570 - our $x; local $x; use strict; set_arg($x->[$N[0]]); () <+store> [return] ok 2571 - our $x; local $x; use strict; set_arg($x->[$N[0]]); () <+store> [variable] ok 2572 - our $x; local $x; no strict; set_arg($x->[$N[0]]); () <+store> [exception] ok 2573 - our $x; local $x; no strict; set_arg($x->[$N[0]]); () <+store> [return] ok 2574 - our $x; local $x; no strict; set_arg($x->[$N[0]]); () <+store> [variable] ok 2575 - my $x; set_arg($$x[$N[0]]); () <+store> [exception] ok 2576 - my $x; set_arg($$x[$N[0]]); () <+store> [return] ok 2577 - my $x; set_arg($$x[$N[0]]); () <+store> [variable] ok 2578 - our $x; local $x; use strict; set_arg($$x[$N[0]]); () <+store> [exception] ok 2579 - our $x; local $x; use strict; set_arg($$x[$N[0]]); () <+store> [return] ok 2580 - our $x; local $x; use strict; set_arg($$x[$N[0]]); () <+store> [variable] ok 2581 - our $x; local $x; no strict; set_arg($$x[$N[0]]); () <+store> [exception] ok 2582 - our $x; local $x; no strict; set_arg($$x[$N[0]]); () <+store> [return] ok 2583 - our $x; local $x; no strict; set_arg($$x[$N[0]]); () <+store> [variable] ok 2584 - my @x; 1 <+store> [exception] ok 2585 - my @x; 1 <+store> [return] ok 2586 - my @x; 1 <+store> [variable] ok 2587 - our @x; local @x; use strict; 1 <+store> [exception] ok 2588 - our @x; local @x; use strict; 1 <+store> [return] ok 2589 - our @x; local @x; use strict; 1 <+store> [variable] ok 2590 - our @x; local @x; no strict; 1 <+store> [exception] ok 2591 - our @x; local @x; no strict; 1 <+store> [return] ok 2592 - our @x; local @x; no strict; 1 <+store> [variable] ok 2593 - my $x; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2594 - my $x; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2595 - my $x; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2596 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2597 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2598 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2599 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2600 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2601 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2602 - my $x; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2603 - my $x; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2604 - my $x; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2605 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2606 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2607 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2608 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2609 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2610 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2611 - my @x; 1 [exception] ok 2612 - my @x; 1 [return] ok 2613 - my @x; 1 [variable] ok 2614 - our @x; local @x; use strict; 1 [exception] ok 2615 - our @x; local @x; use strict; 1 [return] ok 2616 - our @x; local @x; use strict; 1 [variable] ok 2617 - our @x; local @x; no strict; 1 [exception] ok 2618 - our @x; local @x; no strict; 1 [return] ok 2619 - our @x; local @x; no strict; 1 [variable] ok 2620 - my $x; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2621 - my $x; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2622 - my $x; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2623 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2624 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2625 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2626 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2627 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2628 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2629 - my $x; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2630 - my $x; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2631 - my $x; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2632 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2633 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2634 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2635 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2636 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2637 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2638 - my @x; 1 [exception] ok 2639 - my @x; 1 [return] ok 2640 - my @x; 1 [variable] ok 2641 - our @x; local @x; use strict; 1 [exception] ok 2642 - our @x; local @x; use strict; 1 [return] ok 2643 - our @x; local @x; use strict; 1 [variable] ok 2644 - our @x; local @x; no strict; 1 [exception] ok 2645 - our @x; local @x; no strict; 1 [return] ok 2646 - our @x; local @x; no strict; 1 [variable] ok 2647 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [exception] ok 2648 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [return] ok 2649 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [variable] ok 2650 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [exception] ok 2651 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [return] ok 2652 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [variable] ok 2653 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [exception] ok 2654 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [return] ok 2655 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [variable] ok 2656 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [exception] ok 2657 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [return] ok 2658 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [variable] ok 2659 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [exception] ok 2660 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [return] ok 2661 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [variable] ok 2662 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [exception] ok 2663 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [return] ok 2664 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [variable] ok 2665 - my @x; 1 <+fetch> [exception] ok 2666 - my @x; 1 <+fetch> [return] ok 2667 - my @x; 1 <+fetch> [variable] ok 2668 - our @x; local @x; use strict; 1 <+fetch> [exception] ok 2669 - our @x; local @x; use strict; 1 <+fetch> [return] ok 2670 - our @x; local @x; use strict; 1 <+fetch> [variable] ok 2671 - our @x; local @x; no strict; 1 <+fetch> [exception] ok 2672 - our @x; local @x; no strict; 1 <+fetch> [return] ok 2673 - our @x; local @x; no strict; 1 <+fetch> [variable] ok 2674 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+exists> [exception] ok 2675 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+exists> [return] ok 2676 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+exists> [variable] ok 2677 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [exception] ok 2678 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [return] ok 2679 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [variable] ok 2680 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [exception] ok 2681 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [return] ok 2682 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [variable] ok 2683 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+exists> [exception] ok 2684 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+exists> [return] ok 2685 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+exists> [variable] ok 2686 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [exception] ok 2687 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [return] ok 2688 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [variable] ok 2689 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [exception] ok 2690 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [return] ok 2691 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [variable] ok 2692 - my @x; 1 <+exists> [exception] ok 2693 - my @x; 1 <+exists> [return] ok 2694 - my @x; 1 <+exists> [variable] ok 2695 - our @x; local @x; use strict; 1 <+exists> [exception] ok 2696 - our @x; local @x; use strict; 1 <+exists> [return] ok 2697 - our @x; local @x; use strict; 1 <+exists> [variable] ok 2698 - our @x; local @x; no strict; 1 <+exists> [exception] ok 2699 - our @x; local @x; no strict; 1 <+exists> [return] ok 2700 - our @x; local @x; no strict; 1 <+exists> [variable] ok 2701 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+delete> [exception] ok 2702 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+delete> [return] ok 2703 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+delete> [variable] ok 2704 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [exception] ok 2705 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [return] ok 2706 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [variable] ok 2707 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [exception] ok 2708 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [return] ok 2709 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [variable] ok 2710 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+delete> [exception] ok 2711 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+delete> [return] ok 2712 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+delete> [variable] ok 2713 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [exception] ok 2714 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [return] ok 2715 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [variable] ok 2716 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [exception] ok 2717 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [return] ok 2718 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [variable] ok 2719 - my @x; 1 <+delete> [exception] ok 2720 - my @x; 1 <+delete> [return] ok 2721 - my @x; 1 <+delete> [variable] ok 2722 - our @x; local @x; use strict; 1 <+delete> [exception] ok 2723 - our @x; local @x; use strict; 1 <+delete> [return] ok 2724 - our @x; local @x; use strict; 1 <+delete> [variable] ok 2725 - our @x; local @x; no strict; 1 <+delete> [exception] ok 2726 - our @x; local @x; no strict; 1 <+delete> [return] ok 2727 - our @x; local @x; no strict; 1 <+delete> [variable] ok 2728 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+store> [exception] ok 2729 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+store> [return] ok 2730 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+store> [variable] ok 2731 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [exception] ok 2732 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [return] ok 2733 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [variable] ok 2734 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [exception] ok 2735 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [return] ok 2736 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [variable] ok 2737 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+store> [exception] ok 2738 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+store> [return] ok 2739 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+store> [variable] ok 2740 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [exception] ok 2741 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [return] ok 2742 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [variable] ok 2743 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [exception] ok 2744 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [return] ok 2745 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [variable] ok 2746 - my @x; 1 <+store> [exception] ok 2747 - my @x; 1 <+store> [return] ok 2748 - my @x; 1 <+store> [variable] ok 2749 - our @x; local @x; use strict; 1 <+store> [exception] ok 2750 - our @x; local @x; use strict; 1 <+store> [return] ok 2751 - our @x; local @x; use strict; 1 <+store> [variable] ok 2752 - our @x; local @x; no strict; 1 <+store> [exception] ok 2753 - our @x; local @x; no strict; 1 <+store> [return] ok 2754 - our @x; local @x; no strict; 1 <+store> [variable] ok 2755 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+fetch> [exception] ok 2756 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+fetch> [return] ok 2757 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+fetch> [variable] ok 2758 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+fetch> [exception] ok 2759 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+fetch> [return] ok 2760 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+fetch> [variable] ok 2761 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+fetch> [exception] ok 2762 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+fetch> [return] ok 2763 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+fetch> [variable] ok 2764 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+fetch> [exception] ok 2765 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+fetch> [return] ok 2766 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+fetch> [variable] ok 2767 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+fetch> [exception] ok 2768 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+fetch> [return] ok 2769 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+fetch> [variable] ok 2770 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+fetch> [exception] ok 2771 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+fetch> [return] ok 2772 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+fetch> [variable] ok 2773 - my @x; $x[$N[0]] = 1; my @a = @x; () <+fetch> [exception] ok 2774 - my @x; $x[$N[0]] = 1; my @a = @x; () <+fetch> [return] ok 2775 - my @x; $x[$N[0]] = 1; my @a = @x; () <+fetch> [variable] ok 2776 - our @x; local @x; use strict; $x[$N[0]] = 1; my @a = @x; () <+fetch> [exception] ok 2777 - our @x; local @x; use strict; $x[$N[0]] = 1; my @a = @x; () <+fetch> [return] ok 2778 - our @x; local @x; use strict; $x[$N[0]] = 1; my @a = @x; () <+fetch> [variable] ok 2779 - our @x; local @x; no strict; $x[$N[0]] = 1; my @a = @x; () <+fetch> [exception] ok 2780 - our @x; local @x; no strict; $x[$N[0]] = 1; my @a = @x; () <+fetch> [return] ok 2781 - our @x; local @x; no strict; $x[$N[0]] = 1; my @a = @x; () <+fetch> [variable] ok 2782 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+exists> [exception] ok 2783 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+exists> [return] ok 2784 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+exists> [variable] ok 2785 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+exists> [exception] ok 2786 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+exists> [return] ok 2787 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+exists> [variable] ok 2788 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+exists> [exception] ok 2789 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+exists> [return] ok 2790 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+exists> [variable] ok 2791 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+exists> [exception] ok 2792 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+exists> [return] ok 2793 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+exists> [variable] ok 2794 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+exists> [exception] ok 2795 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+exists> [return] ok 2796 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+exists> [variable] ok 2797 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+exists> [exception] ok 2798 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+exists> [return] ok 2799 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+exists> [variable] ok 2800 - my @x; $x[$N[0]] = 1; my @a = @x; () <+exists> [exception] ok 2801 - my @x; $x[$N[0]] = 1; my @a = @x; () <+exists> [return] ok 2802 - my @x; $x[$N[0]] = 1; my @a = @x; () <+exists> [variable] ok 2803 - our @x; local @x; use strict; $x[$N[0]] = 1; my @a = @x; () <+exists> [exception] ok 2804 - our @x; local @x; use strict; $x[$N[0]] = 1; my @a = @x; () <+exists> [return] ok 2805 - our @x; local @x; use strict; $x[$N[0]] = 1; my @a = @x; () <+exists> [variable] ok 2806 - our @x; local @x; no strict; $x[$N[0]] = 1; my @a = @x; () <+exists> [exception] ok 2807 - our @x; local @x; no strict; $x[$N[0]] = 1; my @a = @x; () <+exists> [return] ok 2808 - our @x; local @x; no strict; $x[$N[0]] = 1; my @a = @x; () <+exists> [variable] ok 2809 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+delete> [exception] ok 2810 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+delete> [return] ok 2811 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+delete> [variable] ok 2812 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+delete> [exception] ok 2813 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+delete> [return] ok 2814 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+delete> [variable] ok 2815 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+delete> [exception] ok 2816 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+delete> [return] ok 2817 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+delete> [variable] ok 2818 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+delete> [exception] ok 2819 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+delete> [return] ok 2820 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+delete> [variable] ok 2821 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+delete> [exception] ok 2822 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+delete> [return] ok 2823 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+delete> [variable] ok 2824 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+delete> [exception] ok 2825 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+delete> [return] ok 2826 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+delete> [variable] ok 2827 - my @x; $x[$N[0]] = 1; my @a = @x; () <+delete> [exception] ok 2828 - my @x; $x[$N[0]] = 1; my @a = @x; () <+delete> [return] ok 2829 - my @x; $x[$N[0]] = 1; my @a = @x; () <+delete> [variable] ok 2830 - our @x; local @x; use strict; $x[$N[0]] = 1; my @a = @x; () <+delete> [exception] ok 2831 - our @x; local @x; use strict; $x[$N[0]] = 1; my @a = @x; () <+delete> [return] ok 2832 - our @x; local @x; use strict; $x[$N[0]] = 1; my @a = @x; () <+delete> [variable] ok 2833 - our @x; local @x; no strict; $x[$N[0]] = 1; my @a = @x; () <+delete> [exception] ok 2834 - our @x; local @x; no strict; $x[$N[0]] = 1; my @a = @x; () <+delete> [return] ok 2835 - our @x; local @x; no strict; $x[$N[0]] = 1; my @a = @x; () <+delete> [variable] ok 2836 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+store> [exception] ok 2837 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+store> [return] ok 2838 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+store> [variable] ok 2839 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+store> [exception] ok 2840 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+store> [return] ok 2841 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+store> [variable] ok 2842 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+store> [exception] ok 2843 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+store> [return] ok 2844 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+store> [variable] ok 2845 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+store> [exception] ok 2846 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+store> [return] ok 2847 - my $x; $x->[$N[0]] = 1; my @a = @$x; () <+store> [variable] ok 2848 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+store> [exception] ok 2849 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+store> [return] ok 2850 - our $x; local $x; use strict; $x->[$N[0]] = 1; my @a = @$x; () <+store> [variable] ok 2851 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+store> [exception] ok 2852 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+store> [return] ok 2853 - our $x; local $x; no strict; $x->[$N[0]] = 1; my @a = @$x; () <+store> [variable] ok 2854 - my @x; $x[$N[0]] = 1; my @a = @x; () <+store> [exception] ok 2855 - my @x; $x[$N[0]] = 1; my @a = @x; () <+store> [return] ok 2856 - my @x; $x[$N[0]] = 1; my @a = @x; () <+store> [variable] ok 2857 - our @x; local @x; use strict; $x[$N[0]] = 1; my @a = @x; () <+store> [exception] ok 2858 - our @x; local @x; use strict; $x[$N[0]] = 1; my @a = @x; () <+store> [return] ok 2859 - our @x; local @x; use strict; $x[$N[0]] = 1; my @a = @x; () <+store> [variable] ok 2860 - our @x; local @x; no strict; $x[$N[0]] = 1; my @a = @x; () <+store> [exception] ok 2861 - our @x; local @x; no strict; $x[$N[0]] = 1; my @a = @x; () <+store> [return] ok 2862 - our @x; local @x; no strict; $x[$N[0]] = 1; my @a = @x; () <+store> [variable] ok 2863 - my $x; my @a = @$x[$N[0], $N[1]]; \@a [exception] ok 2864 - my $x; my @a = @$x[$N[0], $N[1]]; \@a [return] ok 2865 - my $x; my @a = @$x[$N[0], $N[1]]; \@a [variable] ok 2866 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a [exception] ok 2867 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a [return] ok 2868 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a [variable] ok 2869 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a [exception] ok 2870 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a [return] ok 2871 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a [variable] ok 2872 - my $x; my @a = @$x[$N[0], $N[1]]; \@a [exception] ok 2873 - my $x; my @a = @$x[$N[0], $N[1]]; \@a [return] ok 2874 - my $x; my @a = @$x[$N[0], $N[1]]; \@a [variable] ok 2875 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a [exception] ok 2876 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a [return] ok 2877 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a [variable] ok 2878 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a [exception] ok 2879 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a [return] ok 2880 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a [variable] ok 2881 - my @x; my @a = @x[$N[0], $N[1]]; \@a [exception] ok 2882 - my @x; my @a = @x[$N[0], $N[1]]; \@a [return] ok 2883 - my @x; my @a = @x[$N[0], $N[1]]; \@a [variable] ok 2884 - our @x; local @x; use strict; my @a = @x[$N[0], $N[1]]; \@a [exception] ok 2885 - our @x; local @x; use strict; my @a = @x[$N[0], $N[1]]; \@a [return] ok 2886 - our @x; local @x; use strict; my @a = @x[$N[0], $N[1]]; \@a [variable] ok 2887 - our @x; local @x; no strict; my @a = @x[$N[0], $N[1]]; \@a [exception] ok 2888 - our @x; local @x; no strict; my @a = @x[$N[0], $N[1]]; \@a [return] ok 2889 - our @x; local @x; no strict; my @a = @x[$N[0], $N[1]]; \@a [variable] ok 2890 - my $x; my @a = @$x[$N[0], $N[1]]; \@a [exception] ok 2891 - my $x; my @a = @$x[$N[0], $N[1]]; \@a [return] ok 2892 - my $x; my @a = @$x[$N[0], $N[1]]; \@a [variable] ok 2893 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a [exception] ok 2894 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a [return] ok 2895 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a [variable] ok 2896 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a [exception] ok 2897 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a [return] ok 2898 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a [variable] ok 2899 - my $x; my @a = @$x[$N[0], $N[1]]; \@a [exception] ok 2900 - my $x; my @a = @$x[$N[0], $N[1]]; \@a [return] ok 2901 - my $x; my @a = @$x[$N[0], $N[1]]; \@a [variable] ok 2902 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a [exception] ok 2903 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a [return] ok 2904 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a [variable] ok 2905 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a [exception] ok 2906 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a [return] ok 2907 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a [variable] ok 2908 - my @x; my @a = @x[$N[0], $N[1]]; \@a [exception] ok 2909 - my @x; my @a = @x[$N[0], $N[1]]; \@a [return] ok 2910 - my @x; my @a = @x[$N[0], $N[1]]; \@a [variable] ok 2911 - our @x; local @x; use strict; my @a = @x[$N[0], $N[1]]; \@a [exception] ok 2912 - our @x; local @x; use strict; my @a = @x[$N[0], $N[1]]; \@a [return] ok 2913 - our @x; local @x; use strict; my @a = @x[$N[0], $N[1]]; \@a [variable] ok 2914 - our @x; local @x; no strict; my @a = @x[$N[0], $N[1]]; \@a [exception] ok 2915 - our @x; local @x; no strict; my @a = @x[$N[0], $N[1]]; \@a [return] ok 2916 - our @x; local @x; no strict; my @a = @x[$N[0], $N[1]]; \@a [variable] ok 2917 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [exception] ok 2918 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [return] ok 2919 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [variable] ok 2920 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [exception] ok 2921 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [return] ok 2922 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [variable] ok 2923 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [exception] ok 2924 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [return] ok 2925 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [variable] ok 2926 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [exception] ok 2927 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [return] ok 2928 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [variable] ok 2929 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [exception] ok 2930 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [return] ok 2931 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [variable] ok 2932 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [exception] ok 2933 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [return] ok 2934 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [variable] ok 2935 - my @x; my @a = @x[$N[0], $N[1]]; \@a <+fetch> [exception] ok 2936 - my @x; my @a = @x[$N[0], $N[1]]; \@a <+fetch> [return] ok 2937 - my @x; my @a = @x[$N[0], $N[1]]; \@a <+fetch> [variable] ok 2938 - our @x; local @x; use strict; my @a = @x[$N[0], $N[1]]; \@a <+fetch> [exception] ok 2939 - our @x; local @x; use strict; my @a = @x[$N[0], $N[1]]; \@a <+fetch> [return] ok 2940 - our @x; local @x; use strict; my @a = @x[$N[0], $N[1]]; \@a <+fetch> [variable] ok 2941 - our @x; local @x; no strict; my @a = @x[$N[0], $N[1]]; \@a <+fetch> [exception] ok 2942 - our @x; local @x; no strict; my @a = @x[$N[0], $N[1]]; \@a <+fetch> [return] ok 2943 - our @x; local @x; no strict; my @a = @x[$N[0], $N[1]]; \@a <+fetch> [variable] ok 2944 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+exists> [exception] ok 2945 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+exists> [return] ok 2946 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+exists> [variable] ok 2947 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+exists> [exception] ok 2948 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+exists> [return] ok 2949 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+exists> [variable] ok 2950 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+exists> [exception] ok 2951 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+exists> [return] ok 2952 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+exists> [variable] ok 2953 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+exists> [exception] ok 2954 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+exists> [return] ok 2955 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+exists> [variable] ok 2956 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+exists> [exception] ok 2957 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+exists> [return] ok 2958 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+exists> [variable] ok 2959 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+exists> [exception] ok 2960 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+exists> [return] ok 2961 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+exists> [variable] ok 2962 - my @x; my @a = @x[$N[0], $N[1]]; \@a <+exists> [exception] ok 2963 - my @x; my @a = @x[$N[0], $N[1]]; \@a <+exists> [return] ok 2964 - my @x; my @a = @x[$N[0], $N[1]]; \@a <+exists> [variable] ok 2965 - our @x; local @x; use strict; my @a = @x[$N[0], $N[1]]; \@a <+exists> [exception] ok 2966 - our @x; local @x; use strict; my @a = @x[$N[0], $N[1]]; \@a <+exists> [return] ok 2967 - our @x; local @x; use strict; my @a = @x[$N[0], $N[1]]; \@a <+exists> [variable] ok 2968 - our @x; local @x; no strict; my @a = @x[$N[0], $N[1]]; \@a <+exists> [exception] ok 2969 - our @x; local @x; no strict; my @a = @x[$N[0], $N[1]]; \@a <+exists> [return] ok 2970 - our @x; local @x; no strict; my @a = @x[$N[0], $N[1]]; \@a <+exists> [variable] ok 2971 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+delete> [exception] ok 2972 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+delete> [return] ok 2973 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+delete> [variable] ok 2974 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+delete> [exception] ok 2975 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+delete> [return] ok 2976 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+delete> [variable] ok 2977 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+delete> [exception] ok 2978 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+delete> [return] ok 2979 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+delete> [variable] ok 2980 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+delete> [exception] ok 2981 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+delete> [return] ok 2982 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+delete> [variable] ok 2983 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+delete> [exception] ok 2984 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+delete> [return] ok 2985 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+delete> [variable] ok 2986 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+delete> [exception] ok 2987 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+delete> [return] ok 2988 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+delete> [variable] ok 2989 - my @x; my @a = @x[$N[0], $N[1]]; \@a <+delete> [exception] ok 2990 - my @x; my @a = @x[$N[0], $N[1]]; \@a <+delete> [return] ok 2991 - my @x; my @a = @x[$N[0], $N[1]]; \@a <+delete> [variable] ok 2992 - our @x; local @x; use strict; my @a = @x[$N[0], $N[1]]; \@a <+delete> [exception] ok 2993 - our @x; local @x; use strict; my @a = @x[$N[0], $N[1]]; \@a <+delete> [return] ok 2994 - our @x; local @x; use strict; my @a = @x[$N[0], $N[1]]; \@a <+delete> [variable] ok 2995 - our @x; local @x; no strict; my @a = @x[$N[0], $N[1]]; \@a <+delete> [exception] ok 2996 - our @x; local @x; no strict; my @a = @x[$N[0], $N[1]]; \@a <+delete> [return] ok 2997 - our @x; local @x; no strict; my @a = @x[$N[0], $N[1]]; \@a <+delete> [variable] ok 2998 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+store> [exception] ok 2999 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+store> [return] ok 3000 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+store> [variable] ok 3001 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+store> [exception] ok 3002 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+store> [return] ok 3003 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+store> [variable] ok 3004 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+store> [exception] ok 3005 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+store> [return] ok 3006 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+store> [variable] ok 3007 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+store> [exception] ok 3008 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+store> [return] ok 3009 - my $x; my @a = @$x[$N[0], $N[1]]; \@a <+store> [variable] ok 3010 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+store> [exception] ok 3011 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+store> [return] ok 3012 - our $x; local $x; use strict; my @a = @$x[$N[0], $N[1]]; \@a <+store> [variable] ok 3013 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+store> [exception] ok 3014 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+store> [return] ok 3015 - our $x; local $x; no strict; my @a = @$x[$N[0], $N[1]]; \@a <+store> [variable] ok 3016 - my @x; my @a = @x[$N[0], $N[1]]; \@a <+store> [exception] ok 3017 - my @x; my @a = @x[$N[0], $N[1]]; \@a <+store> [return] ok 3018 - my @x; my @a = @x[$N[0], $N[1]]; \@a <+store> [variable] ok 3019 - our @x; local @x; use strict; my @a = @x[$N[0], $N[1]]; \@a <+store> [exception] ok 3020 - our @x; local @x; use strict; my @a = @x[$N[0], $N[1]]; \@a <+store> [return] ok 3021 - our @x; local @x; use strict; my @a = @x[$N[0], $N[1]]; \@a <+store> [variable] ok 3022 - our @x; local @x; no strict; my @a = @x[$N[0], $N[1]]; \@a <+store> [exception] ok 3023 - our @x; local @x; no strict; my @a = @x[$N[0], $N[1]]; \@a <+store> [return] ok 3024 - our @x; local @x; no strict; my @a = @x[$N[0], $N[1]]; \@a <+store> [variable] ok 3025 - my $x; $x->[$N[1]] = 0; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [exception] ok 3026 - my $x; $x->[$N[1]] = 0; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [return] ok 3027 - my $x; $x->[$N[1]] = 0; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [variable] ok 3028 - our $x; local $x; use strict; $x->[$N[1]] = 0; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [exception] ok 3029 - our $x; local $x; use strict; $x->[$N[1]] = 0; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [return] ok 3030 - our $x; local $x; use strict; $x->[$N[1]] = 0; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [variable] ok 3031 - our $x; local $x; no strict; $x->[$N[1]] = 0; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [exception] ok 3032 - our $x; local $x; no strict; $x->[$N[1]] = 0; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [return] ok 3033 - our $x; local $x; no strict; $x->[$N[1]] = 0; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [variable] ok 3034 - my $x; $x->[$N[1]] = 0; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [exception] ok 3035 - my $x; $x->[$N[1]] = 0; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [return] ok 3036 - my $x; $x->[$N[1]] = 0; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [variable] ok 3037 - our $x; local $x; use strict; $x->[$N[1]] = 0; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [exception] ok 3038 - our $x; local $x; use strict; $x->[$N[1]] = 0; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [return] ok 3039 - our $x; local $x; use strict; $x->[$N[1]] = 0; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [variable] ok 3040 - our $x; local $x; no strict; $x->[$N[1]] = 0; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [exception] ok 3041 - our $x; local $x; no strict; $x->[$N[1]] = 0; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [return] ok 3042 - our $x; local $x; no strict; $x->[$N[1]] = 0; my @a = @$x[$N[0], $N[1]]; \@a <+fetch> [variable] ok 3043 - my @x; $x[$N[1]] = 0; my @a = @x[$N[0], $N[1]]; \@a <+fetch> [exception] ok 3044 - my @x; $x[$N[1]] = 0; my @a = @x[$N[0], $N[1]]; \@a <+fetch> [return] ok 3045 - my @x; $x[$N[1]] = 0; my @a = @x[$N[0], $N[1]]; \@a <+fetch> [variable] ok 3046 - our @x; local @x; use strict; $x[$N[1]] = 0; my @a = @x[$N[0], $N[1]]; \@a <+fetch> [exception] ok 3047 - our @x; local @x; use strict; $x[$N[1]] = 0; my @a = @x[$N[0], $N[1]]; \@a <+fetch> [return] ok 3048 - our @x; local @x; use strict; $x[$N[1]] = 0; my @a = @x[$N[0], $N[1]]; \@a <+fetch> [variable] ok 3049 - our @x; local @x; no strict; $x[$N[1]] = 0; my @a = @x[$N[0], $N[1]]; \@a <+fetch> [exception] ok 3050 - our @x; local @x; no strict; $x[$N[1]] = 0; my @a = @x[$N[0], $N[1]]; \@a <+fetch> [return] ok 3051 - our @x; local @x; no strict; $x[$N[1]] = 0; my @a = @x[$N[0], $N[1]]; \@a <+fetch> [variable] ok 3052 - my $x; @$x[$N[0], $N[1]] = (1, 2); () [exception] ok 3053 - my $x; @$x[$N[0], $N[1]] = (1, 2); () [return] ok 3054 - my $x; @$x[$N[0], $N[1]] = (1, 2); () [variable] ok 3055 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () [exception] ok 3056 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () [return] ok 3057 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () [variable] ok 3058 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () [exception] ok 3059 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () [return] ok 3060 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () [variable] ok 3061 - my $x; @$x[$N[0], $N[1]] = (1, 2); () [exception] ok 3062 - my $x; @$x[$N[0], $N[1]] = (1, 2); () [return] ok 3063 - my $x; @$x[$N[0], $N[1]] = (1, 2); () [variable] ok 3064 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () [exception] ok 3065 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () [return] ok 3066 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () [variable] ok 3067 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () [exception] ok 3068 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () [return] ok 3069 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () [variable] ok 3070 - my @x; @x[$N[0], $N[1]] = (1, 2); () [exception] ok 3071 - my @x; @x[$N[0], $N[1]] = (1, 2); () [return] ok 3072 - my @x; @x[$N[0], $N[1]] = (1, 2); () [variable] ok 3073 - our @x; local @x; use strict; @x[$N[0], $N[1]] = (1, 2); () [exception] ok 3074 - our @x; local @x; use strict; @x[$N[0], $N[1]] = (1, 2); () [return] ok 3075 - our @x; local @x; use strict; @x[$N[0], $N[1]] = (1, 2); () [variable] ok 3076 - our @x; local @x; no strict; @x[$N[0], $N[1]] = (1, 2); () [exception] ok 3077 - our @x; local @x; no strict; @x[$N[0], $N[1]] = (1, 2); () [return] ok 3078 - our @x; local @x; no strict; @x[$N[0], $N[1]] = (1, 2); () [variable] ok 3079 - my $x; @$x[$N[0], $N[1]] = (1, 2); () [exception] ok 3080 - my $x; @$x[$N[0], $N[1]] = (1, 2); () [return] ok 3081 - my $x; @$x[$N[0], $N[1]] = (1, 2); () [variable] ok 3082 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () [exception] ok 3083 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () [return] ok 3084 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () [variable] ok 3085 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () [exception] ok 3086 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () [return] ok 3087 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () [variable] ok 3088 - my $x; @$x[$N[0], $N[1]] = (1, 2); () [exception] ok 3089 - my $x; @$x[$N[0], $N[1]] = (1, 2); () [return] ok 3090 - my $x; @$x[$N[0], $N[1]] = (1, 2); () [variable] ok 3091 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () [exception] ok 3092 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () [return] ok 3093 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () [variable] ok 3094 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () [exception] ok 3095 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () [return] ok 3096 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () [variable] ok 3097 - my @x; @x[$N[0], $N[1]] = (1, 2); () [exception] ok 3098 - my @x; @x[$N[0], $N[1]] = (1, 2); () [return] ok 3099 - my @x; @x[$N[0], $N[1]] = (1, 2); () [variable] ok 3100 - our @x; local @x; use strict; @x[$N[0], $N[1]] = (1, 2); () [exception] ok 3101 - our @x; local @x; use strict; @x[$N[0], $N[1]] = (1, 2); () [return] ok 3102 - our @x; local @x; use strict; @x[$N[0], $N[1]] = (1, 2); () [variable] ok 3103 - our @x; local @x; no strict; @x[$N[0], $N[1]] = (1, 2); () [exception] ok 3104 - our @x; local @x; no strict; @x[$N[0], $N[1]] = (1, 2); () [return] ok 3105 - our @x; local @x; no strict; @x[$N[0], $N[1]] = (1, 2); () [variable] ok 3106 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+fetch> [exception] ok 3107 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+fetch> [return] ok 3108 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+fetch> [variable] ok 3109 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+fetch> [exception] ok 3110 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+fetch> [return] ok 3111 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+fetch> [variable] ok 3112 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+fetch> [exception] ok 3113 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+fetch> [return] ok 3114 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+fetch> [variable] ok 3115 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+fetch> [exception] ok 3116 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+fetch> [return] ok 3117 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+fetch> [variable] ok 3118 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+fetch> [exception] ok 3119 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+fetch> [return] ok 3120 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+fetch> [variable] ok 3121 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+fetch> [exception] ok 3122 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+fetch> [return] ok 3123 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+fetch> [variable] ok 3124 - my @x; @x[$N[0], $N[1]] = (1, 2); () <+fetch> [exception] ok 3125 - my @x; @x[$N[0], $N[1]] = (1, 2); () <+fetch> [return] ok 3126 - my @x; @x[$N[0], $N[1]] = (1, 2); () <+fetch> [variable] ok 3127 - our @x; local @x; use strict; @x[$N[0], $N[1]] = (1, 2); () <+fetch> [exception] ok 3128 - our @x; local @x; use strict; @x[$N[0], $N[1]] = (1, 2); () <+fetch> [return] ok 3129 - our @x; local @x; use strict; @x[$N[0], $N[1]] = (1, 2); () <+fetch> [variable] ok 3130 - our @x; local @x; no strict; @x[$N[0], $N[1]] = (1, 2); () <+fetch> [exception] ok 3131 - our @x; local @x; no strict; @x[$N[0], $N[1]] = (1, 2); () <+fetch> [return] ok 3132 - our @x; local @x; no strict; @x[$N[0], $N[1]] = (1, 2); () <+fetch> [variable] ok 3133 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+exists> [exception] ok 3134 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+exists> [return] ok 3135 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+exists> [variable] ok 3136 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+exists> [exception] ok 3137 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+exists> [return] ok 3138 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+exists> [variable] ok 3139 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+exists> [exception] ok 3140 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+exists> [return] ok 3141 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+exists> [variable] ok 3142 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+exists> [exception] ok 3143 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+exists> [return] ok 3144 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+exists> [variable] ok 3145 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+exists> [exception] ok 3146 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+exists> [return] ok 3147 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+exists> [variable] ok 3148 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+exists> [exception] ok 3149 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+exists> [return] ok 3150 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+exists> [variable] ok 3151 - my @x; @x[$N[0], $N[1]] = (1, 2); () <+exists> [exception] ok 3152 - my @x; @x[$N[0], $N[1]] = (1, 2); () <+exists> [return] ok 3153 - my @x; @x[$N[0], $N[1]] = (1, 2); () <+exists> [variable] ok 3154 - our @x; local @x; use strict; @x[$N[0], $N[1]] = (1, 2); () <+exists> [exception] ok 3155 - our @x; local @x; use strict; @x[$N[0], $N[1]] = (1, 2); () <+exists> [return] ok 3156 - our @x; local @x; use strict; @x[$N[0], $N[1]] = (1, 2); () <+exists> [variable] ok 3157 - our @x; local @x; no strict; @x[$N[0], $N[1]] = (1, 2); () <+exists> [exception] ok 3158 - our @x; local @x; no strict; @x[$N[0], $N[1]] = (1, 2); () <+exists> [return] ok 3159 - our @x; local @x; no strict; @x[$N[0], $N[1]] = (1, 2); () <+exists> [variable] ok 3160 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+delete> [exception] ok 3161 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+delete> [return] ok 3162 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+delete> [variable] ok 3163 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+delete> [exception] ok 3164 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+delete> [return] ok 3165 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+delete> [variable] ok 3166 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+delete> [exception] ok 3167 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+delete> [return] ok 3168 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+delete> [variable] ok 3169 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+delete> [exception] ok 3170 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+delete> [return] ok 3171 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+delete> [variable] ok 3172 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+delete> [exception] ok 3173 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+delete> [return] ok 3174 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+delete> [variable] ok 3175 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+delete> [exception] ok 3176 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+delete> [return] ok 3177 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+delete> [variable] ok 3178 - my @x; @x[$N[0], $N[1]] = (1, 2); () <+delete> [exception] ok 3179 - my @x; @x[$N[0], $N[1]] = (1, 2); () <+delete> [return] ok 3180 - my @x; @x[$N[0], $N[1]] = (1, 2); () <+delete> [variable] ok 3181 - our @x; local @x; use strict; @x[$N[0], $N[1]] = (1, 2); () <+delete> [exception] ok 3182 - our @x; local @x; use strict; @x[$N[0], $N[1]] = (1, 2); () <+delete> [return] ok 3183 - our @x; local @x; use strict; @x[$N[0], $N[1]] = (1, 2); () <+delete> [variable] ok 3184 - our @x; local @x; no strict; @x[$N[0], $N[1]] = (1, 2); () <+delete> [exception] ok 3185 - our @x; local @x; no strict; @x[$N[0], $N[1]] = (1, 2); () <+delete> [return] ok 3186 - our @x; local @x; no strict; @x[$N[0], $N[1]] = (1, 2); () <+delete> [variable] ok 3187 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3188 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3189 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3190 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3191 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3192 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3193 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3194 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3195 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3196 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3197 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3198 - my $x; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3199 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3200 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3201 - our $x; local $x; use strict; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3202 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3203 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3204 - our $x; local $x; no strict; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3205 - my @x; 1 <+store> [exception] ok 3206 - my @x; 1 <+store> [return] ok 3207 - my @x; 1 <+store> [variable] ok 3208 - our @x; local @x; use strict; 1 <+store> [exception] ok 3209 - our @x; local @x; use strict; 1 <+store> [return] ok 3210 - our @x; local @x; use strict; 1 <+store> [variable] ok 3211 - our @x; local @x; no strict; 1 <+store> [exception] ok 3212 - our @x; local @x; no strict; 1 <+store> [return] ok 3213 - our @x; local @x; no strict; 1 <+store> [variable] ok 3214 - my $x; $x->[$N[0]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3215 - my $x; $x->[$N[0]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3216 - my $x; $x->[$N[0]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3217 - our $x; local $x; use strict; $x->[$N[0]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3218 - our $x; local $x; use strict; $x->[$N[0]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3219 - our $x; local $x; use strict; $x->[$N[0]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3220 - our $x; local $x; no strict; $x->[$N[0]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3221 - our $x; local $x; no strict; $x->[$N[0]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3222 - our $x; local $x; no strict; $x->[$N[0]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3223 - my $x; $x->[$N[0]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3224 - my $x; $x->[$N[0]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3225 - my $x; $x->[$N[0]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3226 - our $x; local $x; use strict; $x->[$N[0]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3227 - our $x; local $x; use strict; $x->[$N[0]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3228 - our $x; local $x; use strict; $x->[$N[0]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3229 - our $x; local $x; no strict; $x->[$N[0]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3230 - our $x; local $x; no strict; $x->[$N[0]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3231 - our $x; local $x; no strict; $x->[$N[0]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3232 - my @x; $x[$N[0]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3233 - my @x; $x[$N[0]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3234 - my @x; $x[$N[0]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3235 - our @x; local @x; use strict; $x[$N[0]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3236 - our @x; local @x; use strict; $x[$N[0]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3237 - our @x; local @x; use strict; $x[$N[0]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3238 - our @x; local @x; no strict; $x[$N[0]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3239 - our @x; local @x; no strict; $x[$N[0]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3240 - our @x; local @x; no strict; $x[$N[0]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3241 - my $x; $x->[$N[2]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3242 - my $x; $x->[$N[2]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3243 - my $x; $x->[$N[2]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3244 - our $x; local $x; use strict; $x->[$N[2]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3245 - our $x; local $x; use strict; $x->[$N[2]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3246 - our $x; local $x; use strict; $x->[$N[2]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3247 - our $x; local $x; no strict; $x->[$N[2]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3248 - our $x; local $x; no strict; $x->[$N[2]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3249 - our $x; local $x; no strict; $x->[$N[2]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3250 - my $x; $x->[$N[2]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3251 - my $x; $x->[$N[2]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3252 - my $x; $x->[$N[2]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3253 - our $x; local $x; use strict; $x->[$N[2]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3254 - our $x; local $x; use strict; $x->[$N[2]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3255 - our $x; local $x; use strict; $x->[$N[2]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3256 - our $x; local $x; no strict; $x->[$N[2]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3257 - our $x; local $x; no strict; $x->[$N[2]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3258 - our $x; local $x; no strict; $x->[$N[2]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3259 - my @x; $x[$N[2]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3260 - my @x; $x[$N[2]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3261 - my @x; $x[$N[2]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3262 - our @x; local @x; use strict; $x[$N[2]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3263 - our @x; local @x; use strict; $x[$N[2]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3264 - our @x; local @x; use strict; $x[$N[2]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3265 - our @x; local @x; no strict; $x[$N[2]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3266 - our @x; local @x; no strict; $x[$N[2]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3267 - our @x; local @x; no strict; $x[$N[2]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3268 - my $x; $x->[$N[0]] = 0, $x->[$N[1]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3269 - my $x; $x->[$N[0]] = 0, $x->[$N[1]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3270 - my $x; $x->[$N[0]] = 0, $x->[$N[1]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3271 - our $x; local $x; use strict; $x->[$N[0]] = 0, $x->[$N[1]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3272 - our $x; local $x; use strict; $x->[$N[0]] = 0, $x->[$N[1]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3273 - our $x; local $x; use strict; $x->[$N[0]] = 0, $x->[$N[1]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3274 - our $x; local $x; no strict; $x->[$N[0]] = 0, $x->[$N[1]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3275 - our $x; local $x; no strict; $x->[$N[0]] = 0, $x->[$N[1]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3276 - our $x; local $x; no strict; $x->[$N[0]] = 0, $x->[$N[1]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3277 - my $x; $x->[$N[0]] = 0, $x->[$N[1]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3278 - my $x; $x->[$N[0]] = 0, $x->[$N[1]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3279 - my $x; $x->[$N[0]] = 0, $x->[$N[1]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3280 - our $x; local $x; use strict; $x->[$N[0]] = 0, $x->[$N[1]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3281 - our $x; local $x; use strict; $x->[$N[0]] = 0, $x->[$N[1]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3282 - our $x; local $x; use strict; $x->[$N[0]] = 0, $x->[$N[1]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3283 - our $x; local $x; no strict; $x->[$N[0]] = 0, $x->[$N[1]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3284 - our $x; local $x; no strict; $x->[$N[0]] = 0, $x->[$N[1]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3285 - our $x; local $x; no strict; $x->[$N[0]] = 0, $x->[$N[1]] = 0; @$x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3286 - my @x; $x[$N[0]] = 0, $x[$N[1]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3287 - my @x; $x[$N[0]] = 0, $x[$N[1]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3288 - my @x; $x[$N[0]] = 0, $x[$N[1]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3289 - our @x; local @x; use strict; $x[$N[0]] = 0, $x[$N[1]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3290 - our @x; local @x; use strict; $x[$N[0]] = 0, $x[$N[1]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3291 - our @x; local @x; use strict; $x[$N[0]] = 0, $x[$N[1]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3292 - our @x; local @x; no strict; $x[$N[0]] = 0, $x[$N[1]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [exception] ok 3293 - our @x; local @x; no strict; $x[$N[0]] = 0, $x[$N[1]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [return] ok 3294 - our @x; local @x; no strict; $x[$N[0]] = 0, $x[$N[1]] = 0; @x[$N[0], $N[1]] = (1, 2); () <+store> [variable] ok 3295 - my $x; exists $x->[$N[0]] [exception] ok 3296 - my $x; exists $x->[$N[0]] [return] ok 3297 - my $x; exists $x->[$N[0]] [variable] ok 3298 - our $x; local $x; use strict; exists $x->[$N[0]] [exception] ok 3299 - our $x; local $x; use strict; exists $x->[$N[0]] [return] ok 3300 - our $x; local $x; use strict; exists $x->[$N[0]] [variable] ok 3301 - our $x; local $x; no strict; exists $x->[$N[0]] [exception] ok 3302 - our $x; local $x; no strict; exists $x->[$N[0]] [return] ok 3303 - our $x; local $x; no strict; exists $x->[$N[0]] [variable] ok 3304 - my $x; exists $$x[$N[0]] [exception] ok 3305 - my $x; exists $$x[$N[0]] [return] ok 3306 - my $x; exists $$x[$N[0]] [variable] ok 3307 - our $x; local $x; use strict; exists $$x[$N[0]] [exception] ok 3308 - our $x; local $x; use strict; exists $$x[$N[0]] [return] ok 3309 - our $x; local $x; use strict; exists $$x[$N[0]] [variable] ok 3310 - our $x; local $x; no strict; exists $$x[$N[0]] [exception] ok 3311 - our $x; local $x; no strict; exists $$x[$N[0]] [return] ok 3312 - our $x; local $x; no strict; exists $$x[$N[0]] [variable] ok 3313 - my @x; exists $x[$N[0]] [exception] ok 3314 - my @x; exists $x[$N[0]] [return] ok 3315 - my @x; exists $x[$N[0]] [variable] ok 3316 - our @x; local @x; use strict; exists $x[$N[0]] [exception] ok 3317 - our @x; local @x; use strict; exists $x[$N[0]] [return] ok 3318 - our @x; local @x; use strict; exists $x[$N[0]] [variable] ok 3319 - our @x; local @x; no strict; exists $x[$N[0]] [exception] ok 3320 - our @x; local @x; no strict; exists $x[$N[0]] [return] ok 3321 - our @x; local @x; no strict; exists $x[$N[0]] [variable] ok 3322 - my $x; exists $x->[$N[0]] [exception] ok 3323 - my $x; exists $x->[$N[0]] [return] ok 3324 - my $x; exists $x->[$N[0]] [variable] ok 3325 - our $x; local $x; use strict; exists $x->[$N[0]] [exception] ok 3326 - our $x; local $x; use strict; exists $x->[$N[0]] [return] ok 3327 - our $x; local $x; use strict; exists $x->[$N[0]] [variable] ok 3328 - our $x; local $x; no strict; exists $x->[$N[0]] [exception] ok 3329 - our $x; local $x; no strict; exists $x->[$N[0]] [return] ok 3330 - our $x; local $x; no strict; exists $x->[$N[0]] [variable] ok 3331 - my $x; exists $$x[$N[0]] [exception] ok 3332 - my $x; exists $$x[$N[0]] [return] ok 3333 - my $x; exists $$x[$N[0]] [variable] ok 3334 - our $x; local $x; use strict; exists $$x[$N[0]] [exception] ok 3335 - our $x; local $x; use strict; exists $$x[$N[0]] [return] ok 3336 - our $x; local $x; use strict; exists $$x[$N[0]] [variable] ok 3337 - our $x; local $x; no strict; exists $$x[$N[0]] [exception] ok 3338 - our $x; local $x; no strict; exists $$x[$N[0]] [return] ok 3339 - our $x; local $x; no strict; exists $$x[$N[0]] [variable] ok 3340 - my @x; exists $x[$N[0]] [exception] ok 3341 - my @x; exists $x[$N[0]] [return] ok 3342 - my @x; exists $x[$N[0]] [variable] ok 3343 - our @x; local @x; use strict; exists $x[$N[0]] [exception] ok 3344 - our @x; local @x; use strict; exists $x[$N[0]] [return] ok 3345 - our @x; local @x; use strict; exists $x[$N[0]] [variable] ok 3346 - our @x; local @x; no strict; exists $x[$N[0]] [exception] ok 3347 - our @x; local @x; no strict; exists $x[$N[0]] [return] ok 3348 - our @x; local @x; no strict; exists $x[$N[0]] [variable] ok 3349 - my $x; exists $x->[$N[0]] <+fetch> [exception] ok 3350 - my $x; exists $x->[$N[0]] <+fetch> [return] ok 3351 - my $x; exists $x->[$N[0]] <+fetch> [variable] ok 3352 - our $x; local $x; use strict; exists $x->[$N[0]] <+fetch> [exception] ok 3353 - our $x; local $x; use strict; exists $x->[$N[0]] <+fetch> [return] ok 3354 - our $x; local $x; use strict; exists $x->[$N[0]] <+fetch> [variable] ok 3355 - our $x; local $x; no strict; exists $x->[$N[0]] <+fetch> [exception] ok 3356 - our $x; local $x; no strict; exists $x->[$N[0]] <+fetch> [return] ok 3357 - our $x; local $x; no strict; exists $x->[$N[0]] <+fetch> [variable] ok 3358 - my $x; exists $$x[$N[0]] <+fetch> [exception] ok 3359 - my $x; exists $$x[$N[0]] <+fetch> [return] ok 3360 - my $x; exists $$x[$N[0]] <+fetch> [variable] ok 3361 - our $x; local $x; use strict; exists $$x[$N[0]] <+fetch> [exception] ok 3362 - our $x; local $x; use strict; exists $$x[$N[0]] <+fetch> [return] ok 3363 - our $x; local $x; use strict; exists $$x[$N[0]] <+fetch> [variable] ok 3364 - our $x; local $x; no strict; exists $$x[$N[0]] <+fetch> [exception] ok 3365 - our $x; local $x; no strict; exists $$x[$N[0]] <+fetch> [return] ok 3366 - our $x; local $x; no strict; exists $$x[$N[0]] <+fetch> [variable] ok 3367 - my @x; exists $x[$N[0]] <+fetch> [exception] ok 3368 - my @x; exists $x[$N[0]] <+fetch> [return] ok 3369 - my @x; exists $x[$N[0]] <+fetch> [variable] ok 3370 - our @x; local @x; use strict; exists $x[$N[0]] <+fetch> [exception] ok 3371 - our @x; local @x; use strict; exists $x[$N[0]] <+fetch> [return] ok 3372 - our @x; local @x; use strict; exists $x[$N[0]] <+fetch> [variable] ok 3373 - our @x; local @x; no strict; exists $x[$N[0]] <+fetch> [exception] ok 3374 - our @x; local @x; no strict; exists $x[$N[0]] <+fetch> [return] ok 3375 - our @x; local @x; no strict; exists $x[$N[0]] <+fetch> [variable] ok 3376 - my $x; exists $x->[$N[0]] <+exists> [exception] ok 3377 - my $x; exists $x->[$N[0]] <+exists> [return] ok 3378 - my $x; exists $x->[$N[0]] <+exists> [variable] ok 3379 - our $x; local $x; use strict; exists $x->[$N[0]] <+exists> [exception] ok 3380 - our $x; local $x; use strict; exists $x->[$N[0]] <+exists> [return] ok 3381 - our $x; local $x; use strict; exists $x->[$N[0]] <+exists> [variable] ok 3382 - our $x; local $x; no strict; exists $x->[$N[0]] <+exists> [exception] ok 3383 - our $x; local $x; no strict; exists $x->[$N[0]] <+exists> [return] ok 3384 - our $x; local $x; no strict; exists $x->[$N[0]] <+exists> [variable] ok 3385 - my $x; exists $$x[$N[0]] <+exists> [exception] ok 3386 - my $x; exists $$x[$N[0]] <+exists> [return] ok 3387 - my $x; exists $$x[$N[0]] <+exists> [variable] ok 3388 - our $x; local $x; use strict; exists $$x[$N[0]] <+exists> [exception] ok 3389 - our $x; local $x; use strict; exists $$x[$N[0]] <+exists> [return] ok 3390 - our $x; local $x; use strict; exists $$x[$N[0]] <+exists> [variable] ok 3391 - our $x; local $x; no strict; exists $$x[$N[0]] <+exists> [exception] ok 3392 - our $x; local $x; no strict; exists $$x[$N[0]] <+exists> [return] ok 3393 - our $x; local $x; no strict; exists $$x[$N[0]] <+exists> [variable] ok 3394 - my @x; exists $x[$N[0]] <+exists> [exception] ok 3395 - my @x; exists $x[$N[0]] <+exists> [return] ok 3396 - my @x; exists $x[$N[0]] <+exists> [variable] ok 3397 - our @x; local @x; use strict; exists $x[$N[0]] <+exists> [exception] ok 3398 - our @x; local @x; use strict; exists $x[$N[0]] <+exists> [return] ok 3399 - our @x; local @x; use strict; exists $x[$N[0]] <+exists> [variable] ok 3400 - our @x; local @x; no strict; exists $x[$N[0]] <+exists> [exception] ok 3401 - our @x; local @x; no strict; exists $x[$N[0]] <+exists> [return] ok 3402 - our @x; local @x; no strict; exists $x[$N[0]] <+exists> [variable] ok 3403 - my $x; exists $x->[$N[0]] <+delete> [exception] ok 3404 - my $x; exists $x->[$N[0]] <+delete> [return] ok 3405 - my $x; exists $x->[$N[0]] <+delete> [variable] ok 3406 - our $x; local $x; use strict; exists $x->[$N[0]] <+delete> [exception] ok 3407 - our $x; local $x; use strict; exists $x->[$N[0]] <+delete> [return] ok 3408 - our $x; local $x; use strict; exists $x->[$N[0]] <+delete> [variable] ok 3409 - our $x; local $x; no strict; exists $x->[$N[0]] <+delete> [exception] ok 3410 - our $x; local $x; no strict; exists $x->[$N[0]] <+delete> [return] ok 3411 - our $x; local $x; no strict; exists $x->[$N[0]] <+delete> [variable] ok 3412 - my $x; exists $$x[$N[0]] <+delete> [exception] ok 3413 - my $x; exists $$x[$N[0]] <+delete> [return] ok 3414 - my $x; exists $$x[$N[0]] <+delete> [variable] ok 3415 - our $x; local $x; use strict; exists $$x[$N[0]] <+delete> [exception] ok 3416 - our $x; local $x; use strict; exists $$x[$N[0]] <+delete> [return] ok 3417 - our $x; local $x; use strict; exists $$x[$N[0]] <+delete> [variable] ok 3418 - our $x; local $x; no strict; exists $$x[$N[0]] <+delete> [exception] ok 3419 - our $x; local $x; no strict; exists $$x[$N[0]] <+delete> [return] ok 3420 - our $x; local $x; no strict; exists $$x[$N[0]] <+delete> [variable] ok 3421 - my @x; exists $x[$N[0]] <+delete> [exception] ok 3422 - my @x; exists $x[$N[0]] <+delete> [return] ok 3423 - my @x; exists $x[$N[0]] <+delete> [variable] ok 3424 - our @x; local @x; use strict; exists $x[$N[0]] <+delete> [exception] ok 3425 - our @x; local @x; use strict; exists $x[$N[0]] <+delete> [return] ok 3426 - our @x; local @x; use strict; exists $x[$N[0]] <+delete> [variable] ok 3427 - our @x; local @x; no strict; exists $x[$N[0]] <+delete> [exception] ok 3428 - our @x; local @x; no strict; exists $x[$N[0]] <+delete> [return] ok 3429 - our @x; local @x; no strict; exists $x[$N[0]] <+delete> [variable] ok 3430 - my $x; exists $x->[$N[0]] <+store> [exception] ok 3431 - my $x; exists $x->[$N[0]] <+store> [return] ok 3432 - my $x; exists $x->[$N[0]] <+store> [variable] ok 3433 - our $x; local $x; use strict; exists $x->[$N[0]] <+store> [exception] ok 3434 - our $x; local $x; use strict; exists $x->[$N[0]] <+store> [return] ok 3435 - our $x; local $x; use strict; exists $x->[$N[0]] <+store> [variable] ok 3436 - our $x; local $x; no strict; exists $x->[$N[0]] <+store> [exception] ok 3437 - our $x; local $x; no strict; exists $x->[$N[0]] <+store> [return] ok 3438 - our $x; local $x; no strict; exists $x->[$N[0]] <+store> [variable] ok 3439 - my $x; exists $$x[$N[0]] <+store> [exception] ok 3440 - my $x; exists $$x[$N[0]] <+store> [return] ok 3441 - my $x; exists $$x[$N[0]] <+store> [variable] ok 3442 - our $x; local $x; use strict; exists $$x[$N[0]] <+store> [exception] ok 3443 - our $x; local $x; use strict; exists $$x[$N[0]] <+store> [return] ok 3444 - our $x; local $x; use strict; exists $$x[$N[0]] <+store> [variable] ok 3445 - our $x; local $x; no strict; exists $$x[$N[0]] <+store> [exception] ok 3446 - our $x; local $x; no strict; exists $$x[$N[0]] <+store> [return] ok 3447 - our $x; local $x; no strict; exists $$x[$N[0]] <+store> [variable] ok 3448 - my @x; exists $x[$N[0]] <+store> [exception] ok 3449 - my @x; exists $x[$N[0]] <+store> [return] ok 3450 - my @x; exists $x[$N[0]] <+store> [variable] ok 3451 - our @x; local @x; use strict; exists $x[$N[0]] <+store> [exception] ok 3452 - our @x; local @x; use strict; exists $x[$N[0]] <+store> [return] ok 3453 - our @x; local @x; use strict; exists $x[$N[0]] <+store> [variable] ok 3454 - our @x; local @x; no strict; exists $x[$N[0]] <+store> [exception] ok 3455 - our @x; local @x; no strict; exists $x[$N[0]] <+store> [return] ok 3456 - our @x; local @x; no strict; exists $x[$N[0]] <+store> [variable] ok 3457 - my $x; exists $x->[$N[0]] <+strict +fetch> [exception] ok 3458 - my $x; exists $x->[$N[0]] <+strict +fetch> [return] ok 3459 - my $x; exists $x->[$N[0]] <+strict +fetch> [variable] ok 3460 - our $x; local $x; use strict; exists $x->[$N[0]] <+strict +fetch> [exception] ok 3461 - our $x; local $x; use strict; exists $x->[$N[0]] <+strict +fetch> [return] ok 3462 - our $x; local $x; use strict; exists $x->[$N[0]] <+strict +fetch> [variable] ok 3463 - our $x; local $x; no strict; exists $x->[$N[0]] <+strict +fetch> [exception] ok 3464 - our $x; local $x; no strict; exists $x->[$N[0]] <+strict +fetch> [return] ok 3465 - our $x; local $x; no strict; exists $x->[$N[0]] <+strict +fetch> [variable] ok 3466 - my $x; exists $$x[$N[0]] <+strict +fetch> [exception] ok 3467 - my $x; exists $$x[$N[0]] <+strict +fetch> [return] ok 3468 - my $x; exists $$x[$N[0]] <+strict +fetch> [variable] ok 3469 - our $x; local $x; use strict; exists $$x[$N[0]] <+strict +fetch> [exception] ok 3470 - our $x; local $x; use strict; exists $$x[$N[0]] <+strict +fetch> [return] ok 3471 - our $x; local $x; use strict; exists $$x[$N[0]] <+strict +fetch> [variable] ok 3472 - our $x; local $x; no strict; exists $$x[$N[0]] <+strict +fetch> [exception] ok 3473 - our $x; local $x; no strict; exists $$x[$N[0]] <+strict +fetch> [return] ok 3474 - our $x; local $x; no strict; exists $$x[$N[0]] <+strict +fetch> [variable] ok 3475 - my @x; exists $x[$N[0]] <+strict +fetch> [exception] ok 3476 - my @x; exists $x[$N[0]] <+strict +fetch> [return] ok 3477 - my @x; exists $x[$N[0]] <+strict +fetch> [variable] ok 3478 - our @x; local @x; use strict; exists $x[$N[0]] <+strict +fetch> [exception] ok 3479 - our @x; local @x; use strict; exists $x[$N[0]] <+strict +fetch> [return] ok 3480 - our @x; local @x; use strict; exists $x[$N[0]] <+strict +fetch> [variable] ok 3481 - our @x; local @x; no strict; exists $x[$N[0]] <+strict +fetch> [exception] ok 3482 - our @x; local @x; no strict; exists $x[$N[0]] <+strict +fetch> [return] ok 3483 - our @x; local @x; no strict; exists $x[$N[0]] <+strict +fetch> [variable] ok 3484 - my $x; exists $x->[$N[0]] <+strict +exists> [exception] ok 3485 - my $x; exists $x->[$N[0]] <+strict +exists> [return] ok 3486 - my $x; exists $x->[$N[0]] <+strict +exists> [variable] ok 3487 - our $x; local $x; use strict; exists $x->[$N[0]] <+strict +exists> [exception] ok 3488 - our $x; local $x; use strict; exists $x->[$N[0]] <+strict +exists> [return] ok 3489 - our $x; local $x; use strict; exists $x->[$N[0]] <+strict +exists> [variable] ok 3490 - our $x; local $x; no strict; exists $x->[$N[0]] <+strict +exists> [exception] ok 3491 - our $x; local $x; no strict; exists $x->[$N[0]] <+strict +exists> [return] ok 3492 - our $x; local $x; no strict; exists $x->[$N[0]] <+strict +exists> [variable] ok 3493 - my $x; exists $$x[$N[0]] <+strict +exists> [exception] ok 3494 - my $x; exists $$x[$N[0]] <+strict +exists> [return] ok 3495 - my $x; exists $$x[$N[0]] <+strict +exists> [variable] ok 3496 - our $x; local $x; use strict; exists $$x[$N[0]] <+strict +exists> [exception] ok 3497 - our $x; local $x; use strict; exists $$x[$N[0]] <+strict +exists> [return] ok 3498 - our $x; local $x; use strict; exists $$x[$N[0]] <+strict +exists> [variable] ok 3499 - our $x; local $x; no strict; exists $$x[$N[0]] <+strict +exists> [exception] ok 3500 - our $x; local $x; no strict; exists $$x[$N[0]] <+strict +exists> [return] ok 3501 - our $x; local $x; no strict; exists $$x[$N[0]] <+strict +exists> [variable] ok 3502 - my @x; 1 <+strict +exists> [exception] ok 3503 - my @x; 1 <+strict +exists> [return] ok 3504 - my @x; 1 <+strict +exists> [variable] ok 3505 - our @x; local @x; use strict; 1 <+strict +exists> [exception] ok 3506 - our @x; local @x; use strict; 1 <+strict +exists> [return] ok 3507 - our @x; local @x; use strict; 1 <+strict +exists> [variable] ok 3508 - our @x; local @x; no strict; 1 <+strict +exists> [exception] ok 3509 - our @x; local @x; no strict; 1 <+strict +exists> [return] ok 3510 - our @x; local @x; no strict; 1 <+strict +exists> [variable] ok 3511 - my $x; exists $x->[$N[0]] <+strict +delete> [exception] ok 3512 - my $x; exists $x->[$N[0]] <+strict +delete> [return] ok 3513 - my $x; exists $x->[$N[0]] <+strict +delete> [variable] ok 3514 - our $x; local $x; use strict; exists $x->[$N[0]] <+strict +delete> [exception] ok 3515 - our $x; local $x; use strict; exists $x->[$N[0]] <+strict +delete> [return] ok 3516 - our $x; local $x; use strict; exists $x->[$N[0]] <+strict +delete> [variable] ok 3517 - our $x; local $x; no strict; exists $x->[$N[0]] <+strict +delete> [exception] ok 3518 - our $x; local $x; no strict; exists $x->[$N[0]] <+strict +delete> [return] ok 3519 - our $x; local $x; no strict; exists $x->[$N[0]] <+strict +delete> [variable] ok 3520 - my $x; exists $$x[$N[0]] <+strict +delete> [exception] ok 3521 - my $x; exists $$x[$N[0]] <+strict +delete> [return] ok 3522 - my $x; exists $$x[$N[0]] <+strict +delete> [variable] ok 3523 - our $x; local $x; use strict; exists $$x[$N[0]] <+strict +delete> [exception] ok 3524 - our $x; local $x; use strict; exists $$x[$N[0]] <+strict +delete> [return] ok 3525 - our $x; local $x; use strict; exists $$x[$N[0]] <+strict +delete> [variable] ok 3526 - our $x; local $x; no strict; exists $$x[$N[0]] <+strict +delete> [exception] ok 3527 - our $x; local $x; no strict; exists $$x[$N[0]] <+strict +delete> [return] ok 3528 - our $x; local $x; no strict; exists $$x[$N[0]] <+strict +delete> [variable] ok 3529 - my @x; exists $x[$N[0]] <+strict +delete> [exception] ok 3530 - my @x; exists $x[$N[0]] <+strict +delete> [return] ok 3531 - my @x; exists $x[$N[0]] <+strict +delete> [variable] ok 3532 - our @x; local @x; use strict; exists $x[$N[0]] <+strict +delete> [exception] ok 3533 - our @x; local @x; use strict; exists $x[$N[0]] <+strict +delete> [return] ok 3534 - our @x; local @x; use strict; exists $x[$N[0]] <+strict +delete> [variable] ok 3535 - our @x; local @x; no strict; exists $x[$N[0]] <+strict +delete> [exception] ok 3536 - our @x; local @x; no strict; exists $x[$N[0]] <+strict +delete> [return] ok 3537 - our @x; local @x; no strict; exists $x[$N[0]] <+strict +delete> [variable] ok 3538 - my $x; exists $x->[$N[0]] <+strict +store> [exception] ok 3539 - my $x; exists $x->[$N[0]] <+strict +store> [return] ok 3540 - my $x; exists $x->[$N[0]] <+strict +store> [variable] ok 3541 - our $x; local $x; use strict; exists $x->[$N[0]] <+strict +store> [exception] ok 3542 - our $x; local $x; use strict; exists $x->[$N[0]] <+strict +store> [return] ok 3543 - our $x; local $x; use strict; exists $x->[$N[0]] <+strict +store> [variable] ok 3544 - our $x; local $x; no strict; exists $x->[$N[0]] <+strict +store> [exception] ok 3545 - our $x; local $x; no strict; exists $x->[$N[0]] <+strict +store> [return] ok 3546 - our $x; local $x; no strict; exists $x->[$N[0]] <+strict +store> [variable] ok 3547 - my $x; exists $$x[$N[0]] <+strict +store> [exception] ok 3548 - my $x; exists $$x[$N[0]] <+strict +store> [return] ok 3549 - my $x; exists $$x[$N[0]] <+strict +store> [variable] ok 3550 - our $x; local $x; use strict; exists $$x[$N[0]] <+strict +store> [exception] ok 3551 - our $x; local $x; use strict; exists $$x[$N[0]] <+strict +store> [return] ok 3552 - our $x; local $x; use strict; exists $$x[$N[0]] <+strict +store> [variable] ok 3553 - our $x; local $x; no strict; exists $$x[$N[0]] <+strict +store> [exception] ok 3554 - our $x; local $x; no strict; exists $$x[$N[0]] <+strict +store> [return] ok 3555 - our $x; local $x; no strict; exists $$x[$N[0]] <+strict +store> [variable] ok 3556 - my @x; exists $x[$N[0]] <+strict +store> [exception] ok 3557 - my @x; exists $x[$N[0]] <+strict +store> [return] ok 3558 - my @x; exists $x[$N[0]] <+strict +store> [variable] ok 3559 - our @x; local @x; use strict; exists $x[$N[0]] <+strict +store> [exception] ok 3560 - our @x; local @x; use strict; exists $x[$N[0]] <+strict +store> [return] ok 3561 - our @x; local @x; use strict; exists $x[$N[0]] <+strict +store> [variable] ok 3562 - our @x; local @x; no strict; exists $x[$N[0]] <+strict +store> [exception] ok 3563 - our @x; local @x; no strict; exists $x[$N[0]] <+strict +store> [return] ok 3564 - our @x; local @x; no strict; exists $x[$N[0]] <+strict +store> [variable] ok 3565 - my $x; exists $x->[$N[0]]->[$N[1]] [exception] ok 3566 - my $x; exists $x->[$N[0]]->[$N[1]] [return] ok 3567 - my $x; exists $x->[$N[0]]->[$N[1]] [variable] ok 3568 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] [exception] ok 3569 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] [return] ok 3570 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] [variable] ok 3571 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] [exception] ok 3572 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] [return] ok 3573 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] [variable] ok 3574 - my $x; exists $$x[$N[0]]->[$N[1]] [exception] ok 3575 - my $x; exists $$x[$N[0]]->[$N[1]] [return] ok 3576 - my $x; exists $$x[$N[0]]->[$N[1]] [variable] ok 3577 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] [exception] ok 3578 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] [return] ok 3579 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] [variable] ok 3580 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] [exception] ok 3581 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] [return] ok 3582 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] [variable] ok 3583 - my @x; exists $x[$N[0]]->[$N[1]] [exception] ok 3584 - my @x; exists $x[$N[0]]->[$N[1]] [return] ok 3585 - my @x; exists $x[$N[0]]->[$N[1]] [variable] ok 3586 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] [exception] ok 3587 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] [return] ok 3588 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] [variable] ok 3589 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] [exception] ok 3590 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] [return] ok 3591 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] [variable] ok 3592 - my $x; exists $x->[$N[0]]->[$N[1]] [exception] ok 3593 - my $x; exists $x->[$N[0]]->[$N[1]] [return] ok 3594 - my $x; exists $x->[$N[0]]->[$N[1]] [variable] ok 3595 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] [exception] ok 3596 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] [return] ok 3597 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] [variable] ok 3598 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] [exception] ok 3599 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] [return] ok 3600 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] [variable] ok 3601 - my $x; exists $$x[$N[0]]->[$N[1]] [exception] ok 3602 - my $x; exists $$x[$N[0]]->[$N[1]] [return] ok 3603 - my $x; exists $$x[$N[0]]->[$N[1]] [variable] ok 3604 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] [exception] ok 3605 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] [return] ok 3606 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] [variable] ok 3607 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] [exception] ok 3608 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] [return] ok 3609 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] [variable] ok 3610 - my @x; exists $x[$N[0]]->[$N[1]] [exception] ok 3611 - my @x; exists $x[$N[0]]->[$N[1]] [return] ok 3612 - my @x; exists $x[$N[0]]->[$N[1]] [variable] ok 3613 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] [exception] ok 3614 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] [return] ok 3615 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] [variable] ok 3616 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] [exception] ok 3617 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] [return] ok 3618 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] [variable] ok 3619 - my $x; exists $x->[$N[0]]->[$N[1]] <+fetch> [exception] ok 3620 - my $x; exists $x->[$N[0]]->[$N[1]] <+fetch> [return] ok 3621 - my $x; exists $x->[$N[0]]->[$N[1]] <+fetch> [variable] ok 3622 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+fetch> [exception] ok 3623 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+fetch> [return] ok 3624 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+fetch> [variable] ok 3625 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+fetch> [exception] ok 3626 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+fetch> [return] ok 3627 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+fetch> [variable] ok 3628 - my $x; exists $$x[$N[0]]->[$N[1]] <+fetch> [exception] ok 3629 - my $x; exists $$x[$N[0]]->[$N[1]] <+fetch> [return] ok 3630 - my $x; exists $$x[$N[0]]->[$N[1]] <+fetch> [variable] ok 3631 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+fetch> [exception] ok 3632 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+fetch> [return] ok 3633 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+fetch> [variable] ok 3634 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+fetch> [exception] ok 3635 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+fetch> [return] ok 3636 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+fetch> [variable] ok 3637 - my @x; exists $x[$N[0]]->[$N[1]] <+fetch> [exception] ok 3638 - my @x; exists $x[$N[0]]->[$N[1]] <+fetch> [return] ok 3639 - my @x; exists $x[$N[0]]->[$N[1]] <+fetch> [variable] ok 3640 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+fetch> [exception] ok 3641 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+fetch> [return] ok 3642 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+fetch> [variable] ok 3643 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+fetch> [exception] ok 3644 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+fetch> [return] ok 3645 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+fetch> [variable] ok 3646 - my $x; exists $x->[$N[0]]->[$N[1]] <+exists> [exception] ok 3647 - my $x; exists $x->[$N[0]]->[$N[1]] <+exists> [return] ok 3648 - my $x; exists $x->[$N[0]]->[$N[1]] <+exists> [variable] ok 3649 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+exists> [exception] ok 3650 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+exists> [return] ok 3651 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+exists> [variable] ok 3652 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+exists> [exception] ok 3653 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+exists> [return] ok 3654 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+exists> [variable] ok 3655 - my $x; exists $$x[$N[0]]->[$N[1]] <+exists> [exception] ok 3656 - my $x; exists $$x[$N[0]]->[$N[1]] <+exists> [return] ok 3657 - my $x; exists $$x[$N[0]]->[$N[1]] <+exists> [variable] ok 3658 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+exists> [exception] ok 3659 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+exists> [return] ok 3660 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+exists> [variable] ok 3661 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+exists> [exception] ok 3662 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+exists> [return] ok 3663 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+exists> [variable] ok 3664 - my @x; exists $x[$N[0]]->[$N[1]] <+exists> [exception] ok 3665 - my @x; exists $x[$N[0]]->[$N[1]] <+exists> [return] ok 3666 - my @x; exists $x[$N[0]]->[$N[1]] <+exists> [variable] ok 3667 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+exists> [exception] ok 3668 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+exists> [return] ok 3669 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+exists> [variable] ok 3670 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+exists> [exception] ok 3671 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+exists> [return] ok 3672 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+exists> [variable] ok 3673 - my $x; exists $x->[$N[0]]->[$N[1]] <+delete> [exception] ok 3674 - my $x; exists $x->[$N[0]]->[$N[1]] <+delete> [return] ok 3675 - my $x; exists $x->[$N[0]]->[$N[1]] <+delete> [variable] ok 3676 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+delete> [exception] ok 3677 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+delete> [return] ok 3678 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+delete> [variable] ok 3679 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+delete> [exception] ok 3680 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+delete> [return] ok 3681 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+delete> [variable] ok 3682 - my $x; exists $$x[$N[0]]->[$N[1]] <+delete> [exception] ok 3683 - my $x; exists $$x[$N[0]]->[$N[1]] <+delete> [return] ok 3684 - my $x; exists $$x[$N[0]]->[$N[1]] <+delete> [variable] ok 3685 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+delete> [exception] ok 3686 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+delete> [return] ok 3687 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+delete> [variable] ok 3688 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+delete> [exception] ok 3689 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+delete> [return] ok 3690 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+delete> [variable] ok 3691 - my @x; exists $x[$N[0]]->[$N[1]] <+delete> [exception] ok 3692 - my @x; exists $x[$N[0]]->[$N[1]] <+delete> [return] ok 3693 - my @x; exists $x[$N[0]]->[$N[1]] <+delete> [variable] ok 3694 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+delete> [exception] ok 3695 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+delete> [return] ok 3696 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+delete> [variable] ok 3697 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+delete> [exception] ok 3698 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+delete> [return] ok 3699 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+delete> [variable] ok 3700 - my $x; exists $x->[$N[0]]->[$N[1]] <+store> [exception] ok 3701 - my $x; exists $x->[$N[0]]->[$N[1]] <+store> [return] ok 3702 - my $x; exists $x->[$N[0]]->[$N[1]] <+store> [variable] ok 3703 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+store> [exception] ok 3704 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+store> [return] ok 3705 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+store> [variable] ok 3706 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+store> [exception] ok 3707 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+store> [return] ok 3708 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+store> [variable] ok 3709 - my $x; exists $$x[$N[0]]->[$N[1]] <+store> [exception] ok 3710 - my $x; exists $$x[$N[0]]->[$N[1]] <+store> [return] ok 3711 - my $x; exists $$x[$N[0]]->[$N[1]] <+store> [variable] ok 3712 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+store> [exception] ok 3713 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+store> [return] ok 3714 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+store> [variable] ok 3715 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+store> [exception] ok 3716 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+store> [return] ok 3717 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+store> [variable] ok 3718 - my @x; exists $x[$N[0]]->[$N[1]] <+store> [exception] ok 3719 - my @x; exists $x[$N[0]]->[$N[1]] <+store> [return] ok 3720 - my @x; exists $x[$N[0]]->[$N[1]] <+store> [variable] ok 3721 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+store> [exception] ok 3722 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+store> [return] ok 3723 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+store> [variable] ok 3724 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+store> [exception] ok 3725 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+store> [return] ok 3726 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+store> [variable] ok 3727 - my $x; exists $x->[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 3728 - my $x; exists $x->[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 3729 - my $x; exists $x->[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 3730 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 3731 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 3732 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 3733 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 3734 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 3735 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 3736 - my $x; exists $$x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 3737 - my $x; exists $$x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 3738 - my $x; exists $$x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 3739 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 3740 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 3741 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 3742 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 3743 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 3744 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 3745 - my @x; exists $x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 3746 - my @x; exists $x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 3747 - my @x; exists $x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 3748 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 3749 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 3750 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 3751 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 3752 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 3753 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 3754 - my $x; exists $x->[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 3755 - my $x; exists $x->[$N[0]]->[$N[1]] <+strict +exists> [return] ok 3756 - my $x; exists $x->[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 3757 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 3758 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+strict +exists> [return] ok 3759 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 3760 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 3761 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+strict +exists> [return] ok 3762 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 3763 - my $x; exists $$x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 3764 - my $x; exists $$x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 3765 - my $x; exists $$x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 3766 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 3767 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 3768 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 3769 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 3770 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 3771 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 3772 - my @x; exists $x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 3773 - my @x; exists $x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 3774 - my @x; exists $x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 3775 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 3776 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 3777 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 3778 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 3779 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 3780 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 3781 - my $x; exists $x->[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 3782 - my $x; exists $x->[$N[0]]->[$N[1]] <+strict +delete> [return] ok 3783 - my $x; exists $x->[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 3784 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 3785 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+strict +delete> [return] ok 3786 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 3787 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 3788 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+strict +delete> [return] ok 3789 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 3790 - my $x; exists $$x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 3791 - my $x; exists $$x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 3792 - my $x; exists $$x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 3793 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 3794 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 3795 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 3796 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 3797 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 3798 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 3799 - my @x; exists $x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 3800 - my @x; exists $x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 3801 - my @x; exists $x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 3802 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 3803 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 3804 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 3805 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 3806 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 3807 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 3808 - my $x; exists $x->[$N[0]]->[$N[1]] <+strict +store> [exception] ok 3809 - my $x; exists $x->[$N[0]]->[$N[1]] <+strict +store> [return] ok 3810 - my $x; exists $x->[$N[0]]->[$N[1]] <+strict +store> [variable] ok 3811 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+strict +store> [exception] ok 3812 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+strict +store> [return] ok 3813 - our $x; local $x; use strict; exists $x->[$N[0]]->[$N[1]] <+strict +store> [variable] ok 3814 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+strict +store> [exception] ok 3815 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+strict +store> [return] ok 3816 - our $x; local $x; no strict; exists $x->[$N[0]]->[$N[1]] <+strict +store> [variable] ok 3817 - my $x; exists $$x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 3818 - my $x; exists $$x[$N[0]]->[$N[1]] <+strict +store> [return] ok 3819 - my $x; exists $$x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 3820 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 3821 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+strict +store> [return] ok 3822 - our $x; local $x; use strict; exists $$x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 3823 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 3824 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+strict +store> [return] ok 3825 - our $x; local $x; no strict; exists $$x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 3826 - my @x; exists $x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 3827 - my @x; exists $x[$N[0]]->[$N[1]] <+strict +store> [return] ok 3828 - my @x; exists $x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 3829 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 3830 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+strict +store> [return] ok 3831 - our @x; local @x; use strict; exists $x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 3832 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 3833 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+strict +store> [return] ok 3834 - our @x; local @x; no strict; exists $x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 3835 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+fetch> [exception] ok 3836 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+fetch> [return] ok 3837 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+fetch> [variable] ok 3838 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+fetch> [exception] ok 3839 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+fetch> [return] ok 3840 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+fetch> [variable] ok 3841 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+fetch> [exception] ok 3842 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+fetch> [return] ok 3843 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+fetch> [variable] ok 3844 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+fetch> [exception] ok 3845 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+fetch> [return] ok 3846 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+fetch> [variable] ok 3847 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+fetch> [exception] ok 3848 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+fetch> [return] ok 3849 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+fetch> [variable] ok 3850 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+fetch> [exception] ok 3851 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+fetch> [return] ok 3852 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+fetch> [variable] ok 3853 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+fetch> [exception] ok 3854 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+fetch> [return] ok 3855 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+fetch> [variable] ok 3856 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+fetch> [exception] ok 3857 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+fetch> [return] ok 3858 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+fetch> [variable] ok 3859 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+fetch> [exception] ok 3860 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+fetch> [return] ok 3861 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+fetch> [variable] ok 3862 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+fetch> [exception] ok 3863 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+fetch> [return] ok 3864 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+fetch> [variable] ok 3865 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+fetch> [exception] ok 3866 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+fetch> [return] ok 3867 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+fetch> [variable] ok 3868 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+fetch> [exception] ok 3869 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+fetch> [return] ok 3870 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+fetch> [variable] ok 3871 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+fetch> [exception] ok 3872 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+fetch> [return] ok 3873 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+fetch> [variable] ok 3874 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+fetch> [exception] ok 3875 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+fetch> [return] ok 3876 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+fetch> [variable] ok 3877 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+fetch> [exception] ok 3878 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+fetch> [return] ok 3879 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+fetch> [variable] ok 3880 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+fetch> [exception] ok 3881 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+fetch> [return] ok 3882 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+fetch> [variable] ok 3883 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+fetch> [exception] ok 3884 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+fetch> [return] ok 3885 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+fetch> [variable] ok 3886 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+fetch> [exception] ok 3887 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+fetch> [return] ok 3888 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+fetch> [variable] ok 3889 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+exists> [exception] ok 3890 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+exists> [return] ok 3891 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+exists> [variable] ok 3892 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+exists> [exception] ok 3893 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+exists> [return] ok 3894 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+exists> [variable] ok 3895 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+exists> [exception] ok 3896 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+exists> [return] ok 3897 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+exists> [variable] ok 3898 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+exists> [exception] ok 3899 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+exists> [return] ok 3900 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+exists> [variable] ok 3901 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+exists> [exception] ok 3902 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+exists> [return] ok 3903 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+exists> [variable] ok 3904 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+exists> [exception] ok 3905 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+exists> [return] ok 3906 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+exists> [variable] ok 3907 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+exists> [exception] ok 3908 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+exists> [return] ok 3909 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+exists> [variable] ok 3910 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+exists> [exception] ok 3911 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+exists> [return] ok 3912 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+exists> [variable] ok 3913 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+exists> [exception] ok 3914 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+exists> [return] ok 3915 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+exists> [variable] ok 3916 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+exists> [exception] ok 3917 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+exists> [return] ok 3918 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+exists> [variable] ok 3919 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+exists> [exception] ok 3920 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+exists> [return] ok 3921 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+exists> [variable] ok 3922 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+exists> [exception] ok 3923 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+exists> [return] ok 3924 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+exists> [variable] ok 3925 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+exists> [exception] ok 3926 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+exists> [return] ok 3927 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+exists> [variable] ok 3928 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+exists> [exception] ok 3929 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+exists> [return] ok 3930 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+exists> [variable] ok 3931 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+exists> [exception] ok 3932 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+exists> [return] ok 3933 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+exists> [variable] ok 3934 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+exists> [exception] ok 3935 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+exists> [return] ok 3936 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+exists> [variable] ok 3937 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+exists> [exception] ok 3938 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+exists> [return] ok 3939 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+exists> [variable] ok 3940 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+exists> [exception] ok 3941 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+exists> [return] ok 3942 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+exists> [variable] ok 3943 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+delete> [exception] ok 3944 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+delete> [return] ok 3945 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+delete> [variable] ok 3946 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+delete> [exception] ok 3947 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+delete> [return] ok 3948 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+delete> [variable] ok 3949 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+delete> [exception] ok 3950 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+delete> [return] ok 3951 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+delete> [variable] ok 3952 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+delete> [exception] ok 3953 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+delete> [return] ok 3954 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+delete> [variable] ok 3955 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+delete> [exception] ok 3956 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+delete> [return] ok 3957 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+delete> [variable] ok 3958 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+delete> [exception] ok 3959 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+delete> [return] ok 3960 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+delete> [variable] ok 3961 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+delete> [exception] ok 3962 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+delete> [return] ok 3963 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+delete> [variable] ok 3964 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+delete> [exception] ok 3965 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+delete> [return] ok 3966 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+delete> [variable] ok 3967 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+delete> [exception] ok 3968 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+delete> [return] ok 3969 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+delete> [variable] ok 3970 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+delete> [exception] ok 3971 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+delete> [return] ok 3972 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+delete> [variable] ok 3973 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+delete> [exception] ok 3974 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+delete> [return] ok 3975 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+delete> [variable] ok 3976 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+delete> [exception] ok 3977 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+delete> [return] ok 3978 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+delete> [variable] ok 3979 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+delete> [exception] ok 3980 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+delete> [return] ok 3981 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+delete> [variable] ok 3982 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+delete> [exception] ok 3983 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+delete> [return] ok 3984 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+delete> [variable] ok 3985 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+delete> [exception] ok 3986 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+delete> [return] ok 3987 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+delete> [variable] ok 3988 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+delete> [exception] ok 3989 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+delete> [return] ok 3990 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+delete> [variable] ok 3991 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+delete> [exception] ok 3992 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+delete> [return] ok 3993 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+delete> [variable] ok 3994 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+delete> [exception] ok 3995 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+delete> [return] ok 3996 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+delete> [variable] ok 3997 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+store> [exception] ok 3998 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+store> [return] ok 3999 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+store> [variable] ok 4000 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+store> [exception] ok 4001 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+store> [return] ok 4002 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+store> [variable] ok 4003 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+store> [exception] ok 4004 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+store> [return] ok 4005 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+store> [variable] ok 4006 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+store> [exception] ok 4007 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+store> [return] ok 4008 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+store> [variable] ok 4009 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+store> [exception] ok 4010 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+store> [return] ok 4011 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+store> [variable] ok 4012 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+store> [exception] ok 4013 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+store> [return] ok 4014 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+store> [variable] ok 4015 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+store> [exception] ok 4016 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+store> [return] ok 4017 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+store> [variable] ok 4018 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+store> [exception] ok 4019 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+store> [return] ok 4020 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+store> [variable] ok 4021 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+store> [exception] ok 4022 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+store> [return] ok 4023 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+store> [variable] ok 4024 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+store> [exception] ok 4025 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+store> [return] ok 4026 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+store> [variable] ok 4027 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+store> [exception] ok 4028 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+store> [return] ok 4029 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+store> [variable] ok 4030 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+store> [exception] ok 4031 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+store> [return] ok 4032 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+store> [variable] ok 4033 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+store> [exception] ok 4034 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+store> [return] ok 4035 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+store> [variable] ok 4036 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+store> [exception] ok 4037 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+store> [return] ok 4038 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+store> [variable] ok 4039 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+store> [exception] ok 4040 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+store> [return] ok 4041 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+store> [variable] ok 4042 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+store> [exception] ok 4043 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+store> [return] ok 4044 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+store> [variable] ok 4045 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+store> [exception] ok 4046 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+store> [return] ok 4047 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+store> [variable] ok 4048 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+store> [exception] ok 4049 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+store> [return] ok 4050 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+store> [variable] ok 4051 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +fetch> [exception] ok 4052 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +fetch> [return] ok 4053 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +fetch> [variable] ok 4054 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +fetch> [exception] ok 4055 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +fetch> [return] ok 4056 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +fetch> [variable] ok 4057 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +fetch> [exception] ok 4058 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +fetch> [return] ok 4059 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +fetch> [variable] ok 4060 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +fetch> [exception] ok 4061 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +fetch> [return] ok 4062 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +fetch> [variable] ok 4063 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +fetch> [exception] ok 4064 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +fetch> [return] ok 4065 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +fetch> [variable] ok 4066 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +fetch> [exception] ok 4067 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +fetch> [return] ok 4068 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +fetch> [variable] ok 4069 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +fetch> [exception] ok 4070 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +fetch> [return] ok 4071 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +fetch> [variable] ok 4072 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +fetch> [exception] ok 4073 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +fetch> [return] ok 4074 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +fetch> [variable] ok 4075 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +fetch> [exception] ok 4076 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +fetch> [return] ok 4077 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +fetch> [variable] ok 4078 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +fetch> [exception] ok 4079 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +fetch> [return] ok 4080 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +fetch> [variable] ok 4081 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +fetch> [exception] ok 4082 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +fetch> [return] ok 4083 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +fetch> [variable] ok 4084 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +fetch> [exception] ok 4085 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +fetch> [return] ok 4086 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +fetch> [variable] ok 4087 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +fetch> [exception] ok 4088 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +fetch> [return] ok 4089 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +fetch> [variable] ok 4090 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +fetch> [exception] ok 4091 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +fetch> [return] ok 4092 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +fetch> [variable] ok 4093 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +fetch> [exception] ok 4094 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +fetch> [return] ok 4095 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +fetch> [variable] ok 4096 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +fetch> [exception] ok 4097 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +fetch> [return] ok 4098 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +fetch> [variable] ok 4099 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +fetch> [exception] ok 4100 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +fetch> [return] ok 4101 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +fetch> [variable] ok 4102 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +fetch> [exception] ok 4103 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +fetch> [return] ok 4104 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +fetch> [variable] ok 4105 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +exists> [exception] ok 4106 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +exists> [return] ok 4107 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +exists> [variable] ok 4108 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +exists> [exception] ok 4109 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +exists> [return] ok 4110 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +exists> [variable] ok 4111 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +exists> [exception] ok 4112 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +exists> [return] ok 4113 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +exists> [variable] ok 4114 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +exists> [exception] ok 4115 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +exists> [return] ok 4116 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +exists> [variable] ok 4117 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +exists> [exception] ok 4118 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +exists> [return] ok 4119 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +exists> [variable] ok 4120 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +exists> [exception] ok 4121 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +exists> [return] ok 4122 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +exists> [variable] ok 4123 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +exists> [exception] ok 4124 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +exists> [return] ok 4125 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +exists> [variable] ok 4126 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +exists> [exception] ok 4127 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +exists> [return] ok 4128 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +exists> [variable] ok 4129 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +exists> [exception] ok 4130 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +exists> [return] ok 4131 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +exists> [variable] ok 4132 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +exists> [exception] ok 4133 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +exists> [return] ok 4134 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +exists> [variable] ok 4135 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +exists> [exception] ok 4136 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +exists> [return] ok 4137 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +exists> [variable] ok 4138 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +exists> [exception] ok 4139 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +exists> [return] ok 4140 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +exists> [variable] ok 4141 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +exists> [exception] ok 4142 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +exists> [return] ok 4143 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +exists> [variable] ok 4144 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +exists> [exception] ok 4145 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +exists> [return] ok 4146 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +exists> [variable] ok 4147 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +exists> [exception] ok 4148 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +exists> [return] ok 4149 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +exists> [variable] ok 4150 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +exists> [exception] ok 4151 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +exists> [return] ok 4152 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +exists> [variable] ok 4153 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +exists> [exception] ok 4154 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +exists> [return] ok 4155 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +exists> [variable] ok 4156 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +exists> [exception] ok 4157 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +exists> [return] ok 4158 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +exists> [variable] ok 4159 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +delete> [exception] ok 4160 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +delete> [return] ok 4161 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +delete> [variable] ok 4162 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +delete> [exception] ok 4163 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +delete> [return] ok 4164 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +delete> [variable] ok 4165 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +delete> [exception] ok 4166 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +delete> [return] ok 4167 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +delete> [variable] ok 4168 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +delete> [exception] ok 4169 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +delete> [return] ok 4170 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +delete> [variable] ok 4171 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +delete> [exception] ok 4172 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +delete> [return] ok 4173 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +delete> [variable] ok 4174 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +delete> [exception] ok 4175 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +delete> [return] ok 4176 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +delete> [variable] ok 4177 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +delete> [exception] ok 4178 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +delete> [return] ok 4179 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +delete> [variable] ok 4180 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +delete> [exception] ok 4181 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +delete> [return] ok 4182 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +delete> [variable] ok 4183 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +delete> [exception] ok 4184 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +delete> [return] ok 4185 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +delete> [variable] ok 4186 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +delete> [exception] ok 4187 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +delete> [return] ok 4188 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +delete> [variable] ok 4189 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +delete> [exception] ok 4190 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +delete> [return] ok 4191 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +delete> [variable] ok 4192 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +delete> [exception] ok 4193 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +delete> [return] ok 4194 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +delete> [variable] ok 4195 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +delete> [exception] ok 4196 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +delete> [return] ok 4197 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +delete> [variable] ok 4198 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +delete> [exception] ok 4199 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +delete> [return] ok 4200 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +delete> [variable] ok 4201 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +delete> [exception] ok 4202 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +delete> [return] ok 4203 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +delete> [variable] ok 4204 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +delete> [exception] ok 4205 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +delete> [return] ok 4206 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +delete> [variable] ok 4207 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +delete> [exception] ok 4208 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +delete> [return] ok 4209 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +delete> [variable] ok 4210 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +delete> [exception] ok 4211 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +delete> [return] ok 4212 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +delete> [variable] ok 4213 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +store> [exception] ok 4214 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +store> [return] ok 4215 - my $x; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +store> [variable] ok 4216 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +store> [exception] ok 4217 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +store> [return] ok 4218 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +store> [variable] ok 4219 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +store> [exception] ok 4220 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +store> [return] ok 4221 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[0]] <+strict +store> [variable] ok 4222 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +store> [exception] ok 4223 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +store> [return] ok 4224 - my $x; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +store> [variable] ok 4225 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +store> [exception] ok 4226 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +store> [return] ok 4227 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +store> [variable] ok 4228 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +store> [exception] ok 4229 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +store> [return] ok 4230 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[0]] <+strict +store> [variable] ok 4231 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +store> [exception] ok 4232 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +store> [return] ok 4233 - my @x; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +store> [variable] ok 4234 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +store> [exception] ok 4235 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +store> [return] ok 4236 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +store> [variable] ok 4237 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +store> [exception] ok 4238 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +store> [return] ok 4239 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[0]] <+strict +store> [variable] ok 4240 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +store> [exception] ok 4241 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +store> [return] ok 4242 - my $x; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +store> [variable] ok 4243 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +store> [exception] ok 4244 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +store> [return] ok 4245 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +store> [variable] ok 4246 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +store> [exception] ok 4247 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +store> [return] ok 4248 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $x->[$N[1]] <+strict +store> [variable] ok 4249 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +store> [exception] ok 4250 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +store> [return] ok 4251 - my $x; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +store> [variable] ok 4252 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +store> [exception] ok 4253 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +store> [return] ok 4254 - our $x; local $x; use strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +store> [variable] ok 4255 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +store> [exception] ok 4256 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +store> [return] ok 4257 - our $x; local $x; no strict; $x->[$N[0]] = 1; exists $$x[$N[1]] <+strict +store> [variable] ok 4258 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +store> [exception] ok 4259 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +store> [return] ok 4260 - my @x; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +store> [variable] ok 4261 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +store> [exception] ok 4262 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +store> [return] ok 4263 - our @x; local @x; use strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +store> [variable] ok 4264 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +store> [exception] ok 4265 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +store> [return] ok 4266 - our @x; local @x; no strict; $x[$N[0]] = 1; exists $x[$N[1]] <+strict +store> [variable] ok 4267 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+fetch> [exception] ok 4268 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+fetch> [return] ok 4269 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+fetch> [variable] ok 4270 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+fetch> [exception] ok 4271 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+fetch> [return] ok 4272 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+fetch> [variable] ok 4273 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+fetch> [exception] ok 4274 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+fetch> [return] ok 4275 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+fetch> [variable] ok 4276 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+fetch> [exception] ok 4277 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+fetch> [return] ok 4278 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+fetch> [variable] ok 4279 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+fetch> [exception] ok 4280 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+fetch> [return] ok 4281 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+fetch> [variable] ok 4282 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+fetch> [exception] ok 4283 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+fetch> [return] ok 4284 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+fetch> [variable] ok 4285 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+fetch> [exception] ok 4286 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+fetch> [return] ok 4287 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+fetch> [variable] ok 4288 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+fetch> [exception] ok 4289 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+fetch> [return] ok 4290 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+fetch> [variable] ok 4291 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+fetch> [exception] ok 4292 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+fetch> [return] ok 4293 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+fetch> [variable] ok 4294 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+fetch> [exception] ok 4295 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+fetch> [return] ok 4296 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+fetch> [variable] ok 4297 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+fetch> [exception] ok 4298 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+fetch> [return] ok 4299 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+fetch> [variable] ok 4300 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+fetch> [exception] ok 4301 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+fetch> [return] ok 4302 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+fetch> [variable] ok 4303 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+fetch> [exception] ok 4304 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+fetch> [return] ok 4305 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+fetch> [variable] ok 4306 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+fetch> [exception] ok 4307 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+fetch> [return] ok 4308 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+fetch> [variable] ok 4309 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+fetch> [exception] ok 4310 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+fetch> [return] ok 4311 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+fetch> [variable] ok 4312 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+fetch> [exception] ok 4313 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+fetch> [return] ok 4314 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+fetch> [variable] ok 4315 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+fetch> [exception] ok 4316 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+fetch> [return] ok 4317 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+fetch> [variable] ok 4318 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+fetch> [exception] ok 4319 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+fetch> [return] ok 4320 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+fetch> [variable] ok 4321 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+fetch> [exception] ok 4322 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+fetch> [return] ok 4323 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+fetch> [variable] ok 4324 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+fetch> [exception] ok 4325 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+fetch> [return] ok 4326 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+fetch> [variable] ok 4327 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+fetch> [exception] ok 4328 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+fetch> [return] ok 4329 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+fetch> [variable] ok 4330 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+fetch> [exception] ok 4331 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+fetch> [return] ok 4332 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+fetch> [variable] ok 4333 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+fetch> [exception] ok 4334 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+fetch> [return] ok 4335 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+fetch> [variable] ok 4336 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+fetch> [exception] ok 4337 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+fetch> [return] ok 4338 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+fetch> [variable] ok 4339 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+fetch> [exception] ok 4340 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+fetch> [return] ok 4341 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+fetch> [variable] ok 4342 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+fetch> [exception] ok 4343 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+fetch> [return] ok 4344 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+fetch> [variable] ok 4345 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+fetch> [exception] ok 4346 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+fetch> [return] ok 4347 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+fetch> [variable] ok 4348 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+exists> [exception] ok 4349 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+exists> [return] ok 4350 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+exists> [variable] ok 4351 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+exists> [exception] ok 4352 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+exists> [return] ok 4353 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+exists> [variable] ok 4354 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+exists> [exception] ok 4355 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+exists> [return] ok 4356 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+exists> [variable] ok 4357 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+exists> [exception] ok 4358 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+exists> [return] ok 4359 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+exists> [variable] ok 4360 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+exists> [exception] ok 4361 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+exists> [return] ok 4362 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+exists> [variable] ok 4363 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+exists> [exception] ok 4364 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+exists> [return] ok 4365 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+exists> [variable] ok 4366 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+exists> [exception] ok 4367 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+exists> [return] ok 4368 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+exists> [variable] ok 4369 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+exists> [exception] ok 4370 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+exists> [return] ok 4371 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+exists> [variable] ok 4372 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+exists> [exception] ok 4373 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+exists> [return] ok 4374 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+exists> [variable] ok 4375 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+exists> [exception] ok 4376 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+exists> [return] ok 4377 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+exists> [variable] ok 4378 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+exists> [exception] ok 4379 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+exists> [return] ok 4380 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+exists> [variable] ok 4381 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+exists> [exception] ok 4382 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+exists> [return] ok 4383 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+exists> [variable] ok 4384 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+exists> [exception] ok 4385 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+exists> [return] ok 4386 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+exists> [variable] ok 4387 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+exists> [exception] ok 4388 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+exists> [return] ok 4389 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+exists> [variable] ok 4390 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+exists> [exception] ok 4391 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+exists> [return] ok 4392 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+exists> [variable] ok 4393 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+exists> [exception] ok 4394 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+exists> [return] ok 4395 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+exists> [variable] ok 4396 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+exists> [exception] ok 4397 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+exists> [return] ok 4398 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+exists> [variable] ok 4399 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+exists> [exception] ok 4400 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+exists> [return] ok 4401 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+exists> [variable] ok 4402 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+exists> [exception] ok 4403 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+exists> [return] ok 4404 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+exists> [variable] ok 4405 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+exists> [exception] ok 4406 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+exists> [return] ok 4407 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+exists> [variable] ok 4408 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+exists> [exception] ok 4409 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+exists> [return] ok 4410 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+exists> [variable] ok 4411 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+exists> [exception] ok 4412 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+exists> [return] ok 4413 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+exists> [variable] ok 4414 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+exists> [exception] ok 4415 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+exists> [return] ok 4416 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+exists> [variable] ok 4417 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+exists> [exception] ok 4418 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+exists> [return] ok 4419 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+exists> [variable] ok 4420 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+exists> [exception] ok 4421 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+exists> [return] ok 4422 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+exists> [variable] ok 4423 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+exists> [exception] ok 4424 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+exists> [return] ok 4425 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+exists> [variable] ok 4426 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+exists> [exception] ok 4427 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+exists> [return] ok 4428 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+exists> [variable] ok 4429 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+delete> [exception] ok 4430 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+delete> [return] ok 4431 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+delete> [variable] ok 4432 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+delete> [exception] ok 4433 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+delete> [return] ok 4434 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+delete> [variable] ok 4435 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+delete> [exception] ok 4436 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+delete> [return] ok 4437 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+delete> [variable] ok 4438 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+delete> [exception] ok 4439 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+delete> [return] ok 4440 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+delete> [variable] ok 4441 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+delete> [exception] ok 4442 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+delete> [return] ok 4443 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+delete> [variable] ok 4444 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+delete> [exception] ok 4445 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+delete> [return] ok 4446 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+delete> [variable] ok 4447 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+delete> [exception] ok 4448 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+delete> [return] ok 4449 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+delete> [variable] ok 4450 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+delete> [exception] ok 4451 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+delete> [return] ok 4452 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+delete> [variable] ok 4453 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+delete> [exception] ok 4454 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+delete> [return] ok 4455 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+delete> [variable] ok 4456 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+delete> [exception] ok 4457 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+delete> [return] ok 4458 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+delete> [variable] ok 4459 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+delete> [exception] ok 4460 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+delete> [return] ok 4461 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+delete> [variable] ok 4462 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+delete> [exception] ok 4463 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+delete> [return] ok 4464 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+delete> [variable] ok 4465 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+delete> [exception] ok 4466 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+delete> [return] ok 4467 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+delete> [variable] ok 4468 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+delete> [exception] ok 4469 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+delete> [return] ok 4470 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+delete> [variable] ok 4471 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+delete> [exception] ok 4472 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+delete> [return] ok 4473 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+delete> [variable] ok 4474 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+delete> [exception] ok 4475 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+delete> [return] ok 4476 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+delete> [variable] ok 4477 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+delete> [exception] ok 4478 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+delete> [return] ok 4479 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+delete> [variable] ok 4480 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+delete> [exception] ok 4481 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+delete> [return] ok 4482 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+delete> [variable] ok 4483 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+delete> [exception] ok 4484 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+delete> [return] ok 4485 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+delete> [variable] ok 4486 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+delete> [exception] ok 4487 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+delete> [return] ok 4488 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+delete> [variable] ok 4489 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+delete> [exception] ok 4490 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+delete> [return] ok 4491 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+delete> [variable] ok 4492 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+delete> [exception] ok 4493 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+delete> [return] ok 4494 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+delete> [variable] ok 4495 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+delete> [exception] ok 4496 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+delete> [return] ok 4497 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+delete> [variable] ok 4498 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+delete> [exception] ok 4499 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+delete> [return] ok 4500 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+delete> [variable] ok 4501 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+delete> [exception] ok 4502 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+delete> [return] ok 4503 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+delete> [variable] ok 4504 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+delete> [exception] ok 4505 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+delete> [return] ok 4506 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+delete> [variable] ok 4507 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+delete> [exception] ok 4508 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+delete> [return] ok 4509 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+delete> [variable] ok 4510 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+store> [exception] ok 4511 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+store> [return] ok 4512 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+store> [variable] ok 4513 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+store> [exception] ok 4514 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+store> [return] ok 4515 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+store> [variable] ok 4516 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+store> [exception] ok 4517 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+store> [return] ok 4518 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+store> [variable] ok 4519 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+store> [exception] ok 4520 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+store> [return] ok 4521 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+store> [variable] ok 4522 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+store> [exception] ok 4523 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+store> [return] ok 4524 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+store> [variable] ok 4525 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+store> [exception] ok 4526 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+store> [return] ok 4527 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+store> [variable] ok 4528 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+store> [exception] ok 4529 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+store> [return] ok 4530 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+store> [variable] ok 4531 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+store> [exception] ok 4532 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+store> [return] ok 4533 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+store> [variable] ok 4534 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+store> [exception] ok 4535 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+store> [return] ok 4536 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+store> [variable] ok 4537 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+store> [exception] ok 4538 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+store> [return] ok 4539 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+store> [variable] ok 4540 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+store> [exception] ok 4541 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+store> [return] ok 4542 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+store> [variable] ok 4543 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+store> [exception] ok 4544 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+store> [return] ok 4545 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+store> [variable] ok 4546 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+store> [exception] ok 4547 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+store> [return] ok 4548 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+store> [variable] ok 4549 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+store> [exception] ok 4550 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+store> [return] ok 4551 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+store> [variable] ok 4552 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+store> [exception] ok 4553 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+store> [return] ok 4554 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+store> [variable] ok 4555 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+store> [exception] ok 4556 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+store> [return] ok 4557 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+store> [variable] ok 4558 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+store> [exception] ok 4559 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+store> [return] ok 4560 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+store> [variable] ok 4561 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+store> [exception] ok 4562 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+store> [return] ok 4563 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+store> [variable] ok 4564 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+store> [exception] ok 4565 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+store> [return] ok 4566 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+store> [variable] ok 4567 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+store> [exception] ok 4568 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+store> [return] ok 4569 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+store> [variable] ok 4570 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+store> [exception] ok 4571 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+store> [return] ok 4572 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+store> [variable] ok 4573 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+store> [exception] ok 4574 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+store> [return] ok 4575 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+store> [variable] ok 4576 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+store> [exception] ok 4577 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+store> [return] ok 4578 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+store> [variable] ok 4579 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+store> [exception] ok 4580 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+store> [return] ok 4581 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+store> [variable] ok 4582 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+store> [exception] ok 4583 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+store> [return] ok 4584 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+store> [variable] ok 4585 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+store> [exception] ok 4586 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+store> [return] ok 4587 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+store> [variable] ok 4588 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+store> [exception] ok 4589 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+store> [return] ok 4590 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+store> [variable] ok 4591 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 4592 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 4593 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 4594 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 4595 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 4596 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 4597 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 4598 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 4599 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 4600 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 4601 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 4602 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 4603 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 4604 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 4605 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 4606 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 4607 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 4608 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 4609 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 4610 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 4611 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 4612 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 4613 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 4614 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 4615 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 4616 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 4617 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 4618 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 4619 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 4620 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 4621 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 4622 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 4623 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 4624 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 4625 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 4626 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 4627 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 4628 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 4629 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 4630 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 4631 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 4632 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 4633 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 4634 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 4635 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 4636 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 4637 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 4638 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 4639 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 4640 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 4641 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 4642 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 4643 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 4644 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 4645 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 4646 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 4647 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 4648 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 4649 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 4650 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 4651 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 4652 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 4653 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 4654 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 4655 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 4656 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 4657 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 4658 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 4659 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 4660 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 4661 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 4662 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 4663 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 4664 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 4665 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 4666 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 4667 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 4668 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 4669 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 4670 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 4671 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 4672 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 4673 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +exists> [return] ok 4674 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 4675 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 4676 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +exists> [return] ok 4677 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 4678 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 4679 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +exists> [return] ok 4680 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 4681 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 4682 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 4683 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 4684 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 4685 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 4686 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 4687 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 4688 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 4689 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 4690 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 4691 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 4692 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 4693 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 4694 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 4695 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 4696 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 4697 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 4698 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 4699 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 4700 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +exists> [return] ok 4701 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 4702 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 4703 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +exists> [return] ok 4704 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 4705 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 4706 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +exists> [return] ok 4707 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 4708 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 4709 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +exists> [return] ok 4710 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 4711 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 4712 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +exists> [return] ok 4713 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 4714 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 4715 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +exists> [return] ok 4716 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 4717 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 4718 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +exists> [return] ok 4719 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 4720 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 4721 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +exists> [return] ok 4722 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 4723 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 4724 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +exists> [return] ok 4725 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 4726 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 4727 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +exists> [return] ok 4728 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 4729 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 4730 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +exists> [return] ok 4731 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 4732 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 4733 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +exists> [return] ok 4734 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 4735 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 4736 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +exists> [return] ok 4737 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 4738 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 4739 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +exists> [return] ok 4740 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 4741 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 4742 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +exists> [return] ok 4743 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 4744 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 4745 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +exists> [return] ok 4746 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 4747 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 4748 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +exists> [return] ok 4749 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 4750 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 4751 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +exists> [return] ok 4752 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 4753 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 4754 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +delete> [return] ok 4755 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 4756 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 4757 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +delete> [return] ok 4758 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 4759 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 4760 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +delete> [return] ok 4761 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 4762 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 4763 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 4764 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 4765 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 4766 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 4767 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 4768 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 4769 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 4770 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 4771 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 4772 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 4773 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 4774 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 4775 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 4776 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 4777 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 4778 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 4779 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 4780 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 4781 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +delete> [return] ok 4782 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 4783 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 4784 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +delete> [return] ok 4785 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 4786 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 4787 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +delete> [return] ok 4788 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 4789 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 4790 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +delete> [return] ok 4791 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 4792 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 4793 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +delete> [return] ok 4794 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 4795 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 4796 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +delete> [return] ok 4797 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 4798 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 4799 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +delete> [return] ok 4800 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 4801 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 4802 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +delete> [return] ok 4803 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 4804 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 4805 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +delete> [return] ok 4806 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 4807 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 4808 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +delete> [return] ok 4809 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 4810 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 4811 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +delete> [return] ok 4812 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 4813 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 4814 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +delete> [return] ok 4815 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 4816 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 4817 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +delete> [return] ok 4818 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 4819 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 4820 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +delete> [return] ok 4821 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 4822 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 4823 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +delete> [return] ok 4824 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 4825 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 4826 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +delete> [return] ok 4827 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 4828 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 4829 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +delete> [return] ok 4830 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 4831 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 4832 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +delete> [return] ok 4833 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 4834 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +store> [exception] ok 4835 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +store> [return] ok 4836 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +store> [variable] ok 4837 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +store> [exception] ok 4838 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +store> [return] ok 4839 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +store> [variable] ok 4840 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +store> [exception] ok 4841 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +store> [return] ok 4842 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[1]] <+strict +store> [variable] ok 4843 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 4844 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +store> [return] ok 4845 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 4846 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 4847 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +store> [return] ok 4848 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 4849 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 4850 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +store> [return] ok 4851 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 4852 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 4853 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +store> [return] ok 4854 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 4855 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 4856 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +store> [return] ok 4857 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 4858 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 4859 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +store> [return] ok 4860 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 4861 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +store> [exception] ok 4862 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +store> [return] ok 4863 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +store> [variable] ok 4864 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +store> [exception] ok 4865 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +store> [return] ok 4866 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +store> [variable] ok 4867 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +store> [exception] ok 4868 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +store> [return] ok 4869 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[0]]->[$N[3]] <+strict +store> [variable] ok 4870 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +store> [exception] ok 4871 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +store> [return] ok 4872 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +store> [variable] ok 4873 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +store> [exception] ok 4874 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +store> [return] ok 4875 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +store> [variable] ok 4876 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +store> [exception] ok 4877 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +store> [return] ok 4878 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[0]]->[$N[3]] <+strict +store> [variable] ok 4879 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +store> [exception] ok 4880 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +store> [return] ok 4881 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +store> [variable] ok 4882 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +store> [exception] ok 4883 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +store> [return] ok 4884 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +store> [variable] ok 4885 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +store> [exception] ok 4886 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +store> [return] ok 4887 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[0]]->[$N[3]] <+strict +store> [variable] ok 4888 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +store> [exception] ok 4889 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +store> [return] ok 4890 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +store> [variable] ok 4891 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +store> [exception] ok 4892 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +store> [return] ok 4893 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +store> [variable] ok 4894 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +store> [exception] ok 4895 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +store> [return] ok 4896 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $x->[$N[2]]->[$N[3]] <+strict +store> [variable] ok 4897 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +store> [exception] ok 4898 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +store> [return] ok 4899 - my $x; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +store> [variable] ok 4900 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +store> [exception] ok 4901 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +store> [return] ok 4902 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +store> [variable] ok 4903 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +store> [exception] ok 4904 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +store> [return] ok 4905 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; exists $$x[$N[2]]->[$N[3]] <+strict +store> [variable] ok 4906 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +store> [exception] ok 4907 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +store> [return] ok 4908 - my @x; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +store> [variable] ok 4909 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +store> [exception] ok 4910 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +store> [return] ok 4911 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +store> [variable] ok 4912 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +store> [exception] ok 4913 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +store> [return] ok 4914 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; exists $x[$N[2]]->[$N[3]] <+strict +store> [variable] ok 4915 - my $x; delete $x->[$N[0]] [exception] ok 4916 - my $x; delete $x->[$N[0]] [return] ok 4917 - my $x; delete $x->[$N[0]] [variable] ok 4918 - our $x; local $x; use strict; delete $x->[$N[0]] [exception] ok 4919 - our $x; local $x; use strict; delete $x->[$N[0]] [return] ok 4920 - our $x; local $x; use strict; delete $x->[$N[0]] [variable] ok 4921 - our $x; local $x; no strict; delete $x->[$N[0]] [exception] ok 4922 - our $x; local $x; no strict; delete $x->[$N[0]] [return] ok 4923 - our $x; local $x; no strict; delete $x->[$N[0]] [variable] ok 4924 - my $x; delete $$x[$N[0]] [exception] ok 4925 - my $x; delete $$x[$N[0]] [return] ok 4926 - my $x; delete $$x[$N[0]] [variable] ok 4927 - our $x; local $x; use strict; delete $$x[$N[0]] [exception] ok 4928 - our $x; local $x; use strict; delete $$x[$N[0]] [return] ok 4929 - our $x; local $x; use strict; delete $$x[$N[0]] [variable] ok 4930 - our $x; local $x; no strict; delete $$x[$N[0]] [exception] ok 4931 - our $x; local $x; no strict; delete $$x[$N[0]] [return] ok 4932 - our $x; local $x; no strict; delete $$x[$N[0]] [variable] ok 4933 - my @x; delete $x[$N[0]] [exception] ok 4934 - my @x; delete $x[$N[0]] [return] ok 4935 - my @x; delete $x[$N[0]] [variable] ok 4936 - our @x; local @x; use strict; delete $x[$N[0]] [exception] ok 4937 - our @x; local @x; use strict; delete $x[$N[0]] [return] ok 4938 - our @x; local @x; use strict; delete $x[$N[0]] [variable] ok 4939 - our @x; local @x; no strict; delete $x[$N[0]] [exception] ok 4940 - our @x; local @x; no strict; delete $x[$N[0]] [return] ok 4941 - our @x; local @x; no strict; delete $x[$N[0]] [variable] ok 4942 - my $x; delete $x->[$N[0]] [exception] ok 4943 - my $x; delete $x->[$N[0]] [return] ok 4944 - my $x; delete $x->[$N[0]] [variable] ok 4945 - our $x; local $x; use strict; delete $x->[$N[0]] [exception] ok 4946 - our $x; local $x; use strict; delete $x->[$N[0]] [return] ok 4947 - our $x; local $x; use strict; delete $x->[$N[0]] [variable] ok 4948 - our $x; local $x; no strict; delete $x->[$N[0]] [exception] ok 4949 - our $x; local $x; no strict; delete $x->[$N[0]] [return] ok 4950 - our $x; local $x; no strict; delete $x->[$N[0]] [variable] ok 4951 - my $x; delete $$x[$N[0]] [exception] ok 4952 - my $x; delete $$x[$N[0]] [return] ok 4953 - my $x; delete $$x[$N[0]] [variable] ok 4954 - our $x; local $x; use strict; delete $$x[$N[0]] [exception] ok 4955 - our $x; local $x; use strict; delete $$x[$N[0]] [return] ok 4956 - our $x; local $x; use strict; delete $$x[$N[0]] [variable] ok 4957 - our $x; local $x; no strict; delete $$x[$N[0]] [exception] ok 4958 - our $x; local $x; no strict; delete $$x[$N[0]] [return] ok 4959 - our $x; local $x; no strict; delete $$x[$N[0]] [variable] ok 4960 - my @x; delete $x[$N[0]] [exception] ok 4961 - my @x; delete $x[$N[0]] [return] ok 4962 - my @x; delete $x[$N[0]] [variable] ok 4963 - our @x; local @x; use strict; delete $x[$N[0]] [exception] ok 4964 - our @x; local @x; use strict; delete $x[$N[0]] [return] ok 4965 - our @x; local @x; use strict; delete $x[$N[0]] [variable] ok 4966 - our @x; local @x; no strict; delete $x[$N[0]] [exception] ok 4967 - our @x; local @x; no strict; delete $x[$N[0]] [return] ok 4968 - our @x; local @x; no strict; delete $x[$N[0]] [variable] ok 4969 - my $x; delete $x->[$N[0]] <+fetch> [exception] ok 4970 - my $x; delete $x->[$N[0]] <+fetch> [return] ok 4971 - my $x; delete $x->[$N[0]] <+fetch> [variable] ok 4972 - our $x; local $x; use strict; delete $x->[$N[0]] <+fetch> [exception] ok 4973 - our $x; local $x; use strict; delete $x->[$N[0]] <+fetch> [return] ok 4974 - our $x; local $x; use strict; delete $x->[$N[0]] <+fetch> [variable] ok 4975 - our $x; local $x; no strict; delete $x->[$N[0]] <+fetch> [exception] ok 4976 - our $x; local $x; no strict; delete $x->[$N[0]] <+fetch> [return] ok 4977 - our $x; local $x; no strict; delete $x->[$N[0]] <+fetch> [variable] ok 4978 - my $x; delete $$x[$N[0]] <+fetch> [exception] ok 4979 - my $x; delete $$x[$N[0]] <+fetch> [return] ok 4980 - my $x; delete $$x[$N[0]] <+fetch> [variable] ok 4981 - our $x; local $x; use strict; delete $$x[$N[0]] <+fetch> [exception] ok 4982 - our $x; local $x; use strict; delete $$x[$N[0]] <+fetch> [return] ok 4983 - our $x; local $x; use strict; delete $$x[$N[0]] <+fetch> [variable] ok 4984 - our $x; local $x; no strict; delete $$x[$N[0]] <+fetch> [exception] ok 4985 - our $x; local $x; no strict; delete $$x[$N[0]] <+fetch> [return] ok 4986 - our $x; local $x; no strict; delete $$x[$N[0]] <+fetch> [variable] ok 4987 - my @x; delete $x[$N[0]] <+fetch> [exception] ok 4988 - my @x; delete $x[$N[0]] <+fetch> [return] ok 4989 - my @x; delete $x[$N[0]] <+fetch> [variable] ok 4990 - our @x; local @x; use strict; delete $x[$N[0]] <+fetch> [exception] ok 4991 - our @x; local @x; use strict; delete $x[$N[0]] <+fetch> [return] ok 4992 - our @x; local @x; use strict; delete $x[$N[0]] <+fetch> [variable] ok 4993 - our @x; local @x; no strict; delete $x[$N[0]] <+fetch> [exception] ok 4994 - our @x; local @x; no strict; delete $x[$N[0]] <+fetch> [return] ok 4995 - our @x; local @x; no strict; delete $x[$N[0]] <+fetch> [variable] ok 4996 - my $x; delete $x->[$N[0]] <+exists> [exception] ok 4997 - my $x; delete $x->[$N[0]] <+exists> [return] ok 4998 - my $x; delete $x->[$N[0]] <+exists> [variable] ok 4999 - our $x; local $x; use strict; delete $x->[$N[0]] <+exists> [exception] ok 5000 - our $x; local $x; use strict; delete $x->[$N[0]] <+exists> [return] ok 5001 - our $x; local $x; use strict; delete $x->[$N[0]] <+exists> [variable] ok 5002 - our $x; local $x; no strict; delete $x->[$N[0]] <+exists> [exception] ok 5003 - our $x; local $x; no strict; delete $x->[$N[0]] <+exists> [return] ok 5004 - our $x; local $x; no strict; delete $x->[$N[0]] <+exists> [variable] ok 5005 - my $x; delete $$x[$N[0]] <+exists> [exception] ok 5006 - my $x; delete $$x[$N[0]] <+exists> [return] ok 5007 - my $x; delete $$x[$N[0]] <+exists> [variable] ok 5008 - our $x; local $x; use strict; delete $$x[$N[0]] <+exists> [exception] ok 5009 - our $x; local $x; use strict; delete $$x[$N[0]] <+exists> [return] ok 5010 - our $x; local $x; use strict; delete $$x[$N[0]] <+exists> [variable] ok 5011 - our $x; local $x; no strict; delete $$x[$N[0]] <+exists> [exception] ok 5012 - our $x; local $x; no strict; delete $$x[$N[0]] <+exists> [return] ok 5013 - our $x; local $x; no strict; delete $$x[$N[0]] <+exists> [variable] ok 5014 - my @x; delete $x[$N[0]] <+exists> [exception] ok 5015 - my @x; delete $x[$N[0]] <+exists> [return] ok 5016 - my @x; delete $x[$N[0]] <+exists> [variable] ok 5017 - our @x; local @x; use strict; delete $x[$N[0]] <+exists> [exception] ok 5018 - our @x; local @x; use strict; delete $x[$N[0]] <+exists> [return] ok 5019 - our @x; local @x; use strict; delete $x[$N[0]] <+exists> [variable] ok 5020 - our @x; local @x; no strict; delete $x[$N[0]] <+exists> [exception] ok 5021 - our @x; local @x; no strict; delete $x[$N[0]] <+exists> [return] ok 5022 - our @x; local @x; no strict; delete $x[$N[0]] <+exists> [variable] ok 5023 - my $x; delete $x->[$N[0]] <+delete> [exception] ok 5024 - my $x; delete $x->[$N[0]] <+delete> [return] ok 5025 - my $x; delete $x->[$N[0]] <+delete> [variable] ok 5026 - our $x; local $x; use strict; delete $x->[$N[0]] <+delete> [exception] ok 5027 - our $x; local $x; use strict; delete $x->[$N[0]] <+delete> [return] ok 5028 - our $x; local $x; use strict; delete $x->[$N[0]] <+delete> [variable] ok 5029 - our $x; local $x; no strict; delete $x->[$N[0]] <+delete> [exception] ok 5030 - our $x; local $x; no strict; delete $x->[$N[0]] <+delete> [return] ok 5031 - our $x; local $x; no strict; delete $x->[$N[0]] <+delete> [variable] ok 5032 - my $x; delete $$x[$N[0]] <+delete> [exception] ok 5033 - my $x; delete $$x[$N[0]] <+delete> [return] ok 5034 - my $x; delete $$x[$N[0]] <+delete> [variable] ok 5035 - our $x; local $x; use strict; delete $$x[$N[0]] <+delete> [exception] ok 5036 - our $x; local $x; use strict; delete $$x[$N[0]] <+delete> [return] ok 5037 - our $x; local $x; use strict; delete $$x[$N[0]] <+delete> [variable] ok 5038 - our $x; local $x; no strict; delete $$x[$N[0]] <+delete> [exception] ok 5039 - our $x; local $x; no strict; delete $$x[$N[0]] <+delete> [return] ok 5040 - our $x; local $x; no strict; delete $$x[$N[0]] <+delete> [variable] ok 5041 - my @x; delete $x[$N[0]] <+delete> [exception] ok 5042 - my @x; delete $x[$N[0]] <+delete> [return] ok 5043 - my @x; delete $x[$N[0]] <+delete> [variable] ok 5044 - our @x; local @x; use strict; delete $x[$N[0]] <+delete> [exception] ok 5045 - our @x; local @x; use strict; delete $x[$N[0]] <+delete> [return] ok 5046 - our @x; local @x; use strict; delete $x[$N[0]] <+delete> [variable] ok 5047 - our @x; local @x; no strict; delete $x[$N[0]] <+delete> [exception] ok 5048 - our @x; local @x; no strict; delete $x[$N[0]] <+delete> [return] ok 5049 - our @x; local @x; no strict; delete $x[$N[0]] <+delete> [variable] ok 5050 - my $x; delete $x->[$N[0]] <+store> [exception] ok 5051 - my $x; delete $x->[$N[0]] <+store> [return] ok 5052 - my $x; delete $x->[$N[0]] <+store> [variable] ok 5053 - our $x; local $x; use strict; delete $x->[$N[0]] <+store> [exception] ok 5054 - our $x; local $x; use strict; delete $x->[$N[0]] <+store> [return] ok 5055 - our $x; local $x; use strict; delete $x->[$N[0]] <+store> [variable] ok 5056 - our $x; local $x; no strict; delete $x->[$N[0]] <+store> [exception] ok 5057 - our $x; local $x; no strict; delete $x->[$N[0]] <+store> [return] ok 5058 - our $x; local $x; no strict; delete $x->[$N[0]] <+store> [variable] ok 5059 - my $x; delete $$x[$N[0]] <+store> [exception] ok 5060 - my $x; delete $$x[$N[0]] <+store> [return] ok 5061 - my $x; delete $$x[$N[0]] <+store> [variable] ok 5062 - our $x; local $x; use strict; delete $$x[$N[0]] <+store> [exception] ok 5063 - our $x; local $x; use strict; delete $$x[$N[0]] <+store> [return] ok 5064 - our $x; local $x; use strict; delete $$x[$N[0]] <+store> [variable] ok 5065 - our $x; local $x; no strict; delete $$x[$N[0]] <+store> [exception] ok 5066 - our $x; local $x; no strict; delete $$x[$N[0]] <+store> [return] ok 5067 - our $x; local $x; no strict; delete $$x[$N[0]] <+store> [variable] ok 5068 - my @x; delete $x[$N[0]] <+store> [exception] ok 5069 - my @x; delete $x[$N[0]] <+store> [return] ok 5070 - my @x; delete $x[$N[0]] <+store> [variable] ok 5071 - our @x; local @x; use strict; delete $x[$N[0]] <+store> [exception] ok 5072 - our @x; local @x; use strict; delete $x[$N[0]] <+store> [return] ok 5073 - our @x; local @x; use strict; delete $x[$N[0]] <+store> [variable] ok 5074 - our @x; local @x; no strict; delete $x[$N[0]] <+store> [exception] ok 5075 - our @x; local @x; no strict; delete $x[$N[0]] <+store> [return] ok 5076 - our @x; local @x; no strict; delete $x[$N[0]] <+store> [variable] ok 5077 - my $x; delete $x->[$N[0]] <+strict +fetch> [exception] ok 5078 - my $x; delete $x->[$N[0]] <+strict +fetch> [return] ok 5079 - my $x; delete $x->[$N[0]] <+strict +fetch> [variable] ok 5080 - our $x; local $x; use strict; delete $x->[$N[0]] <+strict +fetch> [exception] ok 5081 - our $x; local $x; use strict; delete $x->[$N[0]] <+strict +fetch> [return] ok 5082 - our $x; local $x; use strict; delete $x->[$N[0]] <+strict +fetch> [variable] ok 5083 - our $x; local $x; no strict; delete $x->[$N[0]] <+strict +fetch> [exception] ok 5084 - our $x; local $x; no strict; delete $x->[$N[0]] <+strict +fetch> [return] ok 5085 - our $x; local $x; no strict; delete $x->[$N[0]] <+strict +fetch> [variable] ok 5086 - my $x; delete $$x[$N[0]] <+strict +fetch> [exception] ok 5087 - my $x; delete $$x[$N[0]] <+strict +fetch> [return] ok 5088 - my $x; delete $$x[$N[0]] <+strict +fetch> [variable] ok 5089 - our $x; local $x; use strict; delete $$x[$N[0]] <+strict +fetch> [exception] ok 5090 - our $x; local $x; use strict; delete $$x[$N[0]] <+strict +fetch> [return] ok 5091 - our $x; local $x; use strict; delete $$x[$N[0]] <+strict +fetch> [variable] ok 5092 - our $x; local $x; no strict; delete $$x[$N[0]] <+strict +fetch> [exception] ok 5093 - our $x; local $x; no strict; delete $$x[$N[0]] <+strict +fetch> [return] ok 5094 - our $x; local $x; no strict; delete $$x[$N[0]] <+strict +fetch> [variable] ok 5095 - my @x; delete $x[$N[0]] <+strict +fetch> [exception] ok 5096 - my @x; delete $x[$N[0]] <+strict +fetch> [return] ok 5097 - my @x; delete $x[$N[0]] <+strict +fetch> [variable] ok 5098 - our @x; local @x; use strict; delete $x[$N[0]] <+strict +fetch> [exception] ok 5099 - our @x; local @x; use strict; delete $x[$N[0]] <+strict +fetch> [return] ok 5100 - our @x; local @x; use strict; delete $x[$N[0]] <+strict +fetch> [variable] ok 5101 - our @x; local @x; no strict; delete $x[$N[0]] <+strict +fetch> [exception] ok 5102 - our @x; local @x; no strict; delete $x[$N[0]] <+strict +fetch> [return] ok 5103 - our @x; local @x; no strict; delete $x[$N[0]] <+strict +fetch> [variable] ok 5104 - my $x; delete $x->[$N[0]] <+strict +exists> [exception] ok 5105 - my $x; delete $x->[$N[0]] <+strict +exists> [return] ok 5106 - my $x; delete $x->[$N[0]] <+strict +exists> [variable] ok 5107 - our $x; local $x; use strict; delete $x->[$N[0]] <+strict +exists> [exception] ok 5108 - our $x; local $x; use strict; delete $x->[$N[0]] <+strict +exists> [return] ok 5109 - our $x; local $x; use strict; delete $x->[$N[0]] <+strict +exists> [variable] ok 5110 - our $x; local $x; no strict; delete $x->[$N[0]] <+strict +exists> [exception] ok 5111 - our $x; local $x; no strict; delete $x->[$N[0]] <+strict +exists> [return] ok 5112 - our $x; local $x; no strict; delete $x->[$N[0]] <+strict +exists> [variable] ok 5113 - my $x; delete $$x[$N[0]] <+strict +exists> [exception] ok 5114 - my $x; delete $$x[$N[0]] <+strict +exists> [return] ok 5115 - my $x; delete $$x[$N[0]] <+strict +exists> [variable] ok 5116 - our $x; local $x; use strict; delete $$x[$N[0]] <+strict +exists> [exception] ok 5117 - our $x; local $x; use strict; delete $$x[$N[0]] <+strict +exists> [return] ok 5118 - our $x; local $x; use strict; delete $$x[$N[0]] <+strict +exists> [variable] ok 5119 - our $x; local $x; no strict; delete $$x[$N[0]] <+strict +exists> [exception] ok 5120 - our $x; local $x; no strict; delete $$x[$N[0]] <+strict +exists> [return] ok 5121 - our $x; local $x; no strict; delete $$x[$N[0]] <+strict +exists> [variable] ok 5122 - my @x; delete $x[$N[0]] <+strict +exists> [exception] ok 5123 - my @x; delete $x[$N[0]] <+strict +exists> [return] ok 5124 - my @x; delete $x[$N[0]] <+strict +exists> [variable] ok 5125 - our @x; local @x; use strict; delete $x[$N[0]] <+strict +exists> [exception] ok 5126 - our @x; local @x; use strict; delete $x[$N[0]] <+strict +exists> [return] ok 5127 - our @x; local @x; use strict; delete $x[$N[0]] <+strict +exists> [variable] ok 5128 - our @x; local @x; no strict; delete $x[$N[0]] <+strict +exists> [exception] ok 5129 - our @x; local @x; no strict; delete $x[$N[0]] <+strict +exists> [return] ok 5130 - our @x; local @x; no strict; delete $x[$N[0]] <+strict +exists> [variable] ok 5131 - my $x; delete $x->[$N[0]] <+strict +delete> [exception] ok 5132 - my $x; delete $x->[$N[0]] <+strict +delete> [return] ok 5133 - my $x; delete $x->[$N[0]] <+strict +delete> [variable] ok 5134 - our $x; local $x; use strict; delete $x->[$N[0]] <+strict +delete> [exception] ok 5135 - our $x; local $x; use strict; delete $x->[$N[0]] <+strict +delete> [return] ok 5136 - our $x; local $x; use strict; delete $x->[$N[0]] <+strict +delete> [variable] ok 5137 - our $x; local $x; no strict; delete $x->[$N[0]] <+strict +delete> [exception] ok 5138 - our $x; local $x; no strict; delete $x->[$N[0]] <+strict +delete> [return] ok 5139 - our $x; local $x; no strict; delete $x->[$N[0]] <+strict +delete> [variable] ok 5140 - my $x; delete $$x[$N[0]] <+strict +delete> [exception] ok 5141 - my $x; delete $$x[$N[0]] <+strict +delete> [return] ok 5142 - my $x; delete $$x[$N[0]] <+strict +delete> [variable] ok 5143 - our $x; local $x; use strict; delete $$x[$N[0]] <+strict +delete> [exception] ok 5144 - our $x; local $x; use strict; delete $$x[$N[0]] <+strict +delete> [return] ok 5145 - our $x; local $x; use strict; delete $$x[$N[0]] <+strict +delete> [variable] ok 5146 - our $x; local $x; no strict; delete $$x[$N[0]] <+strict +delete> [exception] ok 5147 - our $x; local $x; no strict; delete $$x[$N[0]] <+strict +delete> [return] ok 5148 - our $x; local $x; no strict; delete $$x[$N[0]] <+strict +delete> [variable] ok 5149 - my @x; 1 <+strict +delete> [exception] ok 5150 - my @x; 1 <+strict +delete> [return] ok 5151 - my @x; 1 <+strict +delete> [variable] ok 5152 - our @x; local @x; use strict; 1 <+strict +delete> [exception] ok 5153 - our @x; local @x; use strict; 1 <+strict +delete> [return] ok 5154 - our @x; local @x; use strict; 1 <+strict +delete> [variable] ok 5155 - our @x; local @x; no strict; 1 <+strict +delete> [exception] ok 5156 - our @x; local @x; no strict; 1 <+strict +delete> [return] ok 5157 - our @x; local @x; no strict; 1 <+strict +delete> [variable] ok 5158 - my $x; delete $x->[$N[0]] <+strict +store> [exception] ok 5159 - my $x; delete $x->[$N[0]] <+strict +store> [return] ok 5160 - my $x; delete $x->[$N[0]] <+strict +store> [variable] ok 5161 - our $x; local $x; use strict; delete $x->[$N[0]] <+strict +store> [exception] ok 5162 - our $x; local $x; use strict; delete $x->[$N[0]] <+strict +store> [return] ok 5163 - our $x; local $x; use strict; delete $x->[$N[0]] <+strict +store> [variable] ok 5164 - our $x; local $x; no strict; delete $x->[$N[0]] <+strict +store> [exception] ok 5165 - our $x; local $x; no strict; delete $x->[$N[0]] <+strict +store> [return] ok 5166 - our $x; local $x; no strict; delete $x->[$N[0]] <+strict +store> [variable] ok 5167 - my $x; delete $$x[$N[0]] <+strict +store> [exception] ok 5168 - my $x; delete $$x[$N[0]] <+strict +store> [return] ok 5169 - my $x; delete $$x[$N[0]] <+strict +store> [variable] ok 5170 - our $x; local $x; use strict; delete $$x[$N[0]] <+strict +store> [exception] ok 5171 - our $x; local $x; use strict; delete $$x[$N[0]] <+strict +store> [return] ok 5172 - our $x; local $x; use strict; delete $$x[$N[0]] <+strict +store> [variable] ok 5173 - our $x; local $x; no strict; delete $$x[$N[0]] <+strict +store> [exception] ok 5174 - our $x; local $x; no strict; delete $$x[$N[0]] <+strict +store> [return] ok 5175 - our $x; local $x; no strict; delete $$x[$N[0]] <+strict +store> [variable] ok 5176 - my @x; delete $x[$N[0]] <+strict +store> [exception] ok 5177 - my @x; delete $x[$N[0]] <+strict +store> [return] ok 5178 - my @x; delete $x[$N[0]] <+strict +store> [variable] ok 5179 - our @x; local @x; use strict; delete $x[$N[0]] <+strict +store> [exception] ok 5180 - our @x; local @x; use strict; delete $x[$N[0]] <+strict +store> [return] ok 5181 - our @x; local @x; use strict; delete $x[$N[0]] <+strict +store> [variable] ok 5182 - our @x; local @x; no strict; delete $x[$N[0]] <+strict +store> [exception] ok 5183 - our @x; local @x; no strict; delete $x[$N[0]] <+strict +store> [return] ok 5184 - our @x; local @x; no strict; delete $x[$N[0]] <+strict +store> [variable] ok 5185 - my $x; delete $x->[$N[0]]->[$N[1]] [exception] ok 5186 - my $x; delete $x->[$N[0]]->[$N[1]] [return] ok 5187 - my $x; delete $x->[$N[0]]->[$N[1]] [variable] ok 5188 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] [exception] ok 5189 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] [return] ok 5190 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] [variable] ok 5191 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] [exception] ok 5192 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] [return] ok 5193 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] [variable] ok 5194 - my $x; delete $$x[$N[0]]->[$N[1]] [exception] ok 5195 - my $x; delete $$x[$N[0]]->[$N[1]] [return] ok 5196 - my $x; delete $$x[$N[0]]->[$N[1]] [variable] ok 5197 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] [exception] ok 5198 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] [return] ok 5199 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] [variable] ok 5200 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] [exception] ok 5201 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] [return] ok 5202 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] [variable] ok 5203 - my @x; delete $x[$N[0]]->[$N[1]] [exception] ok 5204 - my @x; delete $x[$N[0]]->[$N[1]] [return] ok 5205 - my @x; delete $x[$N[0]]->[$N[1]] [variable] ok 5206 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] [exception] ok 5207 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] [return] ok 5208 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] [variable] ok 5209 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] [exception] ok 5210 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] [return] ok 5211 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] [variable] ok 5212 - my $x; delete $x->[$N[0]]->[$N[1]] [exception] ok 5213 - my $x; delete $x->[$N[0]]->[$N[1]] [return] ok 5214 - my $x; delete $x->[$N[0]]->[$N[1]] [variable] ok 5215 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] [exception] ok 5216 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] [return] ok 5217 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] [variable] ok 5218 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] [exception] ok 5219 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] [return] ok 5220 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] [variable] ok 5221 - my $x; delete $$x[$N[0]]->[$N[1]] [exception] ok 5222 - my $x; delete $$x[$N[0]]->[$N[1]] [return] ok 5223 - my $x; delete $$x[$N[0]]->[$N[1]] [variable] ok 5224 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] [exception] ok 5225 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] [return] ok 5226 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] [variable] ok 5227 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] [exception] ok 5228 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] [return] ok 5229 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] [variable] ok 5230 - my @x; delete $x[$N[0]]->[$N[1]] [exception] ok 5231 - my @x; delete $x[$N[0]]->[$N[1]] [return] ok 5232 - my @x; delete $x[$N[0]]->[$N[1]] [variable] ok 5233 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] [exception] ok 5234 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] [return] ok 5235 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] [variable] ok 5236 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] [exception] ok 5237 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] [return] ok 5238 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] [variable] ok 5239 - my $x; delete $x->[$N[0]]->[$N[1]] <+fetch> [exception] ok 5240 - my $x; delete $x->[$N[0]]->[$N[1]] <+fetch> [return] ok 5241 - my $x; delete $x->[$N[0]]->[$N[1]] <+fetch> [variable] ok 5242 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+fetch> [exception] ok 5243 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+fetch> [return] ok 5244 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+fetch> [variable] ok 5245 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+fetch> [exception] ok 5246 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+fetch> [return] ok 5247 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+fetch> [variable] ok 5248 - my $x; delete $$x[$N[0]]->[$N[1]] <+fetch> [exception] ok 5249 - my $x; delete $$x[$N[0]]->[$N[1]] <+fetch> [return] ok 5250 - my $x; delete $$x[$N[0]]->[$N[1]] <+fetch> [variable] ok 5251 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+fetch> [exception] ok 5252 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+fetch> [return] ok 5253 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+fetch> [variable] ok 5254 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+fetch> [exception] ok 5255 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+fetch> [return] ok 5256 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+fetch> [variable] ok 5257 - my @x; delete $x[$N[0]]->[$N[1]] <+fetch> [exception] ok 5258 - my @x; delete $x[$N[0]]->[$N[1]] <+fetch> [return] ok 5259 - my @x; delete $x[$N[0]]->[$N[1]] <+fetch> [variable] ok 5260 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+fetch> [exception] ok 5261 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+fetch> [return] ok 5262 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+fetch> [variable] ok 5263 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+fetch> [exception] ok 5264 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+fetch> [return] ok 5265 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+fetch> [variable] ok 5266 - my $x; delete $x->[$N[0]]->[$N[1]] <+exists> [exception] ok 5267 - my $x; delete $x->[$N[0]]->[$N[1]] <+exists> [return] ok 5268 - my $x; delete $x->[$N[0]]->[$N[1]] <+exists> [variable] ok 5269 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+exists> [exception] ok 5270 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+exists> [return] ok 5271 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+exists> [variable] ok 5272 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+exists> [exception] ok 5273 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+exists> [return] ok 5274 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+exists> [variable] ok 5275 - my $x; delete $$x[$N[0]]->[$N[1]] <+exists> [exception] ok 5276 - my $x; delete $$x[$N[0]]->[$N[1]] <+exists> [return] ok 5277 - my $x; delete $$x[$N[0]]->[$N[1]] <+exists> [variable] ok 5278 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+exists> [exception] ok 5279 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+exists> [return] ok 5280 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+exists> [variable] ok 5281 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+exists> [exception] ok 5282 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+exists> [return] ok 5283 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+exists> [variable] ok 5284 - my @x; delete $x[$N[0]]->[$N[1]] <+exists> [exception] ok 5285 - my @x; delete $x[$N[0]]->[$N[1]] <+exists> [return] ok 5286 - my @x; delete $x[$N[0]]->[$N[1]] <+exists> [variable] ok 5287 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+exists> [exception] ok 5288 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+exists> [return] ok 5289 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+exists> [variable] ok 5290 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+exists> [exception] ok 5291 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+exists> [return] ok 5292 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+exists> [variable] ok 5293 - my $x; delete $x->[$N[0]]->[$N[1]] <+delete> [exception] ok 5294 - my $x; delete $x->[$N[0]]->[$N[1]] <+delete> [return] ok 5295 - my $x; delete $x->[$N[0]]->[$N[1]] <+delete> [variable] ok 5296 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+delete> [exception] ok 5297 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+delete> [return] ok 5298 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+delete> [variable] ok 5299 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+delete> [exception] ok 5300 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+delete> [return] ok 5301 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+delete> [variable] ok 5302 - my $x; delete $$x[$N[0]]->[$N[1]] <+delete> [exception] ok 5303 - my $x; delete $$x[$N[0]]->[$N[1]] <+delete> [return] ok 5304 - my $x; delete $$x[$N[0]]->[$N[1]] <+delete> [variable] ok 5305 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+delete> [exception] ok 5306 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+delete> [return] ok 5307 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+delete> [variable] ok 5308 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+delete> [exception] ok 5309 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+delete> [return] ok 5310 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+delete> [variable] ok 5311 - my @x; delete $x[$N[0]]->[$N[1]] <+delete> [exception] ok 5312 - my @x; delete $x[$N[0]]->[$N[1]] <+delete> [return] ok 5313 - my @x; delete $x[$N[0]]->[$N[1]] <+delete> [variable] ok 5314 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+delete> [exception] ok 5315 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+delete> [return] ok 5316 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+delete> [variable] ok 5317 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+delete> [exception] ok 5318 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+delete> [return] ok 5319 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+delete> [variable] ok 5320 - my $x; delete $x->[$N[0]]->[$N[1]] <+store> [exception] ok 5321 - my $x; delete $x->[$N[0]]->[$N[1]] <+store> [return] ok 5322 - my $x; delete $x->[$N[0]]->[$N[1]] <+store> [variable] ok 5323 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+store> [exception] ok 5324 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+store> [return] ok 5325 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+store> [variable] ok 5326 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+store> [exception] ok 5327 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+store> [return] ok 5328 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+store> [variable] ok 5329 - my $x; delete $$x[$N[0]]->[$N[1]] <+store> [exception] ok 5330 - my $x; delete $$x[$N[0]]->[$N[1]] <+store> [return] ok 5331 - my $x; delete $$x[$N[0]]->[$N[1]] <+store> [variable] ok 5332 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+store> [exception] ok 5333 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+store> [return] ok 5334 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+store> [variable] ok 5335 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+store> [exception] ok 5336 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+store> [return] ok 5337 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+store> [variable] ok 5338 - my @x; delete $x[$N[0]]->[$N[1]] <+store> [exception] ok 5339 - my @x; delete $x[$N[0]]->[$N[1]] <+store> [return] ok 5340 - my @x; delete $x[$N[0]]->[$N[1]] <+store> [variable] ok 5341 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+store> [exception] ok 5342 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+store> [return] ok 5343 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+store> [variable] ok 5344 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+store> [exception] ok 5345 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+store> [return] ok 5346 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+store> [variable] ok 5347 - my $x; delete $x->[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 5348 - my $x; delete $x->[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 5349 - my $x; delete $x->[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 5350 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 5351 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 5352 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 5353 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 5354 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 5355 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 5356 - my $x; delete $$x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 5357 - my $x; delete $$x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 5358 - my $x; delete $$x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 5359 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 5360 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 5361 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 5362 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 5363 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 5364 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 5365 - my @x; delete $x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 5366 - my @x; delete $x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 5367 - my @x; delete $x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 5368 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 5369 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 5370 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 5371 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 5372 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 5373 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 5374 - my $x; delete $x->[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 5375 - my $x; delete $x->[$N[0]]->[$N[1]] <+strict +exists> [return] ok 5376 - my $x; delete $x->[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 5377 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 5378 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+strict +exists> [return] ok 5379 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 5380 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 5381 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+strict +exists> [return] ok 5382 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 5383 - my $x; delete $$x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 5384 - my $x; delete $$x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 5385 - my $x; delete $$x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 5386 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 5387 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 5388 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 5389 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 5390 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 5391 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 5392 - my @x; delete $x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 5393 - my @x; delete $x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 5394 - my @x; delete $x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 5395 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 5396 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 5397 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 5398 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 5399 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 5400 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 5401 - my $x; delete $x->[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 5402 - my $x; delete $x->[$N[0]]->[$N[1]] <+strict +delete> [return] ok 5403 - my $x; delete $x->[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 5404 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 5405 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+strict +delete> [return] ok 5406 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 5407 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 5408 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+strict +delete> [return] ok 5409 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 5410 - my $x; delete $$x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 5411 - my $x; delete $$x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 5412 - my $x; delete $$x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 5413 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 5414 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 5415 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 5416 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 5417 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 5418 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 5419 - my @x; delete $x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 5420 - my @x; delete $x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 5421 - my @x; delete $x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 5422 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 5423 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 5424 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 5425 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 5426 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 5427 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 5428 - my $x; delete $x->[$N[0]]->[$N[1]] <+strict +store> [exception] ok 5429 - my $x; delete $x->[$N[0]]->[$N[1]] <+strict +store> [return] ok 5430 - my $x; delete $x->[$N[0]]->[$N[1]] <+strict +store> [variable] ok 5431 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+strict +store> [exception] ok 5432 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+strict +store> [return] ok 5433 - our $x; local $x; use strict; delete $x->[$N[0]]->[$N[1]] <+strict +store> [variable] ok 5434 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+strict +store> [exception] ok 5435 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+strict +store> [return] ok 5436 - our $x; local $x; no strict; delete $x->[$N[0]]->[$N[1]] <+strict +store> [variable] ok 5437 - my $x; delete $$x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 5438 - my $x; delete $$x[$N[0]]->[$N[1]] <+strict +store> [return] ok 5439 - my $x; delete $$x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 5440 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 5441 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+strict +store> [return] ok 5442 - our $x; local $x; use strict; delete $$x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 5443 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 5444 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+strict +store> [return] ok 5445 - our $x; local $x; no strict; delete $$x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 5446 - my @x; delete $x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 5447 - my @x; delete $x[$N[0]]->[$N[1]] <+strict +store> [return] ok 5448 - my @x; delete $x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 5449 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 5450 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+strict +store> [return] ok 5451 - our @x; local @x; use strict; delete $x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 5452 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 5453 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+strict +store> [return] ok 5454 - our @x; local @x; no strict; delete $x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 5455 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+fetch> [exception] ok 5456 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+fetch> [return] ok 5457 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+fetch> [variable] ok 5458 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+fetch> [exception] ok 5459 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+fetch> [return] ok 5460 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+fetch> [variable] ok 5461 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+fetch> [exception] ok 5462 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+fetch> [return] ok 5463 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+fetch> [variable] ok 5464 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+fetch> [exception] ok 5465 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+fetch> [return] ok 5466 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+fetch> [variable] ok 5467 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+fetch> [exception] ok 5468 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+fetch> [return] ok 5469 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+fetch> [variable] ok 5470 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+fetch> [exception] ok 5471 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+fetch> [return] ok 5472 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+fetch> [variable] ok 5473 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+fetch> [exception] ok 5474 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+fetch> [return] ok 5475 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+fetch> [variable] ok 5476 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+fetch> [exception] ok 5477 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+fetch> [return] ok 5478 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+fetch> [variable] ok 5479 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+fetch> [exception] ok 5480 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+fetch> [return] ok 5481 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+fetch> [variable] ok 5482 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+fetch> [exception] ok 5483 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+fetch> [return] ok 5484 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+fetch> [variable] ok 5485 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+fetch> [exception] ok 5486 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+fetch> [return] ok 5487 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+fetch> [variable] ok 5488 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+fetch> [exception] ok 5489 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+fetch> [return] ok 5490 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+fetch> [variable] ok 5491 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+fetch> [exception] ok 5492 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+fetch> [return] ok 5493 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+fetch> [variable] ok 5494 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+fetch> [exception] ok 5495 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+fetch> [return] ok 5496 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+fetch> [variable] ok 5497 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+fetch> [exception] ok 5498 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+fetch> [return] ok 5499 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+fetch> [variable] ok 5500 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+fetch> [exception] ok 5501 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+fetch> [return] ok 5502 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+fetch> [variable] ok 5503 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+fetch> [exception] ok 5504 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+fetch> [return] ok 5505 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+fetch> [variable] ok 5506 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+fetch> [exception] ok 5507 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+fetch> [return] ok 5508 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+fetch> [variable] ok 5509 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+exists> [exception] ok 5510 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+exists> [return] ok 5511 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+exists> [variable] ok 5512 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+exists> [exception] ok 5513 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+exists> [return] ok 5514 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+exists> [variable] ok 5515 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+exists> [exception] ok 5516 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+exists> [return] ok 5517 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+exists> [variable] ok 5518 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+exists> [exception] ok 5519 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+exists> [return] ok 5520 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+exists> [variable] ok 5521 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+exists> [exception] ok 5522 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+exists> [return] ok 5523 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+exists> [variable] ok 5524 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+exists> [exception] ok 5525 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+exists> [return] ok 5526 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+exists> [variable] ok 5527 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+exists> [exception] ok 5528 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+exists> [return] ok 5529 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+exists> [variable] ok 5530 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+exists> [exception] ok 5531 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+exists> [return] ok 5532 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+exists> [variable] ok 5533 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+exists> [exception] ok 5534 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+exists> [return] ok 5535 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+exists> [variable] ok 5536 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+exists> [exception] ok 5537 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+exists> [return] ok 5538 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+exists> [variable] ok 5539 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+exists> [exception] ok 5540 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+exists> [return] ok 5541 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+exists> [variable] ok 5542 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+exists> [exception] ok 5543 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+exists> [return] ok 5544 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+exists> [variable] ok 5545 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+exists> [exception] ok 5546 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+exists> [return] ok 5547 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+exists> [variable] ok 5548 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+exists> [exception] ok 5549 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+exists> [return] ok 5550 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+exists> [variable] ok 5551 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+exists> [exception] ok 5552 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+exists> [return] ok 5553 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+exists> [variable] ok 5554 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+exists> [exception] ok 5555 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+exists> [return] ok 5556 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+exists> [variable] ok 5557 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+exists> [exception] ok 5558 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+exists> [return] ok 5559 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+exists> [variable] ok 5560 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+exists> [exception] ok 5561 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+exists> [return] ok 5562 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+exists> [variable] ok 5563 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+delete> [exception] ok 5564 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+delete> [return] ok 5565 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+delete> [variable] ok 5566 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+delete> [exception] ok 5567 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+delete> [return] ok 5568 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+delete> [variable] ok 5569 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+delete> [exception] ok 5570 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+delete> [return] ok 5571 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+delete> [variable] ok 5572 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+delete> [exception] ok 5573 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+delete> [return] ok 5574 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+delete> [variable] ok 5575 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+delete> [exception] ok 5576 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+delete> [return] ok 5577 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+delete> [variable] ok 5578 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+delete> [exception] ok 5579 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+delete> [return] ok 5580 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+delete> [variable] ok 5581 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+delete> [exception] ok 5582 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+delete> [return] ok 5583 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+delete> [variable] ok 5584 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+delete> [exception] ok 5585 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+delete> [return] ok 5586 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+delete> [variable] ok 5587 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+delete> [exception] ok 5588 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+delete> [return] ok 5589 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+delete> [variable] ok 5590 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+delete> [exception] ok 5591 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+delete> [return] ok 5592 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+delete> [variable] ok 5593 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+delete> [exception] ok 5594 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+delete> [return] ok 5595 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+delete> [variable] ok 5596 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+delete> [exception] ok 5597 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+delete> [return] ok 5598 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+delete> [variable] ok 5599 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+delete> [exception] ok 5600 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+delete> [return] ok 5601 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+delete> [variable] ok 5602 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+delete> [exception] ok 5603 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+delete> [return] ok 5604 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+delete> [variable] ok 5605 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+delete> [exception] ok 5606 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+delete> [return] ok 5607 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+delete> [variable] ok 5608 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+delete> [exception] ok 5609 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+delete> [return] ok 5610 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+delete> [variable] ok 5611 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+delete> [exception] ok 5612 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+delete> [return] ok 5613 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+delete> [variable] ok 5614 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+delete> [exception] ok 5615 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+delete> [return] ok 5616 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+delete> [variable] ok 5617 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+store> [exception] ok 5618 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+store> [return] ok 5619 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+store> [variable] ok 5620 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+store> [exception] ok 5621 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+store> [return] ok 5622 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+store> [variable] ok 5623 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+store> [exception] ok 5624 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+store> [return] ok 5625 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+store> [variable] ok 5626 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+store> [exception] ok 5627 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+store> [return] ok 5628 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+store> [variable] ok 5629 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+store> [exception] ok 5630 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+store> [return] ok 5631 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+store> [variable] ok 5632 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+store> [exception] ok 5633 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+store> [return] ok 5634 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+store> [variable] ok 5635 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+store> [exception] ok 5636 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+store> [return] ok 5637 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+store> [variable] ok 5638 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+store> [exception] ok 5639 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+store> [return] ok 5640 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+store> [variable] ok 5641 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+store> [exception] ok 5642 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+store> [return] ok 5643 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+store> [variable] ok 5644 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+store> [exception] ok 5645 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+store> [return] ok 5646 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+store> [variable] ok 5647 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+store> [exception] ok 5648 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+store> [return] ok 5649 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+store> [variable] ok 5650 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+store> [exception] ok 5651 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+store> [return] ok 5652 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+store> [variable] ok 5653 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+store> [exception] ok 5654 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+store> [return] ok 5655 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+store> [variable] ok 5656 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+store> [exception] ok 5657 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+store> [return] ok 5658 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+store> [variable] ok 5659 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+store> [exception] ok 5660 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+store> [return] ok 5661 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+store> [variable] ok 5662 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+store> [exception] ok 5663 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+store> [return] ok 5664 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+store> [variable] ok 5665 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+store> [exception] ok 5666 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+store> [return] ok 5667 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+store> [variable] ok 5668 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+store> [exception] ok 5669 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+store> [return] ok 5670 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+store> [variable] ok 5671 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +fetch> [exception] ok 5672 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +fetch> [return] ok 5673 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +fetch> [variable] ok 5674 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +fetch> [exception] ok 5675 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +fetch> [return] ok 5676 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +fetch> [variable] ok 5677 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +fetch> [exception] ok 5678 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +fetch> [return] ok 5679 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +fetch> [variable] ok 5680 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +fetch> [exception] ok 5681 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +fetch> [return] ok 5682 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +fetch> [variable] ok 5683 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +fetch> [exception] ok 5684 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +fetch> [return] ok 5685 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +fetch> [variable] ok 5686 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +fetch> [exception] ok 5687 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +fetch> [return] ok 5688 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +fetch> [variable] ok 5689 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +fetch> [exception] ok 5690 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +fetch> [return] ok 5691 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +fetch> [variable] ok 5692 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +fetch> [exception] ok 5693 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +fetch> [return] ok 5694 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +fetch> [variable] ok 5695 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +fetch> [exception] ok 5696 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +fetch> [return] ok 5697 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +fetch> [variable] ok 5698 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +fetch> [exception] ok 5699 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +fetch> [return] ok 5700 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +fetch> [variable] ok 5701 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +fetch> [exception] ok 5702 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +fetch> [return] ok 5703 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +fetch> [variable] ok 5704 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +fetch> [exception] ok 5705 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +fetch> [return] ok 5706 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +fetch> [variable] ok 5707 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +fetch> [exception] ok 5708 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +fetch> [return] ok 5709 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +fetch> [variable] ok 5710 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +fetch> [exception] ok 5711 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +fetch> [return] ok 5712 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +fetch> [variable] ok 5713 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +fetch> [exception] ok 5714 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +fetch> [return] ok 5715 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +fetch> [variable] ok 5716 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +fetch> [exception] ok 5717 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +fetch> [return] ok 5718 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +fetch> [variable] ok 5719 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +fetch> [exception] ok 5720 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +fetch> [return] ok 5721 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +fetch> [variable] ok 5722 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +fetch> [exception] ok 5723 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +fetch> [return] ok 5724 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +fetch> [variable] ok 5725 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +exists> [exception] ok 5726 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +exists> [return] ok 5727 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +exists> [variable] ok 5728 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +exists> [exception] ok 5729 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +exists> [return] ok 5730 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +exists> [variable] ok 5731 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +exists> [exception] ok 5732 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +exists> [return] ok 5733 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +exists> [variable] ok 5734 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +exists> [exception] ok 5735 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +exists> [return] ok 5736 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +exists> [variable] ok 5737 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +exists> [exception] ok 5738 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +exists> [return] ok 5739 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +exists> [variable] ok 5740 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +exists> [exception] ok 5741 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +exists> [return] ok 5742 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +exists> [variable] ok 5743 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +exists> [exception] ok 5744 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +exists> [return] ok 5745 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +exists> [variable] ok 5746 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +exists> [exception] ok 5747 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +exists> [return] ok 5748 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +exists> [variable] ok 5749 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +exists> [exception] ok 5750 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +exists> [return] ok 5751 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +exists> [variable] ok 5752 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +exists> [exception] ok 5753 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +exists> [return] ok 5754 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +exists> [variable] ok 5755 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +exists> [exception] ok 5756 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +exists> [return] ok 5757 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +exists> [variable] ok 5758 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +exists> [exception] ok 5759 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +exists> [return] ok 5760 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +exists> [variable] ok 5761 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +exists> [exception] ok 5762 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +exists> [return] ok 5763 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +exists> [variable] ok 5764 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +exists> [exception] ok 5765 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +exists> [return] ok 5766 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +exists> [variable] ok 5767 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +exists> [exception] ok 5768 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +exists> [return] ok 5769 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +exists> [variable] ok 5770 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +exists> [exception] ok 5771 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +exists> [return] ok 5772 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +exists> [variable] ok 5773 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +exists> [exception] ok 5774 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +exists> [return] ok 5775 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +exists> [variable] ok 5776 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +exists> [exception] ok 5777 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +exists> [return] ok 5778 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +exists> [variable] ok 5779 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +delete> [exception] ok 5780 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +delete> [return] ok 5781 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +delete> [variable] ok 5782 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +delete> [exception] ok 5783 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +delete> [return] ok 5784 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +delete> [variable] ok 5785 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +delete> [exception] ok 5786 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +delete> [return] ok 5787 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +delete> [variable] ok 5788 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +delete> [exception] ok 5789 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +delete> [return] ok 5790 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +delete> [variable] ok 5791 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +delete> [exception] ok 5792 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +delete> [return] ok 5793 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +delete> [variable] ok 5794 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +delete> [exception] ok 5795 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +delete> [return] ok 5796 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +delete> [variable] ok 5797 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +delete> [exception] ok 5798 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +delete> [return] ok 5799 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +delete> [variable] ok 5800 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +delete> [exception] ok 5801 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +delete> [return] ok 5802 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +delete> [variable] ok 5803 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +delete> [exception] ok 5804 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +delete> [return] ok 5805 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +delete> [variable] ok 5806 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +delete> [exception] ok 5807 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +delete> [return] ok 5808 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +delete> [variable] ok 5809 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +delete> [exception] ok 5810 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +delete> [return] ok 5811 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +delete> [variable] ok 5812 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +delete> [exception] ok 5813 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +delete> [return] ok 5814 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +delete> [variable] ok 5815 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +delete> [exception] ok 5816 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +delete> [return] ok 5817 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +delete> [variable] ok 5818 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +delete> [exception] ok 5819 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +delete> [return] ok 5820 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +delete> [variable] ok 5821 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +delete> [exception] ok 5822 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +delete> [return] ok 5823 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +delete> [variable] ok 5824 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +delete> [exception] ok 5825 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +delete> [return] ok 5826 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +delete> [variable] ok 5827 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +delete> [exception] ok 5828 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +delete> [return] ok 5829 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +delete> [variable] ok 5830 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +delete> [exception] ok 5831 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +delete> [return] ok 5832 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +delete> [variable] ok 5833 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +store> [exception] ok 5834 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +store> [return] ok 5835 - my $x; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +store> [variable] ok 5836 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +store> [exception] ok 5837 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +store> [return] ok 5838 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +store> [variable] ok 5839 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +store> [exception] ok 5840 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +store> [return] ok 5841 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[0]] <+strict +store> [variable] ok 5842 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +store> [exception] ok 5843 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +store> [return] ok 5844 - my $x; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +store> [variable] ok 5845 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +store> [exception] ok 5846 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +store> [return] ok 5847 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +store> [variable] ok 5848 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +store> [exception] ok 5849 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +store> [return] ok 5850 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[0]] <+strict +store> [variable] ok 5851 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +store> [exception] ok 5852 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +store> [return] ok 5853 - my @x; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +store> [variable] ok 5854 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +store> [exception] ok 5855 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +store> [return] ok 5856 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +store> [variable] ok 5857 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +store> [exception] ok 5858 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +store> [return] ok 5859 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[0]] <+strict +store> [variable] ok 5860 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +store> [exception] ok 5861 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +store> [return] ok 5862 - my $x; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +store> [variable] ok 5863 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +store> [exception] ok 5864 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +store> [return] ok 5865 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +store> [variable] ok 5866 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +store> [exception] ok 5867 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +store> [return] ok 5868 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $x->[$N[1]] <+strict +store> [variable] ok 5869 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +store> [exception] ok 5870 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +store> [return] ok 5871 - my $x; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +store> [variable] ok 5872 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +store> [exception] ok 5873 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +store> [return] ok 5874 - our $x; local $x; use strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +store> [variable] ok 5875 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +store> [exception] ok 5876 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +store> [return] ok 5877 - our $x; local $x; no strict; $x->[$N[0]] = 1; delete $$x[$N[1]] <+strict +store> [variable] ok 5878 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +store> [exception] ok 5879 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +store> [return] ok 5880 - my @x; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +store> [variable] ok 5881 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +store> [exception] ok 5882 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +store> [return] ok 5883 - our @x; local @x; use strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +store> [variable] ok 5884 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +store> [exception] ok 5885 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +store> [return] ok 5886 - our @x; local @x; no strict; $x[$N[0]] = 1; delete $x[$N[1]] <+strict +store> [variable] ok 5887 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+fetch> [exception] ok 5888 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+fetch> [return] ok 5889 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+fetch> [variable] ok 5890 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+fetch> [exception] ok 5891 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+fetch> [return] ok 5892 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+fetch> [variable] ok 5893 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+fetch> [exception] ok 5894 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+fetch> [return] ok 5895 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+fetch> [variable] ok 5896 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+fetch> [exception] ok 5897 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+fetch> [return] ok 5898 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+fetch> [variable] ok 5899 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+fetch> [exception] ok 5900 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+fetch> [return] ok 5901 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+fetch> [variable] ok 5902 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+fetch> [exception] ok 5903 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+fetch> [return] ok 5904 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+fetch> [variable] ok 5905 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+fetch> [exception] ok 5906 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+fetch> [return] ok 5907 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+fetch> [variable] ok 5908 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+fetch> [exception] ok 5909 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+fetch> [return] ok 5910 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+fetch> [variable] ok 5911 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+fetch> [exception] ok 5912 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+fetch> [return] ok 5913 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+fetch> [variable] ok 5914 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+fetch> [exception] ok 5915 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+fetch> [return] ok 5916 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+fetch> [variable] ok 5917 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+fetch> [exception] ok 5918 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+fetch> [return] ok 5919 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+fetch> [variable] ok 5920 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+fetch> [exception] ok 5921 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+fetch> [return] ok 5922 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+fetch> [variable] ok 5923 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+fetch> [exception] ok 5924 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+fetch> [return] ok 5925 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+fetch> [variable] ok 5926 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+fetch> [exception] ok 5927 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+fetch> [return] ok 5928 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+fetch> [variable] ok 5929 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+fetch> [exception] ok 5930 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+fetch> [return] ok 5931 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+fetch> [variable] ok 5932 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+fetch> [exception] ok 5933 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+fetch> [return] ok 5934 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+fetch> [variable] ok 5935 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+fetch> [exception] ok 5936 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+fetch> [return] ok 5937 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+fetch> [variable] ok 5938 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+fetch> [exception] ok 5939 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+fetch> [return] ok 5940 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+fetch> [variable] ok 5941 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+fetch> [exception] ok 5942 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+fetch> [return] ok 5943 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+fetch> [variable] ok 5944 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+fetch> [exception] ok 5945 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+fetch> [return] ok 5946 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+fetch> [variable] ok 5947 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+fetch> [exception] ok 5948 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+fetch> [return] ok 5949 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+fetch> [variable] ok 5950 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+fetch> [exception] ok 5951 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+fetch> [return] ok 5952 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+fetch> [variable] ok 5953 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+fetch> [exception] ok 5954 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+fetch> [return] ok 5955 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+fetch> [variable] ok 5956 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+fetch> [exception] ok 5957 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+fetch> [return] ok 5958 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+fetch> [variable] ok 5959 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+fetch> [exception] ok 5960 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+fetch> [return] ok 5961 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+fetch> [variable] ok 5962 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+fetch> [exception] ok 5963 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+fetch> [return] ok 5964 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+fetch> [variable] ok 5965 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+fetch> [exception] ok 5966 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+fetch> [return] ok 5967 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+fetch> [variable] ok 5968 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+exists> [exception] ok 5969 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+exists> [return] ok 5970 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+exists> [variable] ok 5971 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+exists> [exception] ok 5972 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+exists> [return] ok 5973 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+exists> [variable] ok 5974 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+exists> [exception] ok 5975 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+exists> [return] ok 5976 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+exists> [variable] ok 5977 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+exists> [exception] ok 5978 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+exists> [return] ok 5979 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+exists> [variable] ok 5980 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+exists> [exception] ok 5981 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+exists> [return] ok 5982 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+exists> [variable] ok 5983 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+exists> [exception] ok 5984 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+exists> [return] ok 5985 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+exists> [variable] ok 5986 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+exists> [exception] ok 5987 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+exists> [return] ok 5988 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+exists> [variable] ok 5989 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+exists> [exception] ok 5990 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+exists> [return] ok 5991 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+exists> [variable] ok 5992 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+exists> [exception] ok 5993 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+exists> [return] ok 5994 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+exists> [variable] ok 5995 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+exists> [exception] ok 5996 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+exists> [return] ok 5997 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+exists> [variable] ok 5998 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+exists> [exception] ok 5999 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+exists> [return] ok 6000 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+exists> [variable] ok 6001 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+exists> [exception] ok 6002 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+exists> [return] ok 6003 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+exists> [variable] ok 6004 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+exists> [exception] ok 6005 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+exists> [return] ok 6006 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+exists> [variable] ok 6007 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+exists> [exception] ok 6008 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+exists> [return] ok 6009 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+exists> [variable] ok 6010 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+exists> [exception] ok 6011 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+exists> [return] ok 6012 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+exists> [variable] ok 6013 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+exists> [exception] ok 6014 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+exists> [return] ok 6015 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+exists> [variable] ok 6016 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+exists> [exception] ok 6017 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+exists> [return] ok 6018 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+exists> [variable] ok 6019 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+exists> [exception] ok 6020 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+exists> [return] ok 6021 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+exists> [variable] ok 6022 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+exists> [exception] ok 6023 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+exists> [return] ok 6024 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+exists> [variable] ok 6025 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+exists> [exception] ok 6026 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+exists> [return] ok 6027 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+exists> [variable] ok 6028 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+exists> [exception] ok 6029 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+exists> [return] ok 6030 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+exists> [variable] ok 6031 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+exists> [exception] ok 6032 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+exists> [return] ok 6033 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+exists> [variable] ok 6034 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+exists> [exception] ok 6035 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+exists> [return] ok 6036 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+exists> [variable] ok 6037 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+exists> [exception] ok 6038 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+exists> [return] ok 6039 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+exists> [variable] ok 6040 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+exists> [exception] ok 6041 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+exists> [return] ok 6042 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+exists> [variable] ok 6043 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+exists> [exception] ok 6044 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+exists> [return] ok 6045 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+exists> [variable] ok 6046 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+exists> [exception] ok 6047 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+exists> [return] ok 6048 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+exists> [variable] ok 6049 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+delete> [exception] ok 6050 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+delete> [return] ok 6051 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+delete> [variable] ok 6052 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+delete> [exception] ok 6053 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+delete> [return] ok 6054 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+delete> [variable] ok 6055 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+delete> [exception] ok 6056 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+delete> [return] ok 6057 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+delete> [variable] ok 6058 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+delete> [exception] ok 6059 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+delete> [return] ok 6060 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+delete> [variable] ok 6061 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+delete> [exception] ok 6062 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+delete> [return] ok 6063 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+delete> [variable] ok 6064 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+delete> [exception] ok 6065 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+delete> [return] ok 6066 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+delete> [variable] ok 6067 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+delete> [exception] ok 6068 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+delete> [return] ok 6069 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+delete> [variable] ok 6070 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+delete> [exception] ok 6071 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+delete> [return] ok 6072 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+delete> [variable] ok 6073 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+delete> [exception] ok 6074 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+delete> [return] ok 6075 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+delete> [variable] ok 6076 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+delete> [exception] ok 6077 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+delete> [return] ok 6078 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+delete> [variable] ok 6079 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+delete> [exception] ok 6080 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+delete> [return] ok 6081 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+delete> [variable] ok 6082 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+delete> [exception] ok 6083 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+delete> [return] ok 6084 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+delete> [variable] ok 6085 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+delete> [exception] ok 6086 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+delete> [return] ok 6087 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+delete> [variable] ok 6088 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+delete> [exception] ok 6089 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+delete> [return] ok 6090 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+delete> [variable] ok 6091 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+delete> [exception] ok 6092 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+delete> [return] ok 6093 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+delete> [variable] ok 6094 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+delete> [exception] ok 6095 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+delete> [return] ok 6096 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+delete> [variable] ok 6097 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+delete> [exception] ok 6098 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+delete> [return] ok 6099 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+delete> [variable] ok 6100 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+delete> [exception] ok 6101 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+delete> [return] ok 6102 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+delete> [variable] ok 6103 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+delete> [exception] ok 6104 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+delete> [return] ok 6105 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+delete> [variable] ok 6106 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+delete> [exception] ok 6107 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+delete> [return] ok 6108 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+delete> [variable] ok 6109 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+delete> [exception] ok 6110 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+delete> [return] ok 6111 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+delete> [variable] ok 6112 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+delete> [exception] ok 6113 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+delete> [return] ok 6114 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+delete> [variable] ok 6115 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+delete> [exception] ok 6116 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+delete> [return] ok 6117 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+delete> [variable] ok 6118 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+delete> [exception] ok 6119 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+delete> [return] ok 6120 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+delete> [variable] ok 6121 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+delete> [exception] ok 6122 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+delete> [return] ok 6123 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+delete> [variable] ok 6124 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+delete> [exception] ok 6125 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+delete> [return] ok 6126 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+delete> [variable] ok 6127 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+delete> [exception] ok 6128 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+delete> [return] ok 6129 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+delete> [variable] ok 6130 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+store> [exception] ok 6131 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+store> [return] ok 6132 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+store> [variable] ok 6133 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+store> [exception] ok 6134 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+store> [return] ok 6135 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+store> [variable] ok 6136 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+store> [exception] ok 6137 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+store> [return] ok 6138 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+store> [variable] ok 6139 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+store> [exception] ok 6140 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+store> [return] ok 6141 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+store> [variable] ok 6142 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+store> [exception] ok 6143 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+store> [return] ok 6144 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+store> [variable] ok 6145 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+store> [exception] ok 6146 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+store> [return] ok 6147 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+store> [variable] ok 6148 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+store> [exception] ok 6149 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+store> [return] ok 6150 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+store> [variable] ok 6151 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+store> [exception] ok 6152 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+store> [return] ok 6153 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+store> [variable] ok 6154 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+store> [exception] ok 6155 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+store> [return] ok 6156 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+store> [variable] ok 6157 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+store> [exception] ok 6158 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+store> [return] ok 6159 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+store> [variable] ok 6160 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+store> [exception] ok 6161 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+store> [return] ok 6162 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+store> [variable] ok 6163 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+store> [exception] ok 6164 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+store> [return] ok 6165 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+store> [variable] ok 6166 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+store> [exception] ok 6167 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+store> [return] ok 6168 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+store> [variable] ok 6169 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+store> [exception] ok 6170 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+store> [return] ok 6171 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+store> [variable] ok 6172 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+store> [exception] ok 6173 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+store> [return] ok 6174 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+store> [variable] ok 6175 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+store> [exception] ok 6176 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+store> [return] ok 6177 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+store> [variable] ok 6178 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+store> [exception] ok 6179 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+store> [return] ok 6180 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+store> [variable] ok 6181 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+store> [exception] ok 6182 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+store> [return] ok 6183 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+store> [variable] ok 6184 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+store> [exception] ok 6185 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+store> [return] ok 6186 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+store> [variable] ok 6187 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+store> [exception] ok 6188 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+store> [return] ok 6189 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+store> [variable] ok 6190 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+store> [exception] ok 6191 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+store> [return] ok 6192 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+store> [variable] ok 6193 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+store> [exception] ok 6194 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+store> [return] ok 6195 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+store> [variable] ok 6196 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+store> [exception] ok 6197 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+store> [return] ok 6198 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+store> [variable] ok 6199 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+store> [exception] ok 6200 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+store> [return] ok 6201 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+store> [variable] ok 6202 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+store> [exception] ok 6203 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+store> [return] ok 6204 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+store> [variable] ok 6205 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+store> [exception] ok 6206 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+store> [return] ok 6207 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+store> [variable] ok 6208 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+store> [exception] ok 6209 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+store> [return] ok 6210 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+store> [variable] ok 6211 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 6212 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 6213 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 6214 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 6215 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 6216 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 6217 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 6218 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 6219 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 6220 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 6221 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 6222 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 6223 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 6224 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 6225 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 6226 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 6227 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 6228 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 6229 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 6230 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 6231 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 6232 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 6233 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 6234 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 6235 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +fetch> [exception] ok 6236 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +fetch> [return] ok 6237 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +fetch> [variable] ok 6238 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 6239 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 6240 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 6241 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 6242 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 6243 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 6244 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 6245 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 6246 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 6247 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 6248 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 6249 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 6250 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 6251 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 6252 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 6253 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 6254 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 6255 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 6256 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 6257 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 6258 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 6259 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 6260 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 6261 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 6262 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +fetch> [exception] ok 6263 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +fetch> [return] ok 6264 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +fetch> [variable] ok 6265 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 6266 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 6267 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 6268 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 6269 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 6270 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 6271 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 6272 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 6273 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 6274 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 6275 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 6276 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 6277 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 6278 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 6279 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 6280 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 6281 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 6282 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 6283 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 6284 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 6285 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 6286 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 6287 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 6288 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 6289 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +fetch> [exception] ok 6290 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +fetch> [return] ok 6291 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +fetch> [variable] ok 6292 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 6293 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +exists> [return] ok 6294 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 6295 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 6296 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +exists> [return] ok 6297 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 6298 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 6299 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +exists> [return] ok 6300 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 6301 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 6302 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 6303 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 6304 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 6305 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 6306 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 6307 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 6308 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 6309 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 6310 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 6311 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 6312 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 6313 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 6314 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 6315 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 6316 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +exists> [exception] ok 6317 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +exists> [return] ok 6318 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +exists> [variable] ok 6319 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 6320 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +exists> [return] ok 6321 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 6322 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 6323 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +exists> [return] ok 6324 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 6325 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 6326 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +exists> [return] ok 6327 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 6328 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 6329 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +exists> [return] ok 6330 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 6331 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 6332 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +exists> [return] ok 6333 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 6334 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 6335 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +exists> [return] ok 6336 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 6337 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 6338 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +exists> [return] ok 6339 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 6340 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 6341 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +exists> [return] ok 6342 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 6343 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +exists> [exception] ok 6344 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +exists> [return] ok 6345 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +exists> [variable] ok 6346 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 6347 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +exists> [return] ok 6348 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 6349 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 6350 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +exists> [return] ok 6351 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 6352 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 6353 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +exists> [return] ok 6354 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 6355 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 6356 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +exists> [return] ok 6357 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 6358 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 6359 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +exists> [return] ok 6360 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 6361 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 6362 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +exists> [return] ok 6363 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 6364 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 6365 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +exists> [return] ok 6366 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 6367 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 6368 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +exists> [return] ok 6369 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 6370 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +exists> [exception] ok 6371 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +exists> [return] ok 6372 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +exists> [variable] ok 6373 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 6374 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +delete> [return] ok 6375 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 6376 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 6377 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +delete> [return] ok 6378 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 6379 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 6380 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +delete> [return] ok 6381 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 6382 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 6383 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 6384 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 6385 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 6386 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 6387 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 6388 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 6389 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 6390 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 6391 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 6392 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 6393 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 6394 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 6395 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 6396 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 6397 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +delete> [exception] ok 6398 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +delete> [return] ok 6399 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +delete> [variable] ok 6400 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 6401 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +delete> [return] ok 6402 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 6403 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 6404 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +delete> [return] ok 6405 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 6406 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 6407 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +delete> [return] ok 6408 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 6409 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 6410 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +delete> [return] ok 6411 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 6412 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 6413 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +delete> [return] ok 6414 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 6415 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 6416 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +delete> [return] ok 6417 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 6418 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 6419 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +delete> [return] ok 6420 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 6421 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 6422 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +delete> [return] ok 6423 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 6424 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +delete> [exception] ok 6425 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +delete> [return] ok 6426 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +delete> [variable] ok 6427 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 6428 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +delete> [return] ok 6429 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 6430 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 6431 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +delete> [return] ok 6432 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 6433 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 6434 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +delete> [return] ok 6435 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 6436 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 6437 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +delete> [return] ok 6438 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 6439 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 6440 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +delete> [return] ok 6441 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 6442 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 6443 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +delete> [return] ok 6444 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 6445 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 6446 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +delete> [return] ok 6447 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 6448 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 6449 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +delete> [return] ok 6450 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 6451 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +delete> [exception] ok 6452 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +delete> [return] ok 6453 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +delete> [variable] ok 6454 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +store> [exception] ok 6455 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +store> [return] ok 6456 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +store> [variable] ok 6457 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +store> [exception] ok 6458 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +store> [return] ok 6459 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +store> [variable] ok 6460 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +store> [exception] ok 6461 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +store> [return] ok 6462 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[1]] <+strict +store> [variable] ok 6463 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 6464 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +store> [return] ok 6465 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 6466 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 6467 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +store> [return] ok 6468 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 6469 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 6470 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +store> [return] ok 6471 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 6472 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 6473 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +store> [return] ok 6474 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 6475 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 6476 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +store> [return] ok 6477 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 6478 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +store> [exception] ok 6479 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +store> [return] ok 6480 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[1]] <+strict +store> [variable] ok 6481 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +store> [exception] ok 6482 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +store> [return] ok 6483 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +store> [variable] ok 6484 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +store> [exception] ok 6485 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +store> [return] ok 6486 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +store> [variable] ok 6487 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +store> [exception] ok 6488 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +store> [return] ok 6489 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[0]]->[$N[3]] <+strict +store> [variable] ok 6490 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +store> [exception] ok 6491 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +store> [return] ok 6492 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +store> [variable] ok 6493 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +store> [exception] ok 6494 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +store> [return] ok 6495 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +store> [variable] ok 6496 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +store> [exception] ok 6497 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +store> [return] ok 6498 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[0]]->[$N[3]] <+strict +store> [variable] ok 6499 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +store> [exception] ok 6500 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +store> [return] ok 6501 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +store> [variable] ok 6502 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +store> [exception] ok 6503 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +store> [return] ok 6504 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +store> [variable] ok 6505 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +store> [exception] ok 6506 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +store> [return] ok 6507 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[0]]->[$N[3]] <+strict +store> [variable] ok 6508 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +store> [exception] ok 6509 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +store> [return] ok 6510 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +store> [variable] ok 6511 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +store> [exception] ok 6512 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +store> [return] ok 6513 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +store> [variable] ok 6514 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +store> [exception] ok 6515 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +store> [return] ok 6516 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $x->[$N[2]]->[$N[3]] <+strict +store> [variable] ok 6517 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +store> [exception] ok 6518 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +store> [return] ok 6519 - my $x; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +store> [variable] ok 6520 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +store> [exception] ok 6521 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +store> [return] ok 6522 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +store> [variable] ok 6523 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +store> [exception] ok 6524 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +store> [return] ok 6525 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; delete $$x[$N[2]]->[$N[3]] <+strict +store> [variable] ok 6526 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +store> [exception] ok 6527 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +store> [return] ok 6528 - my @x; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +store> [variable] ok 6529 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +store> [exception] ok 6530 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +store> [return] ok 6531 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +store> [variable] ok 6532 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +store> [exception] ok 6533 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +store> [return] ok 6534 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; delete $x[$N[2]]->[$N[3]] <+strict +store> [variable] ok 6535 - my $x; $x->[$N[0]] = 1 [exception] ok 6536 - my $x; $x->[$N[0]] = 1 [return] ok 6537 - my $x; $x->[$N[0]] = 1 [variable] ok 6538 - our $x; local $x; use strict; $x->[$N[0]] = 1 [exception] ok 6539 - our $x; local $x; use strict; $x->[$N[0]] = 1 [return] ok 6540 - our $x; local $x; use strict; $x->[$N[0]] = 1 [variable] ok 6541 - our $x; local $x; no strict; $x->[$N[0]] = 1 [exception] ok 6542 - our $x; local $x; no strict; $x->[$N[0]] = 1 [return] ok 6543 - our $x; local $x; no strict; $x->[$N[0]] = 1 [variable] ok 6544 - my $x; $$x[$N[0]] = 1 [exception] ok 6545 - my $x; $$x[$N[0]] = 1 [return] ok 6546 - my $x; $$x[$N[0]] = 1 [variable] ok 6547 - our $x; local $x; use strict; $$x[$N[0]] = 1 [exception] ok 6548 - our $x; local $x; use strict; $$x[$N[0]] = 1 [return] ok 6549 - our $x; local $x; use strict; $$x[$N[0]] = 1 [variable] ok 6550 - our $x; local $x; no strict; $$x[$N[0]] = 1 [exception] ok 6551 - our $x; local $x; no strict; $$x[$N[0]] = 1 [return] ok 6552 - our $x; local $x; no strict; $$x[$N[0]] = 1 [variable] ok 6553 - my @x; $x[$N[0]] = 1 [exception] ok 6554 - my @x; $x[$N[0]] = 1 [return] ok 6555 - my @x; $x[$N[0]] = 1 [variable] ok 6556 - our @x; local @x; use strict; $x[$N[0]] = 1 [exception] ok 6557 - our @x; local @x; use strict; $x[$N[0]] = 1 [return] ok 6558 - our @x; local @x; use strict; $x[$N[0]] = 1 [variable] ok 6559 - our @x; local @x; no strict; $x[$N[0]] = 1 [exception] ok 6560 - our @x; local @x; no strict; $x[$N[0]] = 1 [return] ok 6561 - our @x; local @x; no strict; $x[$N[0]] = 1 [variable] ok 6562 - my $x; $x->[$N[0]] = 1 [exception] ok 6563 - my $x; $x->[$N[0]] = 1 [return] ok 6564 - my $x; $x->[$N[0]] = 1 [variable] ok 6565 - our $x; local $x; use strict; $x->[$N[0]] = 1 [exception] ok 6566 - our $x; local $x; use strict; $x->[$N[0]] = 1 [return] ok 6567 - our $x; local $x; use strict; $x->[$N[0]] = 1 [variable] ok 6568 - our $x; local $x; no strict; $x->[$N[0]] = 1 [exception] ok 6569 - our $x; local $x; no strict; $x->[$N[0]] = 1 [return] ok 6570 - our $x; local $x; no strict; $x->[$N[0]] = 1 [variable] ok 6571 - my $x; $$x[$N[0]] = 1 [exception] ok 6572 - my $x; $$x[$N[0]] = 1 [return] ok 6573 - my $x; $$x[$N[0]] = 1 [variable] ok 6574 - our $x; local $x; use strict; $$x[$N[0]] = 1 [exception] ok 6575 - our $x; local $x; use strict; $$x[$N[0]] = 1 [return] ok 6576 - our $x; local $x; use strict; $$x[$N[0]] = 1 [variable] ok 6577 - our $x; local $x; no strict; $$x[$N[0]] = 1 [exception] ok 6578 - our $x; local $x; no strict; $$x[$N[0]] = 1 [return] ok 6579 - our $x; local $x; no strict; $$x[$N[0]] = 1 [variable] ok 6580 - my @x; $x[$N[0]] = 1 [exception] ok 6581 - my @x; $x[$N[0]] = 1 [return] ok 6582 - my @x; $x[$N[0]] = 1 [variable] ok 6583 - our @x; local @x; use strict; $x[$N[0]] = 1 [exception] ok 6584 - our @x; local @x; use strict; $x[$N[0]] = 1 [return] ok 6585 - our @x; local @x; use strict; $x[$N[0]] = 1 [variable] ok 6586 - our @x; local @x; no strict; $x[$N[0]] = 1 [exception] ok 6587 - our @x; local @x; no strict; $x[$N[0]] = 1 [return] ok 6588 - our @x; local @x; no strict; $x[$N[0]] = 1 [variable] ok 6589 - my $x; $x->[$N[0]] = 1 <+fetch> [exception] ok 6590 - my $x; $x->[$N[0]] = 1 <+fetch> [return] ok 6591 - my $x; $x->[$N[0]] = 1 <+fetch> [variable] ok 6592 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+fetch> [exception] ok 6593 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+fetch> [return] ok 6594 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+fetch> [variable] ok 6595 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+fetch> [exception] ok 6596 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+fetch> [return] ok 6597 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+fetch> [variable] ok 6598 - my $x; $$x[$N[0]] = 1 <+fetch> [exception] ok 6599 - my $x; $$x[$N[0]] = 1 <+fetch> [return] ok 6600 - my $x; $$x[$N[0]] = 1 <+fetch> [variable] ok 6601 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+fetch> [exception] ok 6602 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+fetch> [return] ok 6603 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+fetch> [variable] ok 6604 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+fetch> [exception] ok 6605 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+fetch> [return] ok 6606 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+fetch> [variable] ok 6607 - my @x; $x[$N[0]] = 1 <+fetch> [exception] ok 6608 - my @x; $x[$N[0]] = 1 <+fetch> [return] ok 6609 - my @x; $x[$N[0]] = 1 <+fetch> [variable] ok 6610 - our @x; local @x; use strict; $x[$N[0]] = 1 <+fetch> [exception] ok 6611 - our @x; local @x; use strict; $x[$N[0]] = 1 <+fetch> [return] ok 6612 - our @x; local @x; use strict; $x[$N[0]] = 1 <+fetch> [variable] ok 6613 - our @x; local @x; no strict; $x[$N[0]] = 1 <+fetch> [exception] ok 6614 - our @x; local @x; no strict; $x[$N[0]] = 1 <+fetch> [return] ok 6615 - our @x; local @x; no strict; $x[$N[0]] = 1 <+fetch> [variable] ok 6616 - my $x; $x->[$N[0]] = 1 <+exists> [exception] ok 6617 - my $x; $x->[$N[0]] = 1 <+exists> [return] ok 6618 - my $x; $x->[$N[0]] = 1 <+exists> [variable] ok 6619 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+exists> [exception] ok 6620 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+exists> [return] ok 6621 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+exists> [variable] ok 6622 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+exists> [exception] ok 6623 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+exists> [return] ok 6624 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+exists> [variable] ok 6625 - my $x; $$x[$N[0]] = 1 <+exists> [exception] ok 6626 - my $x; $$x[$N[0]] = 1 <+exists> [return] ok 6627 - my $x; $$x[$N[0]] = 1 <+exists> [variable] ok 6628 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+exists> [exception] ok 6629 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+exists> [return] ok 6630 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+exists> [variable] ok 6631 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+exists> [exception] ok 6632 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+exists> [return] ok 6633 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+exists> [variable] ok 6634 - my @x; $x[$N[0]] = 1 <+exists> [exception] ok 6635 - my @x; $x[$N[0]] = 1 <+exists> [return] ok 6636 - my @x; $x[$N[0]] = 1 <+exists> [variable] ok 6637 - our @x; local @x; use strict; $x[$N[0]] = 1 <+exists> [exception] ok 6638 - our @x; local @x; use strict; $x[$N[0]] = 1 <+exists> [return] ok 6639 - our @x; local @x; use strict; $x[$N[0]] = 1 <+exists> [variable] ok 6640 - our @x; local @x; no strict; $x[$N[0]] = 1 <+exists> [exception] ok 6641 - our @x; local @x; no strict; $x[$N[0]] = 1 <+exists> [return] ok 6642 - our @x; local @x; no strict; $x[$N[0]] = 1 <+exists> [variable] ok 6643 - my $x; $x->[$N[0]] = 1 <+delete> [exception] ok 6644 - my $x; $x->[$N[0]] = 1 <+delete> [return] ok 6645 - my $x; $x->[$N[0]] = 1 <+delete> [variable] ok 6646 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+delete> [exception] ok 6647 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+delete> [return] ok 6648 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+delete> [variable] ok 6649 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+delete> [exception] ok 6650 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+delete> [return] ok 6651 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+delete> [variable] ok 6652 - my $x; $$x[$N[0]] = 1 <+delete> [exception] ok 6653 - my $x; $$x[$N[0]] = 1 <+delete> [return] ok 6654 - my $x; $$x[$N[0]] = 1 <+delete> [variable] ok 6655 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+delete> [exception] ok 6656 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+delete> [return] ok 6657 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+delete> [variable] ok 6658 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+delete> [exception] ok 6659 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+delete> [return] ok 6660 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+delete> [variable] ok 6661 - my @x; $x[$N[0]] = 1 <+delete> [exception] ok 6662 - my @x; $x[$N[0]] = 1 <+delete> [return] ok 6663 - my @x; $x[$N[0]] = 1 <+delete> [variable] ok 6664 - our @x; local @x; use strict; $x[$N[0]] = 1 <+delete> [exception] ok 6665 - our @x; local @x; use strict; $x[$N[0]] = 1 <+delete> [return] ok 6666 - our @x; local @x; use strict; $x[$N[0]] = 1 <+delete> [variable] ok 6667 - our @x; local @x; no strict; $x[$N[0]] = 1 <+delete> [exception] ok 6668 - our @x; local @x; no strict; $x[$N[0]] = 1 <+delete> [return] ok 6669 - our @x; local @x; no strict; $x[$N[0]] = 1 <+delete> [variable] ok 6670 - my $x; $x->[$N[0]] = 1 <+store> [exception] ok 6671 - my $x; $x->[$N[0]] = 1 <+store> [return] ok 6672 - my $x; $x->[$N[0]] = 1 <+store> [variable] ok 6673 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+store> [exception] ok 6674 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+store> [return] ok 6675 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+store> [variable] ok 6676 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+store> [exception] ok 6677 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+store> [return] ok 6678 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+store> [variable] ok 6679 - my $x; $$x[$N[0]] = 1 <+store> [exception] ok 6680 - my $x; $$x[$N[0]] = 1 <+store> [return] ok 6681 - my $x; $$x[$N[0]] = 1 <+store> [variable] ok 6682 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+store> [exception] ok 6683 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+store> [return] ok 6684 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+store> [variable] ok 6685 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+store> [exception] ok 6686 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+store> [return] ok 6687 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+store> [variable] ok 6688 - my @x; 1 <+store> [exception] ok 6689 - my @x; 1 <+store> [return] ok 6690 - my @x; 1 <+store> [variable] ok 6691 - our @x; local @x; use strict; 1 <+store> [exception] ok 6692 - our @x; local @x; use strict; 1 <+store> [return] ok 6693 - our @x; local @x; use strict; 1 <+store> [variable] ok 6694 - our @x; local @x; no strict; 1 <+store> [exception] ok 6695 - our @x; local @x; no strict; 1 <+store> [return] ok 6696 - our @x; local @x; no strict; 1 <+store> [variable] ok 6697 - my $x; $x->[$N[0]] = 1 <+strict +fetch> [exception] ok 6698 - my $x; $x->[$N[0]] = 1 <+strict +fetch> [return] ok 6699 - my $x; $x->[$N[0]] = 1 <+strict +fetch> [variable] ok 6700 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+strict +fetch> [exception] ok 6701 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+strict +fetch> [return] ok 6702 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+strict +fetch> [variable] ok 6703 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+strict +fetch> [exception] ok 6704 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+strict +fetch> [return] ok 6705 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+strict +fetch> [variable] ok 6706 - my $x; $$x[$N[0]] = 1 <+strict +fetch> [exception] ok 6707 - my $x; $$x[$N[0]] = 1 <+strict +fetch> [return] ok 6708 - my $x; $$x[$N[0]] = 1 <+strict +fetch> [variable] ok 6709 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+strict +fetch> [exception] ok 6710 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+strict +fetch> [return] ok 6711 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+strict +fetch> [variable] ok 6712 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+strict +fetch> [exception] ok 6713 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+strict +fetch> [return] ok 6714 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+strict +fetch> [variable] ok 6715 - my @x; $x[$N[0]] = 1 <+strict +fetch> [exception] ok 6716 - my @x; $x[$N[0]] = 1 <+strict +fetch> [return] ok 6717 - my @x; $x[$N[0]] = 1 <+strict +fetch> [variable] ok 6718 - our @x; local @x; use strict; $x[$N[0]] = 1 <+strict +fetch> [exception] ok 6719 - our @x; local @x; use strict; $x[$N[0]] = 1 <+strict +fetch> [return] ok 6720 - our @x; local @x; use strict; $x[$N[0]] = 1 <+strict +fetch> [variable] ok 6721 - our @x; local @x; no strict; $x[$N[0]] = 1 <+strict +fetch> [exception] ok 6722 - our @x; local @x; no strict; $x[$N[0]] = 1 <+strict +fetch> [return] ok 6723 - our @x; local @x; no strict; $x[$N[0]] = 1 <+strict +fetch> [variable] ok 6724 - my $x; $x->[$N[0]] = 1 <+strict +exists> [exception] ok 6725 - my $x; $x->[$N[0]] = 1 <+strict +exists> [return] ok 6726 - my $x; $x->[$N[0]] = 1 <+strict +exists> [variable] ok 6727 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+strict +exists> [exception] ok 6728 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+strict +exists> [return] ok 6729 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+strict +exists> [variable] ok 6730 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+strict +exists> [exception] ok 6731 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+strict +exists> [return] ok 6732 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+strict +exists> [variable] ok 6733 - my $x; $$x[$N[0]] = 1 <+strict +exists> [exception] ok 6734 - my $x; $$x[$N[0]] = 1 <+strict +exists> [return] ok 6735 - my $x; $$x[$N[0]] = 1 <+strict +exists> [variable] ok 6736 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+strict +exists> [exception] ok 6737 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+strict +exists> [return] ok 6738 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+strict +exists> [variable] ok 6739 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+strict +exists> [exception] ok 6740 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+strict +exists> [return] ok 6741 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+strict +exists> [variable] ok 6742 - my @x; $x[$N[0]] = 1 <+strict +exists> [exception] ok 6743 - my @x; $x[$N[0]] = 1 <+strict +exists> [return] ok 6744 - my @x; $x[$N[0]] = 1 <+strict +exists> [variable] ok 6745 - our @x; local @x; use strict; $x[$N[0]] = 1 <+strict +exists> [exception] ok 6746 - our @x; local @x; use strict; $x[$N[0]] = 1 <+strict +exists> [return] ok 6747 - our @x; local @x; use strict; $x[$N[0]] = 1 <+strict +exists> [variable] ok 6748 - our @x; local @x; no strict; $x[$N[0]] = 1 <+strict +exists> [exception] ok 6749 - our @x; local @x; no strict; $x[$N[0]] = 1 <+strict +exists> [return] ok 6750 - our @x; local @x; no strict; $x[$N[0]] = 1 <+strict +exists> [variable] ok 6751 - my $x; $x->[$N[0]] = 1 <+strict +delete> [exception] ok 6752 - my $x; $x->[$N[0]] = 1 <+strict +delete> [return] ok 6753 - my $x; $x->[$N[0]] = 1 <+strict +delete> [variable] ok 6754 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+strict +delete> [exception] ok 6755 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+strict +delete> [return] ok 6756 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+strict +delete> [variable] ok 6757 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+strict +delete> [exception] ok 6758 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+strict +delete> [return] ok 6759 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+strict +delete> [variable] ok 6760 - my $x; $$x[$N[0]] = 1 <+strict +delete> [exception] ok 6761 - my $x; $$x[$N[0]] = 1 <+strict +delete> [return] ok 6762 - my $x; $$x[$N[0]] = 1 <+strict +delete> [variable] ok 6763 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+strict +delete> [exception] ok 6764 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+strict +delete> [return] ok 6765 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+strict +delete> [variable] ok 6766 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+strict +delete> [exception] ok 6767 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+strict +delete> [return] ok 6768 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+strict +delete> [variable] ok 6769 - my @x; $x[$N[0]] = 1 <+strict +delete> [exception] ok 6770 - my @x; $x[$N[0]] = 1 <+strict +delete> [return] ok 6771 - my @x; $x[$N[0]] = 1 <+strict +delete> [variable] ok 6772 - our @x; local @x; use strict; $x[$N[0]] = 1 <+strict +delete> [exception] ok 6773 - our @x; local @x; use strict; $x[$N[0]] = 1 <+strict +delete> [return] ok 6774 - our @x; local @x; use strict; $x[$N[0]] = 1 <+strict +delete> [variable] ok 6775 - our @x; local @x; no strict; $x[$N[0]] = 1 <+strict +delete> [exception] ok 6776 - our @x; local @x; no strict; $x[$N[0]] = 1 <+strict +delete> [return] ok 6777 - our @x; local @x; no strict; $x[$N[0]] = 1 <+strict +delete> [variable] ok 6778 - my $x; $x->[$N[0]] = 1 <+strict +store> [exception] ok 6779 - my $x; $x->[$N[0]] = 1 <+strict +store> [return] ok 6780 - my $x; $x->[$N[0]] = 1 <+strict +store> [variable] ok 6781 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+strict +store> [exception] ok 6782 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+strict +store> [return] ok 6783 - our $x; local $x; use strict; $x->[$N[0]] = 1 <+strict +store> [variable] ok 6784 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+strict +store> [exception] ok 6785 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+strict +store> [return] ok 6786 - our $x; local $x; no strict; $x->[$N[0]] = 1 <+strict +store> [variable] ok 6787 - my $x; $$x[$N[0]] = 1 <+strict +store> [exception] ok 6788 - my $x; $$x[$N[0]] = 1 <+strict +store> [return] ok 6789 - my $x; $$x[$N[0]] = 1 <+strict +store> [variable] ok 6790 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+strict +store> [exception] ok 6791 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+strict +store> [return] ok 6792 - our $x; local $x; use strict; $$x[$N[0]] = 1 <+strict +store> [variable] ok 6793 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+strict +store> [exception] ok 6794 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+strict +store> [return] ok 6795 - our $x; local $x; no strict; $$x[$N[0]] = 1 <+strict +store> [variable] ok 6796 - my @x; 1 <+strict +store> [exception] ok 6797 - my @x; 1 <+strict +store> [return] ok 6798 - my @x; 1 <+strict +store> [variable] ok 6799 - our @x; local @x; use strict; 1 <+strict +store> [exception] ok 6800 - our @x; local @x; use strict; 1 <+strict +store> [return] ok 6801 - our @x; local @x; use strict; 1 <+strict +store> [variable] ok 6802 - our @x; local @x; no strict; 1 <+strict +store> [exception] ok 6803 - our @x; local @x; no strict; 1 <+strict +store> [return] ok 6804 - our @x; local @x; no strict; 1 <+strict +store> [variable] ok 6805 - my $x; $x->[$N[0]]->[$N[1]] = 1 [exception] ok 6806 - my $x; $x->[$N[0]]->[$N[1]] = 1 [return] ok 6807 - my $x; $x->[$N[0]]->[$N[1]] = 1 [variable] ok 6808 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 [exception] ok 6809 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 [return] ok 6810 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 [variable] ok 6811 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 [exception] ok 6812 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 [return] ok 6813 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 [variable] ok 6814 - my $x; $$x[$N[0]]->[$N[1]] = 1 [exception] ok 6815 - my $x; $$x[$N[0]]->[$N[1]] = 1 [return] ok 6816 - my $x; $$x[$N[0]]->[$N[1]] = 1 [variable] ok 6817 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 [exception] ok 6818 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 [return] ok 6819 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 [variable] ok 6820 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 [exception] ok 6821 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 [return] ok 6822 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 [variable] ok 6823 - my @x; $x[$N[0]]->[$N[1]] = 1 [exception] ok 6824 - my @x; $x[$N[0]]->[$N[1]] = 1 [return] ok 6825 - my @x; $x[$N[0]]->[$N[1]] = 1 [variable] ok 6826 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 [exception] ok 6827 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 [return] ok 6828 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 [variable] ok 6829 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 [exception] ok 6830 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 [return] ok 6831 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 [variable] ok 6832 - my $x; $x->[$N[0]]->[$N[1]] = 1 [exception] ok 6833 - my $x; $x->[$N[0]]->[$N[1]] = 1 [return] ok 6834 - my $x; $x->[$N[0]]->[$N[1]] = 1 [variable] ok 6835 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 [exception] ok 6836 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 [return] ok 6837 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 [variable] ok 6838 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 [exception] ok 6839 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 [return] ok 6840 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 [variable] ok 6841 - my $x; $$x[$N[0]]->[$N[1]] = 1 [exception] ok 6842 - my $x; $$x[$N[0]]->[$N[1]] = 1 [return] ok 6843 - my $x; $$x[$N[0]]->[$N[1]] = 1 [variable] ok 6844 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 [exception] ok 6845 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 [return] ok 6846 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 [variable] ok 6847 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 [exception] ok 6848 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 [return] ok 6849 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 [variable] ok 6850 - my @x; $x[$N[0]]->[$N[1]] = 1 [exception] ok 6851 - my @x; $x[$N[0]]->[$N[1]] = 1 [return] ok 6852 - my @x; $x[$N[0]]->[$N[1]] = 1 [variable] ok 6853 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 [exception] ok 6854 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 [return] ok 6855 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 [variable] ok 6856 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 [exception] ok 6857 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 [return] ok 6858 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 [variable] ok 6859 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+fetch> [exception] ok 6860 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+fetch> [return] ok 6861 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+fetch> [variable] ok 6862 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+fetch> [exception] ok 6863 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+fetch> [return] ok 6864 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+fetch> [variable] ok 6865 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+fetch> [exception] ok 6866 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+fetch> [return] ok 6867 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+fetch> [variable] ok 6868 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+fetch> [exception] ok 6869 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+fetch> [return] ok 6870 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+fetch> [variable] ok 6871 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+fetch> [exception] ok 6872 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+fetch> [return] ok 6873 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+fetch> [variable] ok 6874 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+fetch> [exception] ok 6875 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+fetch> [return] ok 6876 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+fetch> [variable] ok 6877 - my @x; $x[$N[0]]->[$N[1]] = 1 <+fetch> [exception] ok 6878 - my @x; $x[$N[0]]->[$N[1]] = 1 <+fetch> [return] ok 6879 - my @x; $x[$N[0]]->[$N[1]] = 1 <+fetch> [variable] ok 6880 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+fetch> [exception] ok 6881 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+fetch> [return] ok 6882 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+fetch> [variable] ok 6883 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+fetch> [exception] ok 6884 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+fetch> [return] ok 6885 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+fetch> [variable] ok 6886 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+exists> [exception] ok 6887 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+exists> [return] ok 6888 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+exists> [variable] ok 6889 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+exists> [exception] ok 6890 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+exists> [return] ok 6891 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+exists> [variable] ok 6892 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+exists> [exception] ok 6893 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+exists> [return] ok 6894 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+exists> [variable] ok 6895 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+exists> [exception] ok 6896 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+exists> [return] ok 6897 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+exists> [variable] ok 6898 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+exists> [exception] ok 6899 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+exists> [return] ok 6900 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+exists> [variable] ok 6901 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+exists> [exception] ok 6902 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+exists> [return] ok 6903 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+exists> [variable] ok 6904 - my @x; $x[$N[0]]->[$N[1]] = 1 <+exists> [exception] ok 6905 - my @x; $x[$N[0]]->[$N[1]] = 1 <+exists> [return] ok 6906 - my @x; $x[$N[0]]->[$N[1]] = 1 <+exists> [variable] ok 6907 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+exists> [exception] ok 6908 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+exists> [return] ok 6909 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+exists> [variable] ok 6910 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+exists> [exception] ok 6911 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+exists> [return] ok 6912 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+exists> [variable] ok 6913 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+delete> [exception] ok 6914 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+delete> [return] ok 6915 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+delete> [variable] ok 6916 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+delete> [exception] ok 6917 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+delete> [return] ok 6918 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+delete> [variable] ok 6919 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+delete> [exception] ok 6920 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+delete> [return] ok 6921 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+delete> [variable] ok 6922 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+delete> [exception] ok 6923 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+delete> [return] ok 6924 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+delete> [variable] ok 6925 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+delete> [exception] ok 6926 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+delete> [return] ok 6927 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+delete> [variable] ok 6928 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+delete> [exception] ok 6929 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+delete> [return] ok 6930 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+delete> [variable] ok 6931 - my @x; $x[$N[0]]->[$N[1]] = 1 <+delete> [exception] ok 6932 - my @x; $x[$N[0]]->[$N[1]] = 1 <+delete> [return] ok 6933 - my @x; $x[$N[0]]->[$N[1]] = 1 <+delete> [variable] ok 6934 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+delete> [exception] ok 6935 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+delete> [return] ok 6936 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+delete> [variable] ok 6937 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+delete> [exception] ok 6938 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+delete> [return] ok 6939 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+delete> [variable] ok 6940 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+store> [exception] ok 6941 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+store> [return] ok 6942 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+store> [variable] ok 6943 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+store> [exception] ok 6944 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+store> [return] ok 6945 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+store> [variable] ok 6946 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+store> [exception] ok 6947 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+store> [return] ok 6948 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+store> [variable] ok 6949 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+store> [exception] ok 6950 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+store> [return] ok 6951 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+store> [variable] ok 6952 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+store> [exception] ok 6953 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+store> [return] ok 6954 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+store> [variable] ok 6955 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+store> [exception] ok 6956 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+store> [return] ok 6957 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+store> [variable] ok 6958 - my @x; $x[$N[0]]->[$N[1]] = 1 <+store> [exception] ok 6959 - my @x; $x[$N[0]]->[$N[1]] = 1 <+store> [return] ok 6960 - my @x; $x[$N[0]]->[$N[1]] = 1 <+store> [variable] ok 6961 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+store> [exception] ok 6962 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+store> [return] ok 6963 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+store> [variable] ok 6964 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+store> [exception] ok 6965 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+store> [return] ok 6966 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+store> [variable] ok 6967 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+strict +fetch> [exception] ok 6968 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+strict +fetch> [return] ok 6969 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+strict +fetch> [variable] ok 6970 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +fetch> [exception] ok 6971 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +fetch> [return] ok 6972 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +fetch> [variable] ok 6973 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +fetch> [exception] ok 6974 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +fetch> [return] ok 6975 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +fetch> [variable] ok 6976 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+strict +fetch> [exception] ok 6977 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+strict +fetch> [return] ok 6978 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+strict +fetch> [variable] ok 6979 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +fetch> [exception] ok 6980 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +fetch> [return] ok 6981 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +fetch> [variable] ok 6982 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +fetch> [exception] ok 6983 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +fetch> [return] ok 6984 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +fetch> [variable] ok 6985 - my @x; $x[$N[0]]->[$N[1]] = 1 <+strict +fetch> [exception] ok 6986 - my @x; $x[$N[0]]->[$N[1]] = 1 <+strict +fetch> [return] ok 6987 - my @x; $x[$N[0]]->[$N[1]] = 1 <+strict +fetch> [variable] ok 6988 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+strict +fetch> [exception] ok 6989 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+strict +fetch> [return] ok 6990 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+strict +fetch> [variable] ok 6991 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+strict +fetch> [exception] ok 6992 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+strict +fetch> [return] ok 6993 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+strict +fetch> [variable] ok 6994 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+strict +exists> [exception] ok 6995 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+strict +exists> [return] ok 6996 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+strict +exists> [variable] ok 6997 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +exists> [exception] ok 6998 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +exists> [return] ok 6999 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +exists> [variable] ok 7000 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +exists> [exception] ok 7001 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +exists> [return] ok 7002 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +exists> [variable] ok 7003 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+strict +exists> [exception] ok 7004 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+strict +exists> [return] ok 7005 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+strict +exists> [variable] ok 7006 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +exists> [exception] ok 7007 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +exists> [return] ok 7008 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +exists> [variable] ok 7009 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +exists> [exception] ok 7010 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +exists> [return] ok 7011 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +exists> [variable] ok 7012 - my @x; $x[$N[0]]->[$N[1]] = 1 <+strict +exists> [exception] ok 7013 - my @x; $x[$N[0]]->[$N[1]] = 1 <+strict +exists> [return] ok 7014 - my @x; $x[$N[0]]->[$N[1]] = 1 <+strict +exists> [variable] ok 7015 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+strict +exists> [exception] ok 7016 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+strict +exists> [return] ok 7017 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+strict +exists> [variable] ok 7018 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+strict +exists> [exception] ok 7019 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+strict +exists> [return] ok 7020 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+strict +exists> [variable] ok 7021 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+strict +delete> [exception] ok 7022 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+strict +delete> [return] ok 7023 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+strict +delete> [variable] ok 7024 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +delete> [exception] ok 7025 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +delete> [return] ok 7026 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +delete> [variable] ok 7027 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +delete> [exception] ok 7028 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +delete> [return] ok 7029 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +delete> [variable] ok 7030 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+strict +delete> [exception] ok 7031 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+strict +delete> [return] ok 7032 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+strict +delete> [variable] ok 7033 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +delete> [exception] ok 7034 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +delete> [return] ok 7035 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +delete> [variable] ok 7036 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +delete> [exception] ok 7037 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +delete> [return] ok 7038 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +delete> [variable] ok 7039 - my @x; $x[$N[0]]->[$N[1]] = 1 <+strict +delete> [exception] ok 7040 - my @x; $x[$N[0]]->[$N[1]] = 1 <+strict +delete> [return] ok 7041 - my @x; $x[$N[0]]->[$N[1]] = 1 <+strict +delete> [variable] ok 7042 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+strict +delete> [exception] ok 7043 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+strict +delete> [return] ok 7044 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+strict +delete> [variable] ok 7045 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+strict +delete> [exception] ok 7046 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+strict +delete> [return] ok 7047 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+strict +delete> [variable] ok 7048 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+strict +store> [exception] ok 7049 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+strict +store> [return] ok 7050 - my $x; $x->[$N[0]]->[$N[1]] = 1 <+strict +store> [variable] ok 7051 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +store> [exception] ok 7052 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +store> [return] ok 7053 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +store> [variable] ok 7054 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +store> [exception] ok 7055 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +store> [return] ok 7056 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1 <+strict +store> [variable] ok 7057 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+strict +store> [exception] ok 7058 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+strict +store> [return] ok 7059 - my $x; $$x[$N[0]]->[$N[1]] = 1 <+strict +store> [variable] ok 7060 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +store> [exception] ok 7061 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +store> [return] ok 7062 - our $x; local $x; use strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +store> [variable] ok 7063 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +store> [exception] ok 7064 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +store> [return] ok 7065 - our $x; local $x; no strict; $$x[$N[0]]->[$N[1]] = 1 <+strict +store> [variable] ok 7066 - my @x; $x[$N[0]]->[$N[1]] = 1 <+strict +store> [exception] ok 7067 - my @x; $x[$N[0]]->[$N[1]] = 1 <+strict +store> [return] ok 7068 - my @x; $x[$N[0]]->[$N[1]] = 1 <+strict +store> [variable] ok 7069 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+strict +store> [exception] ok 7070 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+strict +store> [return] ok 7071 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1 <+strict +store> [variable] ok 7072 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+strict +store> [exception] ok 7073 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+strict +store> [return] ok 7074 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1 <+strict +store> [variable] ok 7075 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+fetch> [exception] ok 7076 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+fetch> [return] ok 7077 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+fetch> [variable] ok 7078 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+fetch> [exception] ok 7079 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+fetch> [return] ok 7080 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+fetch> [variable] ok 7081 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+fetch> [exception] ok 7082 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+fetch> [return] ok 7083 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+fetch> [variable] ok 7084 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+fetch> [exception] ok 7085 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+fetch> [return] ok 7086 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+fetch> [variable] ok 7087 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+fetch> [exception] ok 7088 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+fetch> [return] ok 7089 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+fetch> [variable] ok 7090 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+fetch> [exception] ok 7091 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+fetch> [return] ok 7092 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+fetch> [variable] ok 7093 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+fetch> [exception] ok 7094 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+fetch> [return] ok 7095 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+fetch> [variable] ok 7096 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+fetch> [exception] ok 7097 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+fetch> [return] ok 7098 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+fetch> [variable] ok 7099 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+fetch> [exception] ok 7100 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+fetch> [return] ok 7101 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+fetch> [variable] ok 7102 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+fetch> [exception] ok 7103 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+fetch> [return] ok 7104 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+fetch> [variable] ok 7105 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+fetch> [exception] ok 7106 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+fetch> [return] ok 7107 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+fetch> [variable] ok 7108 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+fetch> [exception] ok 7109 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+fetch> [return] ok 7110 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+fetch> [variable] ok 7111 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+fetch> [exception] ok 7112 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+fetch> [return] ok 7113 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+fetch> [variable] ok 7114 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+fetch> [exception] ok 7115 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+fetch> [return] ok 7116 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+fetch> [variable] ok 7117 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+fetch> [exception] ok 7118 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+fetch> [return] ok 7119 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+fetch> [variable] ok 7120 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+fetch> [exception] ok 7121 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+fetch> [return] ok 7122 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+fetch> [variable] ok 7123 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+fetch> [exception] ok 7124 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+fetch> [return] ok 7125 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+fetch> [variable] ok 7126 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+fetch> [exception] ok 7127 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+fetch> [return] ok 7128 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+fetch> [variable] ok 7129 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+exists> [exception] ok 7130 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+exists> [return] ok 7131 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+exists> [variable] ok 7132 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+exists> [exception] ok 7133 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+exists> [return] ok 7134 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+exists> [variable] ok 7135 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+exists> [exception] ok 7136 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+exists> [return] ok 7137 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+exists> [variable] ok 7138 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+exists> [exception] ok 7139 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+exists> [return] ok 7140 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+exists> [variable] ok 7141 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+exists> [exception] ok 7142 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+exists> [return] ok 7143 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+exists> [variable] ok 7144 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+exists> [exception] ok 7145 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+exists> [return] ok 7146 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+exists> [variable] ok 7147 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+exists> [exception] ok 7148 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+exists> [return] ok 7149 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+exists> [variable] ok 7150 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+exists> [exception] ok 7151 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+exists> [return] ok 7152 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+exists> [variable] ok 7153 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+exists> [exception] ok 7154 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+exists> [return] ok 7155 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+exists> [variable] ok 7156 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+exists> [exception] ok 7157 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+exists> [return] ok 7158 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+exists> [variable] ok 7159 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+exists> [exception] ok 7160 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+exists> [return] ok 7161 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+exists> [variable] ok 7162 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+exists> [exception] ok 7163 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+exists> [return] ok 7164 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+exists> [variable] ok 7165 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+exists> [exception] ok 7166 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+exists> [return] ok 7167 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+exists> [variable] ok 7168 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+exists> [exception] ok 7169 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+exists> [return] ok 7170 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+exists> [variable] ok 7171 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+exists> [exception] ok 7172 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+exists> [return] ok 7173 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+exists> [variable] ok 7174 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+exists> [exception] ok 7175 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+exists> [return] ok 7176 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+exists> [variable] ok 7177 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+exists> [exception] ok 7178 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+exists> [return] ok 7179 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+exists> [variable] ok 7180 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+exists> [exception] ok 7181 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+exists> [return] ok 7182 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+exists> [variable] ok 7183 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+delete> [exception] ok 7184 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+delete> [return] ok 7185 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+delete> [variable] ok 7186 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+delete> [exception] ok 7187 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+delete> [return] ok 7188 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+delete> [variable] ok 7189 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+delete> [exception] ok 7190 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+delete> [return] ok 7191 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+delete> [variable] ok 7192 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+delete> [exception] ok 7193 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+delete> [return] ok 7194 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+delete> [variable] ok 7195 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+delete> [exception] ok 7196 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+delete> [return] ok 7197 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+delete> [variable] ok 7198 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+delete> [exception] ok 7199 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+delete> [return] ok 7200 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+delete> [variable] ok 7201 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+delete> [exception] ok 7202 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+delete> [return] ok 7203 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+delete> [variable] ok 7204 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+delete> [exception] ok 7205 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+delete> [return] ok 7206 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+delete> [variable] ok 7207 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+delete> [exception] ok 7208 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+delete> [return] ok 7209 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+delete> [variable] ok 7210 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+delete> [exception] ok 7211 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+delete> [return] ok 7212 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+delete> [variable] ok 7213 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+delete> [exception] ok 7214 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+delete> [return] ok 7215 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+delete> [variable] ok 7216 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+delete> [exception] ok 7217 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+delete> [return] ok 7218 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+delete> [variable] ok 7219 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+delete> [exception] ok 7220 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+delete> [return] ok 7221 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+delete> [variable] ok 7222 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+delete> [exception] ok 7223 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+delete> [return] ok 7224 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+delete> [variable] ok 7225 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+delete> [exception] ok 7226 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+delete> [return] ok 7227 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+delete> [variable] ok 7228 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+delete> [exception] ok 7229 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+delete> [return] ok 7230 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+delete> [variable] ok 7231 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+delete> [exception] ok 7232 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+delete> [return] ok 7233 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+delete> [variable] ok 7234 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+delete> [exception] ok 7235 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+delete> [return] ok 7236 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+delete> [variable] ok 7237 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+store> [exception] ok 7238 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+store> [return] ok 7239 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+store> [variable] ok 7240 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+store> [exception] ok 7241 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+store> [return] ok 7242 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+store> [variable] ok 7243 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+store> [exception] ok 7244 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+store> [return] ok 7245 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+store> [variable] ok 7246 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+store> [exception] ok 7247 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+store> [return] ok 7248 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+store> [variable] ok 7249 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+store> [exception] ok 7250 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+store> [return] ok 7251 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+store> [variable] ok 7252 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+store> [exception] ok 7253 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+store> [return] ok 7254 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+store> [variable] ok 7255 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+store> [exception] ok 7256 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+store> [return] ok 7257 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+store> [variable] ok 7258 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+store> [exception] ok 7259 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+store> [return] ok 7260 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+store> [variable] ok 7261 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+store> [exception] ok 7262 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+store> [return] ok 7263 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+store> [variable] ok 7264 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+store> [exception] ok 7265 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+store> [return] ok 7266 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+store> [variable] ok 7267 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+store> [exception] ok 7268 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+store> [return] ok 7269 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+store> [variable] ok 7270 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+store> [exception] ok 7271 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+store> [return] ok 7272 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+store> [variable] ok 7273 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+store> [exception] ok 7274 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+store> [return] ok 7275 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+store> [variable] ok 7276 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+store> [exception] ok 7277 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+store> [return] ok 7278 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+store> [variable] ok 7279 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+store> [exception] ok 7280 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+store> [return] ok 7281 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+store> [variable] ok 7282 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+store> [exception] ok 7283 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+store> [return] ok 7284 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+store> [variable] ok 7285 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+store> [exception] ok 7286 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+store> [return] ok 7287 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+store> [variable] ok 7288 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+store> [exception] ok 7289 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+store> [return] ok 7290 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+store> [variable] ok 7291 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +fetch> [exception] ok 7292 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +fetch> [return] ok 7293 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +fetch> [variable] ok 7294 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +fetch> [exception] ok 7295 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +fetch> [return] ok 7296 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +fetch> [variable] ok 7297 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +fetch> [exception] ok 7298 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +fetch> [return] ok 7299 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +fetch> [variable] ok 7300 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +fetch> [exception] ok 7301 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +fetch> [return] ok 7302 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +fetch> [variable] ok 7303 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +fetch> [exception] ok 7304 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +fetch> [return] ok 7305 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +fetch> [variable] ok 7306 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +fetch> [exception] ok 7307 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +fetch> [return] ok 7308 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +fetch> [variable] ok 7309 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +fetch> [exception] ok 7310 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +fetch> [return] ok 7311 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +fetch> [variable] ok 7312 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +fetch> [exception] ok 7313 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +fetch> [return] ok 7314 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +fetch> [variable] ok 7315 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +fetch> [exception] ok 7316 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +fetch> [return] ok 7317 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +fetch> [variable] ok 7318 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +fetch> [exception] ok 7319 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +fetch> [return] ok 7320 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +fetch> [variable] ok 7321 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +fetch> [exception] ok 7322 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +fetch> [return] ok 7323 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +fetch> [variable] ok 7324 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +fetch> [exception] ok 7325 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +fetch> [return] ok 7326 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +fetch> [variable] ok 7327 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +fetch> [exception] ok 7328 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +fetch> [return] ok 7329 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +fetch> [variable] ok 7330 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +fetch> [exception] ok 7331 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +fetch> [return] ok 7332 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +fetch> [variable] ok 7333 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +fetch> [exception] ok 7334 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +fetch> [return] ok 7335 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +fetch> [variable] ok 7336 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +fetch> [exception] ok 7337 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +fetch> [return] ok 7338 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +fetch> [variable] ok 7339 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +fetch> [exception] ok 7340 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +fetch> [return] ok 7341 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +fetch> [variable] ok 7342 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +fetch> [exception] ok 7343 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +fetch> [return] ok 7344 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +fetch> [variable] ok 7345 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +exists> [exception] ok 7346 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +exists> [return] ok 7347 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +exists> [variable] ok 7348 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +exists> [exception] ok 7349 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +exists> [return] ok 7350 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +exists> [variable] ok 7351 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +exists> [exception] ok 7352 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +exists> [return] ok 7353 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +exists> [variable] ok 7354 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +exists> [exception] ok 7355 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +exists> [return] ok 7356 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +exists> [variable] ok 7357 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +exists> [exception] ok 7358 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +exists> [return] ok 7359 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +exists> [variable] ok 7360 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +exists> [exception] ok 7361 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +exists> [return] ok 7362 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +exists> [variable] ok 7363 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +exists> [exception] ok 7364 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +exists> [return] ok 7365 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +exists> [variable] ok 7366 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +exists> [exception] ok 7367 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +exists> [return] ok 7368 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +exists> [variable] ok 7369 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +exists> [exception] ok 7370 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +exists> [return] ok 7371 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +exists> [variable] ok 7372 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +exists> [exception] ok 7373 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +exists> [return] ok 7374 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +exists> [variable] ok 7375 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +exists> [exception] ok 7376 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +exists> [return] ok 7377 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +exists> [variable] ok 7378 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +exists> [exception] ok 7379 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +exists> [return] ok 7380 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +exists> [variable] ok 7381 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +exists> [exception] ok 7382 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +exists> [return] ok 7383 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +exists> [variable] ok 7384 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +exists> [exception] ok 7385 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +exists> [return] ok 7386 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +exists> [variable] ok 7387 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +exists> [exception] ok 7388 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +exists> [return] ok 7389 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +exists> [variable] ok 7390 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +exists> [exception] ok 7391 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +exists> [return] ok 7392 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +exists> [variable] ok 7393 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +exists> [exception] ok 7394 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +exists> [return] ok 7395 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +exists> [variable] ok 7396 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +exists> [exception] ok 7397 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +exists> [return] ok 7398 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +exists> [variable] ok 7399 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +delete> [exception] ok 7400 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +delete> [return] ok 7401 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +delete> [variable] ok 7402 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +delete> [exception] ok 7403 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +delete> [return] ok 7404 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +delete> [variable] ok 7405 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +delete> [exception] ok 7406 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +delete> [return] ok 7407 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +delete> [variable] ok 7408 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +delete> [exception] ok 7409 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +delete> [return] ok 7410 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +delete> [variable] ok 7411 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +delete> [exception] ok 7412 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +delete> [return] ok 7413 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +delete> [variable] ok 7414 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +delete> [exception] ok 7415 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +delete> [return] ok 7416 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +delete> [variable] ok 7417 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +delete> [exception] ok 7418 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +delete> [return] ok 7419 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +delete> [variable] ok 7420 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +delete> [exception] ok 7421 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +delete> [return] ok 7422 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +delete> [variable] ok 7423 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +delete> [exception] ok 7424 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +delete> [return] ok 7425 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +delete> [variable] ok 7426 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +delete> [exception] ok 7427 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +delete> [return] ok 7428 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +delete> [variable] ok 7429 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +delete> [exception] ok 7430 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +delete> [return] ok 7431 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +delete> [variable] ok 7432 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +delete> [exception] ok 7433 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +delete> [return] ok 7434 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +delete> [variable] ok 7435 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +delete> [exception] ok 7436 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +delete> [return] ok 7437 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +delete> [variable] ok 7438 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +delete> [exception] ok 7439 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +delete> [return] ok 7440 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +delete> [variable] ok 7441 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +delete> [exception] ok 7442 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +delete> [return] ok 7443 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +delete> [variable] ok 7444 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +delete> [exception] ok 7445 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +delete> [return] ok 7446 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +delete> [variable] ok 7447 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +delete> [exception] ok 7448 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +delete> [return] ok 7449 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +delete> [variable] ok 7450 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +delete> [exception] ok 7451 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +delete> [return] ok 7452 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +delete> [variable] ok 7453 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +store> [exception] ok 7454 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +store> [return] ok 7455 - my $x; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +store> [variable] ok 7456 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +store> [exception] ok 7457 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +store> [return] ok 7458 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +store> [variable] ok 7459 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +store> [exception] ok 7460 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +store> [return] ok 7461 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[0]] = 2 <+strict +store> [variable] ok 7462 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +store> [exception] ok 7463 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +store> [return] ok 7464 - my $x; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +store> [variable] ok 7465 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +store> [exception] ok 7466 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +store> [return] ok 7467 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +store> [variable] ok 7468 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +store> [exception] ok 7469 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +store> [return] ok 7470 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[0]] = 2 <+strict +store> [variable] ok 7471 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +store> [exception] ok 7472 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +store> [return] ok 7473 - my @x; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +store> [variable] ok 7474 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +store> [exception] ok 7475 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +store> [return] ok 7476 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +store> [variable] ok 7477 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +store> [exception] ok 7478 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +store> [return] ok 7479 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[0]] = 2 <+strict +store> [variable] ok 7480 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +store> [exception] ok 7481 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +store> [return] ok 7482 - my $x; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +store> [variable] ok 7483 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +store> [exception] ok 7484 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +store> [return] ok 7485 - our $x; local $x; use strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +store> [variable] ok 7486 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +store> [exception] ok 7487 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +store> [return] ok 7488 - our $x; local $x; no strict; $x->[$N[0]] = 1; $x->[$N[1]] = 2 <+strict +store> [variable] ok 7489 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +store> [exception] ok 7490 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +store> [return] ok 7491 - my $x; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +store> [variable] ok 7492 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +store> [exception] ok 7493 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +store> [return] ok 7494 - our $x; local $x; use strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +store> [variable] ok 7495 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +store> [exception] ok 7496 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +store> [return] ok 7497 - our $x; local $x; no strict; $x->[$N[0]] = 1; $$x[$N[1]] = 2 <+strict +store> [variable] ok 7498 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +store> [exception] ok 7499 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +store> [return] ok 7500 - my @x; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +store> [variable] ok 7501 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +store> [exception] ok 7502 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +store> [return] ok 7503 - our @x; local @x; use strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +store> [variable] ok 7504 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +store> [exception] ok 7505 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +store> [return] ok 7506 - our @x; local @x; no strict; $x[$N[0]] = 1; $x[$N[1]] = 2 <+strict +store> [variable] ok 7507 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+fetch> [exception] ok 7508 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+fetch> [return] ok 7509 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+fetch> [variable] ok 7510 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+fetch> [exception] ok 7511 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+fetch> [return] ok 7512 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+fetch> [variable] ok 7513 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+fetch> [exception] ok 7514 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+fetch> [return] ok 7515 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+fetch> [variable] ok 7516 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+fetch> [exception] ok 7517 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+fetch> [return] ok 7518 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+fetch> [variable] ok 7519 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+fetch> [exception] ok 7520 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+fetch> [return] ok 7521 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+fetch> [variable] ok 7522 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+fetch> [exception] ok 7523 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+fetch> [return] ok 7524 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+fetch> [variable] ok 7525 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+fetch> [exception] ok 7526 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+fetch> [return] ok 7527 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+fetch> [variable] ok 7528 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+fetch> [exception] ok 7529 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+fetch> [return] ok 7530 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+fetch> [variable] ok 7531 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+fetch> [exception] ok 7532 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+fetch> [return] ok 7533 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+fetch> [variable] ok 7534 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+fetch> [exception] ok 7535 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+fetch> [return] ok 7536 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+fetch> [variable] ok 7537 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+fetch> [exception] ok 7538 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+fetch> [return] ok 7539 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+fetch> [variable] ok 7540 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+fetch> [exception] ok 7541 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+fetch> [return] ok 7542 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+fetch> [variable] ok 7543 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+fetch> [exception] ok 7544 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+fetch> [return] ok 7545 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+fetch> [variable] ok 7546 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+fetch> [exception] ok 7547 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+fetch> [return] ok 7548 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+fetch> [variable] ok 7549 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+fetch> [exception] ok 7550 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+fetch> [return] ok 7551 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+fetch> [variable] ok 7552 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+fetch> [exception] ok 7553 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+fetch> [return] ok 7554 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+fetch> [variable] ok 7555 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+fetch> [exception] ok 7556 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+fetch> [return] ok 7557 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+fetch> [variable] ok 7558 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+fetch> [exception] ok 7559 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+fetch> [return] ok 7560 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+fetch> [variable] ok 7561 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+fetch> [exception] ok 7562 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+fetch> [return] ok 7563 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+fetch> [variable] ok 7564 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+fetch> [exception] ok 7565 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+fetch> [return] ok 7566 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+fetch> [variable] ok 7567 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+fetch> [exception] ok 7568 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+fetch> [return] ok 7569 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+fetch> [variable] ok 7570 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+fetch> [exception] ok 7571 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+fetch> [return] ok 7572 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+fetch> [variable] ok 7573 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+fetch> [exception] ok 7574 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+fetch> [return] ok 7575 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+fetch> [variable] ok 7576 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+fetch> [exception] ok 7577 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+fetch> [return] ok 7578 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+fetch> [variable] ok 7579 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+fetch> [exception] ok 7580 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+fetch> [return] ok 7581 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+fetch> [variable] ok 7582 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+fetch> [exception] ok 7583 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+fetch> [return] ok 7584 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+fetch> [variable] ok 7585 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+fetch> [exception] ok 7586 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+fetch> [return] ok 7587 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+fetch> [variable] ok 7588 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+exists> [exception] ok 7589 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+exists> [return] ok 7590 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+exists> [variable] ok 7591 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+exists> [exception] ok 7592 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+exists> [return] ok 7593 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+exists> [variable] ok 7594 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+exists> [exception] ok 7595 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+exists> [return] ok 7596 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+exists> [variable] ok 7597 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+exists> [exception] ok 7598 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+exists> [return] ok 7599 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+exists> [variable] ok 7600 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+exists> [exception] ok 7601 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+exists> [return] ok 7602 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+exists> [variable] ok 7603 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+exists> [exception] ok 7604 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+exists> [return] ok 7605 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+exists> [variable] ok 7606 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+exists> [exception] ok 7607 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+exists> [return] ok 7608 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+exists> [variable] ok 7609 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+exists> [exception] ok 7610 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+exists> [return] ok 7611 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+exists> [variable] ok 7612 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+exists> [exception] ok 7613 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+exists> [return] ok 7614 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+exists> [variable] ok 7615 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+exists> [exception] ok 7616 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+exists> [return] ok 7617 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+exists> [variable] ok 7618 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+exists> [exception] ok 7619 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+exists> [return] ok 7620 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+exists> [variable] ok 7621 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+exists> [exception] ok 7622 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+exists> [return] ok 7623 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+exists> [variable] ok 7624 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+exists> [exception] ok 7625 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+exists> [return] ok 7626 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+exists> [variable] ok 7627 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+exists> [exception] ok 7628 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+exists> [return] ok 7629 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+exists> [variable] ok 7630 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+exists> [exception] ok 7631 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+exists> [return] ok 7632 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+exists> [variable] ok 7633 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+exists> [exception] ok 7634 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+exists> [return] ok 7635 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+exists> [variable] ok 7636 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+exists> [exception] ok 7637 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+exists> [return] ok 7638 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+exists> [variable] ok 7639 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+exists> [exception] ok 7640 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+exists> [return] ok 7641 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+exists> [variable] ok 7642 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+exists> [exception] ok 7643 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+exists> [return] ok 7644 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+exists> [variable] ok 7645 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+exists> [exception] ok 7646 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+exists> [return] ok 7647 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+exists> [variable] ok 7648 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+exists> [exception] ok 7649 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+exists> [return] ok 7650 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+exists> [variable] ok 7651 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+exists> [exception] ok 7652 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+exists> [return] ok 7653 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+exists> [variable] ok 7654 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+exists> [exception] ok 7655 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+exists> [return] ok 7656 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+exists> [variable] ok 7657 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+exists> [exception] ok 7658 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+exists> [return] ok 7659 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+exists> [variable] ok 7660 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+exists> [exception] ok 7661 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+exists> [return] ok 7662 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+exists> [variable] ok 7663 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+exists> [exception] ok 7664 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+exists> [return] ok 7665 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+exists> [variable] ok 7666 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+exists> [exception] ok 7667 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+exists> [return] ok 7668 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+exists> [variable] ok 7669 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+delete> [exception] ok 7670 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+delete> [return] ok 7671 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+delete> [variable] ok 7672 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+delete> [exception] ok 7673 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+delete> [return] ok 7674 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+delete> [variable] ok 7675 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+delete> [exception] ok 7676 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+delete> [return] ok 7677 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+delete> [variable] ok 7678 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+delete> [exception] ok 7679 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+delete> [return] ok 7680 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+delete> [variable] ok 7681 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+delete> [exception] ok 7682 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+delete> [return] ok 7683 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+delete> [variable] ok 7684 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+delete> [exception] ok 7685 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+delete> [return] ok 7686 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+delete> [variable] ok 7687 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+delete> [exception] ok 7688 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+delete> [return] ok 7689 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+delete> [variable] ok 7690 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+delete> [exception] ok 7691 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+delete> [return] ok 7692 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+delete> [variable] ok 7693 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+delete> [exception] ok 7694 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+delete> [return] ok 7695 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+delete> [variable] ok 7696 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+delete> [exception] ok 7697 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+delete> [return] ok 7698 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+delete> [variable] ok 7699 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+delete> [exception] ok 7700 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+delete> [return] ok 7701 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+delete> [variable] ok 7702 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+delete> [exception] ok 7703 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+delete> [return] ok 7704 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+delete> [variable] ok 7705 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+delete> [exception] ok 7706 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+delete> [return] ok 7707 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+delete> [variable] ok 7708 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+delete> [exception] ok 7709 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+delete> [return] ok 7710 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+delete> [variable] ok 7711 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+delete> [exception] ok 7712 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+delete> [return] ok 7713 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+delete> [variable] ok 7714 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+delete> [exception] ok 7715 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+delete> [return] ok 7716 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+delete> [variable] ok 7717 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+delete> [exception] ok 7718 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+delete> [return] ok 7719 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+delete> [variable] ok 7720 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+delete> [exception] ok 7721 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+delete> [return] ok 7722 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+delete> [variable] ok 7723 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+delete> [exception] ok 7724 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+delete> [return] ok 7725 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+delete> [variable] ok 7726 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+delete> [exception] ok 7727 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+delete> [return] ok 7728 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+delete> [variable] ok 7729 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+delete> [exception] ok 7730 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+delete> [return] ok 7731 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+delete> [variable] ok 7732 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+delete> [exception] ok 7733 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+delete> [return] ok 7734 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+delete> [variable] ok 7735 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+delete> [exception] ok 7736 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+delete> [return] ok 7737 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+delete> [variable] ok 7738 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+delete> [exception] ok 7739 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+delete> [return] ok 7740 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+delete> [variable] ok 7741 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+delete> [exception] ok 7742 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+delete> [return] ok 7743 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+delete> [variable] ok 7744 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+delete> [exception] ok 7745 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+delete> [return] ok 7746 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+delete> [variable] ok 7747 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+delete> [exception] ok 7748 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+delete> [return] ok 7749 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+delete> [variable] ok 7750 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+store> [exception] ok 7751 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+store> [return] ok 7752 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+store> [variable] ok 7753 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+store> [exception] ok 7754 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+store> [return] ok 7755 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+store> [variable] ok 7756 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+store> [exception] ok 7757 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+store> [return] ok 7758 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+store> [variable] ok 7759 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+store> [exception] ok 7760 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+store> [return] ok 7761 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+store> [variable] ok 7762 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+store> [exception] ok 7763 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+store> [return] ok 7764 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+store> [variable] ok 7765 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+store> [exception] ok 7766 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+store> [return] ok 7767 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+store> [variable] ok 7768 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+store> [exception] ok 7769 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+store> [return] ok 7770 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+store> [variable] ok 7771 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+store> [exception] ok 7772 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+store> [return] ok 7773 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+store> [variable] ok 7774 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+store> [exception] ok 7775 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+store> [return] ok 7776 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+store> [variable] ok 7777 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+store> [exception] ok 7778 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+store> [return] ok 7779 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+store> [variable] ok 7780 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+store> [exception] ok 7781 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+store> [return] ok 7782 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+store> [variable] ok 7783 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+store> [exception] ok 7784 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+store> [return] ok 7785 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+store> [variable] ok 7786 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+store> [exception] ok 7787 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+store> [return] ok 7788 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+store> [variable] ok 7789 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+store> [exception] ok 7790 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+store> [return] ok 7791 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+store> [variable] ok 7792 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+store> [exception] ok 7793 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+store> [return] ok 7794 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+store> [variable] ok 7795 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+store> [exception] ok 7796 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+store> [return] ok 7797 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+store> [variable] ok 7798 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+store> [exception] ok 7799 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+store> [return] ok 7800 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+store> [variable] ok 7801 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+store> [exception] ok 7802 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+store> [return] ok 7803 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+store> [variable] ok 7804 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+store> [exception] ok 7805 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+store> [return] ok 7806 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+store> [variable] ok 7807 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+store> [exception] ok 7808 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+store> [return] ok 7809 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+store> [variable] ok 7810 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+store> [exception] ok 7811 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+store> [return] ok 7812 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+store> [variable] ok 7813 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+store> [exception] ok 7814 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+store> [return] ok 7815 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+store> [variable] ok 7816 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+store> [exception] ok 7817 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+store> [return] ok 7818 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+store> [variable] ok 7819 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+store> [exception] ok 7820 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+store> [return] ok 7821 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+store> [variable] ok 7822 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+store> [exception] ok 7823 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+store> [return] ok 7824 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+store> [variable] ok 7825 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+store> [exception] ok 7826 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+store> [return] ok 7827 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+store> [variable] ok 7828 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+store> [exception] ok 7829 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+store> [return] ok 7830 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+store> [variable] ok 7831 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +fetch> [exception] ok 7832 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +fetch> [return] ok 7833 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +fetch> [variable] ok 7834 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +fetch> [exception] ok 7835 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +fetch> [return] ok 7836 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +fetch> [variable] ok 7837 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +fetch> [exception] ok 7838 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +fetch> [return] ok 7839 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +fetch> [variable] ok 7840 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +fetch> [exception] ok 7841 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +fetch> [return] ok 7842 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +fetch> [variable] ok 7843 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +fetch> [exception] ok 7844 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +fetch> [return] ok 7845 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +fetch> [variable] ok 7846 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +fetch> [exception] ok 7847 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +fetch> [return] ok 7848 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +fetch> [variable] ok 7849 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +fetch> [exception] ok 7850 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +fetch> [return] ok 7851 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +fetch> [variable] ok 7852 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +fetch> [exception] ok 7853 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +fetch> [return] ok 7854 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +fetch> [variable] ok 7855 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +fetch> [exception] ok 7856 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +fetch> [return] ok 7857 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +fetch> [variable] ok 7858 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +fetch> [exception] ok 7859 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +fetch> [return] ok 7860 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +fetch> [variable] ok 7861 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +fetch> [exception] ok 7862 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +fetch> [return] ok 7863 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +fetch> [variable] ok 7864 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +fetch> [exception] ok 7865 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +fetch> [return] ok 7866 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +fetch> [variable] ok 7867 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +fetch> [exception] ok 7868 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +fetch> [return] ok 7869 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +fetch> [variable] ok 7870 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +fetch> [exception] ok 7871 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +fetch> [return] ok 7872 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +fetch> [variable] ok 7873 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +fetch> [exception] ok 7874 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +fetch> [return] ok 7875 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +fetch> [variable] ok 7876 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +fetch> [exception] ok 7877 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +fetch> [return] ok 7878 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +fetch> [variable] ok 7879 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +fetch> [exception] ok 7880 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +fetch> [return] ok 7881 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +fetch> [variable] ok 7882 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +fetch> [exception] ok 7883 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +fetch> [return] ok 7884 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +fetch> [variable] ok 7885 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +fetch> [exception] ok 7886 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +fetch> [return] ok 7887 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +fetch> [variable] ok 7888 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +fetch> [exception] ok 7889 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +fetch> [return] ok 7890 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +fetch> [variable] ok 7891 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +fetch> [exception] ok 7892 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +fetch> [return] ok 7893 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +fetch> [variable] ok 7894 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +fetch> [exception] ok 7895 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +fetch> [return] ok 7896 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +fetch> [variable] ok 7897 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +fetch> [exception] ok 7898 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +fetch> [return] ok 7899 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +fetch> [variable] ok 7900 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +fetch> [exception] ok 7901 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +fetch> [return] ok 7902 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +fetch> [variable] ok 7903 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +fetch> [exception] ok 7904 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +fetch> [return] ok 7905 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +fetch> [variable] ok 7906 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +fetch> [exception] ok 7907 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +fetch> [return] ok 7908 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +fetch> [variable] ok 7909 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +fetch> [exception] ok 7910 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +fetch> [return] ok 7911 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +fetch> [variable] ok 7912 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +exists> [exception] ok 7913 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +exists> [return] ok 7914 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +exists> [variable] ok 7915 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +exists> [exception] ok 7916 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +exists> [return] ok 7917 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +exists> [variable] ok 7918 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +exists> [exception] ok 7919 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +exists> [return] ok 7920 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +exists> [variable] ok 7921 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +exists> [exception] ok 7922 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +exists> [return] ok 7923 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +exists> [variable] ok 7924 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +exists> [exception] ok 7925 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +exists> [return] ok 7926 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +exists> [variable] ok 7927 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +exists> [exception] ok 7928 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +exists> [return] ok 7929 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +exists> [variable] ok 7930 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +exists> [exception] ok 7931 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +exists> [return] ok 7932 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +exists> [variable] ok 7933 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +exists> [exception] ok 7934 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +exists> [return] ok 7935 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +exists> [variable] ok 7936 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +exists> [exception] ok 7937 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +exists> [return] ok 7938 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +exists> [variable] ok 7939 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +exists> [exception] ok 7940 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +exists> [return] ok 7941 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +exists> [variable] ok 7942 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +exists> [exception] ok 7943 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +exists> [return] ok 7944 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +exists> [variable] ok 7945 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +exists> [exception] ok 7946 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +exists> [return] ok 7947 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +exists> [variable] ok 7948 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +exists> [exception] ok 7949 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +exists> [return] ok 7950 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +exists> [variable] ok 7951 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +exists> [exception] ok 7952 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +exists> [return] ok 7953 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +exists> [variable] ok 7954 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +exists> [exception] ok 7955 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +exists> [return] ok 7956 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +exists> [variable] ok 7957 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +exists> [exception] ok 7958 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +exists> [return] ok 7959 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +exists> [variable] ok 7960 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +exists> [exception] ok 7961 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +exists> [return] ok 7962 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +exists> [variable] ok 7963 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +exists> [exception] ok 7964 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +exists> [return] ok 7965 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +exists> [variable] ok 7966 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +exists> [exception] ok 7967 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +exists> [return] ok 7968 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +exists> [variable] ok 7969 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +exists> [exception] ok 7970 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +exists> [return] ok 7971 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +exists> [variable] ok 7972 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +exists> [exception] ok 7973 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +exists> [return] ok 7974 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +exists> [variable] ok 7975 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +exists> [exception] ok 7976 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +exists> [return] ok 7977 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +exists> [variable] ok 7978 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +exists> [exception] ok 7979 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +exists> [return] ok 7980 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +exists> [variable] ok 7981 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +exists> [exception] ok 7982 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +exists> [return] ok 7983 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +exists> [variable] ok 7984 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +exists> [exception] ok 7985 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +exists> [return] ok 7986 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +exists> [variable] ok 7987 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +exists> [exception] ok 7988 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +exists> [return] ok 7989 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +exists> [variable] ok 7990 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +exists> [exception] ok 7991 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +exists> [return] ok 7992 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +exists> [variable] ok 7993 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +delete> [exception] ok 7994 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +delete> [return] ok 7995 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +delete> [variable] ok 7996 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +delete> [exception] ok 7997 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +delete> [return] ok 7998 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +delete> [variable] ok 7999 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +delete> [exception] ok 8000 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +delete> [return] ok 8001 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +delete> [variable] ok 8002 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +delete> [exception] ok 8003 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +delete> [return] ok 8004 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +delete> [variable] ok 8005 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +delete> [exception] ok 8006 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +delete> [return] ok 8007 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +delete> [variable] ok 8008 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +delete> [exception] ok 8009 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +delete> [return] ok 8010 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +delete> [variable] ok 8011 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +delete> [exception] ok 8012 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +delete> [return] ok 8013 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +delete> [variable] ok 8014 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +delete> [exception] ok 8015 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +delete> [return] ok 8016 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +delete> [variable] ok 8017 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +delete> [exception] ok 8018 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +delete> [return] ok 8019 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +delete> [variable] ok 8020 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +delete> [exception] ok 8021 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +delete> [return] ok 8022 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +delete> [variable] ok 8023 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +delete> [exception] ok 8024 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +delete> [return] ok 8025 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +delete> [variable] ok 8026 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +delete> [exception] ok 8027 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +delete> [return] ok 8028 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +delete> [variable] ok 8029 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +delete> [exception] ok 8030 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +delete> [return] ok 8031 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +delete> [variable] ok 8032 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +delete> [exception] ok 8033 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +delete> [return] ok 8034 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +delete> [variable] ok 8035 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +delete> [exception] ok 8036 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +delete> [return] ok 8037 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +delete> [variable] ok 8038 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +delete> [exception] ok 8039 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +delete> [return] ok 8040 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +delete> [variable] ok 8041 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +delete> [exception] ok 8042 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +delete> [return] ok 8043 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +delete> [variable] ok 8044 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +delete> [exception] ok 8045 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +delete> [return] ok 8046 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +delete> [variable] ok 8047 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +delete> [exception] ok 8048 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +delete> [return] ok 8049 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +delete> [variable] ok 8050 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +delete> [exception] ok 8051 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +delete> [return] ok 8052 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +delete> [variable] ok 8053 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +delete> [exception] ok 8054 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +delete> [return] ok 8055 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +delete> [variable] ok 8056 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +delete> [exception] ok 8057 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +delete> [return] ok 8058 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +delete> [variable] ok 8059 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +delete> [exception] ok 8060 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +delete> [return] ok 8061 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +delete> [variable] ok 8062 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +delete> [exception] ok 8063 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +delete> [return] ok 8064 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +delete> [variable] ok 8065 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +delete> [exception] ok 8066 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +delete> [return] ok 8067 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +delete> [variable] ok 8068 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +delete> [exception] ok 8069 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +delete> [return] ok 8070 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +delete> [variable] ok 8071 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +delete> [exception] ok 8072 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +delete> [return] ok 8073 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +delete> [variable] ok 8074 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +store> [exception] ok 8075 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +store> [return] ok 8076 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +store> [variable] ok 8077 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +store> [exception] ok 8078 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +store> [return] ok 8079 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +store> [variable] ok 8080 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +store> [exception] ok 8081 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +store> [return] ok 8082 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[1]] = 2 <+strict +store> [variable] ok 8083 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +store> [exception] ok 8084 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +store> [return] ok 8085 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +store> [variable] ok 8086 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +store> [exception] ok 8087 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +store> [return] ok 8088 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +store> [variable] ok 8089 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +store> [exception] ok 8090 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +store> [return] ok 8091 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[1]] = 2 <+strict +store> [variable] ok 8092 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +store> [exception] ok 8093 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +store> [return] ok 8094 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +store> [variable] ok 8095 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +store> [exception] ok 8096 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +store> [return] ok 8097 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +store> [variable] ok 8098 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +store> [exception] ok 8099 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +store> [return] ok 8100 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[1]] = 2 <+strict +store> [variable] ok 8101 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +store> [exception] ok 8102 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +store> [return] ok 8103 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +store> [variable] ok 8104 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +store> [exception] ok 8105 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +store> [return] ok 8106 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +store> [variable] ok 8107 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +store> [exception] ok 8108 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +store> [return] ok 8109 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[0]]->[$N[3]] = 2 <+strict +store> [variable] ok 8110 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +store> [exception] ok 8111 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +store> [return] ok 8112 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +store> [variable] ok 8113 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +store> [exception] ok 8114 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +store> [return] ok 8115 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +store> [variable] ok 8116 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +store> [exception] ok 8117 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +store> [return] ok 8118 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[0]]->[$N[3]] = 2 <+strict +store> [variable] ok 8119 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +store> [exception] ok 8120 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +store> [return] ok 8121 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +store> [variable] ok 8122 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +store> [exception] ok 8123 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +store> [return] ok 8124 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +store> [variable] ok 8125 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +store> [exception] ok 8126 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +store> [return] ok 8127 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[0]]->[$N[3]] = 2 <+strict +store> [variable] ok 8128 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +store> [exception] ok 8129 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +store> [return] ok 8130 - my $x; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +store> [variable] ok 8131 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +store> [exception] ok 8132 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +store> [return] ok 8133 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +store> [variable] ok 8134 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +store> [exception] ok 8135 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +store> [return] ok 8136 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $x->[$N[2]]->[$N[3]] = 2 <+strict +store> [variable] ok 8137 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +store> [exception] ok 8138 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +store> [return] ok 8139 - my $x; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +store> [variable] ok 8140 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +store> [exception] ok 8141 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +store> [return] ok 8142 - our $x; local $x; use strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +store> [variable] ok 8143 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +store> [exception] ok 8144 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +store> [return] ok 8145 - our $x; local $x; no strict; $x->[$N[0]]->[$N[1]] = 1; $$x[$N[2]]->[$N[3]] = 2 <+strict +store> [variable] ok 8146 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +store> [exception] ok 8147 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +store> [return] ok 8148 - my @x; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +store> [variable] ok 8149 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +store> [exception] ok 8150 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +store> [return] ok 8151 - our @x; local @x; use strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +store> [variable] ok 8152 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +store> [exception] ok 8153 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +store> [return] ok 8154 - our @x; local @x; no strict; $x[$N[0]]->[$N[1]] = 1; $x[$N[2]]->[$N[3]] = 2 <+strict +store> [variable] ok t/31-array-fast.t ......... 1..8154 ok 1 - my $x; $x->[0] [exception] ok 2 - my $x; $x->[0] [return] ok 3 - my $x; $x->[0] [variable] ok 4 - our $x; local $x; use strict; $x->[0] [exception] ok 5 - our $x; local $x; use strict; $x->[0] [return] ok 6 - our $x; local $x; use strict; $x->[0] [variable] ok 7 - our $x; local $x; no strict; $x->[0] [exception] ok 8 - our $x; local $x; no strict; $x->[0] [return] ok 9 - our $x; local $x; no strict; $x->[0] [variable] ok 10 - my $x; $$x[0] [exception] ok 11 - my $x; $$x[0] [return] ok 12 - my $x; $$x[0] [variable] ok 13 - our $x; local $x; use strict; $$x[0] [exception] ok 14 - our $x; local $x; use strict; $$x[0] [return] ok 15 - our $x; local $x; use strict; $$x[0] [variable] ok 16 - our $x; local $x; no strict; $$x[0] [exception] ok 17 - our $x; local $x; no strict; $$x[0] [return] ok 18 - our $x; local $x; no strict; $$x[0] [variable] ok 19 - my @x; $x[0] [exception] ok 20 - my @x; $x[0] [return] ok 21 - my @x; $x[0] [variable] ok 22 - our @x; local @x; use strict; $x[0] [exception] ok 23 - our @x; local @x; use strict; $x[0] [return] ok 24 - our @x; local @x; use strict; $x[0] [variable] ok 25 - our @x; local @x; no strict; $x[0] [exception] ok 26 - our @x; local @x; no strict; $x[0] [return] ok 27 - our @x; local @x; no strict; $x[0] [variable] ok 28 - my $x; $x->[0] [exception] ok 29 - my $x; $x->[0] [return] ok 30 - my $x; $x->[0] [variable] ok 31 - our $x; local $x; use strict; $x->[0] [exception] ok 32 - our $x; local $x; use strict; $x->[0] [return] ok 33 - our $x; local $x; use strict; $x->[0] [variable] ok 34 - our $x; local $x; no strict; $x->[0] [exception] ok 35 - our $x; local $x; no strict; $x->[0] [return] ok 36 - our $x; local $x; no strict; $x->[0] [variable] ok 37 - my $x; $$x[0] [exception] ok 38 - my $x; $$x[0] [return] ok 39 - my $x; $$x[0] [variable] ok 40 - our $x; local $x; use strict; $$x[0] [exception] ok 41 - our $x; local $x; use strict; $$x[0] [return] ok 42 - our $x; local $x; use strict; $$x[0] [variable] ok 43 - our $x; local $x; no strict; $$x[0] [exception] ok 44 - our $x; local $x; no strict; $$x[0] [return] ok 45 - our $x; local $x; no strict; $$x[0] [variable] ok 46 - my @x; $x[0] [exception] ok 47 - my @x; $x[0] [return] ok 48 - my @x; $x[0] [variable] ok 49 - our @x; local @x; use strict; $x[0] [exception] ok 50 - our @x; local @x; use strict; $x[0] [return] ok 51 - our @x; local @x; use strict; $x[0] [variable] ok 52 - our @x; local @x; no strict; $x[0] [exception] ok 53 - our @x; local @x; no strict; $x[0] [return] ok 54 - our @x; local @x; no strict; $x[0] [variable] ok 55 - my $x; $x->[0] <+fetch> [exception] ok 56 - my $x; $x->[0] <+fetch> [return] ok 57 - my $x; $x->[0] <+fetch> [variable] ok 58 - our $x; local $x; use strict; $x->[0] <+fetch> [exception] ok 59 - our $x; local $x; use strict; $x->[0] <+fetch> [return] ok 60 - our $x; local $x; use strict; $x->[0] <+fetch> [variable] ok 61 - our $x; local $x; no strict; $x->[0] <+fetch> [exception] ok 62 - our $x; local $x; no strict; $x->[0] <+fetch> [return] ok 63 - our $x; local $x; no strict; $x->[0] <+fetch> [variable] ok 64 - my $x; $$x[0] <+fetch> [exception] ok 65 - my $x; $$x[0] <+fetch> [return] ok 66 - my $x; $$x[0] <+fetch> [variable] ok 67 - our $x; local $x; use strict; $$x[0] <+fetch> [exception] ok 68 - our $x; local $x; use strict; $$x[0] <+fetch> [return] ok 69 - our $x; local $x; use strict; $$x[0] <+fetch> [variable] ok 70 - our $x; local $x; no strict; $$x[0] <+fetch> [exception] ok 71 - our $x; local $x; no strict; $$x[0] <+fetch> [return] ok 72 - our $x; local $x; no strict; $$x[0] <+fetch> [variable] ok 73 - my @x; $x[0] <+fetch> [exception] ok 74 - my @x; $x[0] <+fetch> [return] ok 75 - my @x; $x[0] <+fetch> [variable] ok 76 - our @x; local @x; use strict; $x[0] <+fetch> [exception] ok 77 - our @x; local @x; use strict; $x[0] <+fetch> [return] ok 78 - our @x; local @x; use strict; $x[0] <+fetch> [variable] ok 79 - our @x; local @x; no strict; $x[0] <+fetch> [exception] ok 80 - our @x; local @x; no strict; $x[0] <+fetch> [return] ok 81 - our @x; local @x; no strict; $x[0] <+fetch> [variable] ok 82 - my $x; $x->[0] <+exists> [exception] ok 83 - my $x; $x->[0] <+exists> [return] ok 84 - my $x; $x->[0] <+exists> [variable] ok 85 - our $x; local $x; use strict; $x->[0] <+exists> [exception] ok 86 - our $x; local $x; use strict; $x->[0] <+exists> [return] ok 87 - our $x; local $x; use strict; $x->[0] <+exists> [variable] ok 88 - our $x; local $x; no strict; $x->[0] <+exists> [exception] ok 89 - our $x; local $x; no strict; $x->[0] <+exists> [return] ok 90 - our $x; local $x; no strict; $x->[0] <+exists> [variable] ok 91 - my $x; $$x[0] <+exists> [exception] ok 92 - my $x; $$x[0] <+exists> [return] ok 93 - my $x; $$x[0] <+exists> [variable] ok 94 - our $x; local $x; use strict; $$x[0] <+exists> [exception] ok 95 - our $x; local $x; use strict; $$x[0] <+exists> [return] ok 96 - our $x; local $x; use strict; $$x[0] <+exists> [variable] ok 97 - our $x; local $x; no strict; $$x[0] <+exists> [exception] ok 98 - our $x; local $x; no strict; $$x[0] <+exists> [return] ok 99 - our $x; local $x; no strict; $$x[0] <+exists> [variable] ok 100 - my @x; $x[0] <+exists> [exception] ok 101 - my @x; $x[0] <+exists> [return] ok 102 - my @x; $x[0] <+exists> [variable] ok 103 - our @x; local @x; use strict; $x[0] <+exists> [exception] ok 104 - our @x; local @x; use strict; $x[0] <+exists> [return] ok 105 - our @x; local @x; use strict; $x[0] <+exists> [variable] ok 106 - our @x; local @x; no strict; $x[0] <+exists> [exception] ok 107 - our @x; local @x; no strict; $x[0] <+exists> [return] ok 108 - our @x; local @x; no strict; $x[0] <+exists> [variable] ok 109 - my $x; $x->[0] <+delete> [exception] ok 110 - my $x; $x->[0] <+delete> [return] ok 111 - my $x; $x->[0] <+delete> [variable] ok 112 - our $x; local $x; use strict; $x->[0] <+delete> [exception] ok 113 - our $x; local $x; use strict; $x->[0] <+delete> [return] ok 114 - our $x; local $x; use strict; $x->[0] <+delete> [variable] ok 115 - our $x; local $x; no strict; $x->[0] <+delete> [exception] ok 116 - our $x; local $x; no strict; $x->[0] <+delete> [return] ok 117 - our $x; local $x; no strict; $x->[0] <+delete> [variable] ok 118 - my $x; $$x[0] <+delete> [exception] ok 119 - my $x; $$x[0] <+delete> [return] ok 120 - my $x; $$x[0] <+delete> [variable] ok 121 - our $x; local $x; use strict; $$x[0] <+delete> [exception] ok 122 - our $x; local $x; use strict; $$x[0] <+delete> [return] ok 123 - our $x; local $x; use strict; $$x[0] <+delete> [variable] ok 124 - our $x; local $x; no strict; $$x[0] <+delete> [exception] ok 125 - our $x; local $x; no strict; $$x[0] <+delete> [return] ok 126 - our $x; local $x; no strict; $$x[0] <+delete> [variable] ok 127 - my @x; $x[0] <+delete> [exception] ok 128 - my @x; $x[0] <+delete> [return] ok 129 - my @x; $x[0] <+delete> [variable] ok 130 - our @x; local @x; use strict; $x[0] <+delete> [exception] ok 131 - our @x; local @x; use strict; $x[0] <+delete> [return] ok 132 - our @x; local @x; use strict; $x[0] <+delete> [variable] ok 133 - our @x; local @x; no strict; $x[0] <+delete> [exception] ok 134 - our @x; local @x; no strict; $x[0] <+delete> [return] ok 135 - our @x; local @x; no strict; $x[0] <+delete> [variable] ok 136 - my $x; $x->[0] <+store> [exception] ok 137 - my $x; $x->[0] <+store> [return] ok 138 - my $x; $x->[0] <+store> [variable] ok 139 - our $x; local $x; use strict; $x->[0] <+store> [exception] ok 140 - our $x; local $x; use strict; $x->[0] <+store> [return] ok 141 - our $x; local $x; use strict; $x->[0] <+store> [variable] ok 142 - our $x; local $x; no strict; $x->[0] <+store> [exception] ok 143 - our $x; local $x; no strict; $x->[0] <+store> [return] ok 144 - our $x; local $x; no strict; $x->[0] <+store> [variable] ok 145 - my $x; $$x[0] <+store> [exception] ok 146 - my $x; $$x[0] <+store> [return] ok 147 - my $x; $$x[0] <+store> [variable] ok 148 - our $x; local $x; use strict; $$x[0] <+store> [exception] ok 149 - our $x; local $x; use strict; $$x[0] <+store> [return] ok 150 - our $x; local $x; use strict; $$x[0] <+store> [variable] ok 151 - our $x; local $x; no strict; $$x[0] <+store> [exception] ok 152 - our $x; local $x; no strict; $$x[0] <+store> [return] ok 153 - our $x; local $x; no strict; $$x[0] <+store> [variable] ok 154 - my @x; $x[0] <+store> [exception] ok 155 - my @x; $x[0] <+store> [return] ok 156 - my @x; $x[0] <+store> [variable] ok 157 - our @x; local @x; use strict; $x[0] <+store> [exception] ok 158 - our @x; local @x; use strict; $x[0] <+store> [return] ok 159 - our @x; local @x; use strict; $x[0] <+store> [variable] ok 160 - our @x; local @x; no strict; $x[0] <+store> [exception] ok 161 - our @x; local @x; no strict; $x[0] <+store> [return] ok 162 - our @x; local @x; no strict; $x[0] <+store> [variable] ok 163 - my $x; $x->[0] <-fetch> [exception] ok 164 - my $x; $x->[0] <-fetch> [return] ok 165 - my $x; $x->[0] <-fetch> [variable] ok 166 - our $x; local $x; use strict; $x->[0] <-fetch> [exception] ok 167 - our $x; local $x; use strict; $x->[0] <-fetch> [return] ok 168 - our $x; local $x; use strict; $x->[0] <-fetch> [variable] ok 169 - our $x; local $x; no strict; $x->[0] <-fetch> [exception] ok 170 - our $x; local $x; no strict; $x->[0] <-fetch> [return] ok 171 - our $x; local $x; no strict; $x->[0] <-fetch> [variable] ok 172 - my $x; $$x[0] <-fetch> [exception] ok 173 - my $x; $$x[0] <-fetch> [return] ok 174 - my $x; $$x[0] <-fetch> [variable] ok 175 - our $x; local $x; use strict; $$x[0] <-fetch> [exception] ok 176 - our $x; local $x; use strict; $$x[0] <-fetch> [return] ok 177 - our $x; local $x; use strict; $$x[0] <-fetch> [variable] ok 178 - our $x; local $x; no strict; $$x[0] <-fetch> [exception] ok 179 - our $x; local $x; no strict; $$x[0] <-fetch> [return] ok 180 - our $x; local $x; no strict; $$x[0] <-fetch> [variable] ok 181 - my @x; $x[0] <-fetch> [exception] ok 182 - my @x; $x[0] <-fetch> [return] ok 183 - my @x; $x[0] <-fetch> [variable] ok 184 - our @x; local @x; use strict; $x[0] <-fetch> [exception] ok 185 - our @x; local @x; use strict; $x[0] <-fetch> [return] ok 186 - our @x; local @x; use strict; $x[0] <-fetch> [variable] ok 187 - our @x; local @x; no strict; $x[0] <-fetch> [exception] ok 188 - our @x; local @x; no strict; $x[0] <-fetch> [return] ok 189 - our @x; local @x; no strict; $x[0] <-fetch> [variable] ok 190 - my $x; $x->[0] <+fetch -fetch> [exception] ok 191 - my $x; $x->[0] <+fetch -fetch> [return] ok 192 - my $x; $x->[0] <+fetch -fetch> [variable] ok 193 - our $x; local $x; use strict; $x->[0] <+fetch -fetch> [exception] ok 194 - our $x; local $x; use strict; $x->[0] <+fetch -fetch> [return] ok 195 - our $x; local $x; use strict; $x->[0] <+fetch -fetch> [variable] ok 196 - our $x; local $x; no strict; $x->[0] <+fetch -fetch> [exception] ok 197 - our $x; local $x; no strict; $x->[0] <+fetch -fetch> [return] ok 198 - our $x; local $x; no strict; $x->[0] <+fetch -fetch> [variable] ok 199 - my $x; $$x[0] <+fetch -fetch> [exception] ok 200 - my $x; $$x[0] <+fetch -fetch> [return] ok 201 - my $x; $$x[0] <+fetch -fetch> [variable] ok 202 - our $x; local $x; use strict; $$x[0] <+fetch -fetch> [exception] ok 203 - our $x; local $x; use strict; $$x[0] <+fetch -fetch> [return] ok 204 - our $x; local $x; use strict; $$x[0] <+fetch -fetch> [variable] ok 205 - our $x; local $x; no strict; $$x[0] <+fetch -fetch> [exception] ok 206 - our $x; local $x; no strict; $$x[0] <+fetch -fetch> [return] ok 207 - our $x; local $x; no strict; $$x[0] <+fetch -fetch> [variable] ok 208 - my @x; $x[0] <+fetch -fetch> [exception] ok 209 - my @x; $x[0] <+fetch -fetch> [return] ok 210 - my @x; $x[0] <+fetch -fetch> [variable] ok 211 - our @x; local @x; use strict; $x[0] <+fetch -fetch> [exception] ok 212 - our @x; local @x; use strict; $x[0] <+fetch -fetch> [return] ok 213 - our @x; local @x; use strict; $x[0] <+fetch -fetch> [variable] ok 214 - our @x; local @x; no strict; $x[0] <+fetch -fetch> [exception] ok 215 - our @x; local @x; no strict; $x[0] <+fetch -fetch> [return] ok 216 - our @x; local @x; no strict; $x[0] <+fetch -fetch> [variable] ok 217 - my $x; $x->[0] <-fetch +fetch> [exception] ok 218 - my $x; $x->[0] <-fetch +fetch> [return] ok 219 - my $x; $x->[0] <-fetch +fetch> [variable] ok 220 - our $x; local $x; use strict; $x->[0] <-fetch +fetch> [exception] ok 221 - our $x; local $x; use strict; $x->[0] <-fetch +fetch> [return] ok 222 - our $x; local $x; use strict; $x->[0] <-fetch +fetch> [variable] ok 223 - our $x; local $x; no strict; $x->[0] <-fetch +fetch> [exception] ok 224 - our $x; local $x; no strict; $x->[0] <-fetch +fetch> [return] ok 225 - our $x; local $x; no strict; $x->[0] <-fetch +fetch> [variable] ok 226 - my $x; $$x[0] <-fetch +fetch> [exception] ok 227 - my $x; $$x[0] <-fetch +fetch> [return] ok 228 - my $x; $$x[0] <-fetch +fetch> [variable] ok 229 - our $x; local $x; use strict; $$x[0] <-fetch +fetch> [exception] ok 230 - our $x; local $x; use strict; $$x[0] <-fetch +fetch> [return] ok 231 - our $x; local $x; use strict; $$x[0] <-fetch +fetch> [variable] ok 232 - our $x; local $x; no strict; $$x[0] <-fetch +fetch> [exception] ok 233 - our $x; local $x; no strict; $$x[0] <-fetch +fetch> [return] ok 234 - our $x; local $x; no strict; $$x[0] <-fetch +fetch> [variable] ok 235 - my @x; $x[0] <-fetch +fetch> [exception] ok 236 - my @x; $x[0] <-fetch +fetch> [return] ok 237 - my @x; $x[0] <-fetch +fetch> [variable] ok 238 - our @x; local @x; use strict; $x[0] <-fetch +fetch> [exception] ok 239 - our @x; local @x; use strict; $x[0] <-fetch +fetch> [return] ok 240 - our @x; local @x; use strict; $x[0] <-fetch +fetch> [variable] ok 241 - our @x; local @x; no strict; $x[0] <-fetch +fetch> [exception] ok 242 - our @x; local @x; no strict; $x[0] <-fetch +fetch> [return] ok 243 - our @x; local @x; no strict; $x[0] <-fetch +fetch> [variable] ok 244 - my $x; $x->[0] <+fetch -exists> [exception] ok 245 - my $x; $x->[0] <+fetch -exists> [return] ok 246 - my $x; $x->[0] <+fetch -exists> [variable] ok 247 - our $x; local $x; use strict; $x->[0] <+fetch -exists> [exception] ok 248 - our $x; local $x; use strict; $x->[0] <+fetch -exists> [return] ok 249 - our $x; local $x; use strict; $x->[0] <+fetch -exists> [variable] ok 250 - our $x; local $x; no strict; $x->[0] <+fetch -exists> [exception] ok 251 - our $x; local $x; no strict; $x->[0] <+fetch -exists> [return] ok 252 - our $x; local $x; no strict; $x->[0] <+fetch -exists> [variable] ok 253 - my $x; $$x[0] <+fetch -exists> [exception] ok 254 - my $x; $$x[0] <+fetch -exists> [return] ok 255 - my $x; $$x[0] <+fetch -exists> [variable] ok 256 - our $x; local $x; use strict; $$x[0] <+fetch -exists> [exception] ok 257 - our $x; local $x; use strict; $$x[0] <+fetch -exists> [return] ok 258 - our $x; local $x; use strict; $$x[0] <+fetch -exists> [variable] ok 259 - our $x; local $x; no strict; $$x[0] <+fetch -exists> [exception] ok 260 - our $x; local $x; no strict; $$x[0] <+fetch -exists> [return] ok 261 - our $x; local $x; no strict; $$x[0] <+fetch -exists> [variable] ok 262 - my @x; $x[0] <+fetch -exists> [exception] ok 263 - my @x; $x[0] <+fetch -exists> [return] ok 264 - my @x; $x[0] <+fetch -exists> [variable] ok 265 - our @x; local @x; use strict; $x[0] <+fetch -exists> [exception] ok 266 - our @x; local @x; use strict; $x[0] <+fetch -exists> [return] ok 267 - our @x; local @x; use strict; $x[0] <+fetch -exists> [variable] ok 268 - our @x; local @x; no strict; $x[0] <+fetch -exists> [exception] ok 269 - our @x; local @x; no strict; $x[0] <+fetch -exists> [return] ok 270 - our @x; local @x; no strict; $x[0] <+fetch -exists> [variable] ok 271 - my $x; $x->[0] <+strict +fetch> [exception] ok 272 - my $x; $x->[0] <+strict +fetch> [return] ok 273 - my $x; $x->[0] <+strict +fetch> [variable] ok 274 - our $x; local $x; use strict; $x->[0] <+strict +fetch> [exception] ok 275 - our $x; local $x; use strict; $x->[0] <+strict +fetch> [return] ok 276 - our $x; local $x; use strict; $x->[0] <+strict +fetch> [variable] ok 277 - our $x; local $x; no strict; $x->[0] <+strict +fetch> [exception] ok 278 - our $x; local $x; no strict; $x->[0] <+strict +fetch> [return] ok 279 - our $x; local $x; no strict; $x->[0] <+strict +fetch> [variable] ok 280 - my $x; $$x[0] <+strict +fetch> [exception] ok 281 - my $x; $$x[0] <+strict +fetch> [return] ok 282 - my $x; $$x[0] <+strict +fetch> [variable] ok 283 - our $x; local $x; use strict; $$x[0] <+strict +fetch> [exception] ok 284 - our $x; local $x; use strict; $$x[0] <+strict +fetch> [return] ok 285 - our $x; local $x; use strict; $$x[0] <+strict +fetch> [variable] ok 286 - our $x; local $x; no strict; $$x[0] <+strict +fetch> [exception] ok 287 - our $x; local $x; no strict; $$x[0] <+strict +fetch> [return] ok 288 - our $x; local $x; no strict; $$x[0] <+strict +fetch> [variable] ok 289 - my @x; 1 <+strict +fetch> [exception] ok 290 - my @x; 1 <+strict +fetch> [return] ok 291 - my @x; 1 <+strict +fetch> [variable] ok 292 - our @x; local @x; use strict; 1 <+strict +fetch> [exception] ok 293 - our @x; local @x; use strict; 1 <+strict +fetch> [return] ok 294 - our @x; local @x; use strict; 1 <+strict +fetch> [variable] ok 295 - our @x; local @x; no strict; 1 <+strict +fetch> [exception] ok 296 - our @x; local @x; no strict; 1 <+strict +fetch> [return] ok 297 - our @x; local @x; no strict; 1 <+strict +fetch> [variable] ok 298 - my $x; $x->[0] <+strict +exists> [exception] ok 299 - my $x; $x->[0] <+strict +exists> [return] ok 300 - my $x; $x->[0] <+strict +exists> [variable] ok 301 - our $x; local $x; use strict; $x->[0] <+strict +exists> [exception] ok 302 - our $x; local $x; use strict; $x->[0] <+strict +exists> [return] ok 303 - our $x; local $x; use strict; $x->[0] <+strict +exists> [variable] ok 304 - our $x; local $x; no strict; $x->[0] <+strict +exists> [exception] ok 305 - our $x; local $x; no strict; $x->[0] <+strict +exists> [return] ok 306 - our $x; local $x; no strict; $x->[0] <+strict +exists> [variable] ok 307 - my $x; $$x[0] <+strict +exists> [exception] ok 308 - my $x; $$x[0] <+strict +exists> [return] ok 309 - my $x; $$x[0] <+strict +exists> [variable] ok 310 - our $x; local $x; use strict; $$x[0] <+strict +exists> [exception] ok 311 - our $x; local $x; use strict; $$x[0] <+strict +exists> [return] ok 312 - our $x; local $x; use strict; $$x[0] <+strict +exists> [variable] ok 313 - our $x; local $x; no strict; $$x[0] <+strict +exists> [exception] ok 314 - our $x; local $x; no strict; $$x[0] <+strict +exists> [return] ok 315 - our $x; local $x; no strict; $$x[0] <+strict +exists> [variable] ok 316 - my @x; $x[0] <+strict +exists> [exception] ok 317 - my @x; $x[0] <+strict +exists> [return] ok 318 - my @x; $x[0] <+strict +exists> [variable] ok 319 - our @x; local @x; use strict; $x[0] <+strict +exists> [exception] ok 320 - our @x; local @x; use strict; $x[0] <+strict +exists> [return] ok 321 - our @x; local @x; use strict; $x[0] <+strict +exists> [variable] ok 322 - our @x; local @x; no strict; $x[0] <+strict +exists> [exception] ok 323 - our @x; local @x; no strict; $x[0] <+strict +exists> [return] ok 324 - our @x; local @x; no strict; $x[0] <+strict +exists> [variable] ok 325 - my $x; $x->[0] <+strict +delete> [exception] ok 326 - my $x; $x->[0] <+strict +delete> [return] ok 327 - my $x; $x->[0] <+strict +delete> [variable] ok 328 - our $x; local $x; use strict; $x->[0] <+strict +delete> [exception] ok 329 - our $x; local $x; use strict; $x->[0] <+strict +delete> [return] ok 330 - our $x; local $x; use strict; $x->[0] <+strict +delete> [variable] ok 331 - our $x; local $x; no strict; $x->[0] <+strict +delete> [exception] ok 332 - our $x; local $x; no strict; $x->[0] <+strict +delete> [return] ok 333 - our $x; local $x; no strict; $x->[0] <+strict +delete> [variable] ok 334 - my $x; $$x[0] <+strict +delete> [exception] ok 335 - my $x; $$x[0] <+strict +delete> [return] ok 336 - my $x; $$x[0] <+strict +delete> [variable] ok 337 - our $x; local $x; use strict; $$x[0] <+strict +delete> [exception] ok 338 - our $x; local $x; use strict; $$x[0] <+strict +delete> [return] ok 339 - our $x; local $x; use strict; $$x[0] <+strict +delete> [variable] ok 340 - our $x; local $x; no strict; $$x[0] <+strict +delete> [exception] ok 341 - our $x; local $x; no strict; $$x[0] <+strict +delete> [return] ok 342 - our $x; local $x; no strict; $$x[0] <+strict +delete> [variable] ok 343 - my @x; $x[0] <+strict +delete> [exception] ok 344 - my @x; $x[0] <+strict +delete> [return] ok 345 - my @x; $x[0] <+strict +delete> [variable] ok 346 - our @x; local @x; use strict; $x[0] <+strict +delete> [exception] ok 347 - our @x; local @x; use strict; $x[0] <+strict +delete> [return] ok 348 - our @x; local @x; use strict; $x[0] <+strict +delete> [variable] ok 349 - our @x; local @x; no strict; $x[0] <+strict +delete> [exception] ok 350 - our @x; local @x; no strict; $x[0] <+strict +delete> [return] ok 351 - our @x; local @x; no strict; $x[0] <+strict +delete> [variable] ok 352 - my $x; $x->[0] <+strict +store> [exception] ok 353 - my $x; $x->[0] <+strict +store> [return] ok 354 - my $x; $x->[0] <+strict +store> [variable] ok 355 - our $x; local $x; use strict; $x->[0] <+strict +store> [exception] ok 356 - our $x; local $x; use strict; $x->[0] <+strict +store> [return] ok 357 - our $x; local $x; use strict; $x->[0] <+strict +store> [variable] ok 358 - our $x; local $x; no strict; $x->[0] <+strict +store> [exception] ok 359 - our $x; local $x; no strict; $x->[0] <+strict +store> [return] ok 360 - our $x; local $x; no strict; $x->[0] <+strict +store> [variable] ok 361 - my $x; $$x[0] <+strict +store> [exception] ok 362 - my $x; $$x[0] <+strict +store> [return] ok 363 - my $x; $$x[0] <+strict +store> [variable] ok 364 - our $x; local $x; use strict; $$x[0] <+strict +store> [exception] ok 365 - our $x; local $x; use strict; $$x[0] <+strict +store> [return] ok 366 - our $x; local $x; use strict; $$x[0] <+strict +store> [variable] ok 367 - our $x; local $x; no strict; $$x[0] <+strict +store> [exception] ok 368 - our $x; local $x; no strict; $$x[0] <+strict +store> [return] ok 369 - our $x; local $x; no strict; $$x[0] <+strict +store> [variable] ok 370 - my @x; $x[0] <+strict +store> [exception] ok 371 - my @x; $x[0] <+strict +store> [return] ok 372 - my @x; $x[0] <+strict +store> [variable] ok 373 - our @x; local @x; use strict; $x[0] <+strict +store> [exception] ok 374 - our @x; local @x; use strict; $x[0] <+strict +store> [return] ok 375 - our @x; local @x; use strict; $x[0] <+strict +store> [variable] ok 376 - our @x; local @x; no strict; $x[0] <+strict +store> [exception] ok 377 - our @x; local @x; no strict; $x[0] <+strict +store> [return] ok 378 - our @x; local @x; no strict; $x[0] <+strict +store> [variable] ok 379 - my $x; $x->[0]->[1] [exception] ok 380 - my $x; $x->[0]->[1] [return] ok 381 - my $x; $x->[0]->[1] [variable] ok 382 - our $x; local $x; use strict; $x->[0]->[1] [exception] ok 383 - our $x; local $x; use strict; $x->[0]->[1] [return] ok 384 - our $x; local $x; use strict; $x->[0]->[1] [variable] ok 385 - our $x; local $x; no strict; $x->[0]->[1] [exception] ok 386 - our $x; local $x; no strict; $x->[0]->[1] [return] ok 387 - our $x; local $x; no strict; $x->[0]->[1] [variable] ok 388 - my $x; $$x[0]->[1] [exception] ok 389 - my $x; $$x[0]->[1] [return] ok 390 - my $x; $$x[0]->[1] [variable] ok 391 - our $x; local $x; use strict; $$x[0]->[1] [exception] ok 392 - our $x; local $x; use strict; $$x[0]->[1] [return] ok 393 - our $x; local $x; use strict; $$x[0]->[1] [variable] ok 394 - our $x; local $x; no strict; $$x[0]->[1] [exception] ok 395 - our $x; local $x; no strict; $$x[0]->[1] [return] ok 396 - our $x; local $x; no strict; $$x[0]->[1] [variable] ok 397 - my @x; $x[0]->[1] [exception] ok 398 - my @x; $x[0]->[1] [return] ok 399 - my @x; $x[0]->[1] [variable] ok 400 - our @x; local @x; use strict; $x[0]->[1] [exception] ok 401 - our @x; local @x; use strict; $x[0]->[1] [return] ok 402 - our @x; local @x; use strict; $x[0]->[1] [variable] ok 403 - our @x; local @x; no strict; $x[0]->[1] [exception] ok 404 - our @x; local @x; no strict; $x[0]->[1] [return] ok 405 - our @x; local @x; no strict; $x[0]->[1] [variable] ok 406 - my $x; $x->[0]->[1] [exception] ok 407 - my $x; $x->[0]->[1] [return] ok 408 - my $x; $x->[0]->[1] [variable] ok 409 - our $x; local $x; use strict; $x->[0]->[1] [exception] ok 410 - our $x; local $x; use strict; $x->[0]->[1] [return] ok 411 - our $x; local $x; use strict; $x->[0]->[1] [variable] ok 412 - our $x; local $x; no strict; $x->[0]->[1] [exception] ok 413 - our $x; local $x; no strict; $x->[0]->[1] [return] ok 414 - our $x; local $x; no strict; $x->[0]->[1] [variable] ok 415 - my $x; $$x[0]->[1] [exception] ok 416 - my $x; $$x[0]->[1] [return] ok 417 - my $x; $$x[0]->[1] [variable] ok 418 - our $x; local $x; use strict; $$x[0]->[1] [exception] ok 419 - our $x; local $x; use strict; $$x[0]->[1] [return] ok 420 - our $x; local $x; use strict; $$x[0]->[1] [variable] ok 421 - our $x; local $x; no strict; $$x[0]->[1] [exception] ok 422 - our $x; local $x; no strict; $$x[0]->[1] [return] ok 423 - our $x; local $x; no strict; $$x[0]->[1] [variable] ok 424 - my @x; $x[0]->[1] [exception] ok 425 - my @x; $x[0]->[1] [return] ok 426 - my @x; $x[0]->[1] [variable] ok 427 - our @x; local @x; use strict; $x[0]->[1] [exception] ok 428 - our @x; local @x; use strict; $x[0]->[1] [return] ok 429 - our @x; local @x; use strict; $x[0]->[1] [variable] ok 430 - our @x; local @x; no strict; $x[0]->[1] [exception] ok 431 - our @x; local @x; no strict; $x[0]->[1] [return] ok 432 - our @x; local @x; no strict; $x[0]->[1] [variable] ok 433 - my $x; $x->[0]->[1] <+fetch> [exception] ok 434 - my $x; $x->[0]->[1] <+fetch> [return] ok 435 - my $x; $x->[0]->[1] <+fetch> [variable] ok 436 - our $x; local $x; use strict; $x->[0]->[1] <+fetch> [exception] ok 437 - our $x; local $x; use strict; $x->[0]->[1] <+fetch> [return] ok 438 - our $x; local $x; use strict; $x->[0]->[1] <+fetch> [variable] ok 439 - our $x; local $x; no strict; $x->[0]->[1] <+fetch> [exception] ok 440 - our $x; local $x; no strict; $x->[0]->[1] <+fetch> [return] ok 441 - our $x; local $x; no strict; $x->[0]->[1] <+fetch> [variable] ok 442 - my $x; $$x[0]->[1] <+fetch> [exception] ok 443 - my $x; $$x[0]->[1] <+fetch> [return] ok 444 - my $x; $$x[0]->[1] <+fetch> [variable] ok 445 - our $x; local $x; use strict; $$x[0]->[1] <+fetch> [exception] ok 446 - our $x; local $x; use strict; $$x[0]->[1] <+fetch> [return] ok 447 - our $x; local $x; use strict; $$x[0]->[1] <+fetch> [variable] ok 448 - our $x; local $x; no strict; $$x[0]->[1] <+fetch> [exception] ok 449 - our $x; local $x; no strict; $$x[0]->[1] <+fetch> [return] ok 450 - our $x; local $x; no strict; $$x[0]->[1] <+fetch> [variable] ok 451 - my @x; $x[0]->[1] <+fetch> [exception] ok 452 - my @x; $x[0]->[1] <+fetch> [return] ok 453 - my @x; $x[0]->[1] <+fetch> [variable] ok 454 - our @x; local @x; use strict; $x[0]->[1] <+fetch> [exception] ok 455 - our @x; local @x; use strict; $x[0]->[1] <+fetch> [return] ok 456 - our @x; local @x; use strict; $x[0]->[1] <+fetch> [variable] ok 457 - our @x; local @x; no strict; $x[0]->[1] <+fetch> [exception] ok 458 - our @x; local @x; no strict; $x[0]->[1] <+fetch> [return] ok 459 - our @x; local @x; no strict; $x[0]->[1] <+fetch> [variable] ok 460 - my $x; $x->[0]->[1] <+exists> [exception] ok 461 - my $x; $x->[0]->[1] <+exists> [return] ok 462 - my $x; $x->[0]->[1] <+exists> [variable] ok 463 - our $x; local $x; use strict; $x->[0]->[1] <+exists> [exception] ok 464 - our $x; local $x; use strict; $x->[0]->[1] <+exists> [return] ok 465 - our $x; local $x; use strict; $x->[0]->[1] <+exists> [variable] ok 466 - our $x; local $x; no strict; $x->[0]->[1] <+exists> [exception] ok 467 - our $x; local $x; no strict; $x->[0]->[1] <+exists> [return] ok 468 - our $x; local $x; no strict; $x->[0]->[1] <+exists> [variable] ok 469 - my $x; $$x[0]->[1] <+exists> [exception] ok 470 - my $x; $$x[0]->[1] <+exists> [return] ok 471 - my $x; $$x[0]->[1] <+exists> [variable] ok 472 - our $x; local $x; use strict; $$x[0]->[1] <+exists> [exception] ok 473 - our $x; local $x; use strict; $$x[0]->[1] <+exists> [return] ok 474 - our $x; local $x; use strict; $$x[0]->[1] <+exists> [variable] ok 475 - our $x; local $x; no strict; $$x[0]->[1] <+exists> [exception] ok 476 - our $x; local $x; no strict; $$x[0]->[1] <+exists> [return] ok 477 - our $x; local $x; no strict; $$x[0]->[1] <+exists> [variable] ok 478 - my @x; $x[0]->[1] <+exists> [exception] ok 479 - my @x; $x[0]->[1] <+exists> [return] ok 480 - my @x; $x[0]->[1] <+exists> [variable] ok 481 - our @x; local @x; use strict; $x[0]->[1] <+exists> [exception] ok 482 - our @x; local @x; use strict; $x[0]->[1] <+exists> [return] ok 483 - our @x; local @x; use strict; $x[0]->[1] <+exists> [variable] ok 484 - our @x; local @x; no strict; $x[0]->[1] <+exists> [exception] ok 485 - our @x; local @x; no strict; $x[0]->[1] <+exists> [return] ok 486 - our @x; local @x; no strict; $x[0]->[1] <+exists> [variable] ok 487 - my $x; $x->[0]->[1] <+delete> [exception] ok 488 - my $x; $x->[0]->[1] <+delete> [return] ok 489 - my $x; $x->[0]->[1] <+delete> [variable] ok 490 - our $x; local $x; use strict; $x->[0]->[1] <+delete> [exception] ok 491 - our $x; local $x; use strict; $x->[0]->[1] <+delete> [return] ok 492 - our $x; local $x; use strict; $x->[0]->[1] <+delete> [variable] ok 493 - our $x; local $x; no strict; $x->[0]->[1] <+delete> [exception] ok 494 - our $x; local $x; no strict; $x->[0]->[1] <+delete> [return] ok 495 - our $x; local $x; no strict; $x->[0]->[1] <+delete> [variable] ok 496 - my $x; $$x[0]->[1] <+delete> [exception] ok 497 - my $x; $$x[0]->[1] <+delete> [return] ok 498 - my $x; $$x[0]->[1] <+delete> [variable] ok 499 - our $x; local $x; use strict; $$x[0]->[1] <+delete> [exception] ok 500 - our $x; local $x; use strict; $$x[0]->[1] <+delete> [return] ok 501 - our $x; local $x; use strict; $$x[0]->[1] <+delete> [variable] ok 502 - our $x; local $x; no strict; $$x[0]->[1] <+delete> [exception] ok 503 - our $x; local $x; no strict; $$x[0]->[1] <+delete> [return] ok 504 - our $x; local $x; no strict; $$x[0]->[1] <+delete> [variable] ok 505 - my @x; $x[0]->[1] <+delete> [exception] ok 506 - my @x; $x[0]->[1] <+delete> [return] ok 507 - my @x; $x[0]->[1] <+delete> [variable] ok 508 - our @x; local @x; use strict; $x[0]->[1] <+delete> [exception] ok 509 - our @x; local @x; use strict; $x[0]->[1] <+delete> [return] ok 510 - our @x; local @x; use strict; $x[0]->[1] <+delete> [variable] ok 511 - our @x; local @x; no strict; $x[0]->[1] <+delete> [exception] ok 512 - our @x; local @x; no strict; $x[0]->[1] <+delete> [return] ok 513 - our @x; local @x; no strict; $x[0]->[1] <+delete> [variable] ok 514 - my $x; $x->[0]->[1] <+store> [exception] ok 515 - my $x; $x->[0]->[1] <+store> [return] ok 516 - my $x; $x->[0]->[1] <+store> [variable] ok 517 - our $x; local $x; use strict; $x->[0]->[1] <+store> [exception] ok 518 - our $x; local $x; use strict; $x->[0]->[1] <+store> [return] ok 519 - our $x; local $x; use strict; $x->[0]->[1] <+store> [variable] ok 520 - our $x; local $x; no strict; $x->[0]->[1] <+store> [exception] ok 521 - our $x; local $x; no strict; $x->[0]->[1] <+store> [return] ok 522 - our $x; local $x; no strict; $x->[0]->[1] <+store> [variable] ok 523 - my $x; $$x[0]->[1] <+store> [exception] ok 524 - my $x; $$x[0]->[1] <+store> [return] ok 525 - my $x; $$x[0]->[1] <+store> [variable] ok 526 - our $x; local $x; use strict; $$x[0]->[1] <+store> [exception] ok 527 - our $x; local $x; use strict; $$x[0]->[1] <+store> [return] ok 528 - our $x; local $x; use strict; $$x[0]->[1] <+store> [variable] ok 529 - our $x; local $x; no strict; $$x[0]->[1] <+store> [exception] ok 530 - our $x; local $x; no strict; $$x[0]->[1] <+store> [return] ok 531 - our $x; local $x; no strict; $$x[0]->[1] <+store> [variable] ok 532 - my @x; $x[0]->[1] <+store> [exception] ok 533 - my @x; $x[0]->[1] <+store> [return] ok 534 - my @x; $x[0]->[1] <+store> [variable] ok 535 - our @x; local @x; use strict; $x[0]->[1] <+store> [exception] ok 536 - our @x; local @x; use strict; $x[0]->[1] <+store> [return] ok 537 - our @x; local @x; use strict; $x[0]->[1] <+store> [variable] ok 538 - our @x; local @x; no strict; $x[0]->[1] <+store> [exception] ok 539 - our @x; local @x; no strict; $x[0]->[1] <+store> [return] ok 540 - our @x; local @x; no strict; $x[0]->[1] <+store> [variable] ok 541 - my $x; $x->[0]->[1] <+strict +fetch> [exception] ok 542 - my $x; $x->[0]->[1] <+strict +fetch> [return] ok 543 - my $x; $x->[0]->[1] <+strict +fetch> [variable] ok 544 - our $x; local $x; use strict; $x->[0]->[1] <+strict +fetch> [exception] ok 545 - our $x; local $x; use strict; $x->[0]->[1] <+strict +fetch> [return] ok 546 - our $x; local $x; use strict; $x->[0]->[1] <+strict +fetch> [variable] ok 547 - our $x; local $x; no strict; $x->[0]->[1] <+strict +fetch> [exception] ok 548 - our $x; local $x; no strict; $x->[0]->[1] <+strict +fetch> [return] ok 549 - our $x; local $x; no strict; $x->[0]->[1] <+strict +fetch> [variable] ok 550 - my $x; $$x[0]->[1] <+strict +fetch> [exception] ok 551 - my $x; $$x[0]->[1] <+strict +fetch> [return] ok 552 - my $x; $$x[0]->[1] <+strict +fetch> [variable] ok 553 - our $x; local $x; use strict; $$x[0]->[1] <+strict +fetch> [exception] ok 554 - our $x; local $x; use strict; $$x[0]->[1] <+strict +fetch> [return] ok 555 - our $x; local $x; use strict; $$x[0]->[1] <+strict +fetch> [variable] ok 556 - our $x; local $x; no strict; $$x[0]->[1] <+strict +fetch> [exception] ok 557 - our $x; local $x; no strict; $$x[0]->[1] <+strict +fetch> [return] ok 558 - our $x; local $x; no strict; $$x[0]->[1] <+strict +fetch> [variable] ok 559 - my @x; $x[0]->[1] <+strict +fetch> [exception] ok 560 - my @x; $x[0]->[1] <+strict +fetch> [return] ok 561 - my @x; $x[0]->[1] <+strict +fetch> [variable] ok 562 - our @x; local @x; use strict; $x[0]->[1] <+strict +fetch> [exception] ok 563 - our @x; local @x; use strict; $x[0]->[1] <+strict +fetch> [return] ok 564 - our @x; local @x; use strict; $x[0]->[1] <+strict +fetch> [variable] ok 565 - our @x; local @x; no strict; $x[0]->[1] <+strict +fetch> [exception] ok 566 - our @x; local @x; no strict; $x[0]->[1] <+strict +fetch> [return] ok 567 - our @x; local @x; no strict; $x[0]->[1] <+strict +fetch> [variable] ok 568 - my $x; $x->[0]->[1] <+strict +exists> [exception] ok 569 - my $x; $x->[0]->[1] <+strict +exists> [return] ok 570 - my $x; $x->[0]->[1] <+strict +exists> [variable] ok 571 - our $x; local $x; use strict; $x->[0]->[1] <+strict +exists> [exception] ok 572 - our $x; local $x; use strict; $x->[0]->[1] <+strict +exists> [return] ok 573 - our $x; local $x; use strict; $x->[0]->[1] <+strict +exists> [variable] ok 574 - our $x; local $x; no strict; $x->[0]->[1] <+strict +exists> [exception] ok 575 - our $x; local $x; no strict; $x->[0]->[1] <+strict +exists> [return] ok 576 - our $x; local $x; no strict; $x->[0]->[1] <+strict +exists> [variable] ok 577 - my $x; $$x[0]->[1] <+strict +exists> [exception] ok 578 - my $x; $$x[0]->[1] <+strict +exists> [return] ok 579 - my $x; $$x[0]->[1] <+strict +exists> [variable] ok 580 - our $x; local $x; use strict; $$x[0]->[1] <+strict +exists> [exception] ok 581 - our $x; local $x; use strict; $$x[0]->[1] <+strict +exists> [return] ok 582 - our $x; local $x; use strict; $$x[0]->[1] <+strict +exists> [variable] ok 583 - our $x; local $x; no strict; $$x[0]->[1] <+strict +exists> [exception] ok 584 - our $x; local $x; no strict; $$x[0]->[1] <+strict +exists> [return] ok 585 - our $x; local $x; no strict; $$x[0]->[1] <+strict +exists> [variable] ok 586 - my @x; $x[0]->[1] <+strict +exists> [exception] ok 587 - my @x; $x[0]->[1] <+strict +exists> [return] ok 588 - my @x; $x[0]->[1] <+strict +exists> [variable] ok 589 - our @x; local @x; use strict; $x[0]->[1] <+strict +exists> [exception] ok 590 - our @x; local @x; use strict; $x[0]->[1] <+strict +exists> [return] ok 591 - our @x; local @x; use strict; $x[0]->[1] <+strict +exists> [variable] ok 592 - our @x; local @x; no strict; $x[0]->[1] <+strict +exists> [exception] ok 593 - our @x; local @x; no strict; $x[0]->[1] <+strict +exists> [return] ok 594 - our @x; local @x; no strict; $x[0]->[1] <+strict +exists> [variable] ok 595 - my $x; $x->[0]->[1] <+strict +delete> [exception] ok 596 - my $x; $x->[0]->[1] <+strict +delete> [return] ok 597 - my $x; $x->[0]->[1] <+strict +delete> [variable] ok 598 - our $x; local $x; use strict; $x->[0]->[1] <+strict +delete> [exception] ok 599 - our $x; local $x; use strict; $x->[0]->[1] <+strict +delete> [return] ok 600 - our $x; local $x; use strict; $x->[0]->[1] <+strict +delete> [variable] ok 601 - our $x; local $x; no strict; $x->[0]->[1] <+strict +delete> [exception] ok 602 - our $x; local $x; no strict; $x->[0]->[1] <+strict +delete> [return] ok 603 - our $x; local $x; no strict; $x->[0]->[1] <+strict +delete> [variable] ok 604 - my $x; $$x[0]->[1] <+strict +delete> [exception] ok 605 - my $x; $$x[0]->[1] <+strict +delete> [return] ok 606 - my $x; $$x[0]->[1] <+strict +delete> [variable] ok 607 - our $x; local $x; use strict; $$x[0]->[1] <+strict +delete> [exception] ok 608 - our $x; local $x; use strict; $$x[0]->[1] <+strict +delete> [return] ok 609 - our $x; local $x; use strict; $$x[0]->[1] <+strict +delete> [variable] ok 610 - our $x; local $x; no strict; $$x[0]->[1] <+strict +delete> [exception] ok 611 - our $x; local $x; no strict; $$x[0]->[1] <+strict +delete> [return] ok 612 - our $x; local $x; no strict; $$x[0]->[1] <+strict +delete> [variable] ok 613 - my @x; $x[0]->[1] <+strict +delete> [exception] ok 614 - my @x; $x[0]->[1] <+strict +delete> [return] ok 615 - my @x; $x[0]->[1] <+strict +delete> [variable] ok 616 - our @x; local @x; use strict; $x[0]->[1] <+strict +delete> [exception] ok 617 - our @x; local @x; use strict; $x[0]->[1] <+strict +delete> [return] ok 618 - our @x; local @x; use strict; $x[0]->[1] <+strict +delete> [variable] ok 619 - our @x; local @x; no strict; $x[0]->[1] <+strict +delete> [exception] ok 620 - our @x; local @x; no strict; $x[0]->[1] <+strict +delete> [return] ok 621 - our @x; local @x; no strict; $x[0]->[1] <+strict +delete> [variable] ok 622 - my $x; $x->[0]->[1] <+strict +store> [exception] ok 623 - my $x; $x->[0]->[1] <+strict +store> [return] ok 624 - my $x; $x->[0]->[1] <+strict +store> [variable] ok 625 - our $x; local $x; use strict; $x->[0]->[1] <+strict +store> [exception] ok 626 - our $x; local $x; use strict; $x->[0]->[1] <+strict +store> [return] ok 627 - our $x; local $x; use strict; $x->[0]->[1] <+strict +store> [variable] ok 628 - our $x; local $x; no strict; $x->[0]->[1] <+strict +store> [exception] ok 629 - our $x; local $x; no strict; $x->[0]->[1] <+strict +store> [return] ok 630 - our $x; local $x; no strict; $x->[0]->[1] <+strict +store> [variable] ok 631 - my $x; $$x[0]->[1] <+strict +store> [exception] ok 632 - my $x; $$x[0]->[1] <+strict +store> [return] ok 633 - my $x; $$x[0]->[1] <+strict +store> [variable] ok 634 - our $x; local $x; use strict; $$x[0]->[1] <+strict +store> [exception] ok 635 - our $x; local $x; use strict; $$x[0]->[1] <+strict +store> [return] ok 636 - our $x; local $x; use strict; $$x[0]->[1] <+strict +store> [variable] ok 637 - our $x; local $x; no strict; $$x[0]->[1] <+strict +store> [exception] ok 638 - our $x; local $x; no strict; $$x[0]->[1] <+strict +store> [return] ok 639 - our $x; local $x; no strict; $$x[0]->[1] <+strict +store> [variable] ok 640 - my @x; $x[0]->[1] <+strict +store> [exception] ok 641 - my @x; $x[0]->[1] <+strict +store> [return] ok 642 - my @x; $x[0]->[1] <+strict +store> [variable] ok 643 - our @x; local @x; use strict; $x[0]->[1] <+strict +store> [exception] ok 644 - our @x; local @x; use strict; $x[0]->[1] <+strict +store> [return] ok 645 - our @x; local @x; use strict; $x[0]->[1] <+strict +store> [variable] ok 646 - our @x; local @x; no strict; $x[0]->[1] <+strict +store> [exception] ok 647 - our @x; local @x; no strict; $x[0]->[1] <+strict +store> [return] ok 648 - our @x; local @x; no strict; $x[0]->[1] <+strict +store> [variable] ok 649 - my $x; $x->[0] = 1; $x->[0] <+fetch> [exception] ok 650 - my $x; $x->[0] = 1; $x->[0] <+fetch> [return] ok 651 - my $x; $x->[0] = 1; $x->[0] <+fetch> [variable] ok 652 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+fetch> [exception] ok 653 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+fetch> [return] ok 654 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+fetch> [variable] ok 655 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+fetch> [exception] ok 656 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+fetch> [return] ok 657 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+fetch> [variable] ok 658 - my $x; $x->[0] = 1; $$x[0] <+fetch> [exception] ok 659 - my $x; $x->[0] = 1; $$x[0] <+fetch> [return] ok 660 - my $x; $x->[0] = 1; $$x[0] <+fetch> [variable] ok 661 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+fetch> [exception] ok 662 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+fetch> [return] ok 663 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+fetch> [variable] ok 664 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+fetch> [exception] ok 665 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+fetch> [return] ok 666 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+fetch> [variable] ok 667 - my @x; $x[0] = 1; $x[0] <+fetch> [exception] ok 668 - my @x; $x[0] = 1; $x[0] <+fetch> [return] ok 669 - my @x; $x[0] = 1; $x[0] <+fetch> [variable] ok 670 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+fetch> [exception] ok 671 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+fetch> [return] ok 672 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+fetch> [variable] ok 673 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+fetch> [exception] ok 674 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+fetch> [return] ok 675 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+fetch> [variable] ok 676 - my $x; $x->[0] = 1; $x->[1] <+fetch> [exception] ok 677 - my $x; $x->[0] = 1; $x->[1] <+fetch> [return] ok 678 - my $x; $x->[0] = 1; $x->[1] <+fetch> [variable] ok 679 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+fetch> [exception] ok 680 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+fetch> [return] ok 681 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+fetch> [variable] ok 682 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+fetch> [exception] ok 683 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+fetch> [return] ok 684 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+fetch> [variable] ok 685 - my $x; $x->[0] = 1; $$x[1] <+fetch> [exception] ok 686 - my $x; $x->[0] = 1; $$x[1] <+fetch> [return] ok 687 - my $x; $x->[0] = 1; $$x[1] <+fetch> [variable] ok 688 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+fetch> [exception] ok 689 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+fetch> [return] ok 690 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+fetch> [variable] ok 691 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+fetch> [exception] ok 692 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+fetch> [return] ok 693 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+fetch> [variable] ok 694 - my @x; $x[0] = 1; $x[1] <+fetch> [exception] ok 695 - my @x; $x[0] = 1; $x[1] <+fetch> [return] ok 696 - my @x; $x[0] = 1; $x[1] <+fetch> [variable] ok 697 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+fetch> [exception] ok 698 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+fetch> [return] ok 699 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+fetch> [variable] ok 700 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+fetch> [exception] ok 701 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+fetch> [return] ok 702 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+fetch> [variable] ok 703 - my $x; $x->[0] = 1; $x->[0] <+exists> [exception] ok 704 - my $x; $x->[0] = 1; $x->[0] <+exists> [return] ok 705 - my $x; $x->[0] = 1; $x->[0] <+exists> [variable] ok 706 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+exists> [exception] ok 707 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+exists> [return] ok 708 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+exists> [variable] ok 709 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+exists> [exception] ok 710 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+exists> [return] ok 711 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+exists> [variable] ok 712 - my $x; $x->[0] = 1; $$x[0] <+exists> [exception] ok 713 - my $x; $x->[0] = 1; $$x[0] <+exists> [return] ok 714 - my $x; $x->[0] = 1; $$x[0] <+exists> [variable] ok 715 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+exists> [exception] ok 716 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+exists> [return] ok 717 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+exists> [variable] ok 718 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+exists> [exception] ok 719 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+exists> [return] ok 720 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+exists> [variable] ok 721 - my @x; $x[0] = 1; $x[0] <+exists> [exception] ok 722 - my @x; $x[0] = 1; $x[0] <+exists> [return] ok 723 - my @x; $x[0] = 1; $x[0] <+exists> [variable] ok 724 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+exists> [exception] ok 725 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+exists> [return] ok 726 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+exists> [variable] ok 727 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+exists> [exception] ok 728 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+exists> [return] ok 729 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+exists> [variable] ok 730 - my $x; $x->[0] = 1; $x->[1] <+exists> [exception] ok 731 - my $x; $x->[0] = 1; $x->[1] <+exists> [return] ok 732 - my $x; $x->[0] = 1; $x->[1] <+exists> [variable] ok 733 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+exists> [exception] ok 734 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+exists> [return] ok 735 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+exists> [variable] ok 736 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+exists> [exception] ok 737 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+exists> [return] ok 738 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+exists> [variable] ok 739 - my $x; $x->[0] = 1; $$x[1] <+exists> [exception] ok 740 - my $x; $x->[0] = 1; $$x[1] <+exists> [return] ok 741 - my $x; $x->[0] = 1; $$x[1] <+exists> [variable] ok 742 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+exists> [exception] ok 743 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+exists> [return] ok 744 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+exists> [variable] ok 745 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+exists> [exception] ok 746 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+exists> [return] ok 747 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+exists> [variable] ok 748 - my @x; $x[0] = 1; $x[1] <+exists> [exception] ok 749 - my @x; $x[0] = 1; $x[1] <+exists> [return] ok 750 - my @x; $x[0] = 1; $x[1] <+exists> [variable] ok 751 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+exists> [exception] ok 752 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+exists> [return] ok 753 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+exists> [variable] ok 754 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+exists> [exception] ok 755 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+exists> [return] ok 756 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+exists> [variable] ok 757 - my $x; $x->[0] = 1; $x->[0] <+delete> [exception] ok 758 - my $x; $x->[0] = 1; $x->[0] <+delete> [return] ok 759 - my $x; $x->[0] = 1; $x->[0] <+delete> [variable] ok 760 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+delete> [exception] ok 761 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+delete> [return] ok 762 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+delete> [variable] ok 763 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+delete> [exception] ok 764 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+delete> [return] ok 765 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+delete> [variable] ok 766 - my $x; $x->[0] = 1; $$x[0] <+delete> [exception] ok 767 - my $x; $x->[0] = 1; $$x[0] <+delete> [return] ok 768 - my $x; $x->[0] = 1; $$x[0] <+delete> [variable] ok 769 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+delete> [exception] ok 770 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+delete> [return] ok 771 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+delete> [variable] ok 772 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+delete> [exception] ok 773 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+delete> [return] ok 774 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+delete> [variable] ok 775 - my @x; $x[0] = 1; $x[0] <+delete> [exception] ok 776 - my @x; $x[0] = 1; $x[0] <+delete> [return] ok 777 - my @x; $x[0] = 1; $x[0] <+delete> [variable] ok 778 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+delete> [exception] ok 779 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+delete> [return] ok 780 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+delete> [variable] ok 781 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+delete> [exception] ok 782 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+delete> [return] ok 783 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+delete> [variable] ok 784 - my $x; $x->[0] = 1; $x->[1] <+delete> [exception] ok 785 - my $x; $x->[0] = 1; $x->[1] <+delete> [return] ok 786 - my $x; $x->[0] = 1; $x->[1] <+delete> [variable] ok 787 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+delete> [exception] ok 788 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+delete> [return] ok 789 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+delete> [variable] ok 790 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+delete> [exception] ok 791 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+delete> [return] ok 792 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+delete> [variable] ok 793 - my $x; $x->[0] = 1; $$x[1] <+delete> [exception] ok 794 - my $x; $x->[0] = 1; $$x[1] <+delete> [return] ok 795 - my $x; $x->[0] = 1; $$x[1] <+delete> [variable] ok 796 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+delete> [exception] ok 797 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+delete> [return] ok 798 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+delete> [variable] ok 799 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+delete> [exception] ok 800 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+delete> [return] ok 801 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+delete> [variable] ok 802 - my @x; $x[0] = 1; $x[1] <+delete> [exception] ok 803 - my @x; $x[0] = 1; $x[1] <+delete> [return] ok 804 - my @x; $x[0] = 1; $x[1] <+delete> [variable] ok 805 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+delete> [exception] ok 806 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+delete> [return] ok 807 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+delete> [variable] ok 808 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+delete> [exception] ok 809 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+delete> [return] ok 810 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+delete> [variable] ok 811 - my $x; $x->[0] = 1; $x->[0] <+store> [exception] ok 812 - my $x; $x->[0] = 1; $x->[0] <+store> [return] ok 813 - my $x; $x->[0] = 1; $x->[0] <+store> [variable] ok 814 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+store> [exception] ok 815 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+store> [return] ok 816 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+store> [variable] ok 817 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+store> [exception] ok 818 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+store> [return] ok 819 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+store> [variable] ok 820 - my $x; $x->[0] = 1; $$x[0] <+store> [exception] ok 821 - my $x; $x->[0] = 1; $$x[0] <+store> [return] ok 822 - my $x; $x->[0] = 1; $$x[0] <+store> [variable] ok 823 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+store> [exception] ok 824 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+store> [return] ok 825 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+store> [variable] ok 826 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+store> [exception] ok 827 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+store> [return] ok 828 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+store> [variable] ok 829 - my @x; $x[0] = 1; $x[0] <+store> [exception] ok 830 - my @x; $x[0] = 1; $x[0] <+store> [return] ok 831 - my @x; $x[0] = 1; $x[0] <+store> [variable] ok 832 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+store> [exception] ok 833 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+store> [return] ok 834 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+store> [variable] ok 835 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+store> [exception] ok 836 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+store> [return] ok 837 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+store> [variable] ok 838 - my $x; $x->[0] = 1; $x->[1] <+store> [exception] ok 839 - my $x; $x->[0] = 1; $x->[1] <+store> [return] ok 840 - my $x; $x->[0] = 1; $x->[1] <+store> [variable] ok 841 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+store> [exception] ok 842 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+store> [return] ok 843 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+store> [variable] ok 844 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+store> [exception] ok 845 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+store> [return] ok 846 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+store> [variable] ok 847 - my $x; $x->[0] = 1; $$x[1] <+store> [exception] ok 848 - my $x; $x->[0] = 1; $$x[1] <+store> [return] ok 849 - my $x; $x->[0] = 1; $$x[1] <+store> [variable] ok 850 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+store> [exception] ok 851 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+store> [return] ok 852 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+store> [variable] ok 853 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+store> [exception] ok 854 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+store> [return] ok 855 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+store> [variable] ok 856 - my @x; $x[0] = 1; $x[1] <+store> [exception] ok 857 - my @x; $x[0] = 1; $x[1] <+store> [return] ok 858 - my @x; $x[0] = 1; $x[1] <+store> [variable] ok 859 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+store> [exception] ok 860 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+store> [return] ok 861 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+store> [variable] ok 862 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+store> [exception] ok 863 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+store> [return] ok 864 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+store> [variable] ok 865 - my $x; $x->[0] = 1; $x->[0] <+strict +fetch> [exception] ok 866 - my $x; $x->[0] = 1; $x->[0] <+strict +fetch> [return] ok 867 - my $x; $x->[0] = 1; $x->[0] <+strict +fetch> [variable] ok 868 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+strict +fetch> [exception] ok 869 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+strict +fetch> [return] ok 870 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+strict +fetch> [variable] ok 871 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+strict +fetch> [exception] ok 872 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+strict +fetch> [return] ok 873 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+strict +fetch> [variable] ok 874 - my $x; $x->[0] = 1; $$x[0] <+strict +fetch> [exception] ok 875 - my $x; $x->[0] = 1; $$x[0] <+strict +fetch> [return] ok 876 - my $x; $x->[0] = 1; $$x[0] <+strict +fetch> [variable] ok 877 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+strict +fetch> [exception] ok 878 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+strict +fetch> [return] ok 879 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+strict +fetch> [variable] ok 880 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+strict +fetch> [exception] ok 881 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+strict +fetch> [return] ok 882 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+strict +fetch> [variable] ok 883 - my @x; $x[0] = 1; $x[0] <+strict +fetch> [exception] ok 884 - my @x; $x[0] = 1; $x[0] <+strict +fetch> [return] ok 885 - my @x; $x[0] = 1; $x[0] <+strict +fetch> [variable] ok 886 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+strict +fetch> [exception] ok 887 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+strict +fetch> [return] ok 888 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+strict +fetch> [variable] ok 889 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+strict +fetch> [exception] ok 890 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+strict +fetch> [return] ok 891 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+strict +fetch> [variable] ok 892 - my $x; $x->[0] = 1; $x->[1] <+strict +fetch> [exception] ok 893 - my $x; $x->[0] = 1; $x->[1] <+strict +fetch> [return] ok 894 - my $x; $x->[0] = 1; $x->[1] <+strict +fetch> [variable] ok 895 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+strict +fetch> [exception] ok 896 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+strict +fetch> [return] ok 897 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+strict +fetch> [variable] ok 898 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+strict +fetch> [exception] ok 899 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+strict +fetch> [return] ok 900 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+strict +fetch> [variable] ok 901 - my $x; $x->[0] = 1; $$x[1] <+strict +fetch> [exception] ok 902 - my $x; $x->[0] = 1; $$x[1] <+strict +fetch> [return] ok 903 - my $x; $x->[0] = 1; $$x[1] <+strict +fetch> [variable] ok 904 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+strict +fetch> [exception] ok 905 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+strict +fetch> [return] ok 906 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+strict +fetch> [variable] ok 907 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+strict +fetch> [exception] ok 908 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+strict +fetch> [return] ok 909 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+strict +fetch> [variable] ok 910 - my @x; $x[0] = 1; $x[1] <+strict +fetch> [exception] ok 911 - my @x; $x[0] = 1; $x[1] <+strict +fetch> [return] ok 912 - my @x; $x[0] = 1; $x[1] <+strict +fetch> [variable] ok 913 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+strict +fetch> [exception] ok 914 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+strict +fetch> [return] ok 915 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+strict +fetch> [variable] ok 916 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+strict +fetch> [exception] ok 917 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+strict +fetch> [return] ok 918 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+strict +fetch> [variable] ok 919 - my $x; $x->[0] = 1; $x->[0] <+strict +exists> [exception] ok 920 - my $x; $x->[0] = 1; $x->[0] <+strict +exists> [return] ok 921 - my $x; $x->[0] = 1; $x->[0] <+strict +exists> [variable] ok 922 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+strict +exists> [exception] ok 923 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+strict +exists> [return] ok 924 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+strict +exists> [variable] ok 925 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+strict +exists> [exception] ok 926 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+strict +exists> [return] ok 927 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+strict +exists> [variable] ok 928 - my $x; $x->[0] = 1; $$x[0] <+strict +exists> [exception] ok 929 - my $x; $x->[0] = 1; $$x[0] <+strict +exists> [return] ok 930 - my $x; $x->[0] = 1; $$x[0] <+strict +exists> [variable] ok 931 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+strict +exists> [exception] ok 932 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+strict +exists> [return] ok 933 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+strict +exists> [variable] ok 934 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+strict +exists> [exception] ok 935 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+strict +exists> [return] ok 936 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+strict +exists> [variable] ok 937 - my @x; $x[0] = 1; $x[0] <+strict +exists> [exception] ok 938 - my @x; $x[0] = 1; $x[0] <+strict +exists> [return] ok 939 - my @x; $x[0] = 1; $x[0] <+strict +exists> [variable] ok 940 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+strict +exists> [exception] ok 941 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+strict +exists> [return] ok 942 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+strict +exists> [variable] ok 943 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+strict +exists> [exception] ok 944 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+strict +exists> [return] ok 945 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+strict +exists> [variable] ok 946 - my $x; $x->[0] = 1; $x->[1] <+strict +exists> [exception] ok 947 - my $x; $x->[0] = 1; $x->[1] <+strict +exists> [return] ok 948 - my $x; $x->[0] = 1; $x->[1] <+strict +exists> [variable] ok 949 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+strict +exists> [exception] ok 950 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+strict +exists> [return] ok 951 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+strict +exists> [variable] ok 952 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+strict +exists> [exception] ok 953 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+strict +exists> [return] ok 954 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+strict +exists> [variable] ok 955 - my $x; $x->[0] = 1; $$x[1] <+strict +exists> [exception] ok 956 - my $x; $x->[0] = 1; $$x[1] <+strict +exists> [return] ok 957 - my $x; $x->[0] = 1; $$x[1] <+strict +exists> [variable] ok 958 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+strict +exists> [exception] ok 959 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+strict +exists> [return] ok 960 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+strict +exists> [variable] ok 961 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+strict +exists> [exception] ok 962 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+strict +exists> [return] ok 963 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+strict +exists> [variable] ok 964 - my @x; $x[0] = 1; $x[1] <+strict +exists> [exception] ok 965 - my @x; $x[0] = 1; $x[1] <+strict +exists> [return] ok 966 - my @x; $x[0] = 1; $x[1] <+strict +exists> [variable] ok 967 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+strict +exists> [exception] ok 968 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+strict +exists> [return] ok 969 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+strict +exists> [variable] ok 970 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+strict +exists> [exception] ok 971 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+strict +exists> [return] ok 972 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+strict +exists> [variable] ok 973 - my $x; $x->[0] = 1; $x->[0] <+strict +delete> [exception] ok 974 - my $x; $x->[0] = 1; $x->[0] <+strict +delete> [return] ok 975 - my $x; $x->[0] = 1; $x->[0] <+strict +delete> [variable] ok 976 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+strict +delete> [exception] ok 977 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+strict +delete> [return] ok 978 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+strict +delete> [variable] ok 979 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+strict +delete> [exception] ok 980 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+strict +delete> [return] ok 981 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+strict +delete> [variable] ok 982 - my $x; $x->[0] = 1; $$x[0] <+strict +delete> [exception] ok 983 - my $x; $x->[0] = 1; $$x[0] <+strict +delete> [return] ok 984 - my $x; $x->[0] = 1; $$x[0] <+strict +delete> [variable] ok 985 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+strict +delete> [exception] ok 986 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+strict +delete> [return] ok 987 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+strict +delete> [variable] ok 988 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+strict +delete> [exception] ok 989 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+strict +delete> [return] ok 990 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+strict +delete> [variable] ok 991 - my @x; $x[0] = 1; $x[0] <+strict +delete> [exception] ok 992 - my @x; $x[0] = 1; $x[0] <+strict +delete> [return] ok 993 - my @x; $x[0] = 1; $x[0] <+strict +delete> [variable] ok 994 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+strict +delete> [exception] ok 995 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+strict +delete> [return] ok 996 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+strict +delete> [variable] ok 997 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+strict +delete> [exception] ok 998 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+strict +delete> [return] ok 999 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+strict +delete> [variable] ok 1000 - my $x; $x->[0] = 1; $x->[1] <+strict +delete> [exception] ok 1001 - my $x; $x->[0] = 1; $x->[1] <+strict +delete> [return] ok 1002 - my $x; $x->[0] = 1; $x->[1] <+strict +delete> [variable] ok 1003 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+strict +delete> [exception] ok 1004 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+strict +delete> [return] ok 1005 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+strict +delete> [variable] ok 1006 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+strict +delete> [exception] ok 1007 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+strict +delete> [return] ok 1008 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+strict +delete> [variable] ok 1009 - my $x; $x->[0] = 1; $$x[1] <+strict +delete> [exception] ok 1010 - my $x; $x->[0] = 1; $$x[1] <+strict +delete> [return] ok 1011 - my $x; $x->[0] = 1; $$x[1] <+strict +delete> [variable] ok 1012 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+strict +delete> [exception] ok 1013 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+strict +delete> [return] ok 1014 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+strict +delete> [variable] ok 1015 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+strict +delete> [exception] ok 1016 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+strict +delete> [return] ok 1017 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+strict +delete> [variable] ok 1018 - my @x; $x[0] = 1; $x[1] <+strict +delete> [exception] ok 1019 - my @x; $x[0] = 1; $x[1] <+strict +delete> [return] ok 1020 - my @x; $x[0] = 1; $x[1] <+strict +delete> [variable] ok 1021 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+strict +delete> [exception] ok 1022 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+strict +delete> [return] ok 1023 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+strict +delete> [variable] ok 1024 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+strict +delete> [exception] ok 1025 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+strict +delete> [return] ok 1026 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+strict +delete> [variable] ok 1027 - my $x; $x->[0] = 1; $x->[0] <+strict +store> [exception] ok 1028 - my $x; $x->[0] = 1; $x->[0] <+strict +store> [return] ok 1029 - my $x; $x->[0] = 1; $x->[0] <+strict +store> [variable] ok 1030 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+strict +store> [exception] ok 1031 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+strict +store> [return] ok 1032 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] <+strict +store> [variable] ok 1033 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+strict +store> [exception] ok 1034 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+strict +store> [return] ok 1035 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] <+strict +store> [variable] ok 1036 - my $x; $x->[0] = 1; $$x[0] <+strict +store> [exception] ok 1037 - my $x; $x->[0] = 1; $$x[0] <+strict +store> [return] ok 1038 - my $x; $x->[0] = 1; $$x[0] <+strict +store> [variable] ok 1039 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+strict +store> [exception] ok 1040 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+strict +store> [return] ok 1041 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] <+strict +store> [variable] ok 1042 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+strict +store> [exception] ok 1043 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+strict +store> [return] ok 1044 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] <+strict +store> [variable] ok 1045 - my @x; $x[0] = 1; $x[0] <+strict +store> [exception] ok 1046 - my @x; $x[0] = 1; $x[0] <+strict +store> [return] ok 1047 - my @x; $x[0] = 1; $x[0] <+strict +store> [variable] ok 1048 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+strict +store> [exception] ok 1049 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+strict +store> [return] ok 1050 - our @x; local @x; use strict; $x[0] = 1; $x[0] <+strict +store> [variable] ok 1051 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+strict +store> [exception] ok 1052 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+strict +store> [return] ok 1053 - our @x; local @x; no strict; $x[0] = 1; $x[0] <+strict +store> [variable] ok 1054 - my $x; $x->[0] = 1; $x->[1] <+strict +store> [exception] ok 1055 - my $x; $x->[0] = 1; $x->[1] <+strict +store> [return] ok 1056 - my $x; $x->[0] = 1; $x->[1] <+strict +store> [variable] ok 1057 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+strict +store> [exception] ok 1058 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+strict +store> [return] ok 1059 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] <+strict +store> [variable] ok 1060 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+strict +store> [exception] ok 1061 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+strict +store> [return] ok 1062 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] <+strict +store> [variable] ok 1063 - my $x; $x->[0] = 1; $$x[1] <+strict +store> [exception] ok 1064 - my $x; $x->[0] = 1; $$x[1] <+strict +store> [return] ok 1065 - my $x; $x->[0] = 1; $$x[1] <+strict +store> [variable] ok 1066 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+strict +store> [exception] ok 1067 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+strict +store> [return] ok 1068 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] <+strict +store> [variable] ok 1069 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+strict +store> [exception] ok 1070 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+strict +store> [return] ok 1071 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] <+strict +store> [variable] ok 1072 - my @x; $x[0] = 1; $x[1] <+strict +store> [exception] ok 1073 - my @x; $x[0] = 1; $x[1] <+strict +store> [return] ok 1074 - my @x; $x[0] = 1; $x[1] <+strict +store> [variable] ok 1075 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+strict +store> [exception] ok 1076 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+strict +store> [return] ok 1077 - our @x; local @x; use strict; $x[0] = 1; $x[1] <+strict +store> [variable] ok 1078 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+strict +store> [exception] ok 1079 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+strict +store> [return] ok 1080 - our @x; local @x; no strict; $x[0] = 1; $x[1] <+strict +store> [variable] ok 1081 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+fetch> [exception] ok 1082 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+fetch> [return] ok 1083 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+fetch> [variable] ok 1084 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+fetch> [exception] ok 1085 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+fetch> [return] ok 1086 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+fetch> [variable] ok 1087 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+fetch> [exception] ok 1088 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+fetch> [return] ok 1089 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+fetch> [variable] ok 1090 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+fetch> [exception] ok 1091 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+fetch> [return] ok 1092 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+fetch> [variable] ok 1093 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+fetch> [exception] ok 1094 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+fetch> [return] ok 1095 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+fetch> [variable] ok 1096 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+fetch> [exception] ok 1097 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+fetch> [return] ok 1098 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+fetch> [variable] ok 1099 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+fetch> [exception] ok 1100 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+fetch> [return] ok 1101 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+fetch> [variable] ok 1102 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+fetch> [exception] ok 1103 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+fetch> [return] ok 1104 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+fetch> [variable] ok 1105 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+fetch> [exception] ok 1106 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+fetch> [return] ok 1107 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+fetch> [variable] ok 1108 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+fetch> [exception] ok 1109 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+fetch> [return] ok 1110 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+fetch> [variable] ok 1111 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+fetch> [exception] ok 1112 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+fetch> [return] ok 1113 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+fetch> [variable] ok 1114 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+fetch> [exception] ok 1115 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+fetch> [return] ok 1116 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+fetch> [variable] ok 1117 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+fetch> [exception] ok 1118 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+fetch> [return] ok 1119 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+fetch> [variable] ok 1120 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+fetch> [exception] ok 1121 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+fetch> [return] ok 1122 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+fetch> [variable] ok 1123 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+fetch> [exception] ok 1124 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+fetch> [return] ok 1125 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+fetch> [variable] ok 1126 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+fetch> [exception] ok 1127 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+fetch> [return] ok 1128 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+fetch> [variable] ok 1129 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+fetch> [exception] ok 1130 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+fetch> [return] ok 1131 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+fetch> [variable] ok 1132 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+fetch> [exception] ok 1133 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+fetch> [return] ok 1134 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+fetch> [variable] ok 1135 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+fetch> [exception] ok 1136 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+fetch> [return] ok 1137 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+fetch> [variable] ok 1138 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+fetch> [exception] ok 1139 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+fetch> [return] ok 1140 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+fetch> [variable] ok 1141 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+fetch> [exception] ok 1142 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+fetch> [return] ok 1143 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+fetch> [variable] ok 1144 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+fetch> [exception] ok 1145 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+fetch> [return] ok 1146 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+fetch> [variable] ok 1147 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+fetch> [exception] ok 1148 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+fetch> [return] ok 1149 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+fetch> [variable] ok 1150 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+fetch> [exception] ok 1151 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+fetch> [return] ok 1152 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+fetch> [variable] ok 1153 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+fetch> [exception] ok 1154 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+fetch> [return] ok 1155 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+fetch> [variable] ok 1156 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+fetch> [exception] ok 1157 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+fetch> [return] ok 1158 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+fetch> [variable] ok 1159 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+fetch> [exception] ok 1160 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+fetch> [return] ok 1161 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+fetch> [variable] ok 1162 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+exists> [exception] ok 1163 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+exists> [return] ok 1164 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+exists> [variable] ok 1165 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+exists> [exception] ok 1166 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+exists> [return] ok 1167 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+exists> [variable] ok 1168 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+exists> [exception] ok 1169 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+exists> [return] ok 1170 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+exists> [variable] ok 1171 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+exists> [exception] ok 1172 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+exists> [return] ok 1173 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+exists> [variable] ok 1174 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+exists> [exception] ok 1175 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+exists> [return] ok 1176 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+exists> [variable] ok 1177 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+exists> [exception] ok 1178 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+exists> [return] ok 1179 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+exists> [variable] ok 1180 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+exists> [exception] ok 1181 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+exists> [return] ok 1182 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+exists> [variable] ok 1183 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+exists> [exception] ok 1184 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+exists> [return] ok 1185 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+exists> [variable] ok 1186 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+exists> [exception] ok 1187 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+exists> [return] ok 1188 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+exists> [variable] ok 1189 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+exists> [exception] ok 1190 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+exists> [return] ok 1191 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+exists> [variable] ok 1192 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+exists> [exception] ok 1193 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+exists> [return] ok 1194 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+exists> [variable] ok 1195 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+exists> [exception] ok 1196 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+exists> [return] ok 1197 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+exists> [variable] ok 1198 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+exists> [exception] ok 1199 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+exists> [return] ok 1200 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+exists> [variable] ok 1201 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+exists> [exception] ok 1202 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+exists> [return] ok 1203 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+exists> [variable] ok 1204 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+exists> [exception] ok 1205 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+exists> [return] ok 1206 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+exists> [variable] ok 1207 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+exists> [exception] ok 1208 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+exists> [return] ok 1209 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+exists> [variable] ok 1210 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+exists> [exception] ok 1211 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+exists> [return] ok 1212 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+exists> [variable] ok 1213 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+exists> [exception] ok 1214 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+exists> [return] ok 1215 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+exists> [variable] ok 1216 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+exists> [exception] ok 1217 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+exists> [return] ok 1218 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+exists> [variable] ok 1219 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+exists> [exception] ok 1220 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+exists> [return] ok 1221 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+exists> [variable] ok 1222 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+exists> [exception] ok 1223 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+exists> [return] ok 1224 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+exists> [variable] ok 1225 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+exists> [exception] ok 1226 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+exists> [return] ok 1227 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+exists> [variable] ok 1228 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+exists> [exception] ok 1229 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+exists> [return] ok 1230 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+exists> [variable] ok 1231 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+exists> [exception] ok 1232 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+exists> [return] ok 1233 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+exists> [variable] ok 1234 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+exists> [exception] ok 1235 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+exists> [return] ok 1236 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+exists> [variable] ok 1237 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+exists> [exception] ok 1238 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+exists> [return] ok 1239 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+exists> [variable] ok 1240 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+exists> [exception] ok 1241 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+exists> [return] ok 1242 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+exists> [variable] ok 1243 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+delete> [exception] ok 1244 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+delete> [return] ok 1245 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+delete> [variable] ok 1246 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+delete> [exception] ok 1247 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+delete> [return] ok 1248 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+delete> [variable] ok 1249 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+delete> [exception] ok 1250 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+delete> [return] ok 1251 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+delete> [variable] ok 1252 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+delete> [exception] ok 1253 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+delete> [return] ok 1254 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+delete> [variable] ok 1255 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+delete> [exception] ok 1256 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+delete> [return] ok 1257 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+delete> [variable] ok 1258 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+delete> [exception] ok 1259 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+delete> [return] ok 1260 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+delete> [variable] ok 1261 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+delete> [exception] ok 1262 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+delete> [return] ok 1263 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+delete> [variable] ok 1264 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+delete> [exception] ok 1265 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+delete> [return] ok 1266 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+delete> [variable] ok 1267 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+delete> [exception] ok 1268 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+delete> [return] ok 1269 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+delete> [variable] ok 1270 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+delete> [exception] ok 1271 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+delete> [return] ok 1272 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+delete> [variable] ok 1273 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+delete> [exception] ok 1274 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+delete> [return] ok 1275 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+delete> [variable] ok 1276 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+delete> [exception] ok 1277 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+delete> [return] ok 1278 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+delete> [variable] ok 1279 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+delete> [exception] ok 1280 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+delete> [return] ok 1281 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+delete> [variable] ok 1282 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+delete> [exception] ok 1283 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+delete> [return] ok 1284 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+delete> [variable] ok 1285 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+delete> [exception] ok 1286 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+delete> [return] ok 1287 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+delete> [variable] ok 1288 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+delete> [exception] ok 1289 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+delete> [return] ok 1290 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+delete> [variable] ok 1291 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+delete> [exception] ok 1292 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+delete> [return] ok 1293 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+delete> [variable] ok 1294 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+delete> [exception] ok 1295 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+delete> [return] ok 1296 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+delete> [variable] ok 1297 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+delete> [exception] ok 1298 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+delete> [return] ok 1299 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+delete> [variable] ok 1300 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+delete> [exception] ok 1301 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+delete> [return] ok 1302 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+delete> [variable] ok 1303 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+delete> [exception] ok 1304 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+delete> [return] ok 1305 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+delete> [variable] ok 1306 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+delete> [exception] ok 1307 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+delete> [return] ok 1308 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+delete> [variable] ok 1309 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+delete> [exception] ok 1310 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+delete> [return] ok 1311 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+delete> [variable] ok 1312 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+delete> [exception] ok 1313 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+delete> [return] ok 1314 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+delete> [variable] ok 1315 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+delete> [exception] ok 1316 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+delete> [return] ok 1317 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+delete> [variable] ok 1318 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+delete> [exception] ok 1319 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+delete> [return] ok 1320 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+delete> [variable] ok 1321 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+delete> [exception] ok 1322 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+delete> [return] ok 1323 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+delete> [variable] ok 1324 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+store> [exception] ok 1325 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+store> [return] ok 1326 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+store> [variable] ok 1327 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+store> [exception] ok 1328 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+store> [return] ok 1329 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+store> [variable] ok 1330 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+store> [exception] ok 1331 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+store> [return] ok 1332 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+store> [variable] ok 1333 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+store> [exception] ok 1334 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+store> [return] ok 1335 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+store> [variable] ok 1336 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+store> [exception] ok 1337 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+store> [return] ok 1338 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+store> [variable] ok 1339 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+store> [exception] ok 1340 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+store> [return] ok 1341 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+store> [variable] ok 1342 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+store> [exception] ok 1343 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+store> [return] ok 1344 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+store> [variable] ok 1345 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+store> [exception] ok 1346 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+store> [return] ok 1347 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+store> [variable] ok 1348 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+store> [exception] ok 1349 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+store> [return] ok 1350 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+store> [variable] ok 1351 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+store> [exception] ok 1352 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+store> [return] ok 1353 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+store> [variable] ok 1354 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+store> [exception] ok 1355 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+store> [return] ok 1356 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+store> [variable] ok 1357 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+store> [exception] ok 1358 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+store> [return] ok 1359 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+store> [variable] ok 1360 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+store> [exception] ok 1361 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+store> [return] ok 1362 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+store> [variable] ok 1363 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+store> [exception] ok 1364 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+store> [return] ok 1365 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+store> [variable] ok 1366 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+store> [exception] ok 1367 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+store> [return] ok 1368 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+store> [variable] ok 1369 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+store> [exception] ok 1370 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+store> [return] ok 1371 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+store> [variable] ok 1372 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+store> [exception] ok 1373 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+store> [return] ok 1374 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+store> [variable] ok 1375 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+store> [exception] ok 1376 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+store> [return] ok 1377 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+store> [variable] ok 1378 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+store> [exception] ok 1379 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+store> [return] ok 1380 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+store> [variable] ok 1381 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+store> [exception] ok 1382 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+store> [return] ok 1383 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+store> [variable] ok 1384 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+store> [exception] ok 1385 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+store> [return] ok 1386 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+store> [variable] ok 1387 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+store> [exception] ok 1388 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+store> [return] ok 1389 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+store> [variable] ok 1390 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+store> [exception] ok 1391 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+store> [return] ok 1392 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+store> [variable] ok 1393 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+store> [exception] ok 1394 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+store> [return] ok 1395 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+store> [variable] ok 1396 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+store> [exception] ok 1397 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+store> [return] ok 1398 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+store> [variable] ok 1399 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+store> [exception] ok 1400 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+store> [return] ok 1401 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+store> [variable] ok 1402 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+store> [exception] ok 1403 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+store> [return] ok 1404 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+store> [variable] ok 1405 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +fetch> [exception] ok 1406 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +fetch> [return] ok 1407 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +fetch> [variable] ok 1408 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +fetch> [exception] ok 1409 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +fetch> [return] ok 1410 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +fetch> [variable] ok 1411 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +fetch> [exception] ok 1412 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +fetch> [return] ok 1413 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +fetch> [variable] ok 1414 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +fetch> [exception] ok 1415 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +fetch> [return] ok 1416 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +fetch> [variable] ok 1417 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +fetch> [exception] ok 1418 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +fetch> [return] ok 1419 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +fetch> [variable] ok 1420 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +fetch> [exception] ok 1421 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +fetch> [return] ok 1422 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +fetch> [variable] ok 1423 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+strict +fetch> [exception] ok 1424 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+strict +fetch> [return] ok 1425 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+strict +fetch> [variable] ok 1426 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +fetch> [exception] ok 1427 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +fetch> [return] ok 1428 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +fetch> [variable] ok 1429 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +fetch> [exception] ok 1430 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +fetch> [return] ok 1431 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +fetch> [variable] ok 1432 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +fetch> [exception] ok 1433 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +fetch> [return] ok 1434 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +fetch> [variable] ok 1435 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +fetch> [exception] ok 1436 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +fetch> [return] ok 1437 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +fetch> [variable] ok 1438 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +fetch> [exception] ok 1439 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +fetch> [return] ok 1440 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +fetch> [variable] ok 1441 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +fetch> [exception] ok 1442 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +fetch> [return] ok 1443 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +fetch> [variable] ok 1444 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +fetch> [exception] ok 1445 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +fetch> [return] ok 1446 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +fetch> [variable] ok 1447 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +fetch> [exception] ok 1448 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +fetch> [return] ok 1449 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +fetch> [variable] ok 1450 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+strict +fetch> [exception] ok 1451 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+strict +fetch> [return] ok 1452 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+strict +fetch> [variable] ok 1453 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +fetch> [exception] ok 1454 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +fetch> [return] ok 1455 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +fetch> [variable] ok 1456 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +fetch> [exception] ok 1457 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +fetch> [return] ok 1458 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +fetch> [variable] ok 1459 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +fetch> [exception] ok 1460 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +fetch> [return] ok 1461 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +fetch> [variable] ok 1462 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +fetch> [exception] ok 1463 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +fetch> [return] ok 1464 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +fetch> [variable] ok 1465 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +fetch> [exception] ok 1466 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +fetch> [return] ok 1467 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +fetch> [variable] ok 1468 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +fetch> [exception] ok 1469 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +fetch> [return] ok 1470 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +fetch> [variable] ok 1471 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +fetch> [exception] ok 1472 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +fetch> [return] ok 1473 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +fetch> [variable] ok 1474 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +fetch> [exception] ok 1475 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +fetch> [return] ok 1476 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +fetch> [variable] ok 1477 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+strict +fetch> [exception] ok 1478 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+strict +fetch> [return] ok 1479 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+strict +fetch> [variable] ok 1480 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +fetch> [exception] ok 1481 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +fetch> [return] ok 1482 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +fetch> [variable] ok 1483 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +fetch> [exception] ok 1484 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +fetch> [return] ok 1485 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +fetch> [variable] ok 1486 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +exists> [exception] ok 1487 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +exists> [return] ok 1488 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +exists> [variable] ok 1489 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +exists> [exception] ok 1490 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +exists> [return] ok 1491 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +exists> [variable] ok 1492 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +exists> [exception] ok 1493 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +exists> [return] ok 1494 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +exists> [variable] ok 1495 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +exists> [exception] ok 1496 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +exists> [return] ok 1497 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +exists> [variable] ok 1498 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +exists> [exception] ok 1499 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +exists> [return] ok 1500 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +exists> [variable] ok 1501 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +exists> [exception] ok 1502 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +exists> [return] ok 1503 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +exists> [variable] ok 1504 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+strict +exists> [exception] ok 1505 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+strict +exists> [return] ok 1506 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+strict +exists> [variable] ok 1507 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +exists> [exception] ok 1508 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +exists> [return] ok 1509 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +exists> [variable] ok 1510 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +exists> [exception] ok 1511 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +exists> [return] ok 1512 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +exists> [variable] ok 1513 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +exists> [exception] ok 1514 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +exists> [return] ok 1515 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +exists> [variable] ok 1516 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +exists> [exception] ok 1517 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +exists> [return] ok 1518 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +exists> [variable] ok 1519 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +exists> [exception] ok 1520 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +exists> [return] ok 1521 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +exists> [variable] ok 1522 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +exists> [exception] ok 1523 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +exists> [return] ok 1524 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +exists> [variable] ok 1525 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +exists> [exception] ok 1526 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +exists> [return] ok 1527 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +exists> [variable] ok 1528 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +exists> [exception] ok 1529 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +exists> [return] ok 1530 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +exists> [variable] ok 1531 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+strict +exists> [exception] ok 1532 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+strict +exists> [return] ok 1533 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+strict +exists> [variable] ok 1534 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +exists> [exception] ok 1535 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +exists> [return] ok 1536 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +exists> [variable] ok 1537 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +exists> [exception] ok 1538 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +exists> [return] ok 1539 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +exists> [variable] ok 1540 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +exists> [exception] ok 1541 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +exists> [return] ok 1542 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +exists> [variable] ok 1543 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +exists> [exception] ok 1544 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +exists> [return] ok 1545 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +exists> [variable] ok 1546 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +exists> [exception] ok 1547 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +exists> [return] ok 1548 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +exists> [variable] ok 1549 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +exists> [exception] ok 1550 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +exists> [return] ok 1551 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +exists> [variable] ok 1552 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +exists> [exception] ok 1553 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +exists> [return] ok 1554 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +exists> [variable] ok 1555 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +exists> [exception] ok 1556 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +exists> [return] ok 1557 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +exists> [variable] ok 1558 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+strict +exists> [exception] ok 1559 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+strict +exists> [return] ok 1560 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+strict +exists> [variable] ok 1561 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +exists> [exception] ok 1562 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +exists> [return] ok 1563 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +exists> [variable] ok 1564 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +exists> [exception] ok 1565 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +exists> [return] ok 1566 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +exists> [variable] ok 1567 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +delete> [exception] ok 1568 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +delete> [return] ok 1569 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +delete> [variable] ok 1570 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +delete> [exception] ok 1571 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +delete> [return] ok 1572 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +delete> [variable] ok 1573 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +delete> [exception] ok 1574 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +delete> [return] ok 1575 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +delete> [variable] ok 1576 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +delete> [exception] ok 1577 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +delete> [return] ok 1578 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +delete> [variable] ok 1579 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +delete> [exception] ok 1580 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +delete> [return] ok 1581 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +delete> [variable] ok 1582 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +delete> [exception] ok 1583 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +delete> [return] ok 1584 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +delete> [variable] ok 1585 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+strict +delete> [exception] ok 1586 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+strict +delete> [return] ok 1587 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+strict +delete> [variable] ok 1588 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +delete> [exception] ok 1589 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +delete> [return] ok 1590 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +delete> [variable] ok 1591 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +delete> [exception] ok 1592 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +delete> [return] ok 1593 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +delete> [variable] ok 1594 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +delete> [exception] ok 1595 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +delete> [return] ok 1596 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +delete> [variable] ok 1597 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +delete> [exception] ok 1598 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +delete> [return] ok 1599 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +delete> [variable] ok 1600 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +delete> [exception] ok 1601 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +delete> [return] ok 1602 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +delete> [variable] ok 1603 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +delete> [exception] ok 1604 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +delete> [return] ok 1605 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +delete> [variable] ok 1606 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +delete> [exception] ok 1607 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +delete> [return] ok 1608 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +delete> [variable] ok 1609 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +delete> [exception] ok 1610 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +delete> [return] ok 1611 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +delete> [variable] ok 1612 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+strict +delete> [exception] ok 1613 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+strict +delete> [return] ok 1614 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+strict +delete> [variable] ok 1615 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +delete> [exception] ok 1616 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +delete> [return] ok 1617 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +delete> [variable] ok 1618 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +delete> [exception] ok 1619 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +delete> [return] ok 1620 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +delete> [variable] ok 1621 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +delete> [exception] ok 1622 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +delete> [return] ok 1623 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +delete> [variable] ok 1624 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +delete> [exception] ok 1625 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +delete> [return] ok 1626 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +delete> [variable] ok 1627 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +delete> [exception] ok 1628 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +delete> [return] ok 1629 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +delete> [variable] ok 1630 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +delete> [exception] ok 1631 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +delete> [return] ok 1632 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +delete> [variable] ok 1633 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +delete> [exception] ok 1634 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +delete> [return] ok 1635 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +delete> [variable] ok 1636 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +delete> [exception] ok 1637 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +delete> [return] ok 1638 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +delete> [variable] ok 1639 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+strict +delete> [exception] ok 1640 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+strict +delete> [return] ok 1641 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+strict +delete> [variable] ok 1642 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +delete> [exception] ok 1643 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +delete> [return] ok 1644 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +delete> [variable] ok 1645 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +delete> [exception] ok 1646 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +delete> [return] ok 1647 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +delete> [variable] ok 1648 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +store> [exception] ok 1649 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +store> [return] ok 1650 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +store> [variable] ok 1651 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +store> [exception] ok 1652 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +store> [return] ok 1653 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +store> [variable] ok 1654 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +store> [exception] ok 1655 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +store> [return] ok 1656 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] <+strict +store> [variable] ok 1657 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +store> [exception] ok 1658 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +store> [return] ok 1659 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +store> [variable] ok 1660 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +store> [exception] ok 1661 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +store> [return] ok 1662 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +store> [variable] ok 1663 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +store> [exception] ok 1664 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +store> [return] ok 1665 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] <+strict +store> [variable] ok 1666 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+strict +store> [exception] ok 1667 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+strict +store> [return] ok 1668 - my @x; $x[0]->[1] = 1; $x[0]->[1] <+strict +store> [variable] ok 1669 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +store> [exception] ok 1670 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +store> [return] ok 1671 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +store> [variable] ok 1672 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +store> [exception] ok 1673 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +store> [return] ok 1674 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] <+strict +store> [variable] ok 1675 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +store> [exception] ok 1676 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +store> [return] ok 1677 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +store> [variable] ok 1678 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +store> [exception] ok 1679 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +store> [return] ok 1680 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +store> [variable] ok 1681 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +store> [exception] ok 1682 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +store> [return] ok 1683 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] <+strict +store> [variable] ok 1684 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +store> [exception] ok 1685 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +store> [return] ok 1686 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +store> [variable] ok 1687 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +store> [exception] ok 1688 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +store> [return] ok 1689 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +store> [variable] ok 1690 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +store> [exception] ok 1691 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +store> [return] ok 1692 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] <+strict +store> [variable] ok 1693 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+strict +store> [exception] ok 1694 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+strict +store> [return] ok 1695 - my @x; $x[0]->[1] = 1; $x[0]->[3] <+strict +store> [variable] ok 1696 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +store> [exception] ok 1697 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +store> [return] ok 1698 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +store> [variable] ok 1699 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +store> [exception] ok 1700 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +store> [return] ok 1701 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] <+strict +store> [variable] ok 1702 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +store> [exception] ok 1703 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +store> [return] ok 1704 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +store> [variable] ok 1705 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +store> [exception] ok 1706 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +store> [return] ok 1707 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +store> [variable] ok 1708 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +store> [exception] ok 1709 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +store> [return] ok 1710 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] <+strict +store> [variable] ok 1711 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +store> [exception] ok 1712 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +store> [return] ok 1713 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +store> [variable] ok 1714 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +store> [exception] ok 1715 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +store> [return] ok 1716 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +store> [variable] ok 1717 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +store> [exception] ok 1718 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +store> [return] ok 1719 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] <+strict +store> [variable] ok 1720 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+strict +store> [exception] ok 1721 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+strict +store> [return] ok 1722 - my @x; $x[0]->[1] = 1; $x[2]->[3] <+strict +store> [variable] ok 1723 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +store> [exception] ok 1724 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +store> [return] ok 1725 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +store> [variable] ok 1726 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +store> [exception] ok 1727 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +store> [return] ok 1728 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] <+strict +store> [variable] ok 1729 - my $x; 1 for $x->[0]; () [exception] ok 1730 - my $x; 1 for $x->[0]; () [return] ok 1731 - my $x; 1 for $x->[0]; () [variable] ok 1732 - our $x; local $x; use strict; 1 for $x->[0]; () [exception] ok 1733 - our $x; local $x; use strict; 1 for $x->[0]; () [return] ok 1734 - our $x; local $x; use strict; 1 for $x->[0]; () [variable] ok 1735 - our $x; local $x; no strict; 1 for $x->[0]; () [exception] ok 1736 - our $x; local $x; no strict; 1 for $x->[0]; () [return] ok 1737 - our $x; local $x; no strict; 1 for $x->[0]; () [variable] ok 1738 - my $x; 1 for $$x[0]; () [exception] ok 1739 - my $x; 1 for $$x[0]; () [return] ok 1740 - my $x; 1 for $$x[0]; () [variable] ok 1741 - our $x; local $x; use strict; 1 for $$x[0]; () [exception] ok 1742 - our $x; local $x; use strict; 1 for $$x[0]; () [return] ok 1743 - our $x; local $x; use strict; 1 for $$x[0]; () [variable] ok 1744 - our $x; local $x; no strict; 1 for $$x[0]; () [exception] ok 1745 - our $x; local $x; no strict; 1 for $$x[0]; () [return] ok 1746 - our $x; local $x; no strict; 1 for $$x[0]; () [variable] ok 1747 - my @x; 1 for $x[0]; () [exception] ok 1748 - my @x; 1 for $x[0]; () [return] ok 1749 - my @x; 1 for $x[0]; () [variable] ok 1750 - our @x; local @x; use strict; 1 for $x[0]; () [exception] ok 1751 - our @x; local @x; use strict; 1 for $x[0]; () [return] ok 1752 - our @x; local @x; use strict; 1 for $x[0]; () [variable] ok 1753 - our @x; local @x; no strict; 1 for $x[0]; () [exception] ok 1754 - our @x; local @x; no strict; 1 for $x[0]; () [return] ok 1755 - our @x; local @x; no strict; 1 for $x[0]; () [variable] ok 1756 - my $x; 1 for $x->[0]; () [exception] ok 1757 - my $x; 1 for $x->[0]; () [return] ok 1758 - my $x; 1 for $x->[0]; () [variable] ok 1759 - our $x; local $x; use strict; 1 for $x->[0]; () [exception] ok 1760 - our $x; local $x; use strict; 1 for $x->[0]; () [return] ok 1761 - our $x; local $x; use strict; 1 for $x->[0]; () [variable] ok 1762 - our $x; local $x; no strict; 1 for $x->[0]; () [exception] ok 1763 - our $x; local $x; no strict; 1 for $x->[0]; () [return] ok 1764 - our $x; local $x; no strict; 1 for $x->[0]; () [variable] ok 1765 - my $x; 1 for $$x[0]; () [exception] ok 1766 - my $x; 1 for $$x[0]; () [return] ok 1767 - my $x; 1 for $$x[0]; () [variable] ok 1768 - our $x; local $x; use strict; 1 for $$x[0]; () [exception] ok 1769 - our $x; local $x; use strict; 1 for $$x[0]; () [return] ok 1770 - our $x; local $x; use strict; 1 for $$x[0]; () [variable] ok 1771 - our $x; local $x; no strict; 1 for $$x[0]; () [exception] ok 1772 - our $x; local $x; no strict; 1 for $$x[0]; () [return] ok 1773 - our $x; local $x; no strict; 1 for $$x[0]; () [variable] ok 1774 - my @x; 1 for $x[0]; () [exception] ok 1775 - my @x; 1 for $x[0]; () [return] ok 1776 - my @x; 1 for $x[0]; () [variable] ok 1777 - our @x; local @x; use strict; 1 for $x[0]; () [exception] ok 1778 - our @x; local @x; use strict; 1 for $x[0]; () [return] ok 1779 - our @x; local @x; use strict; 1 for $x[0]; () [variable] ok 1780 - our @x; local @x; no strict; 1 for $x[0]; () [exception] ok 1781 - our @x; local @x; no strict; 1 for $x[0]; () [return] ok 1782 - our @x; local @x; no strict; 1 for $x[0]; () [variable] ok 1783 - my $x; 1 for $x->[0]; () <+fetch> [exception] ok 1784 - my $x; 1 for $x->[0]; () <+fetch> [return] ok 1785 - my $x; 1 for $x->[0]; () <+fetch> [variable] ok 1786 - our $x; local $x; use strict; 1 for $x->[0]; () <+fetch> [exception] ok 1787 - our $x; local $x; use strict; 1 for $x->[0]; () <+fetch> [return] ok 1788 - our $x; local $x; use strict; 1 for $x->[0]; () <+fetch> [variable] ok 1789 - our $x; local $x; no strict; 1 for $x->[0]; () <+fetch> [exception] ok 1790 - our $x; local $x; no strict; 1 for $x->[0]; () <+fetch> [return] ok 1791 - our $x; local $x; no strict; 1 for $x->[0]; () <+fetch> [variable] ok 1792 - my $x; 1 for $$x[0]; () <+fetch> [exception] ok 1793 - my $x; 1 for $$x[0]; () <+fetch> [return] ok 1794 - my $x; 1 for $$x[0]; () <+fetch> [variable] ok 1795 - our $x; local $x; use strict; 1 for $$x[0]; () <+fetch> [exception] ok 1796 - our $x; local $x; use strict; 1 for $$x[0]; () <+fetch> [return] ok 1797 - our $x; local $x; use strict; 1 for $$x[0]; () <+fetch> [variable] ok 1798 - our $x; local $x; no strict; 1 for $$x[0]; () <+fetch> [exception] ok 1799 - our $x; local $x; no strict; 1 for $$x[0]; () <+fetch> [return] ok 1800 - our $x; local $x; no strict; 1 for $$x[0]; () <+fetch> [variable] ok 1801 - my @x; 1 for $x[0]; () <+fetch> [exception] ok 1802 - my @x; 1 for $x[0]; () <+fetch> [return] ok 1803 - my @x; 1 for $x[0]; () <+fetch> [variable] ok 1804 - our @x; local @x; use strict; 1 for $x[0]; () <+fetch> [exception] ok 1805 - our @x; local @x; use strict; 1 for $x[0]; () <+fetch> [return] ok 1806 - our @x; local @x; use strict; 1 for $x[0]; () <+fetch> [variable] ok 1807 - our @x; local @x; no strict; 1 for $x[0]; () <+fetch> [exception] ok 1808 - our @x; local @x; no strict; 1 for $x[0]; () <+fetch> [return] ok 1809 - our @x; local @x; no strict; 1 for $x[0]; () <+fetch> [variable] ok 1810 - my $x; 1 for $x->[0]; () <+exists> [exception] ok 1811 - my $x; 1 for $x->[0]; () <+exists> [return] ok 1812 - my $x; 1 for $x->[0]; () <+exists> [variable] ok 1813 - our $x; local $x; use strict; 1 for $x->[0]; () <+exists> [exception] ok 1814 - our $x; local $x; use strict; 1 for $x->[0]; () <+exists> [return] ok 1815 - our $x; local $x; use strict; 1 for $x->[0]; () <+exists> [variable] ok 1816 - our $x; local $x; no strict; 1 for $x->[0]; () <+exists> [exception] ok 1817 - our $x; local $x; no strict; 1 for $x->[0]; () <+exists> [return] ok 1818 - our $x; local $x; no strict; 1 for $x->[0]; () <+exists> [variable] ok 1819 - my $x; 1 for $$x[0]; () <+exists> [exception] ok 1820 - my $x; 1 for $$x[0]; () <+exists> [return] ok 1821 - my $x; 1 for $$x[0]; () <+exists> [variable] ok 1822 - our $x; local $x; use strict; 1 for $$x[0]; () <+exists> [exception] ok 1823 - our $x; local $x; use strict; 1 for $$x[0]; () <+exists> [return] ok 1824 - our $x; local $x; use strict; 1 for $$x[0]; () <+exists> [variable] ok 1825 - our $x; local $x; no strict; 1 for $$x[0]; () <+exists> [exception] ok 1826 - our $x; local $x; no strict; 1 for $$x[0]; () <+exists> [return] ok 1827 - our $x; local $x; no strict; 1 for $$x[0]; () <+exists> [variable] ok 1828 - my @x; 1 for $x[0]; () <+exists> [exception] ok 1829 - my @x; 1 for $x[0]; () <+exists> [return] ok 1830 - my @x; 1 for $x[0]; () <+exists> [variable] ok 1831 - our @x; local @x; use strict; 1 for $x[0]; () <+exists> [exception] ok 1832 - our @x; local @x; use strict; 1 for $x[0]; () <+exists> [return] ok 1833 - our @x; local @x; use strict; 1 for $x[0]; () <+exists> [variable] ok 1834 - our @x; local @x; no strict; 1 for $x[0]; () <+exists> [exception] ok 1835 - our @x; local @x; no strict; 1 for $x[0]; () <+exists> [return] ok 1836 - our @x; local @x; no strict; 1 for $x[0]; () <+exists> [variable] ok 1837 - my $x; 1 for $x->[0]; () <+delete> [exception] ok 1838 - my $x; 1 for $x->[0]; () <+delete> [return] ok 1839 - my $x; 1 for $x->[0]; () <+delete> [variable] ok 1840 - our $x; local $x; use strict; 1 for $x->[0]; () <+delete> [exception] ok 1841 - our $x; local $x; use strict; 1 for $x->[0]; () <+delete> [return] ok 1842 - our $x; local $x; use strict; 1 for $x->[0]; () <+delete> [variable] ok 1843 - our $x; local $x; no strict; 1 for $x->[0]; () <+delete> [exception] ok 1844 - our $x; local $x; no strict; 1 for $x->[0]; () <+delete> [return] ok 1845 - our $x; local $x; no strict; 1 for $x->[0]; () <+delete> [variable] ok 1846 - my $x; 1 for $$x[0]; () <+delete> [exception] ok 1847 - my $x; 1 for $$x[0]; () <+delete> [return] ok 1848 - my $x; 1 for $$x[0]; () <+delete> [variable] ok 1849 - our $x; local $x; use strict; 1 for $$x[0]; () <+delete> [exception] ok 1850 - our $x; local $x; use strict; 1 for $$x[0]; () <+delete> [return] ok 1851 - our $x; local $x; use strict; 1 for $$x[0]; () <+delete> [variable] ok 1852 - our $x; local $x; no strict; 1 for $$x[0]; () <+delete> [exception] ok 1853 - our $x; local $x; no strict; 1 for $$x[0]; () <+delete> [return] ok 1854 - our $x; local $x; no strict; 1 for $$x[0]; () <+delete> [variable] ok 1855 - my @x; 1 for $x[0]; () <+delete> [exception] ok 1856 - my @x; 1 for $x[0]; () <+delete> [return] ok 1857 - my @x; 1 for $x[0]; () <+delete> [variable] ok 1858 - our @x; local @x; use strict; 1 for $x[0]; () <+delete> [exception] ok 1859 - our @x; local @x; use strict; 1 for $x[0]; () <+delete> [return] ok 1860 - our @x; local @x; use strict; 1 for $x[0]; () <+delete> [variable] ok 1861 - our @x; local @x; no strict; 1 for $x[0]; () <+delete> [exception] ok 1862 - our @x; local @x; no strict; 1 for $x[0]; () <+delete> [return] ok 1863 - our @x; local @x; no strict; 1 for $x[0]; () <+delete> [variable] ok 1864 - my $x; 1 for $x->[0]; () <+store> [exception] ok 1865 - my $x; 1 for $x->[0]; () <+store> [return] ok 1866 - my $x; 1 for $x->[0]; () <+store> [variable] ok 1867 - our $x; local $x; use strict; 1 for $x->[0]; () <+store> [exception] ok 1868 - our $x; local $x; use strict; 1 for $x->[0]; () <+store> [return] ok 1869 - our $x; local $x; use strict; 1 for $x->[0]; () <+store> [variable] ok 1870 - our $x; local $x; no strict; 1 for $x->[0]; () <+store> [exception] ok 1871 - our $x; local $x; no strict; 1 for $x->[0]; () <+store> [return] ok 1872 - our $x; local $x; no strict; 1 for $x->[0]; () <+store> [variable] ok 1873 - my $x; 1 for $$x[0]; () <+store> [exception] ok 1874 - my $x; 1 for $$x[0]; () <+store> [return] ok 1875 - my $x; 1 for $$x[0]; () <+store> [variable] ok 1876 - our $x; local $x; use strict; 1 for $$x[0]; () <+store> [exception] ok 1877 - our $x; local $x; use strict; 1 for $$x[0]; () <+store> [return] ok 1878 - our $x; local $x; use strict; 1 for $$x[0]; () <+store> [variable] ok 1879 - our $x; local $x; no strict; 1 for $$x[0]; () <+store> [exception] ok 1880 - our $x; local $x; no strict; 1 for $$x[0]; () <+store> [return] ok 1881 - our $x; local $x; no strict; 1 for $$x[0]; () <+store> [variable] ok 1882 - my @x; 1 <+store> [exception] ok 1883 - my @x; 1 <+store> [return] ok 1884 - my @x; 1 <+store> [variable] ok 1885 - our @x; local @x; use strict; 1 <+store> [exception] ok 1886 - our @x; local @x; use strict; 1 <+store> [return] ok 1887 - our @x; local @x; use strict; 1 <+store> [variable] ok 1888 - our @x; local @x; no strict; 1 <+store> [exception] ok 1889 - our @x; local @x; no strict; 1 <+store> [return] ok 1890 - our @x; local @x; no strict; 1 <+store> [variable] ok 1891 - my $x; $_ = 1 for $x->[0]; () [exception] ok 1892 - my $x; $_ = 1 for $x->[0]; () [return] ok 1893 - my $x; $_ = 1 for $x->[0]; () [variable] ok 1894 - our $x; local $x; use strict; $_ = 1 for $x->[0]; () [exception] ok 1895 - our $x; local $x; use strict; $_ = 1 for $x->[0]; () [return] ok 1896 - our $x; local $x; use strict; $_ = 1 for $x->[0]; () [variable] ok 1897 - our $x; local $x; no strict; $_ = 1 for $x->[0]; () [exception] ok 1898 - our $x; local $x; no strict; $_ = 1 for $x->[0]; () [return] ok 1899 - our $x; local $x; no strict; $_ = 1 for $x->[0]; () [variable] ok 1900 - my $x; $_ = 1 for $$x[0]; () [exception] ok 1901 - my $x; $_ = 1 for $$x[0]; () [return] ok 1902 - my $x; $_ = 1 for $$x[0]; () [variable] ok 1903 - our $x; local $x; use strict; $_ = 1 for $$x[0]; () [exception] ok 1904 - our $x; local $x; use strict; $_ = 1 for $$x[0]; () [return] ok 1905 - our $x; local $x; use strict; $_ = 1 for $$x[0]; () [variable] ok 1906 - our $x; local $x; no strict; $_ = 1 for $$x[0]; () [exception] ok 1907 - our $x; local $x; no strict; $_ = 1 for $$x[0]; () [return] ok 1908 - our $x; local $x; no strict; $_ = 1 for $$x[0]; () [variable] ok 1909 - my @x; $_ = 1 for $x[0]; () [exception] ok 1910 - my @x; $_ = 1 for $x[0]; () [return] ok 1911 - my @x; $_ = 1 for $x[0]; () [variable] ok 1912 - our @x; local @x; use strict; $_ = 1 for $x[0]; () [exception] ok 1913 - our @x; local @x; use strict; $_ = 1 for $x[0]; () [return] ok 1914 - our @x; local @x; use strict; $_ = 1 for $x[0]; () [variable] ok 1915 - our @x; local @x; no strict; $_ = 1 for $x[0]; () [exception] ok 1916 - our @x; local @x; no strict; $_ = 1 for $x[0]; () [return] ok 1917 - our @x; local @x; no strict; $_ = 1 for $x[0]; () [variable] ok 1918 - my $x; $_ = 1 for $x->[0]; () [exception] ok 1919 - my $x; $_ = 1 for $x->[0]; () [return] ok 1920 - my $x; $_ = 1 for $x->[0]; () [variable] ok 1921 - our $x; local $x; use strict; $_ = 1 for $x->[0]; () [exception] ok 1922 - our $x; local $x; use strict; $_ = 1 for $x->[0]; () [return] ok 1923 - our $x; local $x; use strict; $_ = 1 for $x->[0]; () [variable] ok 1924 - our $x; local $x; no strict; $_ = 1 for $x->[0]; () [exception] ok 1925 - our $x; local $x; no strict; $_ = 1 for $x->[0]; () [return] ok 1926 - our $x; local $x; no strict; $_ = 1 for $x->[0]; () [variable] ok 1927 - my $x; $_ = 1 for $$x[0]; () [exception] ok 1928 - my $x; $_ = 1 for $$x[0]; () [return] ok 1929 - my $x; $_ = 1 for $$x[0]; () [variable] ok 1930 - our $x; local $x; use strict; $_ = 1 for $$x[0]; () [exception] ok 1931 - our $x; local $x; use strict; $_ = 1 for $$x[0]; () [return] ok 1932 - our $x; local $x; use strict; $_ = 1 for $$x[0]; () [variable] ok 1933 - our $x; local $x; no strict; $_ = 1 for $$x[0]; () [exception] ok 1934 - our $x; local $x; no strict; $_ = 1 for $$x[0]; () [return] ok 1935 - our $x; local $x; no strict; $_ = 1 for $$x[0]; () [variable] ok 1936 - my @x; $_ = 1 for $x[0]; () [exception] ok 1937 - my @x; $_ = 1 for $x[0]; () [return] ok 1938 - my @x; $_ = 1 for $x[0]; () [variable] ok 1939 - our @x; local @x; use strict; $_ = 1 for $x[0]; () [exception] ok 1940 - our @x; local @x; use strict; $_ = 1 for $x[0]; () [return] ok 1941 - our @x; local @x; use strict; $_ = 1 for $x[0]; () [variable] ok 1942 - our @x; local @x; no strict; $_ = 1 for $x[0]; () [exception] ok 1943 - our @x; local @x; no strict; $_ = 1 for $x[0]; () [return] ok 1944 - our @x; local @x; no strict; $_ = 1 for $x[0]; () [variable] ok 1945 - my $x; $_ = 1 for $x->[0]; () <+fetch> [exception] ok 1946 - my $x; $_ = 1 for $x->[0]; () <+fetch> [return] ok 1947 - my $x; $_ = 1 for $x->[0]; () <+fetch> [variable] ok 1948 - our $x; local $x; use strict; $_ = 1 for $x->[0]; () <+fetch> [exception] ok 1949 - our $x; local $x; use strict; $_ = 1 for $x->[0]; () <+fetch> [return] ok 1950 - our $x; local $x; use strict; $_ = 1 for $x->[0]; () <+fetch> [variable] ok 1951 - our $x; local $x; no strict; $_ = 1 for $x->[0]; () <+fetch> [exception] ok 1952 - our $x; local $x; no strict; $_ = 1 for $x->[0]; () <+fetch> [return] ok 1953 - our $x; local $x; no strict; $_ = 1 for $x->[0]; () <+fetch> [variable] ok 1954 - my $x; $_ = 1 for $$x[0]; () <+fetch> [exception] ok 1955 - my $x; $_ = 1 for $$x[0]; () <+fetch> [return] ok 1956 - my $x; $_ = 1 for $$x[0]; () <+fetch> [variable] ok 1957 - our $x; local $x; use strict; $_ = 1 for $$x[0]; () <+fetch> [exception] ok 1958 - our $x; local $x; use strict; $_ = 1 for $$x[0]; () <+fetch> [return] ok 1959 - our $x; local $x; use strict; $_ = 1 for $$x[0]; () <+fetch> [variable] ok 1960 - our $x; local $x; no strict; $_ = 1 for $$x[0]; () <+fetch> [exception] ok 1961 - our $x; local $x; no strict; $_ = 1 for $$x[0]; () <+fetch> [return] ok 1962 - our $x; local $x; no strict; $_ = 1 for $$x[0]; () <+fetch> [variable] ok 1963 - my @x; $_ = 1 for $x[0]; () <+fetch> [exception] ok 1964 - my @x; $_ = 1 for $x[0]; () <+fetch> [return] ok 1965 - my @x; $_ = 1 for $x[0]; () <+fetch> [variable] ok 1966 - our @x; local @x; use strict; $_ = 1 for $x[0]; () <+fetch> [exception] ok 1967 - our @x; local @x; use strict; $_ = 1 for $x[0]; () <+fetch> [return] ok 1968 - our @x; local @x; use strict; $_ = 1 for $x[0]; () <+fetch> [variable] ok 1969 - our @x; local @x; no strict; $_ = 1 for $x[0]; () <+fetch> [exception] ok 1970 - our @x; local @x; no strict; $_ = 1 for $x[0]; () <+fetch> [return] ok 1971 - our @x; local @x; no strict; $_ = 1 for $x[0]; () <+fetch> [variable] ok 1972 - my $x; $_ = 1 for $x->[0]; () <+exists> [exception] ok 1973 - my $x; $_ = 1 for $x->[0]; () <+exists> [return] ok 1974 - my $x; $_ = 1 for $x->[0]; () <+exists> [variable] ok 1975 - our $x; local $x; use strict; $_ = 1 for $x->[0]; () <+exists> [exception] ok 1976 - our $x; local $x; use strict; $_ = 1 for $x->[0]; () <+exists> [return] ok 1977 - our $x; local $x; use strict; $_ = 1 for $x->[0]; () <+exists> [variable] ok 1978 - our $x; local $x; no strict; $_ = 1 for $x->[0]; () <+exists> [exception] ok 1979 - our $x; local $x; no strict; $_ = 1 for $x->[0]; () <+exists> [return] ok 1980 - our $x; local $x; no strict; $_ = 1 for $x->[0]; () <+exists> [variable] ok 1981 - my $x; $_ = 1 for $$x[0]; () <+exists> [exception] ok 1982 - my $x; $_ = 1 for $$x[0]; () <+exists> [return] ok 1983 - my $x; $_ = 1 for $$x[0]; () <+exists> [variable] ok 1984 - our $x; local $x; use strict; $_ = 1 for $$x[0]; () <+exists> [exception] ok 1985 - our $x; local $x; use strict; $_ = 1 for $$x[0]; () <+exists> [return] ok 1986 - our $x; local $x; use strict; $_ = 1 for $$x[0]; () <+exists> [variable] ok 1987 - our $x; local $x; no strict; $_ = 1 for $$x[0]; () <+exists> [exception] ok 1988 - our $x; local $x; no strict; $_ = 1 for $$x[0]; () <+exists> [return] ok 1989 - our $x; local $x; no strict; $_ = 1 for $$x[0]; () <+exists> [variable] ok 1990 - my @x; $_ = 1 for $x[0]; () <+exists> [exception] ok 1991 - my @x; $_ = 1 for $x[0]; () <+exists> [return] ok 1992 - my @x; $_ = 1 for $x[0]; () <+exists> [variable] ok 1993 - our @x; local @x; use strict; $_ = 1 for $x[0]; () <+exists> [exception] ok 1994 - our @x; local @x; use strict; $_ = 1 for $x[0]; () <+exists> [return] ok 1995 - our @x; local @x; use strict; $_ = 1 for $x[0]; () <+exists> [variable] ok 1996 - our @x; local @x; no strict; $_ = 1 for $x[0]; () <+exists> [exception] ok 1997 - our @x; local @x; no strict; $_ = 1 for $x[0]; () <+exists> [return] ok 1998 - our @x; local @x; no strict; $_ = 1 for $x[0]; () <+exists> [variable] ok 1999 - my $x; $_ = 1 for $x->[0]; () <+delete> [exception] ok 2000 - my $x; $_ = 1 for $x->[0]; () <+delete> [return] ok 2001 - my $x; $_ = 1 for $x->[0]; () <+delete> [variable] ok 2002 - our $x; local $x; use strict; $_ = 1 for $x->[0]; () <+delete> [exception] ok 2003 - our $x; local $x; use strict; $_ = 1 for $x->[0]; () <+delete> [return] ok 2004 - our $x; local $x; use strict; $_ = 1 for $x->[0]; () <+delete> [variable] ok 2005 - our $x; local $x; no strict; $_ = 1 for $x->[0]; () <+delete> [exception] ok 2006 - our $x; local $x; no strict; $_ = 1 for $x->[0]; () <+delete> [return] ok 2007 - our $x; local $x; no strict; $_ = 1 for $x->[0]; () <+delete> [variable] ok 2008 - my $x; $_ = 1 for $$x[0]; () <+delete> [exception] ok 2009 - my $x; $_ = 1 for $$x[0]; () <+delete> [return] ok 2010 - my $x; $_ = 1 for $$x[0]; () <+delete> [variable] ok 2011 - our $x; local $x; use strict; $_ = 1 for $$x[0]; () <+delete> [exception] ok 2012 - our $x; local $x; use strict; $_ = 1 for $$x[0]; () <+delete> [return] ok 2013 - our $x; local $x; use strict; $_ = 1 for $$x[0]; () <+delete> [variable] ok 2014 - our $x; local $x; no strict; $_ = 1 for $$x[0]; () <+delete> [exception] ok 2015 - our $x; local $x; no strict; $_ = 1 for $$x[0]; () <+delete> [return] ok 2016 - our $x; local $x; no strict; $_ = 1 for $$x[0]; () <+delete> [variable] ok 2017 - my @x; $_ = 1 for $x[0]; () <+delete> [exception] ok 2018 - my @x; $_ = 1 for $x[0]; () <+delete> [return] ok 2019 - my @x; $_ = 1 for $x[0]; () <+delete> [variable] ok 2020 - our @x; local @x; use strict; $_ = 1 for $x[0]; () <+delete> [exception] ok 2021 - our @x; local @x; use strict; $_ = 1 for $x[0]; () <+delete> [return] ok 2022 - our @x; local @x; use strict; $_ = 1 for $x[0]; () <+delete> [variable] ok 2023 - our @x; local @x; no strict; $_ = 1 for $x[0]; () <+delete> [exception] ok 2024 - our @x; local @x; no strict; $_ = 1 for $x[0]; () <+delete> [return] ok 2025 - our @x; local @x; no strict; $_ = 1 for $x[0]; () <+delete> [variable] ok 2026 - my $x; $_ = 1 for $x->[0]; () <+store> [exception] ok 2027 - my $x; $_ = 1 for $x->[0]; () <+store> [return] ok 2028 - my $x; $_ = 1 for $x->[0]; () <+store> [variable] ok 2029 - our $x; local $x; use strict; $_ = 1 for $x->[0]; () <+store> [exception] ok 2030 - our $x; local $x; use strict; $_ = 1 for $x->[0]; () <+store> [return] ok 2031 - our $x; local $x; use strict; $_ = 1 for $x->[0]; () <+store> [variable] ok 2032 - our $x; local $x; no strict; $_ = 1 for $x->[0]; () <+store> [exception] ok 2033 - our $x; local $x; no strict; $_ = 1 for $x->[0]; () <+store> [return] ok 2034 - our $x; local $x; no strict; $_ = 1 for $x->[0]; () <+store> [variable] ok 2035 - my $x; $_ = 1 for $$x[0]; () <+store> [exception] ok 2036 - my $x; $_ = 1 for $$x[0]; () <+store> [return] ok 2037 - my $x; $_ = 1 for $$x[0]; () <+store> [variable] ok 2038 - our $x; local $x; use strict; $_ = 1 for $$x[0]; () <+store> [exception] ok 2039 - our $x; local $x; use strict; $_ = 1 for $$x[0]; () <+store> [return] ok 2040 - our $x; local $x; use strict; $_ = 1 for $$x[0]; () <+store> [variable] ok 2041 - our $x; local $x; no strict; $_ = 1 for $$x[0]; () <+store> [exception] ok 2042 - our $x; local $x; no strict; $_ = 1 for $$x[0]; () <+store> [return] ok 2043 - our $x; local $x; no strict; $_ = 1 for $$x[0]; () <+store> [variable] ok 2044 - my @x; 1 <+store> [exception] ok 2045 - my @x; 1 <+store> [return] ok 2046 - my @x; 1 <+store> [variable] ok 2047 - our @x; local @x; use strict; 1 <+store> [exception] ok 2048 - our @x; local @x; use strict; 1 <+store> [return] ok 2049 - our @x; local @x; use strict; 1 <+store> [variable] ok 2050 - our @x; local @x; no strict; 1 <+store> [exception] ok 2051 - our @x; local @x; no strict; 1 <+store> [return] ok 2052 - our @x; local @x; no strict; 1 <+store> [variable] ok 2053 - my $x; $x->[0] = 1; 1 for $x->[0]; () <+fetch> [exception] ok 2054 - my $x; $x->[0] = 1; 1 for $x->[0]; () <+fetch> [return] ok 2055 - my $x; $x->[0] = 1; 1 for $x->[0]; () <+fetch> [variable] ok 2056 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[0]; () <+fetch> [exception] ok 2057 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[0]; () <+fetch> [return] ok 2058 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[0]; () <+fetch> [variable] ok 2059 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[0]; () <+fetch> [exception] ok 2060 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[0]; () <+fetch> [return] ok 2061 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[0]; () <+fetch> [variable] ok 2062 - my $x; $x->[0] = 1; 1 for $$x[0]; () <+fetch> [exception] ok 2063 - my $x; $x->[0] = 1; 1 for $$x[0]; () <+fetch> [return] ok 2064 - my $x; $x->[0] = 1; 1 for $$x[0]; () <+fetch> [variable] ok 2065 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[0]; () <+fetch> [exception] ok 2066 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[0]; () <+fetch> [return] ok 2067 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[0]; () <+fetch> [variable] ok 2068 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[0]; () <+fetch> [exception] ok 2069 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[0]; () <+fetch> [return] ok 2070 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[0]; () <+fetch> [variable] ok 2071 - my @x; $x[0] = 1; 1 for $x[0]; () <+fetch> [exception] ok 2072 - my @x; $x[0] = 1; 1 for $x[0]; () <+fetch> [return] ok 2073 - my @x; $x[0] = 1; 1 for $x[0]; () <+fetch> [variable] ok 2074 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[0]; () <+fetch> [exception] ok 2075 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[0]; () <+fetch> [return] ok 2076 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[0]; () <+fetch> [variable] ok 2077 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[0]; () <+fetch> [exception] ok 2078 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[0]; () <+fetch> [return] ok 2079 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[0]; () <+fetch> [variable] ok 2080 - my $x; $x->[0] = 1; 1 for $x->[1]; () <+fetch> [exception] ok 2081 - my $x; $x->[0] = 1; 1 for $x->[1]; () <+fetch> [return] ok 2082 - my $x; $x->[0] = 1; 1 for $x->[1]; () <+fetch> [variable] ok 2083 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[1]; () <+fetch> [exception] ok 2084 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[1]; () <+fetch> [return] ok 2085 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[1]; () <+fetch> [variable] ok 2086 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[1]; () <+fetch> [exception] ok 2087 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[1]; () <+fetch> [return] ok 2088 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[1]; () <+fetch> [variable] ok 2089 - my $x; $x->[0] = 1; 1 for $$x[1]; () <+fetch> [exception] ok 2090 - my $x; $x->[0] = 1; 1 for $$x[1]; () <+fetch> [return] ok 2091 - my $x; $x->[0] = 1; 1 for $$x[1]; () <+fetch> [variable] ok 2092 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[1]; () <+fetch> [exception] ok 2093 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[1]; () <+fetch> [return] ok 2094 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[1]; () <+fetch> [variable] ok 2095 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[1]; () <+fetch> [exception] ok 2096 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[1]; () <+fetch> [return] ok 2097 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[1]; () <+fetch> [variable] ok 2098 - my @x; $x[0] = 1; 1 for $x[1]; () <+fetch> [exception] ok 2099 - my @x; $x[0] = 1; 1 for $x[1]; () <+fetch> [return] ok 2100 - my @x; $x[0] = 1; 1 for $x[1]; () <+fetch> [variable] ok 2101 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[1]; () <+fetch> [exception] ok 2102 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[1]; () <+fetch> [return] ok 2103 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[1]; () <+fetch> [variable] ok 2104 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[1]; () <+fetch> [exception] ok 2105 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[1]; () <+fetch> [return] ok 2106 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[1]; () <+fetch> [variable] ok 2107 - my $x; $x->[0] = 1; 1 for $x->[0]; () <+exists> [exception] ok 2108 - my $x; $x->[0] = 1; 1 for $x->[0]; () <+exists> [return] ok 2109 - my $x; $x->[0] = 1; 1 for $x->[0]; () <+exists> [variable] ok 2110 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[0]; () <+exists> [exception] ok 2111 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[0]; () <+exists> [return] ok 2112 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[0]; () <+exists> [variable] ok 2113 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[0]; () <+exists> [exception] ok 2114 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[0]; () <+exists> [return] ok 2115 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[0]; () <+exists> [variable] ok 2116 - my $x; $x->[0] = 1; 1 for $$x[0]; () <+exists> [exception] ok 2117 - my $x; $x->[0] = 1; 1 for $$x[0]; () <+exists> [return] ok 2118 - my $x; $x->[0] = 1; 1 for $$x[0]; () <+exists> [variable] ok 2119 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[0]; () <+exists> [exception] ok 2120 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[0]; () <+exists> [return] ok 2121 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[0]; () <+exists> [variable] ok 2122 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[0]; () <+exists> [exception] ok 2123 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[0]; () <+exists> [return] ok 2124 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[0]; () <+exists> [variable] ok 2125 - my @x; $x[0] = 1; 1 for $x[0]; () <+exists> [exception] ok 2126 - my @x; $x[0] = 1; 1 for $x[0]; () <+exists> [return] ok 2127 - my @x; $x[0] = 1; 1 for $x[0]; () <+exists> [variable] ok 2128 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[0]; () <+exists> [exception] ok 2129 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[0]; () <+exists> [return] ok 2130 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[0]; () <+exists> [variable] ok 2131 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[0]; () <+exists> [exception] ok 2132 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[0]; () <+exists> [return] ok 2133 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[0]; () <+exists> [variable] ok 2134 - my $x; $x->[0] = 1; 1 for $x->[1]; () <+exists> [exception] ok 2135 - my $x; $x->[0] = 1; 1 for $x->[1]; () <+exists> [return] ok 2136 - my $x; $x->[0] = 1; 1 for $x->[1]; () <+exists> [variable] ok 2137 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[1]; () <+exists> [exception] ok 2138 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[1]; () <+exists> [return] ok 2139 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[1]; () <+exists> [variable] ok 2140 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[1]; () <+exists> [exception] ok 2141 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[1]; () <+exists> [return] ok 2142 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[1]; () <+exists> [variable] ok 2143 - my $x; $x->[0] = 1; 1 for $$x[1]; () <+exists> [exception] ok 2144 - my $x; $x->[0] = 1; 1 for $$x[1]; () <+exists> [return] ok 2145 - my $x; $x->[0] = 1; 1 for $$x[1]; () <+exists> [variable] ok 2146 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[1]; () <+exists> [exception] ok 2147 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[1]; () <+exists> [return] ok 2148 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[1]; () <+exists> [variable] ok 2149 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[1]; () <+exists> [exception] ok 2150 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[1]; () <+exists> [return] ok 2151 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[1]; () <+exists> [variable] ok 2152 - my @x; $x[0] = 1; 1 for $x[1]; () <+exists> [exception] ok 2153 - my @x; $x[0] = 1; 1 for $x[1]; () <+exists> [return] ok 2154 - my @x; $x[0] = 1; 1 for $x[1]; () <+exists> [variable] ok 2155 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[1]; () <+exists> [exception] ok 2156 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[1]; () <+exists> [return] ok 2157 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[1]; () <+exists> [variable] ok 2158 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[1]; () <+exists> [exception] ok 2159 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[1]; () <+exists> [return] ok 2160 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[1]; () <+exists> [variable] ok 2161 - my $x; $x->[0] = 1; 1 for $x->[0]; () <+delete> [exception] ok 2162 - my $x; $x->[0] = 1; 1 for $x->[0]; () <+delete> [return] ok 2163 - my $x; $x->[0] = 1; 1 for $x->[0]; () <+delete> [variable] ok 2164 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[0]; () <+delete> [exception] ok 2165 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[0]; () <+delete> [return] ok 2166 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[0]; () <+delete> [variable] ok 2167 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[0]; () <+delete> [exception] ok 2168 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[0]; () <+delete> [return] ok 2169 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[0]; () <+delete> [variable] ok 2170 - my $x; $x->[0] = 1; 1 for $$x[0]; () <+delete> [exception] ok 2171 - my $x; $x->[0] = 1; 1 for $$x[0]; () <+delete> [return] ok 2172 - my $x; $x->[0] = 1; 1 for $$x[0]; () <+delete> [variable] ok 2173 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[0]; () <+delete> [exception] ok 2174 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[0]; () <+delete> [return] ok 2175 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[0]; () <+delete> [variable] ok 2176 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[0]; () <+delete> [exception] ok 2177 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[0]; () <+delete> [return] ok 2178 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[0]; () <+delete> [variable] ok 2179 - my @x; $x[0] = 1; 1 for $x[0]; () <+delete> [exception] ok 2180 - my @x; $x[0] = 1; 1 for $x[0]; () <+delete> [return] ok 2181 - my @x; $x[0] = 1; 1 for $x[0]; () <+delete> [variable] ok 2182 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[0]; () <+delete> [exception] ok 2183 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[0]; () <+delete> [return] ok 2184 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[0]; () <+delete> [variable] ok 2185 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[0]; () <+delete> [exception] ok 2186 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[0]; () <+delete> [return] ok 2187 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[0]; () <+delete> [variable] ok 2188 - my $x; $x->[0] = 1; 1 for $x->[1]; () <+delete> [exception] ok 2189 - my $x; $x->[0] = 1; 1 for $x->[1]; () <+delete> [return] ok 2190 - my $x; $x->[0] = 1; 1 for $x->[1]; () <+delete> [variable] ok 2191 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[1]; () <+delete> [exception] ok 2192 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[1]; () <+delete> [return] ok 2193 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[1]; () <+delete> [variable] ok 2194 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[1]; () <+delete> [exception] ok 2195 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[1]; () <+delete> [return] ok 2196 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[1]; () <+delete> [variable] ok 2197 - my $x; $x->[0] = 1; 1 for $$x[1]; () <+delete> [exception] ok 2198 - my $x; $x->[0] = 1; 1 for $$x[1]; () <+delete> [return] ok 2199 - my $x; $x->[0] = 1; 1 for $$x[1]; () <+delete> [variable] ok 2200 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[1]; () <+delete> [exception] ok 2201 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[1]; () <+delete> [return] ok 2202 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[1]; () <+delete> [variable] ok 2203 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[1]; () <+delete> [exception] ok 2204 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[1]; () <+delete> [return] ok 2205 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[1]; () <+delete> [variable] ok 2206 - my @x; $x[0] = 1; 1 for $x[1]; () <+delete> [exception] ok 2207 - my @x; $x[0] = 1; 1 for $x[1]; () <+delete> [return] ok 2208 - my @x; $x[0] = 1; 1 for $x[1]; () <+delete> [variable] ok 2209 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[1]; () <+delete> [exception] ok 2210 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[1]; () <+delete> [return] ok 2211 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[1]; () <+delete> [variable] ok 2212 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[1]; () <+delete> [exception] ok 2213 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[1]; () <+delete> [return] ok 2214 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[1]; () <+delete> [variable] ok 2215 - my $x; $x->[0] = 1; 1 for $x->[0]; () <+store> [exception] ok 2216 - my $x; $x->[0] = 1; 1 for $x->[0]; () <+store> [return] ok 2217 - my $x; $x->[0] = 1; 1 for $x->[0]; () <+store> [variable] ok 2218 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[0]; () <+store> [exception] ok 2219 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[0]; () <+store> [return] ok 2220 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[0]; () <+store> [variable] ok 2221 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[0]; () <+store> [exception] ok 2222 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[0]; () <+store> [return] ok 2223 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[0]; () <+store> [variable] ok 2224 - my $x; $x->[0] = 1; 1 for $$x[0]; () <+store> [exception] ok 2225 - my $x; $x->[0] = 1; 1 for $$x[0]; () <+store> [return] ok 2226 - my $x; $x->[0] = 1; 1 for $$x[0]; () <+store> [variable] ok 2227 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[0]; () <+store> [exception] ok 2228 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[0]; () <+store> [return] ok 2229 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[0]; () <+store> [variable] ok 2230 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[0]; () <+store> [exception] ok 2231 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[0]; () <+store> [return] ok 2232 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[0]; () <+store> [variable] ok 2233 - my @x; $x[0] = 1; 1 for $x[0]; () <+store> [exception] ok 2234 - my @x; $x[0] = 1; 1 for $x[0]; () <+store> [return] ok 2235 - my @x; $x[0] = 1; 1 for $x[0]; () <+store> [variable] ok 2236 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[0]; () <+store> [exception] ok 2237 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[0]; () <+store> [return] ok 2238 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[0]; () <+store> [variable] ok 2239 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[0]; () <+store> [exception] ok 2240 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[0]; () <+store> [return] ok 2241 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[0]; () <+store> [variable] ok 2242 - my $x; $x->[0] = 1; 1 for $x->[1]; () <+store> [exception] ok 2243 - my $x; $x->[0] = 1; 1 for $x->[1]; () <+store> [return] ok 2244 - my $x; $x->[0] = 1; 1 for $x->[1]; () <+store> [variable] ok 2245 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[1]; () <+store> [exception] ok 2246 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[1]; () <+store> [return] ok 2247 - our $x; local $x; use strict; $x->[0] = 1; 1 for $x->[1]; () <+store> [variable] ok 2248 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[1]; () <+store> [exception] ok 2249 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[1]; () <+store> [return] ok 2250 - our $x; local $x; no strict; $x->[0] = 1; 1 for $x->[1]; () <+store> [variable] ok 2251 - my $x; $x->[0] = 1; 1 for $$x[1]; () <+store> [exception] ok 2252 - my $x; $x->[0] = 1; 1 for $$x[1]; () <+store> [return] ok 2253 - my $x; $x->[0] = 1; 1 for $$x[1]; () <+store> [variable] ok 2254 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[1]; () <+store> [exception] ok 2255 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[1]; () <+store> [return] ok 2256 - our $x; local $x; use strict; $x->[0] = 1; 1 for $$x[1]; () <+store> [variable] ok 2257 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[1]; () <+store> [exception] ok 2258 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[1]; () <+store> [return] ok 2259 - our $x; local $x; no strict; $x->[0] = 1; 1 for $$x[1]; () <+store> [variable] ok 2260 - my @x; $x[0] = 1; 1 for $x[1]; () <+store> [exception] ok 2261 - my @x; $x[0] = 1; 1 for $x[1]; () <+store> [return] ok 2262 - my @x; $x[0] = 1; 1 for $x[1]; () <+store> [variable] ok 2263 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[1]; () <+store> [exception] ok 2264 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[1]; () <+store> [return] ok 2265 - our @x; local @x; use strict; $x[0] = 1; 1 for $x[1]; () <+store> [variable] ok 2266 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[1]; () <+store> [exception] ok 2267 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[1]; () <+store> [return] ok 2268 - our @x; local @x; no strict; $x[0] = 1; 1 for $x[1]; () <+store> [variable] ok 2269 - my $x; do_nothing($x->[0]); () [exception] ok 2270 - my $x; do_nothing($x->[0]); () [return] ok 2271 - my $x; do_nothing($x->[0]); () [variable] ok 2272 - our $x; local $x; use strict; do_nothing($x->[0]); () [exception] ok 2273 - our $x; local $x; use strict; do_nothing($x->[0]); () [return] ok 2274 - our $x; local $x; use strict; do_nothing($x->[0]); () [variable] ok 2275 - our $x; local $x; no strict; do_nothing($x->[0]); () [exception] ok 2276 - our $x; local $x; no strict; do_nothing($x->[0]); () [return] ok 2277 - our $x; local $x; no strict; do_nothing($x->[0]); () [variable] ok 2278 - my $x; do_nothing($$x[0]); () [exception] ok 2279 - my $x; do_nothing($$x[0]); () [return] ok 2280 - my $x; do_nothing($$x[0]); () [variable] ok 2281 - our $x; local $x; use strict; do_nothing($$x[0]); () [exception] ok 2282 - our $x; local $x; use strict; do_nothing($$x[0]); () [return] ok 2283 - our $x; local $x; use strict; do_nothing($$x[0]); () [variable] ok 2284 - our $x; local $x; no strict; do_nothing($$x[0]); () [exception] ok 2285 - our $x; local $x; no strict; do_nothing($$x[0]); () [return] ok 2286 - our $x; local $x; no strict; do_nothing($$x[0]); () [variable] ok 2287 - my @x; do_nothing($x[0]); () [exception] ok 2288 - my @x; do_nothing($x[0]); () [return] ok 2289 - my @x; do_nothing($x[0]); () [variable] ok 2290 - our @x; local @x; use strict; do_nothing($x[0]); () [exception] ok 2291 - our @x; local @x; use strict; do_nothing($x[0]); () [return] ok 2292 - our @x; local @x; use strict; do_nothing($x[0]); () [variable] ok 2293 - our @x; local @x; no strict; do_nothing($x[0]); () [exception] ok 2294 - our @x; local @x; no strict; do_nothing($x[0]); () [return] ok 2295 - our @x; local @x; no strict; do_nothing($x[0]); () [variable] ok 2296 - my $x; do_nothing($x->[0]); () [exception] ok 2297 - my $x; do_nothing($x->[0]); () [return] ok 2298 - my $x; do_nothing($x->[0]); () [variable] ok 2299 - our $x; local $x; use strict; do_nothing($x->[0]); () [exception] ok 2300 - our $x; local $x; use strict; do_nothing($x->[0]); () [return] ok 2301 - our $x; local $x; use strict; do_nothing($x->[0]); () [variable] ok 2302 - our $x; local $x; no strict; do_nothing($x->[0]); () [exception] ok 2303 - our $x; local $x; no strict; do_nothing($x->[0]); () [return] ok 2304 - our $x; local $x; no strict; do_nothing($x->[0]); () [variable] ok 2305 - my $x; do_nothing($$x[0]); () [exception] ok 2306 - my $x; do_nothing($$x[0]); () [return] ok 2307 - my $x; do_nothing($$x[0]); () [variable] ok 2308 - our $x; local $x; use strict; do_nothing($$x[0]); () [exception] ok 2309 - our $x; local $x; use strict; do_nothing($$x[0]); () [return] ok 2310 - our $x; local $x; use strict; do_nothing($$x[0]); () [variable] ok 2311 - our $x; local $x; no strict; do_nothing($$x[0]); () [exception] ok 2312 - our $x; local $x; no strict; do_nothing($$x[0]); () [return] ok 2313 - our $x; local $x; no strict; do_nothing($$x[0]); () [variable] ok 2314 - my @x; do_nothing($x[0]); () [exception] ok 2315 - my @x; do_nothing($x[0]); () [return] ok 2316 - my @x; do_nothing($x[0]); () [variable] ok 2317 - our @x; local @x; use strict; do_nothing($x[0]); () [exception] ok 2318 - our @x; local @x; use strict; do_nothing($x[0]); () [return] ok 2319 - our @x; local @x; use strict; do_nothing($x[0]); () [variable] ok 2320 - our @x; local @x; no strict; do_nothing($x[0]); () [exception] ok 2321 - our @x; local @x; no strict; do_nothing($x[0]); () [return] ok 2322 - our @x; local @x; no strict; do_nothing($x[0]); () [variable] ok 2323 - my $x; do_nothing($x->[0]); () <+fetch> [exception] ok 2324 - my $x; do_nothing($x->[0]); () <+fetch> [return] ok 2325 - my $x; do_nothing($x->[0]); () <+fetch> [variable] ok 2326 - our $x; local $x; use strict; do_nothing($x->[0]); () <+fetch> [exception] ok 2327 - our $x; local $x; use strict; do_nothing($x->[0]); () <+fetch> [return] ok 2328 - our $x; local $x; use strict; do_nothing($x->[0]); () <+fetch> [variable] ok 2329 - our $x; local $x; no strict; do_nothing($x->[0]); () <+fetch> [exception] ok 2330 - our $x; local $x; no strict; do_nothing($x->[0]); () <+fetch> [return] ok 2331 - our $x; local $x; no strict; do_nothing($x->[0]); () <+fetch> [variable] ok 2332 - my $x; do_nothing($$x[0]); () <+fetch> [exception] ok 2333 - my $x; do_nothing($$x[0]); () <+fetch> [return] ok 2334 - my $x; do_nothing($$x[0]); () <+fetch> [variable] ok 2335 - our $x; local $x; use strict; do_nothing($$x[0]); () <+fetch> [exception] ok 2336 - our $x; local $x; use strict; do_nothing($$x[0]); () <+fetch> [return] ok 2337 - our $x; local $x; use strict; do_nothing($$x[0]); () <+fetch> [variable] ok 2338 - our $x; local $x; no strict; do_nothing($$x[0]); () <+fetch> [exception] ok 2339 - our $x; local $x; no strict; do_nothing($$x[0]); () <+fetch> [return] ok 2340 - our $x; local $x; no strict; do_nothing($$x[0]); () <+fetch> [variable] ok 2341 - my @x; do_nothing($x[0]); () <+fetch> [exception] ok 2342 - my @x; do_nothing($x[0]); () <+fetch> [return] ok 2343 - my @x; do_nothing($x[0]); () <+fetch> [variable] ok 2344 - our @x; local @x; use strict; do_nothing($x[0]); () <+fetch> [exception] ok 2345 - our @x; local @x; use strict; do_nothing($x[0]); () <+fetch> [return] ok 2346 - our @x; local @x; use strict; do_nothing($x[0]); () <+fetch> [variable] ok 2347 - our @x; local @x; no strict; do_nothing($x[0]); () <+fetch> [exception] ok 2348 - our @x; local @x; no strict; do_nothing($x[0]); () <+fetch> [return] ok 2349 - our @x; local @x; no strict; do_nothing($x[0]); () <+fetch> [variable] ok 2350 - my $x; do_nothing($x->[0]); () <+exists> [exception] ok 2351 - my $x; do_nothing($x->[0]); () <+exists> [return] ok 2352 - my $x; do_nothing($x->[0]); () <+exists> [variable] ok 2353 - our $x; local $x; use strict; do_nothing($x->[0]); () <+exists> [exception] ok 2354 - our $x; local $x; use strict; do_nothing($x->[0]); () <+exists> [return] ok 2355 - our $x; local $x; use strict; do_nothing($x->[0]); () <+exists> [variable] ok 2356 - our $x; local $x; no strict; do_nothing($x->[0]); () <+exists> [exception] ok 2357 - our $x; local $x; no strict; do_nothing($x->[0]); () <+exists> [return] ok 2358 - our $x; local $x; no strict; do_nothing($x->[0]); () <+exists> [variable] ok 2359 - my $x; do_nothing($$x[0]); () <+exists> [exception] ok 2360 - my $x; do_nothing($$x[0]); () <+exists> [return] ok 2361 - my $x; do_nothing($$x[0]); () <+exists> [variable] ok 2362 - our $x; local $x; use strict; do_nothing($$x[0]); () <+exists> [exception] ok 2363 - our $x; local $x; use strict; do_nothing($$x[0]); () <+exists> [return] ok 2364 - our $x; local $x; use strict; do_nothing($$x[0]); () <+exists> [variable] ok 2365 - our $x; local $x; no strict; do_nothing($$x[0]); () <+exists> [exception] ok 2366 - our $x; local $x; no strict; do_nothing($$x[0]); () <+exists> [return] ok 2367 - our $x; local $x; no strict; do_nothing($$x[0]); () <+exists> [variable] ok 2368 - my @x; do_nothing($x[0]); () <+exists> [exception] ok 2369 - my @x; do_nothing($x[0]); () <+exists> [return] ok 2370 - my @x; do_nothing($x[0]); () <+exists> [variable] ok 2371 - our @x; local @x; use strict; do_nothing($x[0]); () <+exists> [exception] ok 2372 - our @x; local @x; use strict; do_nothing($x[0]); () <+exists> [return] ok 2373 - our @x; local @x; use strict; do_nothing($x[0]); () <+exists> [variable] ok 2374 - our @x; local @x; no strict; do_nothing($x[0]); () <+exists> [exception] ok 2375 - our @x; local @x; no strict; do_nothing($x[0]); () <+exists> [return] ok 2376 - our @x; local @x; no strict; do_nothing($x[0]); () <+exists> [variable] ok 2377 - my $x; do_nothing($x->[0]); () <+delete> [exception] ok 2378 - my $x; do_nothing($x->[0]); () <+delete> [return] ok 2379 - my $x; do_nothing($x->[0]); () <+delete> [variable] ok 2380 - our $x; local $x; use strict; do_nothing($x->[0]); () <+delete> [exception] ok 2381 - our $x; local $x; use strict; do_nothing($x->[0]); () <+delete> [return] ok 2382 - our $x; local $x; use strict; do_nothing($x->[0]); () <+delete> [variable] ok 2383 - our $x; local $x; no strict; do_nothing($x->[0]); () <+delete> [exception] ok 2384 - our $x; local $x; no strict; do_nothing($x->[0]); () <+delete> [return] ok 2385 - our $x; local $x; no strict; do_nothing($x->[0]); () <+delete> [variable] ok 2386 - my $x; do_nothing($$x[0]); () <+delete> [exception] ok 2387 - my $x; do_nothing($$x[0]); () <+delete> [return] ok 2388 - my $x; do_nothing($$x[0]); () <+delete> [variable] ok 2389 - our $x; local $x; use strict; do_nothing($$x[0]); () <+delete> [exception] ok 2390 - our $x; local $x; use strict; do_nothing($$x[0]); () <+delete> [return] ok 2391 - our $x; local $x; use strict; do_nothing($$x[0]); () <+delete> [variable] ok 2392 - our $x; local $x; no strict; do_nothing($$x[0]); () <+delete> [exception] ok 2393 - our $x; local $x; no strict; do_nothing($$x[0]); () <+delete> [return] ok 2394 - our $x; local $x; no strict; do_nothing($$x[0]); () <+delete> [variable] ok 2395 - my @x; do_nothing($x[0]); () <+delete> [exception] ok 2396 - my @x; do_nothing($x[0]); () <+delete> [return] ok 2397 - my @x; do_nothing($x[0]); () <+delete> [variable] ok 2398 - our @x; local @x; use strict; do_nothing($x[0]); () <+delete> [exception] ok 2399 - our @x; local @x; use strict; do_nothing($x[0]); () <+delete> [return] ok 2400 - our @x; local @x; use strict; do_nothing($x[0]); () <+delete> [variable] ok 2401 - our @x; local @x; no strict; do_nothing($x[0]); () <+delete> [exception] ok 2402 - our @x; local @x; no strict; do_nothing($x[0]); () <+delete> [return] ok 2403 - our @x; local @x; no strict; do_nothing($x[0]); () <+delete> [variable] ok 2404 - my $x; do_nothing($x->[0]); () <+store> [exception] ok 2405 - my $x; do_nothing($x->[0]); () <+store> [return] ok 2406 - my $x; do_nothing($x->[0]); () <+store> [variable] ok 2407 - our $x; local $x; use strict; do_nothing($x->[0]); () <+store> [exception] ok 2408 - our $x; local $x; use strict; do_nothing($x->[0]); () <+store> [return] ok 2409 - our $x; local $x; use strict; do_nothing($x->[0]); () <+store> [variable] ok 2410 - our $x; local $x; no strict; do_nothing($x->[0]); () <+store> [exception] ok 2411 - our $x; local $x; no strict; do_nothing($x->[0]); () <+store> [return] ok 2412 - our $x; local $x; no strict; do_nothing($x->[0]); () <+store> [variable] ok 2413 - my $x; do_nothing($$x[0]); () <+store> [exception] ok 2414 - my $x; do_nothing($$x[0]); () <+store> [return] ok 2415 - my $x; do_nothing($$x[0]); () <+store> [variable] ok 2416 - our $x; local $x; use strict; do_nothing($$x[0]); () <+store> [exception] ok 2417 - our $x; local $x; use strict; do_nothing($$x[0]); () <+store> [return] ok 2418 - our $x; local $x; use strict; do_nothing($$x[0]); () <+store> [variable] ok 2419 - our $x; local $x; no strict; do_nothing($$x[0]); () <+store> [exception] ok 2420 - our $x; local $x; no strict; do_nothing($$x[0]); () <+store> [return] ok 2421 - our $x; local $x; no strict; do_nothing($$x[0]); () <+store> [variable] ok 2422 - my @x; 1 <+store> [exception] ok 2423 - my @x; 1 <+store> [return] ok 2424 - my @x; 1 <+store> [variable] ok 2425 - our @x; local @x; use strict; 1 <+store> [exception] ok 2426 - our @x; local @x; use strict; 1 <+store> [return] ok 2427 - our @x; local @x; use strict; 1 <+store> [variable] ok 2428 - our @x; local @x; no strict; 1 <+store> [exception] ok 2429 - our @x; local @x; no strict; 1 <+store> [return] ok 2430 - our @x; local @x; no strict; 1 <+store> [variable] ok 2431 - my $x; set_arg($x->[0]); () [exception] ok 2432 - my $x; set_arg($x->[0]); () [return] ok 2433 - my $x; set_arg($x->[0]); () [variable] ok 2434 - our $x; local $x; use strict; set_arg($x->[0]); () [exception] ok 2435 - our $x; local $x; use strict; set_arg($x->[0]); () [return] ok 2436 - our $x; local $x; use strict; set_arg($x->[0]); () [variable] ok 2437 - our $x; local $x; no strict; set_arg($x->[0]); () [exception] ok 2438 - our $x; local $x; no strict; set_arg($x->[0]); () [return] ok 2439 - our $x; local $x; no strict; set_arg($x->[0]); () [variable] ok 2440 - my $x; set_arg($$x[0]); () [exception] ok 2441 - my $x; set_arg($$x[0]); () [return] ok 2442 - my $x; set_arg($$x[0]); () [variable] ok 2443 - our $x; local $x; use strict; set_arg($$x[0]); () [exception] ok 2444 - our $x; local $x; use strict; set_arg($$x[0]); () [return] ok 2445 - our $x; local $x; use strict; set_arg($$x[0]); () [variable] ok 2446 - our $x; local $x; no strict; set_arg($$x[0]); () [exception] ok 2447 - our $x; local $x; no strict; set_arg($$x[0]); () [return] ok 2448 - our $x; local $x; no strict; set_arg($$x[0]); () [variable] ok 2449 - my @x; set_arg($x[0]); () [exception] ok 2450 - my @x; set_arg($x[0]); () [return] ok 2451 - my @x; set_arg($x[0]); () [variable] ok 2452 - our @x; local @x; use strict; set_arg($x[0]); () [exception] ok 2453 - our @x; local @x; use strict; set_arg($x[0]); () [return] ok 2454 - our @x; local @x; use strict; set_arg($x[0]); () [variable] ok 2455 - our @x; local @x; no strict; set_arg($x[0]); () [exception] ok 2456 - our @x; local @x; no strict; set_arg($x[0]); () [return] ok 2457 - our @x; local @x; no strict; set_arg($x[0]); () [variable] ok 2458 - my $x; set_arg($x->[0]); () [exception] ok 2459 - my $x; set_arg($x->[0]); () [return] ok 2460 - my $x; set_arg($x->[0]); () [variable] ok 2461 - our $x; local $x; use strict; set_arg($x->[0]); () [exception] ok 2462 - our $x; local $x; use strict; set_arg($x->[0]); () [return] ok 2463 - our $x; local $x; use strict; set_arg($x->[0]); () [variable] ok 2464 - our $x; local $x; no strict; set_arg($x->[0]); () [exception] ok 2465 - our $x; local $x; no strict; set_arg($x->[0]); () [return] ok 2466 - our $x; local $x; no strict; set_arg($x->[0]); () [variable] ok 2467 - my $x; set_arg($$x[0]); () [exception] ok 2468 - my $x; set_arg($$x[0]); () [return] ok 2469 - my $x; set_arg($$x[0]); () [variable] ok 2470 - our $x; local $x; use strict; set_arg($$x[0]); () [exception] ok 2471 - our $x; local $x; use strict; set_arg($$x[0]); () [return] ok 2472 - our $x; local $x; use strict; set_arg($$x[0]); () [variable] ok 2473 - our $x; local $x; no strict; set_arg($$x[0]); () [exception] ok 2474 - our $x; local $x; no strict; set_arg($$x[0]); () [return] ok 2475 - our $x; local $x; no strict; set_arg($$x[0]); () [variable] ok 2476 - my @x; set_arg($x[0]); () [exception] ok 2477 - my @x; set_arg($x[0]); () [return] ok 2478 - my @x; set_arg($x[0]); () [variable] ok 2479 - our @x; local @x; use strict; set_arg($x[0]); () [exception] ok 2480 - our @x; local @x; use strict; set_arg($x[0]); () [return] ok 2481 - our @x; local @x; use strict; set_arg($x[0]); () [variable] ok 2482 - our @x; local @x; no strict; set_arg($x[0]); () [exception] ok 2483 - our @x; local @x; no strict; set_arg($x[0]); () [return] ok 2484 - our @x; local @x; no strict; set_arg($x[0]); () [variable] ok 2485 - my $x; set_arg($x->[0]); () <+fetch> [exception] ok 2486 - my $x; set_arg($x->[0]); () <+fetch> [return] ok 2487 - my $x; set_arg($x->[0]); () <+fetch> [variable] ok 2488 - our $x; local $x; use strict; set_arg($x->[0]); () <+fetch> [exception] ok 2489 - our $x; local $x; use strict; set_arg($x->[0]); () <+fetch> [return] ok 2490 - our $x; local $x; use strict; set_arg($x->[0]); () <+fetch> [variable] ok 2491 - our $x; local $x; no strict; set_arg($x->[0]); () <+fetch> [exception] ok 2492 - our $x; local $x; no strict; set_arg($x->[0]); () <+fetch> [return] ok 2493 - our $x; local $x; no strict; set_arg($x->[0]); () <+fetch> [variable] ok 2494 - my $x; set_arg($$x[0]); () <+fetch> [exception] ok 2495 - my $x; set_arg($$x[0]); () <+fetch> [return] ok 2496 - my $x; set_arg($$x[0]); () <+fetch> [variable] ok 2497 - our $x; local $x; use strict; set_arg($$x[0]); () <+fetch> [exception] ok 2498 - our $x; local $x; use strict; set_arg($$x[0]); () <+fetch> [return] ok 2499 - our $x; local $x; use strict; set_arg($$x[0]); () <+fetch> [variable] ok 2500 - our $x; local $x; no strict; set_arg($$x[0]); () <+fetch> [exception] ok 2501 - our $x; local $x; no strict; set_arg($$x[0]); () <+fetch> [return] ok 2502 - our $x; local $x; no strict; set_arg($$x[0]); () <+fetch> [variable] ok 2503 - my @x; set_arg($x[0]); () <+fetch> [exception] ok 2504 - my @x; set_arg($x[0]); () <+fetch> [return] ok 2505 - my @x; set_arg($x[0]); () <+fetch> [variable] ok 2506 - our @x; local @x; use strict; set_arg($x[0]); () <+fetch> [exception] ok 2507 - our @x; local @x; use strict; set_arg($x[0]); () <+fetch> [return] ok 2508 - our @x; local @x; use strict; set_arg($x[0]); () <+fetch> [variable] ok 2509 - our @x; local @x; no strict; set_arg($x[0]); () <+fetch> [exception] ok 2510 - our @x; local @x; no strict; set_arg($x[0]); () <+fetch> [return] ok 2511 - our @x; local @x; no strict; set_arg($x[0]); () <+fetch> [variable] ok 2512 - my $x; set_arg($x->[0]); () <+exists> [exception] ok 2513 - my $x; set_arg($x->[0]); () <+exists> [return] ok 2514 - my $x; set_arg($x->[0]); () <+exists> [variable] ok 2515 - our $x; local $x; use strict; set_arg($x->[0]); () <+exists> [exception] ok 2516 - our $x; local $x; use strict; set_arg($x->[0]); () <+exists> [return] ok 2517 - our $x; local $x; use strict; set_arg($x->[0]); () <+exists> [variable] ok 2518 - our $x; local $x; no strict; set_arg($x->[0]); () <+exists> [exception] ok 2519 - our $x; local $x; no strict; set_arg($x->[0]); () <+exists> [return] ok 2520 - our $x; local $x; no strict; set_arg($x->[0]); () <+exists> [variable] ok 2521 - my $x; set_arg($$x[0]); () <+exists> [exception] ok 2522 - my $x; set_arg($$x[0]); () <+exists> [return] ok 2523 - my $x; set_arg($$x[0]); () <+exists> [variable] ok 2524 - our $x; local $x; use strict; set_arg($$x[0]); () <+exists> [exception] ok 2525 - our $x; local $x; use strict; set_arg($$x[0]); () <+exists> [return] ok 2526 - our $x; local $x; use strict; set_arg($$x[0]); () <+exists> [variable] ok 2527 - our $x; local $x; no strict; set_arg($$x[0]); () <+exists> [exception] ok 2528 - our $x; local $x; no strict; set_arg($$x[0]); () <+exists> [return] ok 2529 - our $x; local $x; no strict; set_arg($$x[0]); () <+exists> [variable] ok 2530 - my @x; set_arg($x[0]); () <+exists> [exception] ok 2531 - my @x; set_arg($x[0]); () <+exists> [return] ok 2532 - my @x; set_arg($x[0]); () <+exists> [variable] ok 2533 - our @x; local @x; use strict; set_arg($x[0]); () <+exists> [exception] ok 2534 - our @x; local @x; use strict; set_arg($x[0]); () <+exists> [return] ok 2535 - our @x; local @x; use strict; set_arg($x[0]); () <+exists> [variable] ok 2536 - our @x; local @x; no strict; set_arg($x[0]); () <+exists> [exception] ok 2537 - our @x; local @x; no strict; set_arg($x[0]); () <+exists> [return] ok 2538 - our @x; local @x; no strict; set_arg($x[0]); () <+exists> [variable] ok 2539 - my $x; set_arg($x->[0]); () <+delete> [exception] ok 2540 - my $x; set_arg($x->[0]); () <+delete> [return] ok 2541 - my $x; set_arg($x->[0]); () <+delete> [variable] ok 2542 - our $x; local $x; use strict; set_arg($x->[0]); () <+delete> [exception] ok 2543 - our $x; local $x; use strict; set_arg($x->[0]); () <+delete> [return] ok 2544 - our $x; local $x; use strict; set_arg($x->[0]); () <+delete> [variable] ok 2545 - our $x; local $x; no strict; set_arg($x->[0]); () <+delete> [exception] ok 2546 - our $x; local $x; no strict; set_arg($x->[0]); () <+delete> [return] ok 2547 - our $x; local $x; no strict; set_arg($x->[0]); () <+delete> [variable] ok 2548 - my $x; set_arg($$x[0]); () <+delete> [exception] ok 2549 - my $x; set_arg($$x[0]); () <+delete> [return] ok 2550 - my $x; set_arg($$x[0]); () <+delete> [variable] ok 2551 - our $x; local $x; use strict; set_arg($$x[0]); () <+delete> [exception] ok 2552 - our $x; local $x; use strict; set_arg($$x[0]); () <+delete> [return] ok 2553 - our $x; local $x; use strict; set_arg($$x[0]); () <+delete> [variable] ok 2554 - our $x; local $x; no strict; set_arg($$x[0]); () <+delete> [exception] ok 2555 - our $x; local $x; no strict; set_arg($$x[0]); () <+delete> [return] ok 2556 - our $x; local $x; no strict; set_arg($$x[0]); () <+delete> [variable] ok 2557 - my @x; set_arg($x[0]); () <+delete> [exception] ok 2558 - my @x; set_arg($x[0]); () <+delete> [return] ok 2559 - my @x; set_arg($x[0]); () <+delete> [variable] ok 2560 - our @x; local @x; use strict; set_arg($x[0]); () <+delete> [exception] ok 2561 - our @x; local @x; use strict; set_arg($x[0]); () <+delete> [return] ok 2562 - our @x; local @x; use strict; set_arg($x[0]); () <+delete> [variable] ok 2563 - our @x; local @x; no strict; set_arg($x[0]); () <+delete> [exception] ok 2564 - our @x; local @x; no strict; set_arg($x[0]); () <+delete> [return] ok 2565 - our @x; local @x; no strict; set_arg($x[0]); () <+delete> [variable] ok 2566 - my $x; set_arg($x->[0]); () <+store> [exception] ok 2567 - my $x; set_arg($x->[0]); () <+store> [return] ok 2568 - my $x; set_arg($x->[0]); () <+store> [variable] ok 2569 - our $x; local $x; use strict; set_arg($x->[0]); () <+store> [exception] ok 2570 - our $x; local $x; use strict; set_arg($x->[0]); () <+store> [return] ok 2571 - our $x; local $x; use strict; set_arg($x->[0]); () <+store> [variable] ok 2572 - our $x; local $x; no strict; set_arg($x->[0]); () <+store> [exception] ok 2573 - our $x; local $x; no strict; set_arg($x->[0]); () <+store> [return] ok 2574 - our $x; local $x; no strict; set_arg($x->[0]); () <+store> [variable] ok 2575 - my $x; set_arg($$x[0]); () <+store> [exception] ok 2576 - my $x; set_arg($$x[0]); () <+store> [return] ok 2577 - my $x; set_arg($$x[0]); () <+store> [variable] ok 2578 - our $x; local $x; use strict; set_arg($$x[0]); () <+store> [exception] ok 2579 - our $x; local $x; use strict; set_arg($$x[0]); () <+store> [return] ok 2580 - our $x; local $x; use strict; set_arg($$x[0]); () <+store> [variable] ok 2581 - our $x; local $x; no strict; set_arg($$x[0]); () <+store> [exception] ok 2582 - our $x; local $x; no strict; set_arg($$x[0]); () <+store> [return] ok 2583 - our $x; local $x; no strict; set_arg($$x[0]); () <+store> [variable] ok 2584 - my @x; 1 <+store> [exception] ok 2585 - my @x; 1 <+store> [return] ok 2586 - my @x; 1 <+store> [variable] ok 2587 - our @x; local @x; use strict; 1 <+store> [exception] ok 2588 - our @x; local @x; use strict; 1 <+store> [return] ok 2589 - our @x; local @x; use strict; 1 <+store> [variable] ok 2590 - our @x; local @x; no strict; 1 <+store> [exception] ok 2591 - our @x; local @x; no strict; 1 <+store> [return] ok 2592 - our @x; local @x; no strict; 1 <+store> [variable] ok 2593 - my $x; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2594 - my $x; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2595 - my $x; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2596 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2597 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2598 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2599 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2600 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2601 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2602 - my $x; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2603 - my $x; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2604 - my $x; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2605 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2606 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2607 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2608 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2609 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2610 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2611 - my @x; 1 [exception] ok 2612 - my @x; 1 [return] ok 2613 - my @x; 1 [variable] ok 2614 - our @x; local @x; use strict; 1 [exception] ok 2615 - our @x; local @x; use strict; 1 [return] ok 2616 - our @x; local @x; use strict; 1 [variable] ok 2617 - our @x; local @x; no strict; 1 [exception] ok 2618 - our @x; local @x; no strict; 1 [return] ok 2619 - our @x; local @x; no strict; 1 [variable] ok 2620 - my $x; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2621 - my $x; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2622 - my $x; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2623 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2624 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2625 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2626 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2627 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2628 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2629 - my $x; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2630 - my $x; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2631 - my $x; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2632 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2633 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2634 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2635 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [exception] ok 2636 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [return] ok 2637 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () [variable] ok 2638 - my @x; 1 [exception] ok 2639 - my @x; 1 [return] ok 2640 - my @x; 1 [variable] ok 2641 - our @x; local @x; use strict; 1 [exception] ok 2642 - our @x; local @x; use strict; 1 [return] ok 2643 - our @x; local @x; use strict; 1 [variable] ok 2644 - our @x; local @x; no strict; 1 [exception] ok 2645 - our @x; local @x; no strict; 1 [return] ok 2646 - our @x; local @x; no strict; 1 [variable] ok 2647 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [exception] ok 2648 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [return] ok 2649 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [variable] ok 2650 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [exception] ok 2651 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [return] ok 2652 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [variable] ok 2653 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [exception] ok 2654 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [return] ok 2655 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [variable] ok 2656 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [exception] ok 2657 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [return] ok 2658 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [variable] ok 2659 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [exception] ok 2660 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [return] ok 2661 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [variable] ok 2662 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [exception] ok 2663 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [return] ok 2664 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+fetch> [variable] ok 2665 - my @x; 1 <+fetch> [exception] ok 2666 - my @x; 1 <+fetch> [return] ok 2667 - my @x; 1 <+fetch> [variable] ok 2668 - our @x; local @x; use strict; 1 <+fetch> [exception] ok 2669 - our @x; local @x; use strict; 1 <+fetch> [return] ok 2670 - our @x; local @x; use strict; 1 <+fetch> [variable] ok 2671 - our @x; local @x; no strict; 1 <+fetch> [exception] ok 2672 - our @x; local @x; no strict; 1 <+fetch> [return] ok 2673 - our @x; local @x; no strict; 1 <+fetch> [variable] ok 2674 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+exists> [exception] ok 2675 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+exists> [return] ok 2676 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+exists> [variable] ok 2677 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [exception] ok 2678 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [return] ok 2679 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [variable] ok 2680 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [exception] ok 2681 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [return] ok 2682 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [variable] ok 2683 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+exists> [exception] ok 2684 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+exists> [return] ok 2685 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+exists> [variable] ok 2686 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [exception] ok 2687 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [return] ok 2688 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [variable] ok 2689 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [exception] ok 2690 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [return] ok 2691 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+exists> [variable] ok 2692 - my @x; 1 <+exists> [exception] ok 2693 - my @x; 1 <+exists> [return] ok 2694 - my @x; 1 <+exists> [variable] ok 2695 - our @x; local @x; use strict; 1 <+exists> [exception] ok 2696 - our @x; local @x; use strict; 1 <+exists> [return] ok 2697 - our @x; local @x; use strict; 1 <+exists> [variable] ok 2698 - our @x; local @x; no strict; 1 <+exists> [exception] ok 2699 - our @x; local @x; no strict; 1 <+exists> [return] ok 2700 - our @x; local @x; no strict; 1 <+exists> [variable] ok 2701 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+delete> [exception] ok 2702 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+delete> [return] ok 2703 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+delete> [variable] ok 2704 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [exception] ok 2705 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [return] ok 2706 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [variable] ok 2707 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [exception] ok 2708 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [return] ok 2709 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [variable] ok 2710 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+delete> [exception] ok 2711 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+delete> [return] ok 2712 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+delete> [variable] ok 2713 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [exception] ok 2714 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [return] ok 2715 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [variable] ok 2716 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [exception] ok 2717 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [return] ok 2718 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+delete> [variable] ok 2719 - my @x; 1 <+delete> [exception] ok 2720 - my @x; 1 <+delete> [return] ok 2721 - my @x; 1 <+delete> [variable] ok 2722 - our @x; local @x; use strict; 1 <+delete> [exception] ok 2723 - our @x; local @x; use strict; 1 <+delete> [return] ok 2724 - our @x; local @x; use strict; 1 <+delete> [variable] ok 2725 - our @x; local @x; no strict; 1 <+delete> [exception] ok 2726 - our @x; local @x; no strict; 1 <+delete> [return] ok 2727 - our @x; local @x; no strict; 1 <+delete> [variable] ok 2728 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+store> [exception] ok 2729 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+store> [return] ok 2730 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+store> [variable] ok 2731 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [exception] ok 2732 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [return] ok 2733 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [variable] ok 2734 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [exception] ok 2735 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [return] ok 2736 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [variable] ok 2737 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+store> [exception] ok 2738 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+store> [return] ok 2739 - my $x; no warnings 'uninitialized'; my @a = @$x; () <+store> [variable] ok 2740 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [exception] ok 2741 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [return] ok 2742 - our $x; local $x; use strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [variable] ok 2743 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [exception] ok 2744 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [return] ok 2745 - our $x; local $x; no strict; no warnings 'uninitialized'; my @a = @$x; () <+store> [variable] ok 2746 - my @x; 1 <+store> [exception] ok 2747 - my @x; 1 <+store> [return] ok 2748 - my @x; 1 <+store> [variable] ok 2749 - our @x; local @x; use strict; 1 <+store> [exception] ok 2750 - our @x; local @x; use strict; 1 <+store> [return] ok 2751 - our @x; local @x; use strict; 1 <+store> [variable] ok 2752 - our @x; local @x; no strict; 1 <+store> [exception] ok 2753 - our @x; local @x; no strict; 1 <+store> [return] ok 2754 - our @x; local @x; no strict; 1 <+store> [variable] ok 2755 - my $x; $x->[0] = 1; my @a = @$x; () <+fetch> [exception] ok 2756 - my $x; $x->[0] = 1; my @a = @$x; () <+fetch> [return] ok 2757 - my $x; $x->[0] = 1; my @a = @$x; () <+fetch> [variable] ok 2758 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+fetch> [exception] ok 2759 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+fetch> [return] ok 2760 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+fetch> [variable] ok 2761 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+fetch> [exception] ok 2762 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+fetch> [return] ok 2763 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+fetch> [variable] ok 2764 - my $x; $x->[0] = 1; my @a = @$x; () <+fetch> [exception] ok 2765 - my $x; $x->[0] = 1; my @a = @$x; () <+fetch> [return] ok 2766 - my $x; $x->[0] = 1; my @a = @$x; () <+fetch> [variable] ok 2767 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+fetch> [exception] ok 2768 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+fetch> [return] ok 2769 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+fetch> [variable] ok 2770 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+fetch> [exception] ok 2771 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+fetch> [return] ok 2772 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+fetch> [variable] ok 2773 - my @x; $x[0] = 1; my @a = @x; () <+fetch> [exception] ok 2774 - my @x; $x[0] = 1; my @a = @x; () <+fetch> [return] ok 2775 - my @x; $x[0] = 1; my @a = @x; () <+fetch> [variable] ok 2776 - our @x; local @x; use strict; $x[0] = 1; my @a = @x; () <+fetch> [exception] ok 2777 - our @x; local @x; use strict; $x[0] = 1; my @a = @x; () <+fetch> [return] ok 2778 - our @x; local @x; use strict; $x[0] = 1; my @a = @x; () <+fetch> [variable] ok 2779 - our @x; local @x; no strict; $x[0] = 1; my @a = @x; () <+fetch> [exception] ok 2780 - our @x; local @x; no strict; $x[0] = 1; my @a = @x; () <+fetch> [return] ok 2781 - our @x; local @x; no strict; $x[0] = 1; my @a = @x; () <+fetch> [variable] ok 2782 - my $x; $x->[0] = 1; my @a = @$x; () <+exists> [exception] ok 2783 - my $x; $x->[0] = 1; my @a = @$x; () <+exists> [return] ok 2784 - my $x; $x->[0] = 1; my @a = @$x; () <+exists> [variable] ok 2785 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+exists> [exception] ok 2786 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+exists> [return] ok 2787 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+exists> [variable] ok 2788 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+exists> [exception] ok 2789 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+exists> [return] ok 2790 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+exists> [variable] ok 2791 - my $x; $x->[0] = 1; my @a = @$x; () <+exists> [exception] ok 2792 - my $x; $x->[0] = 1; my @a = @$x; () <+exists> [return] ok 2793 - my $x; $x->[0] = 1; my @a = @$x; () <+exists> [variable] ok 2794 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+exists> [exception] ok 2795 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+exists> [return] ok 2796 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+exists> [variable] ok 2797 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+exists> [exception] ok 2798 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+exists> [return] ok 2799 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+exists> [variable] ok 2800 - my @x; $x[0] = 1; my @a = @x; () <+exists> [exception] ok 2801 - my @x; $x[0] = 1; my @a = @x; () <+exists> [return] ok 2802 - my @x; $x[0] = 1; my @a = @x; () <+exists> [variable] ok 2803 - our @x; local @x; use strict; $x[0] = 1; my @a = @x; () <+exists> [exception] ok 2804 - our @x; local @x; use strict; $x[0] = 1; my @a = @x; () <+exists> [return] ok 2805 - our @x; local @x; use strict; $x[0] = 1; my @a = @x; () <+exists> [variable] ok 2806 - our @x; local @x; no strict; $x[0] = 1; my @a = @x; () <+exists> [exception] ok 2807 - our @x; local @x; no strict; $x[0] = 1; my @a = @x; () <+exists> [return] ok 2808 - our @x; local @x; no strict; $x[0] = 1; my @a = @x; () <+exists> [variable] ok 2809 - my $x; $x->[0] = 1; my @a = @$x; () <+delete> [exception] ok 2810 - my $x; $x->[0] = 1; my @a = @$x; () <+delete> [return] ok 2811 - my $x; $x->[0] = 1; my @a = @$x; () <+delete> [variable] ok 2812 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+delete> [exception] ok 2813 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+delete> [return] ok 2814 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+delete> [variable] ok 2815 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+delete> [exception] ok 2816 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+delete> [return] ok 2817 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+delete> [variable] ok 2818 - my $x; $x->[0] = 1; my @a = @$x; () <+delete> [exception] ok 2819 - my $x; $x->[0] = 1; my @a = @$x; () <+delete> [return] ok 2820 - my $x; $x->[0] = 1; my @a = @$x; () <+delete> [variable] ok 2821 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+delete> [exception] ok 2822 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+delete> [return] ok 2823 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+delete> [variable] ok 2824 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+delete> [exception] ok 2825 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+delete> [return] ok 2826 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+delete> [variable] ok 2827 - my @x; $x[0] = 1; my @a = @x; () <+delete> [exception] ok 2828 - my @x; $x[0] = 1; my @a = @x; () <+delete> [return] ok 2829 - my @x; $x[0] = 1; my @a = @x; () <+delete> [variable] ok 2830 - our @x; local @x; use strict; $x[0] = 1; my @a = @x; () <+delete> [exception] ok 2831 - our @x; local @x; use strict; $x[0] = 1; my @a = @x; () <+delete> [return] ok 2832 - our @x; local @x; use strict; $x[0] = 1; my @a = @x; () <+delete> [variable] ok 2833 - our @x; local @x; no strict; $x[0] = 1; my @a = @x; () <+delete> [exception] ok 2834 - our @x; local @x; no strict; $x[0] = 1; my @a = @x; () <+delete> [return] ok 2835 - our @x; local @x; no strict; $x[0] = 1; my @a = @x; () <+delete> [variable] ok 2836 - my $x; $x->[0] = 1; my @a = @$x; () <+store> [exception] ok 2837 - my $x; $x->[0] = 1; my @a = @$x; () <+store> [return] ok 2838 - my $x; $x->[0] = 1; my @a = @$x; () <+store> [variable] ok 2839 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+store> [exception] ok 2840 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+store> [return] ok 2841 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+store> [variable] ok 2842 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+store> [exception] ok 2843 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+store> [return] ok 2844 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+store> [variable] ok 2845 - my $x; $x->[0] = 1; my @a = @$x; () <+store> [exception] ok 2846 - my $x; $x->[0] = 1; my @a = @$x; () <+store> [return] ok 2847 - my $x; $x->[0] = 1; my @a = @$x; () <+store> [variable] ok 2848 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+store> [exception] ok 2849 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+store> [return] ok 2850 - our $x; local $x; use strict; $x->[0] = 1; my @a = @$x; () <+store> [variable] ok 2851 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+store> [exception] ok 2852 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+store> [return] ok 2853 - our $x; local $x; no strict; $x->[0] = 1; my @a = @$x; () <+store> [variable] ok 2854 - my @x; $x[0] = 1; my @a = @x; () <+store> [exception] ok 2855 - my @x; $x[0] = 1; my @a = @x; () <+store> [return] ok 2856 - my @x; $x[0] = 1; my @a = @x; () <+store> [variable] ok 2857 - our @x; local @x; use strict; $x[0] = 1; my @a = @x; () <+store> [exception] ok 2858 - our @x; local @x; use strict; $x[0] = 1; my @a = @x; () <+store> [return] ok 2859 - our @x; local @x; use strict; $x[0] = 1; my @a = @x; () <+store> [variable] ok 2860 - our @x; local @x; no strict; $x[0] = 1; my @a = @x; () <+store> [exception] ok 2861 - our @x; local @x; no strict; $x[0] = 1; my @a = @x; () <+store> [return] ok 2862 - our @x; local @x; no strict; $x[0] = 1; my @a = @x; () <+store> [variable] ok 2863 - my $x; my @a = @$x[0, 1]; \@a [exception] ok 2864 - my $x; my @a = @$x[0, 1]; \@a [return] ok 2865 - my $x; my @a = @$x[0, 1]; \@a [variable] ok 2866 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a [exception] ok 2867 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a [return] ok 2868 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a [variable] ok 2869 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a [exception] ok 2870 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a [return] ok 2871 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a [variable] ok 2872 - my $x; my @a = @$x[0, 1]; \@a [exception] ok 2873 - my $x; my @a = @$x[0, 1]; \@a [return] ok 2874 - my $x; my @a = @$x[0, 1]; \@a [variable] ok 2875 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a [exception] ok 2876 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a [return] ok 2877 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a [variable] ok 2878 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a [exception] ok 2879 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a [return] ok 2880 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a [variable] ok 2881 - my @x; my @a = @x[0, 1]; \@a [exception] ok 2882 - my @x; my @a = @x[0, 1]; \@a [return] ok 2883 - my @x; my @a = @x[0, 1]; \@a [variable] ok 2884 - our @x; local @x; use strict; my @a = @x[0, 1]; \@a [exception] ok 2885 - our @x; local @x; use strict; my @a = @x[0, 1]; \@a [return] ok 2886 - our @x; local @x; use strict; my @a = @x[0, 1]; \@a [variable] ok 2887 - our @x; local @x; no strict; my @a = @x[0, 1]; \@a [exception] ok 2888 - our @x; local @x; no strict; my @a = @x[0, 1]; \@a [return] ok 2889 - our @x; local @x; no strict; my @a = @x[0, 1]; \@a [variable] ok 2890 - my $x; my @a = @$x[0, 1]; \@a [exception] ok 2891 - my $x; my @a = @$x[0, 1]; \@a [return] ok 2892 - my $x; my @a = @$x[0, 1]; \@a [variable] ok 2893 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a [exception] ok 2894 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a [return] ok 2895 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a [variable] ok 2896 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a [exception] ok 2897 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a [return] ok 2898 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a [variable] ok 2899 - my $x; my @a = @$x[0, 1]; \@a [exception] ok 2900 - my $x; my @a = @$x[0, 1]; \@a [return] ok 2901 - my $x; my @a = @$x[0, 1]; \@a [variable] ok 2902 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a [exception] ok 2903 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a [return] ok 2904 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a [variable] ok 2905 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a [exception] ok 2906 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a [return] ok 2907 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a [variable] ok 2908 - my @x; my @a = @x[0, 1]; \@a [exception] ok 2909 - my @x; my @a = @x[0, 1]; \@a [return] ok 2910 - my @x; my @a = @x[0, 1]; \@a [variable] ok 2911 - our @x; local @x; use strict; my @a = @x[0, 1]; \@a [exception] ok 2912 - our @x; local @x; use strict; my @a = @x[0, 1]; \@a [return] ok 2913 - our @x; local @x; use strict; my @a = @x[0, 1]; \@a [variable] ok 2914 - our @x; local @x; no strict; my @a = @x[0, 1]; \@a [exception] ok 2915 - our @x; local @x; no strict; my @a = @x[0, 1]; \@a [return] ok 2916 - our @x; local @x; no strict; my @a = @x[0, 1]; \@a [variable] ok 2917 - my $x; my @a = @$x[0, 1]; \@a <+fetch> [exception] ok 2918 - my $x; my @a = @$x[0, 1]; \@a <+fetch> [return] ok 2919 - my $x; my @a = @$x[0, 1]; \@a <+fetch> [variable] ok 2920 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+fetch> [exception] ok 2921 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+fetch> [return] ok 2922 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+fetch> [variable] ok 2923 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+fetch> [exception] ok 2924 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+fetch> [return] ok 2925 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+fetch> [variable] ok 2926 - my $x; my @a = @$x[0, 1]; \@a <+fetch> [exception] ok 2927 - my $x; my @a = @$x[0, 1]; \@a <+fetch> [return] ok 2928 - my $x; my @a = @$x[0, 1]; \@a <+fetch> [variable] ok 2929 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+fetch> [exception] ok 2930 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+fetch> [return] ok 2931 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+fetch> [variable] ok 2932 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+fetch> [exception] ok 2933 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+fetch> [return] ok 2934 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+fetch> [variable] ok 2935 - my @x; my @a = @x[0, 1]; \@a <+fetch> [exception] ok 2936 - my @x; my @a = @x[0, 1]; \@a <+fetch> [return] ok 2937 - my @x; my @a = @x[0, 1]; \@a <+fetch> [variable] ok 2938 - our @x; local @x; use strict; my @a = @x[0, 1]; \@a <+fetch> [exception] ok 2939 - our @x; local @x; use strict; my @a = @x[0, 1]; \@a <+fetch> [return] ok 2940 - our @x; local @x; use strict; my @a = @x[0, 1]; \@a <+fetch> [variable] ok 2941 - our @x; local @x; no strict; my @a = @x[0, 1]; \@a <+fetch> [exception] ok 2942 - our @x; local @x; no strict; my @a = @x[0, 1]; \@a <+fetch> [return] ok 2943 - our @x; local @x; no strict; my @a = @x[0, 1]; \@a <+fetch> [variable] ok 2944 - my $x; my @a = @$x[0, 1]; \@a <+exists> [exception] ok 2945 - my $x; my @a = @$x[0, 1]; \@a <+exists> [return] ok 2946 - my $x; my @a = @$x[0, 1]; \@a <+exists> [variable] ok 2947 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+exists> [exception] ok 2948 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+exists> [return] ok 2949 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+exists> [variable] ok 2950 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+exists> [exception] ok 2951 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+exists> [return] ok 2952 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+exists> [variable] ok 2953 - my $x; my @a = @$x[0, 1]; \@a <+exists> [exception] ok 2954 - my $x; my @a = @$x[0, 1]; \@a <+exists> [return] ok 2955 - my $x; my @a = @$x[0, 1]; \@a <+exists> [variable] ok 2956 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+exists> [exception] ok 2957 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+exists> [return] ok 2958 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+exists> [variable] ok 2959 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+exists> [exception] ok 2960 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+exists> [return] ok 2961 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+exists> [variable] ok 2962 - my @x; my @a = @x[0, 1]; \@a <+exists> [exception] ok 2963 - my @x; my @a = @x[0, 1]; \@a <+exists> [return] ok 2964 - my @x; my @a = @x[0, 1]; \@a <+exists> [variable] ok 2965 - our @x; local @x; use strict; my @a = @x[0, 1]; \@a <+exists> [exception] ok 2966 - our @x; local @x; use strict; my @a = @x[0, 1]; \@a <+exists> [return] ok 2967 - our @x; local @x; use strict; my @a = @x[0, 1]; \@a <+exists> [variable] ok 2968 - our @x; local @x; no strict; my @a = @x[0, 1]; \@a <+exists> [exception] ok 2969 - our @x; local @x; no strict; my @a = @x[0, 1]; \@a <+exists> [return] ok 2970 - our @x; local @x; no strict; my @a = @x[0, 1]; \@a <+exists> [variable] ok 2971 - my $x; my @a = @$x[0, 1]; \@a <+delete> [exception] ok 2972 - my $x; my @a = @$x[0, 1]; \@a <+delete> [return] ok 2973 - my $x; my @a = @$x[0, 1]; \@a <+delete> [variable] ok 2974 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+delete> [exception] ok 2975 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+delete> [return] ok 2976 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+delete> [variable] ok 2977 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+delete> [exception] ok 2978 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+delete> [return] ok 2979 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+delete> [variable] ok 2980 - my $x; my @a = @$x[0, 1]; \@a <+delete> [exception] ok 2981 - my $x; my @a = @$x[0, 1]; \@a <+delete> [return] ok 2982 - my $x; my @a = @$x[0, 1]; \@a <+delete> [variable] ok 2983 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+delete> [exception] ok 2984 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+delete> [return] ok 2985 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+delete> [variable] ok 2986 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+delete> [exception] ok 2987 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+delete> [return] ok 2988 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+delete> [variable] ok 2989 - my @x; my @a = @x[0, 1]; \@a <+delete> [exception] ok 2990 - my @x; my @a = @x[0, 1]; \@a <+delete> [return] ok 2991 - my @x; my @a = @x[0, 1]; \@a <+delete> [variable] ok 2992 - our @x; local @x; use strict; my @a = @x[0, 1]; \@a <+delete> [exception] ok 2993 - our @x; local @x; use strict; my @a = @x[0, 1]; \@a <+delete> [return] ok 2994 - our @x; local @x; use strict; my @a = @x[0, 1]; \@a <+delete> [variable] ok 2995 - our @x; local @x; no strict; my @a = @x[0, 1]; \@a <+delete> [exception] ok 2996 - our @x; local @x; no strict; my @a = @x[0, 1]; \@a <+delete> [return] ok 2997 - our @x; local @x; no strict; my @a = @x[0, 1]; \@a <+delete> [variable] ok 2998 - my $x; my @a = @$x[0, 1]; \@a <+store> [exception] ok 2999 - my $x; my @a = @$x[0, 1]; \@a <+store> [return] ok 3000 - my $x; my @a = @$x[0, 1]; \@a <+store> [variable] ok 3001 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+store> [exception] ok 3002 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+store> [return] ok 3003 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+store> [variable] ok 3004 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+store> [exception] ok 3005 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+store> [return] ok 3006 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+store> [variable] ok 3007 - my $x; my @a = @$x[0, 1]; \@a <+store> [exception] ok 3008 - my $x; my @a = @$x[0, 1]; \@a <+store> [return] ok 3009 - my $x; my @a = @$x[0, 1]; \@a <+store> [variable] ok 3010 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+store> [exception] ok 3011 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+store> [return] ok 3012 - our $x; local $x; use strict; my @a = @$x[0, 1]; \@a <+store> [variable] ok 3013 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+store> [exception] ok 3014 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+store> [return] ok 3015 - our $x; local $x; no strict; my @a = @$x[0, 1]; \@a <+store> [variable] ok 3016 - my @x; my @a = @x[0, 1]; \@a <+store> [exception] ok 3017 - my @x; my @a = @x[0, 1]; \@a <+store> [return] ok 3018 - my @x; my @a = @x[0, 1]; \@a <+store> [variable] ok 3019 - our @x; local @x; use strict; my @a = @x[0, 1]; \@a <+store> [exception] ok 3020 - our @x; local @x; use strict; my @a = @x[0, 1]; \@a <+store> [return] ok 3021 - our @x; local @x; use strict; my @a = @x[0, 1]; \@a <+store> [variable] ok 3022 - our @x; local @x; no strict; my @a = @x[0, 1]; \@a <+store> [exception] ok 3023 - our @x; local @x; no strict; my @a = @x[0, 1]; \@a <+store> [return] ok 3024 - our @x; local @x; no strict; my @a = @x[0, 1]; \@a <+store> [variable] ok 3025 - my $x; $x->[1] = 0; my @a = @$x[0, 1]; \@a <+fetch> [exception] ok 3026 - my $x; $x->[1] = 0; my @a = @$x[0, 1]; \@a <+fetch> [return] ok 3027 - my $x; $x->[1] = 0; my @a = @$x[0, 1]; \@a <+fetch> [variable] ok 3028 - our $x; local $x; use strict; $x->[1] = 0; my @a = @$x[0, 1]; \@a <+fetch> [exception] ok 3029 - our $x; local $x; use strict; $x->[1] = 0; my @a = @$x[0, 1]; \@a <+fetch> [return] ok 3030 - our $x; local $x; use strict; $x->[1] = 0; my @a = @$x[0, 1]; \@a <+fetch> [variable] ok 3031 - our $x; local $x; no strict; $x->[1] = 0; my @a = @$x[0, 1]; \@a <+fetch> [exception] ok 3032 - our $x; local $x; no strict; $x->[1] = 0; my @a = @$x[0, 1]; \@a <+fetch> [return] ok 3033 - our $x; local $x; no strict; $x->[1] = 0; my @a = @$x[0, 1]; \@a <+fetch> [variable] ok 3034 - my $x; $x->[1] = 0; my @a = @$x[0, 1]; \@a <+fetch> [exception] ok 3035 - my $x; $x->[1] = 0; my @a = @$x[0, 1]; \@a <+fetch> [return] ok 3036 - my $x; $x->[1] = 0; my @a = @$x[0, 1]; \@a <+fetch> [variable] ok 3037 - our $x; local $x; use strict; $x->[1] = 0; my @a = @$x[0, 1]; \@a <+fetch> [exception] ok 3038 - our $x; local $x; use strict; $x->[1] = 0; my @a = @$x[0, 1]; \@a <+fetch> [return] ok 3039 - our $x; local $x; use strict; $x->[1] = 0; my @a = @$x[0, 1]; \@a <+fetch> [variable] ok 3040 - our $x; local $x; no strict; $x->[1] = 0; my @a = @$x[0, 1]; \@a <+fetch> [exception] ok 3041 - our $x; local $x; no strict; $x->[1] = 0; my @a = @$x[0, 1]; \@a <+fetch> [return] ok 3042 - our $x; local $x; no strict; $x->[1] = 0; my @a = @$x[0, 1]; \@a <+fetch> [variable] ok 3043 - my @x; $x[1] = 0; my @a = @x[0, 1]; \@a <+fetch> [exception] ok 3044 - my @x; $x[1] = 0; my @a = @x[0, 1]; \@a <+fetch> [return] ok 3045 - my @x; $x[1] = 0; my @a = @x[0, 1]; \@a <+fetch> [variable] ok 3046 - our @x; local @x; use strict; $x[1] = 0; my @a = @x[0, 1]; \@a <+fetch> [exception] ok 3047 - our @x; local @x; use strict; $x[1] = 0; my @a = @x[0, 1]; \@a <+fetch> [return] ok 3048 - our @x; local @x; use strict; $x[1] = 0; my @a = @x[0, 1]; \@a <+fetch> [variable] ok 3049 - our @x; local @x; no strict; $x[1] = 0; my @a = @x[0, 1]; \@a <+fetch> [exception] ok 3050 - our @x; local @x; no strict; $x[1] = 0; my @a = @x[0, 1]; \@a <+fetch> [return] ok 3051 - our @x; local @x; no strict; $x[1] = 0; my @a = @x[0, 1]; \@a <+fetch> [variable] ok 3052 - my $x; @$x[0, 1] = (1, 2); () [exception] ok 3053 - my $x; @$x[0, 1] = (1, 2); () [return] ok 3054 - my $x; @$x[0, 1] = (1, 2); () [variable] ok 3055 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () [exception] ok 3056 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () [return] ok 3057 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () [variable] ok 3058 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () [exception] ok 3059 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () [return] ok 3060 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () [variable] ok 3061 - my $x; @$x[0, 1] = (1, 2); () [exception] ok 3062 - my $x; @$x[0, 1] = (1, 2); () [return] ok 3063 - my $x; @$x[0, 1] = (1, 2); () [variable] ok 3064 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () [exception] ok 3065 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () [return] ok 3066 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () [variable] ok 3067 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () [exception] ok 3068 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () [return] ok 3069 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () [variable] ok 3070 - my @x; @x[0, 1] = (1, 2); () [exception] ok 3071 - my @x; @x[0, 1] = (1, 2); () [return] ok 3072 - my @x; @x[0, 1] = (1, 2); () [variable] ok 3073 - our @x; local @x; use strict; @x[0, 1] = (1, 2); () [exception] ok 3074 - our @x; local @x; use strict; @x[0, 1] = (1, 2); () [return] ok 3075 - our @x; local @x; use strict; @x[0, 1] = (1, 2); () [variable] ok 3076 - our @x; local @x; no strict; @x[0, 1] = (1, 2); () [exception] ok 3077 - our @x; local @x; no strict; @x[0, 1] = (1, 2); () [return] ok 3078 - our @x; local @x; no strict; @x[0, 1] = (1, 2); () [variable] ok 3079 - my $x; @$x[0, 1] = (1, 2); () [exception] ok 3080 - my $x; @$x[0, 1] = (1, 2); () [return] ok 3081 - my $x; @$x[0, 1] = (1, 2); () [variable] ok 3082 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () [exception] ok 3083 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () [return] ok 3084 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () [variable] ok 3085 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () [exception] ok 3086 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () [return] ok 3087 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () [variable] ok 3088 - my $x; @$x[0, 1] = (1, 2); () [exception] ok 3089 - my $x; @$x[0, 1] = (1, 2); () [return] ok 3090 - my $x; @$x[0, 1] = (1, 2); () [variable] ok 3091 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () [exception] ok 3092 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () [return] ok 3093 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () [variable] ok 3094 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () [exception] ok 3095 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () [return] ok 3096 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () [variable] ok 3097 - my @x; @x[0, 1] = (1, 2); () [exception] ok 3098 - my @x; @x[0, 1] = (1, 2); () [return] ok 3099 - my @x; @x[0, 1] = (1, 2); () [variable] ok 3100 - our @x; local @x; use strict; @x[0, 1] = (1, 2); () [exception] ok 3101 - our @x; local @x; use strict; @x[0, 1] = (1, 2); () [return] ok 3102 - our @x; local @x; use strict; @x[0, 1] = (1, 2); () [variable] ok 3103 - our @x; local @x; no strict; @x[0, 1] = (1, 2); () [exception] ok 3104 - our @x; local @x; no strict; @x[0, 1] = (1, 2); () [return] ok 3105 - our @x; local @x; no strict; @x[0, 1] = (1, 2); () [variable] ok 3106 - my $x; @$x[0, 1] = (1, 2); () <+fetch> [exception] ok 3107 - my $x; @$x[0, 1] = (1, 2); () <+fetch> [return] ok 3108 - my $x; @$x[0, 1] = (1, 2); () <+fetch> [variable] ok 3109 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+fetch> [exception] ok 3110 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+fetch> [return] ok 3111 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+fetch> [variable] ok 3112 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+fetch> [exception] ok 3113 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+fetch> [return] ok 3114 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+fetch> [variable] ok 3115 - my $x; @$x[0, 1] = (1, 2); () <+fetch> [exception] ok 3116 - my $x; @$x[0, 1] = (1, 2); () <+fetch> [return] ok 3117 - my $x; @$x[0, 1] = (1, 2); () <+fetch> [variable] ok 3118 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+fetch> [exception] ok 3119 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+fetch> [return] ok 3120 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+fetch> [variable] ok 3121 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+fetch> [exception] ok 3122 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+fetch> [return] ok 3123 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+fetch> [variable] ok 3124 - my @x; @x[0, 1] = (1, 2); () <+fetch> [exception] ok 3125 - my @x; @x[0, 1] = (1, 2); () <+fetch> [return] ok 3126 - my @x; @x[0, 1] = (1, 2); () <+fetch> [variable] ok 3127 - our @x; local @x; use strict; @x[0, 1] = (1, 2); () <+fetch> [exception] ok 3128 - our @x; local @x; use strict; @x[0, 1] = (1, 2); () <+fetch> [return] ok 3129 - our @x; local @x; use strict; @x[0, 1] = (1, 2); () <+fetch> [variable] ok 3130 - our @x; local @x; no strict; @x[0, 1] = (1, 2); () <+fetch> [exception] ok 3131 - our @x; local @x; no strict; @x[0, 1] = (1, 2); () <+fetch> [return] ok 3132 - our @x; local @x; no strict; @x[0, 1] = (1, 2); () <+fetch> [variable] ok 3133 - my $x; @$x[0, 1] = (1, 2); () <+exists> [exception] ok 3134 - my $x; @$x[0, 1] = (1, 2); () <+exists> [return] ok 3135 - my $x; @$x[0, 1] = (1, 2); () <+exists> [variable] ok 3136 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+exists> [exception] ok 3137 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+exists> [return] ok 3138 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+exists> [variable] ok 3139 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+exists> [exception] ok 3140 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+exists> [return] ok 3141 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+exists> [variable] ok 3142 - my $x; @$x[0, 1] = (1, 2); () <+exists> [exception] ok 3143 - my $x; @$x[0, 1] = (1, 2); () <+exists> [return] ok 3144 - my $x; @$x[0, 1] = (1, 2); () <+exists> [variable] ok 3145 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+exists> [exception] ok 3146 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+exists> [return] ok 3147 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+exists> [variable] ok 3148 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+exists> [exception] ok 3149 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+exists> [return] ok 3150 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+exists> [variable] ok 3151 - my @x; @x[0, 1] = (1, 2); () <+exists> [exception] ok 3152 - my @x; @x[0, 1] = (1, 2); () <+exists> [return] ok 3153 - my @x; @x[0, 1] = (1, 2); () <+exists> [variable] ok 3154 - our @x; local @x; use strict; @x[0, 1] = (1, 2); () <+exists> [exception] ok 3155 - our @x; local @x; use strict; @x[0, 1] = (1, 2); () <+exists> [return] ok 3156 - our @x; local @x; use strict; @x[0, 1] = (1, 2); () <+exists> [variable] ok 3157 - our @x; local @x; no strict; @x[0, 1] = (1, 2); () <+exists> [exception] ok 3158 - our @x; local @x; no strict; @x[0, 1] = (1, 2); () <+exists> [return] ok 3159 - our @x; local @x; no strict; @x[0, 1] = (1, 2); () <+exists> [variable] ok 3160 - my $x; @$x[0, 1] = (1, 2); () <+delete> [exception] ok 3161 - my $x; @$x[0, 1] = (1, 2); () <+delete> [return] ok 3162 - my $x; @$x[0, 1] = (1, 2); () <+delete> [variable] ok 3163 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+delete> [exception] ok 3164 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+delete> [return] ok 3165 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+delete> [variable] ok 3166 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+delete> [exception] ok 3167 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+delete> [return] ok 3168 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+delete> [variable] ok 3169 - my $x; @$x[0, 1] = (1, 2); () <+delete> [exception] ok 3170 - my $x; @$x[0, 1] = (1, 2); () <+delete> [return] ok 3171 - my $x; @$x[0, 1] = (1, 2); () <+delete> [variable] ok 3172 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+delete> [exception] ok 3173 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+delete> [return] ok 3174 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+delete> [variable] ok 3175 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+delete> [exception] ok 3176 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+delete> [return] ok 3177 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+delete> [variable] ok 3178 - my @x; @x[0, 1] = (1, 2); () <+delete> [exception] ok 3179 - my @x; @x[0, 1] = (1, 2); () <+delete> [return] ok 3180 - my @x; @x[0, 1] = (1, 2); () <+delete> [variable] ok 3181 - our @x; local @x; use strict; @x[0, 1] = (1, 2); () <+delete> [exception] ok 3182 - our @x; local @x; use strict; @x[0, 1] = (1, 2); () <+delete> [return] ok 3183 - our @x; local @x; use strict; @x[0, 1] = (1, 2); () <+delete> [variable] ok 3184 - our @x; local @x; no strict; @x[0, 1] = (1, 2); () <+delete> [exception] ok 3185 - our @x; local @x; no strict; @x[0, 1] = (1, 2); () <+delete> [return] ok 3186 - our @x; local @x; no strict; @x[0, 1] = (1, 2); () <+delete> [variable] ok 3187 - my $x; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3188 - my $x; @$x[0, 1] = (1, 2); () <+store> [return] ok 3189 - my $x; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3190 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3191 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+store> [return] ok 3192 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3193 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3194 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+store> [return] ok 3195 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3196 - my $x; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3197 - my $x; @$x[0, 1] = (1, 2); () <+store> [return] ok 3198 - my $x; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3199 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3200 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+store> [return] ok 3201 - our $x; local $x; use strict; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3202 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3203 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+store> [return] ok 3204 - our $x; local $x; no strict; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3205 - my @x; 1 <+store> [exception] ok 3206 - my @x; 1 <+store> [return] ok 3207 - my @x; 1 <+store> [variable] ok 3208 - our @x; local @x; use strict; 1 <+store> [exception] ok 3209 - our @x; local @x; use strict; 1 <+store> [return] ok 3210 - our @x; local @x; use strict; 1 <+store> [variable] ok 3211 - our @x; local @x; no strict; 1 <+store> [exception] ok 3212 - our @x; local @x; no strict; 1 <+store> [return] ok 3213 - our @x; local @x; no strict; 1 <+store> [variable] ok 3214 - my $x; $x->[0] = 0; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3215 - my $x; $x->[0] = 0; @$x[0, 1] = (1, 2); () <+store> [return] ok 3216 - my $x; $x->[0] = 0; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3217 - our $x; local $x; use strict; $x->[0] = 0; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3218 - our $x; local $x; use strict; $x->[0] = 0; @$x[0, 1] = (1, 2); () <+store> [return] ok 3219 - our $x; local $x; use strict; $x->[0] = 0; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3220 - our $x; local $x; no strict; $x->[0] = 0; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3221 - our $x; local $x; no strict; $x->[0] = 0; @$x[0, 1] = (1, 2); () <+store> [return] ok 3222 - our $x; local $x; no strict; $x->[0] = 0; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3223 - my $x; $x->[0] = 0; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3224 - my $x; $x->[0] = 0; @$x[0, 1] = (1, 2); () <+store> [return] ok 3225 - my $x; $x->[0] = 0; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3226 - our $x; local $x; use strict; $x->[0] = 0; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3227 - our $x; local $x; use strict; $x->[0] = 0; @$x[0, 1] = (1, 2); () <+store> [return] ok 3228 - our $x; local $x; use strict; $x->[0] = 0; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3229 - our $x; local $x; no strict; $x->[0] = 0; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3230 - our $x; local $x; no strict; $x->[0] = 0; @$x[0, 1] = (1, 2); () <+store> [return] ok 3231 - our $x; local $x; no strict; $x->[0] = 0; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3232 - my @x; $x[0] = 0; @x[0, 1] = (1, 2); () <+store> [exception] ok 3233 - my @x; $x[0] = 0; @x[0, 1] = (1, 2); () <+store> [return] ok 3234 - my @x; $x[0] = 0; @x[0, 1] = (1, 2); () <+store> [variable] ok 3235 - our @x; local @x; use strict; $x[0] = 0; @x[0, 1] = (1, 2); () <+store> [exception] ok 3236 - our @x; local @x; use strict; $x[0] = 0; @x[0, 1] = (1, 2); () <+store> [return] ok 3237 - our @x; local @x; use strict; $x[0] = 0; @x[0, 1] = (1, 2); () <+store> [variable] ok 3238 - our @x; local @x; no strict; $x[0] = 0; @x[0, 1] = (1, 2); () <+store> [exception] ok 3239 - our @x; local @x; no strict; $x[0] = 0; @x[0, 1] = (1, 2); () <+store> [return] ok 3240 - our @x; local @x; no strict; $x[0] = 0; @x[0, 1] = (1, 2); () <+store> [variable] ok 3241 - my $x; $x->[2] = 0; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3242 - my $x; $x->[2] = 0; @$x[0, 1] = (1, 2); () <+store> [return] ok 3243 - my $x; $x->[2] = 0; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3244 - our $x; local $x; use strict; $x->[2] = 0; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3245 - our $x; local $x; use strict; $x->[2] = 0; @$x[0, 1] = (1, 2); () <+store> [return] ok 3246 - our $x; local $x; use strict; $x->[2] = 0; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3247 - our $x; local $x; no strict; $x->[2] = 0; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3248 - our $x; local $x; no strict; $x->[2] = 0; @$x[0, 1] = (1, 2); () <+store> [return] ok 3249 - our $x; local $x; no strict; $x->[2] = 0; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3250 - my $x; $x->[2] = 0; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3251 - my $x; $x->[2] = 0; @$x[0, 1] = (1, 2); () <+store> [return] ok 3252 - my $x; $x->[2] = 0; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3253 - our $x; local $x; use strict; $x->[2] = 0; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3254 - our $x; local $x; use strict; $x->[2] = 0; @$x[0, 1] = (1, 2); () <+store> [return] ok 3255 - our $x; local $x; use strict; $x->[2] = 0; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3256 - our $x; local $x; no strict; $x->[2] = 0; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3257 - our $x; local $x; no strict; $x->[2] = 0; @$x[0, 1] = (1, 2); () <+store> [return] ok 3258 - our $x; local $x; no strict; $x->[2] = 0; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3259 - my @x; $x[2] = 0; @x[0, 1] = (1, 2); () <+store> [exception] ok 3260 - my @x; $x[2] = 0; @x[0, 1] = (1, 2); () <+store> [return] ok 3261 - my @x; $x[2] = 0; @x[0, 1] = (1, 2); () <+store> [variable] ok 3262 - our @x; local @x; use strict; $x[2] = 0; @x[0, 1] = (1, 2); () <+store> [exception] ok 3263 - our @x; local @x; use strict; $x[2] = 0; @x[0, 1] = (1, 2); () <+store> [return] ok 3264 - our @x; local @x; use strict; $x[2] = 0; @x[0, 1] = (1, 2); () <+store> [variable] ok 3265 - our @x; local @x; no strict; $x[2] = 0; @x[0, 1] = (1, 2); () <+store> [exception] ok 3266 - our @x; local @x; no strict; $x[2] = 0; @x[0, 1] = (1, 2); () <+store> [return] ok 3267 - our @x; local @x; no strict; $x[2] = 0; @x[0, 1] = (1, 2); () <+store> [variable] ok 3268 - my $x; $x->[0] = 0, $x->[1] = 0; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3269 - my $x; $x->[0] = 0, $x->[1] = 0; @$x[0, 1] = (1, 2); () <+store> [return] ok 3270 - my $x; $x->[0] = 0, $x->[1] = 0; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3271 - our $x; local $x; use strict; $x->[0] = 0, $x->[1] = 0; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3272 - our $x; local $x; use strict; $x->[0] = 0, $x->[1] = 0; @$x[0, 1] = (1, 2); () <+store> [return] ok 3273 - our $x; local $x; use strict; $x->[0] = 0, $x->[1] = 0; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3274 - our $x; local $x; no strict; $x->[0] = 0, $x->[1] = 0; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3275 - our $x; local $x; no strict; $x->[0] = 0, $x->[1] = 0; @$x[0, 1] = (1, 2); () <+store> [return] ok 3276 - our $x; local $x; no strict; $x->[0] = 0, $x->[1] = 0; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3277 - my $x; $x->[0] = 0, $x->[1] = 0; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3278 - my $x; $x->[0] = 0, $x->[1] = 0; @$x[0, 1] = (1, 2); () <+store> [return] ok 3279 - my $x; $x->[0] = 0, $x->[1] = 0; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3280 - our $x; local $x; use strict; $x->[0] = 0, $x->[1] = 0; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3281 - our $x; local $x; use strict; $x->[0] = 0, $x->[1] = 0; @$x[0, 1] = (1, 2); () <+store> [return] ok 3282 - our $x; local $x; use strict; $x->[0] = 0, $x->[1] = 0; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3283 - our $x; local $x; no strict; $x->[0] = 0, $x->[1] = 0; @$x[0, 1] = (1, 2); () <+store> [exception] ok 3284 - our $x; local $x; no strict; $x->[0] = 0, $x->[1] = 0; @$x[0, 1] = (1, 2); () <+store> [return] ok 3285 - our $x; local $x; no strict; $x->[0] = 0, $x->[1] = 0; @$x[0, 1] = (1, 2); () <+store> [variable] ok 3286 - my @x; $x[0] = 0, $x[1] = 0; @x[0, 1] = (1, 2); () <+store> [exception] ok 3287 - my @x; $x[0] = 0, $x[1] = 0; @x[0, 1] = (1, 2); () <+store> [return] ok 3288 - my @x; $x[0] = 0, $x[1] = 0; @x[0, 1] = (1, 2); () <+store> [variable] ok 3289 - our @x; local @x; use strict; $x[0] = 0, $x[1] = 0; @x[0, 1] = (1, 2); () <+store> [exception] ok 3290 - our @x; local @x; use strict; $x[0] = 0, $x[1] = 0; @x[0, 1] = (1, 2); () <+store> [return] ok 3291 - our @x; local @x; use strict; $x[0] = 0, $x[1] = 0; @x[0, 1] = (1, 2); () <+store> [variable] ok 3292 - our @x; local @x; no strict; $x[0] = 0, $x[1] = 0; @x[0, 1] = (1, 2); () <+store> [exception] ok 3293 - our @x; local @x; no strict; $x[0] = 0, $x[1] = 0; @x[0, 1] = (1, 2); () <+store> [return] ok 3294 - our @x; local @x; no strict; $x[0] = 0, $x[1] = 0; @x[0, 1] = (1, 2); () <+store> [variable] ok 3295 - my $x; exists $x->[0] [exception] ok 3296 - my $x; exists $x->[0] [return] ok 3297 - my $x; exists $x->[0] [variable] ok 3298 - our $x; local $x; use strict; exists $x->[0] [exception] ok 3299 - our $x; local $x; use strict; exists $x->[0] [return] ok 3300 - our $x; local $x; use strict; exists $x->[0] [variable] ok 3301 - our $x; local $x; no strict; exists $x->[0] [exception] ok 3302 - our $x; local $x; no strict; exists $x->[0] [return] ok 3303 - our $x; local $x; no strict; exists $x->[0] [variable] ok 3304 - my $x; exists $$x[0] [exception] ok 3305 - my $x; exists $$x[0] [return] ok 3306 - my $x; exists $$x[0] [variable] ok 3307 - our $x; local $x; use strict; exists $$x[0] [exception] ok 3308 - our $x; local $x; use strict; exists $$x[0] [return] ok 3309 - our $x; local $x; use strict; exists $$x[0] [variable] ok 3310 - our $x; local $x; no strict; exists $$x[0] [exception] ok 3311 - our $x; local $x; no strict; exists $$x[0] [return] ok 3312 - our $x; local $x; no strict; exists $$x[0] [variable] ok 3313 - my @x; exists $x[0] [exception] ok 3314 - my @x; exists $x[0] [return] ok 3315 - my @x; exists $x[0] [variable] ok 3316 - our @x; local @x; use strict; exists $x[0] [exception] ok 3317 - our @x; local @x; use strict; exists $x[0] [return] ok 3318 - our @x; local @x; use strict; exists $x[0] [variable] ok 3319 - our @x; local @x; no strict; exists $x[0] [exception] ok 3320 - our @x; local @x; no strict; exists $x[0] [return] ok 3321 - our @x; local @x; no strict; exists $x[0] [variable] ok 3322 - my $x; exists $x->[0] [exception] ok 3323 - my $x; exists $x->[0] [return] ok 3324 - my $x; exists $x->[0] [variable] ok 3325 - our $x; local $x; use strict; exists $x->[0] [exception] ok 3326 - our $x; local $x; use strict; exists $x->[0] [return] ok 3327 - our $x; local $x; use strict; exists $x->[0] [variable] ok 3328 - our $x; local $x; no strict; exists $x->[0] [exception] ok 3329 - our $x; local $x; no strict; exists $x->[0] [return] ok 3330 - our $x; local $x; no strict; exists $x->[0] [variable] ok 3331 - my $x; exists $$x[0] [exception] ok 3332 - my $x; exists $$x[0] [return] ok 3333 - my $x; exists $$x[0] [variable] ok 3334 - our $x; local $x; use strict; exists $$x[0] [exception] ok 3335 - our $x; local $x; use strict; exists $$x[0] [return] ok 3336 - our $x; local $x; use strict; exists $$x[0] [variable] ok 3337 - our $x; local $x; no strict; exists $$x[0] [exception] ok 3338 - our $x; local $x; no strict; exists $$x[0] [return] ok 3339 - our $x; local $x; no strict; exists $$x[0] [variable] ok 3340 - my @x; exists $x[0] [exception] ok 3341 - my @x; exists $x[0] [return] ok 3342 - my @x; exists $x[0] [variable] ok 3343 - our @x; local @x; use strict; exists $x[0] [exception] ok 3344 - our @x; local @x; use strict; exists $x[0] [return] ok 3345 - our @x; local @x; use strict; exists $x[0] [variable] ok 3346 - our @x; local @x; no strict; exists $x[0] [exception] ok 3347 - our @x; local @x; no strict; exists $x[0] [return] ok 3348 - our @x; local @x; no strict; exists $x[0] [variable] ok 3349 - my $x; exists $x->[0] <+fetch> [exception] ok 3350 - my $x; exists $x->[0] <+fetch> [return] ok 3351 - my $x; exists $x->[0] <+fetch> [variable] ok 3352 - our $x; local $x; use strict; exists $x->[0] <+fetch> [exception] ok 3353 - our $x; local $x; use strict; exists $x->[0] <+fetch> [return] ok 3354 - our $x; local $x; use strict; exists $x->[0] <+fetch> [variable] ok 3355 - our $x; local $x; no strict; exists $x->[0] <+fetch> [exception] ok 3356 - our $x; local $x; no strict; exists $x->[0] <+fetch> [return] ok 3357 - our $x; local $x; no strict; exists $x->[0] <+fetch> [variable] ok 3358 - my $x; exists $$x[0] <+fetch> [exception] ok 3359 - my $x; exists $$x[0] <+fetch> [return] ok 3360 - my $x; exists $$x[0] <+fetch> [variable] ok 3361 - our $x; local $x; use strict; exists $$x[0] <+fetch> [exception] ok 3362 - our $x; local $x; use strict; exists $$x[0] <+fetch> [return] ok 3363 - our $x; local $x; use strict; exists $$x[0] <+fetch> [variable] ok 3364 - our $x; local $x; no strict; exists $$x[0] <+fetch> [exception] ok 3365 - our $x; local $x; no strict; exists $$x[0] <+fetch> [return] ok 3366 - our $x; local $x; no strict; exists $$x[0] <+fetch> [variable] ok 3367 - my @x; exists $x[0] <+fetch> [exception] ok 3368 - my @x; exists $x[0] <+fetch> [return] ok 3369 - my @x; exists $x[0] <+fetch> [variable] ok 3370 - our @x; local @x; use strict; exists $x[0] <+fetch> [exception] ok 3371 - our @x; local @x; use strict; exists $x[0] <+fetch> [return] ok 3372 - our @x; local @x; use strict; exists $x[0] <+fetch> [variable] ok 3373 - our @x; local @x; no strict; exists $x[0] <+fetch> [exception] ok 3374 - our @x; local @x; no strict; exists $x[0] <+fetch> [return] ok 3375 - our @x; local @x; no strict; exists $x[0] <+fetch> [variable] ok 3376 - my $x; exists $x->[0] <+exists> [exception] ok 3377 - my $x; exists $x->[0] <+exists> [return] ok 3378 - my $x; exists $x->[0] <+exists> [variable] ok 3379 - our $x; local $x; use strict; exists $x->[0] <+exists> [exception] ok 3380 - our $x; local $x; use strict; exists $x->[0] <+exists> [return] ok 3381 - our $x; local $x; use strict; exists $x->[0] <+exists> [variable] ok 3382 - our $x; local $x; no strict; exists $x->[0] <+exists> [exception] ok 3383 - our $x; local $x; no strict; exists $x->[0] <+exists> [return] ok 3384 - our $x; local $x; no strict; exists $x->[0] <+exists> [variable] ok 3385 - my $x; exists $$x[0] <+exists> [exception] ok 3386 - my $x; exists $$x[0] <+exists> [return] ok 3387 - my $x; exists $$x[0] <+exists> [variable] ok 3388 - our $x; local $x; use strict; exists $$x[0] <+exists> [exception] ok 3389 - our $x; local $x; use strict; exists $$x[0] <+exists> [return] ok 3390 - our $x; local $x; use strict; exists $$x[0] <+exists> [variable] ok 3391 - our $x; local $x; no strict; exists $$x[0] <+exists> [exception] ok 3392 - our $x; local $x; no strict; exists $$x[0] <+exists> [return] ok 3393 - our $x; local $x; no strict; exists $$x[0] <+exists> [variable] ok 3394 - my @x; exists $x[0] <+exists> [exception] ok 3395 - my @x; exists $x[0] <+exists> [return] ok 3396 - my @x; exists $x[0] <+exists> [variable] ok 3397 - our @x; local @x; use strict; exists $x[0] <+exists> [exception] ok 3398 - our @x; local @x; use strict; exists $x[0] <+exists> [return] ok 3399 - our @x; local @x; use strict; exists $x[0] <+exists> [variable] ok 3400 - our @x; local @x; no strict; exists $x[0] <+exists> [exception] ok 3401 - our @x; local @x; no strict; exists $x[0] <+exists> [return] ok 3402 - our @x; local @x; no strict; exists $x[0] <+exists> [variable] ok 3403 - my $x; exists $x->[0] <+delete> [exception] ok 3404 - my $x; exists $x->[0] <+delete> [return] ok 3405 - my $x; exists $x->[0] <+delete> [variable] ok 3406 - our $x; local $x; use strict; exists $x->[0] <+delete> [exception] ok 3407 - our $x; local $x; use strict; exists $x->[0] <+delete> [return] ok 3408 - our $x; local $x; use strict; exists $x->[0] <+delete> [variable] ok 3409 - our $x; local $x; no strict; exists $x->[0] <+delete> [exception] ok 3410 - our $x; local $x; no strict; exists $x->[0] <+delete> [return] ok 3411 - our $x; local $x; no strict; exists $x->[0] <+delete> [variable] ok 3412 - my $x; exists $$x[0] <+delete> [exception] ok 3413 - my $x; exists $$x[0] <+delete> [return] ok 3414 - my $x; exists $$x[0] <+delete> [variable] ok 3415 - our $x; local $x; use strict; exists $$x[0] <+delete> [exception] ok 3416 - our $x; local $x; use strict; exists $$x[0] <+delete> [return] ok 3417 - our $x; local $x; use strict; exists $$x[0] <+delete> [variable] ok 3418 - our $x; local $x; no strict; exists $$x[0] <+delete> [exception] ok 3419 - our $x; local $x; no strict; exists $$x[0] <+delete> [return] ok 3420 - our $x; local $x; no strict; exists $$x[0] <+delete> [variable] ok 3421 - my @x; exists $x[0] <+delete> [exception] ok 3422 - my @x; exists $x[0] <+delete> [return] ok 3423 - my @x; exists $x[0] <+delete> [variable] ok 3424 - our @x; local @x; use strict; exists $x[0] <+delete> [exception] ok 3425 - our @x; local @x; use strict; exists $x[0] <+delete> [return] ok 3426 - our @x; local @x; use strict; exists $x[0] <+delete> [variable] ok 3427 - our @x; local @x; no strict; exists $x[0] <+delete> [exception] ok 3428 - our @x; local @x; no strict; exists $x[0] <+delete> [return] ok 3429 - our @x; local @x; no strict; exists $x[0] <+delete> [variable] ok 3430 - my $x; exists $x->[0] <+store> [exception] ok 3431 - my $x; exists $x->[0] <+store> [return] ok 3432 - my $x; exists $x->[0] <+store> [variable] ok 3433 - our $x; local $x; use strict; exists $x->[0] <+store> [exception] ok 3434 - our $x; local $x; use strict; exists $x->[0] <+store> [return] ok 3435 - our $x; local $x; use strict; exists $x->[0] <+store> [variable] ok 3436 - our $x; local $x; no strict; exists $x->[0] <+store> [exception] ok 3437 - our $x; local $x; no strict; exists $x->[0] <+store> [return] ok 3438 - our $x; local $x; no strict; exists $x->[0] <+store> [variable] ok 3439 - my $x; exists $$x[0] <+store> [exception] ok 3440 - my $x; exists $$x[0] <+store> [return] ok 3441 - my $x; exists $$x[0] <+store> [variable] ok 3442 - our $x; local $x; use strict; exists $$x[0] <+store> [exception] ok 3443 - our $x; local $x; use strict; exists $$x[0] <+store> [return] ok 3444 - our $x; local $x; use strict; exists $$x[0] <+store> [variable] ok 3445 - our $x; local $x; no strict; exists $$x[0] <+store> [exception] ok 3446 - our $x; local $x; no strict; exists $$x[0] <+store> [return] ok 3447 - our $x; local $x; no strict; exists $$x[0] <+store> [variable] ok 3448 - my @x; exists $x[0] <+store> [exception] ok 3449 - my @x; exists $x[0] <+store> [return] ok 3450 - my @x; exists $x[0] <+store> [variable] ok 3451 - our @x; local @x; use strict; exists $x[0] <+store> [exception] ok 3452 - our @x; local @x; use strict; exists $x[0] <+store> [return] ok 3453 - our @x; local @x; use strict; exists $x[0] <+store> [variable] ok 3454 - our @x; local @x; no strict; exists $x[0] <+store> [exception] ok 3455 - our @x; local @x; no strict; exists $x[0] <+store> [return] ok 3456 - our @x; local @x; no strict; exists $x[0] <+store> [variable] ok 3457 - my $x; exists $x->[0] <+strict +fetch> [exception] ok 3458 - my $x; exists $x->[0] <+strict +fetch> [return] ok 3459 - my $x; exists $x->[0] <+strict +fetch> [variable] ok 3460 - our $x; local $x; use strict; exists $x->[0] <+strict +fetch> [exception] ok 3461 - our $x; local $x; use strict; exists $x->[0] <+strict +fetch> [return] ok 3462 - our $x; local $x; use strict; exists $x->[0] <+strict +fetch> [variable] ok 3463 - our $x; local $x; no strict; exists $x->[0] <+strict +fetch> [exception] ok 3464 - our $x; local $x; no strict; exists $x->[0] <+strict +fetch> [return] ok 3465 - our $x; local $x; no strict; exists $x->[0] <+strict +fetch> [variable] ok 3466 - my $x; exists $$x[0] <+strict +fetch> [exception] ok 3467 - my $x; exists $$x[0] <+strict +fetch> [return] ok 3468 - my $x; exists $$x[0] <+strict +fetch> [variable] ok 3469 - our $x; local $x; use strict; exists $$x[0] <+strict +fetch> [exception] ok 3470 - our $x; local $x; use strict; exists $$x[0] <+strict +fetch> [return] ok 3471 - our $x; local $x; use strict; exists $$x[0] <+strict +fetch> [variable] ok 3472 - our $x; local $x; no strict; exists $$x[0] <+strict +fetch> [exception] ok 3473 - our $x; local $x; no strict; exists $$x[0] <+strict +fetch> [return] ok 3474 - our $x; local $x; no strict; exists $$x[0] <+strict +fetch> [variable] ok 3475 - my @x; exists $x[0] <+strict +fetch> [exception] ok 3476 - my @x; exists $x[0] <+strict +fetch> [return] ok 3477 - my @x; exists $x[0] <+strict +fetch> [variable] ok 3478 - our @x; local @x; use strict; exists $x[0] <+strict +fetch> [exception] ok 3479 - our @x; local @x; use strict; exists $x[0] <+strict +fetch> [return] ok 3480 - our @x; local @x; use strict; exists $x[0] <+strict +fetch> [variable] ok 3481 - our @x; local @x; no strict; exists $x[0] <+strict +fetch> [exception] ok 3482 - our @x; local @x; no strict; exists $x[0] <+strict +fetch> [return] ok 3483 - our @x; local @x; no strict; exists $x[0] <+strict +fetch> [variable] ok 3484 - my $x; exists $x->[0] <+strict +exists> [exception] ok 3485 - my $x; exists $x->[0] <+strict +exists> [return] ok 3486 - my $x; exists $x->[0] <+strict +exists> [variable] ok 3487 - our $x; local $x; use strict; exists $x->[0] <+strict +exists> [exception] ok 3488 - our $x; local $x; use strict; exists $x->[0] <+strict +exists> [return] ok 3489 - our $x; local $x; use strict; exists $x->[0] <+strict +exists> [variable] ok 3490 - our $x; local $x; no strict; exists $x->[0] <+strict +exists> [exception] ok 3491 - our $x; local $x; no strict; exists $x->[0] <+strict +exists> [return] ok 3492 - our $x; local $x; no strict; exists $x->[0] <+strict +exists> [variable] ok 3493 - my $x; exists $$x[0] <+strict +exists> [exception] ok 3494 - my $x; exists $$x[0] <+strict +exists> [return] ok 3495 - my $x; exists $$x[0] <+strict +exists> [variable] ok 3496 - our $x; local $x; use strict; exists $$x[0] <+strict +exists> [exception] ok 3497 - our $x; local $x; use strict; exists $$x[0] <+strict +exists> [return] ok 3498 - our $x; local $x; use strict; exists $$x[0] <+strict +exists> [variable] ok 3499 - our $x; local $x; no strict; exists $$x[0] <+strict +exists> [exception] ok 3500 - our $x; local $x; no strict; exists $$x[0] <+strict +exists> [return] ok 3501 - our $x; local $x; no strict; exists $$x[0] <+strict +exists> [variable] ok 3502 - my @x; 1 <+strict +exists> [exception] ok 3503 - my @x; 1 <+strict +exists> [return] ok 3504 - my @x; 1 <+strict +exists> [variable] ok 3505 - our @x; local @x; use strict; 1 <+strict +exists> [exception] ok 3506 - our @x; local @x; use strict; 1 <+strict +exists> [return] ok 3507 - our @x; local @x; use strict; 1 <+strict +exists> [variable] ok 3508 - our @x; local @x; no strict; 1 <+strict +exists> [exception] ok 3509 - our @x; local @x; no strict; 1 <+strict +exists> [return] ok 3510 - our @x; local @x; no strict; 1 <+strict +exists> [variable] ok 3511 - my $x; exists $x->[0] <+strict +delete> [exception] ok 3512 - my $x; exists $x->[0] <+strict +delete> [return] ok 3513 - my $x; exists $x->[0] <+strict +delete> [variable] ok 3514 - our $x; local $x; use strict; exists $x->[0] <+strict +delete> [exception] ok 3515 - our $x; local $x; use strict; exists $x->[0] <+strict +delete> [return] ok 3516 - our $x; local $x; use strict; exists $x->[0] <+strict +delete> [variable] ok 3517 - our $x; local $x; no strict; exists $x->[0] <+strict +delete> [exception] ok 3518 - our $x; local $x; no strict; exists $x->[0] <+strict +delete> [return] ok 3519 - our $x; local $x; no strict; exists $x->[0] <+strict +delete> [variable] ok 3520 - my $x; exists $$x[0] <+strict +delete> [exception] ok 3521 - my $x; exists $$x[0] <+strict +delete> [return] ok 3522 - my $x; exists $$x[0] <+strict +delete> [variable] ok 3523 - our $x; local $x; use strict; exists $$x[0] <+strict +delete> [exception] ok 3524 - our $x; local $x; use strict; exists $$x[0] <+strict +delete> [return] ok 3525 - our $x; local $x; use strict; exists $$x[0] <+strict +delete> [variable] ok 3526 - our $x; local $x; no strict; exists $$x[0] <+strict +delete> [exception] ok 3527 - our $x; local $x; no strict; exists $$x[0] <+strict +delete> [return] ok 3528 - our $x; local $x; no strict; exists $$x[0] <+strict +delete> [variable] ok 3529 - my @x; exists $x[0] <+strict +delete> [exception] ok 3530 - my @x; exists $x[0] <+strict +delete> [return] ok 3531 - my @x; exists $x[0] <+strict +delete> [variable] ok 3532 - our @x; local @x; use strict; exists $x[0] <+strict +delete> [exception] ok 3533 - our @x; local @x; use strict; exists $x[0] <+strict +delete> [return] ok 3534 - our @x; local @x; use strict; exists $x[0] <+strict +delete> [variable] ok 3535 - our @x; local @x; no strict; exists $x[0] <+strict +delete> [exception] ok 3536 - our @x; local @x; no strict; exists $x[0] <+strict +delete> [return] ok 3537 - our @x; local @x; no strict; exists $x[0] <+strict +delete> [variable] ok 3538 - my $x; exists $x->[0] <+strict +store> [exception] ok 3539 - my $x; exists $x->[0] <+strict +store> [return] ok 3540 - my $x; exists $x->[0] <+strict +store> [variable] ok 3541 - our $x; local $x; use strict; exists $x->[0] <+strict +store> [exception] ok 3542 - our $x; local $x; use strict; exists $x->[0] <+strict +store> [return] ok 3543 - our $x; local $x; use strict; exists $x->[0] <+strict +store> [variable] ok 3544 - our $x; local $x; no strict; exists $x->[0] <+strict +store> [exception] ok 3545 - our $x; local $x; no strict; exists $x->[0] <+strict +store> [return] ok 3546 - our $x; local $x; no strict; exists $x->[0] <+strict +store> [variable] ok 3547 - my $x; exists $$x[0] <+strict +store> [exception] ok 3548 - my $x; exists $$x[0] <+strict +store> [return] ok 3549 - my $x; exists $$x[0] <+strict +store> [variable] ok 3550 - our $x; local $x; use strict; exists $$x[0] <+strict +store> [exception] ok 3551 - our $x; local $x; use strict; exists $$x[0] <+strict +store> [return] ok 3552 - our $x; local $x; use strict; exists $$x[0] <+strict +store> [variable] ok 3553 - our $x; local $x; no strict; exists $$x[0] <+strict +store> [exception] ok 3554 - our $x; local $x; no strict; exists $$x[0] <+strict +store> [return] ok 3555 - our $x; local $x; no strict; exists $$x[0] <+strict +store> [variable] ok 3556 - my @x; exists $x[0] <+strict +store> [exception] ok 3557 - my @x; exists $x[0] <+strict +store> [return] ok 3558 - my @x; exists $x[0] <+strict +store> [variable] ok 3559 - our @x; local @x; use strict; exists $x[0] <+strict +store> [exception] ok 3560 - our @x; local @x; use strict; exists $x[0] <+strict +store> [return] ok 3561 - our @x; local @x; use strict; exists $x[0] <+strict +store> [variable] ok 3562 - our @x; local @x; no strict; exists $x[0] <+strict +store> [exception] ok 3563 - our @x; local @x; no strict; exists $x[0] <+strict +store> [return] ok 3564 - our @x; local @x; no strict; exists $x[0] <+strict +store> [variable] ok 3565 - my $x; exists $x->[0]->[1] [exception] ok 3566 - my $x; exists $x->[0]->[1] [return] ok 3567 - my $x; exists $x->[0]->[1] [variable] ok 3568 - our $x; local $x; use strict; exists $x->[0]->[1] [exception] ok 3569 - our $x; local $x; use strict; exists $x->[0]->[1] [return] ok 3570 - our $x; local $x; use strict; exists $x->[0]->[1] [variable] ok 3571 - our $x; local $x; no strict; exists $x->[0]->[1] [exception] ok 3572 - our $x; local $x; no strict; exists $x->[0]->[1] [return] ok 3573 - our $x; local $x; no strict; exists $x->[0]->[1] [variable] ok 3574 - my $x; exists $$x[0]->[1] [exception] ok 3575 - my $x; exists $$x[0]->[1] [return] ok 3576 - my $x; exists $$x[0]->[1] [variable] ok 3577 - our $x; local $x; use strict; exists $$x[0]->[1] [exception] ok 3578 - our $x; local $x; use strict; exists $$x[0]->[1] [return] ok 3579 - our $x; local $x; use strict; exists $$x[0]->[1] [variable] ok 3580 - our $x; local $x; no strict; exists $$x[0]->[1] [exception] ok 3581 - our $x; local $x; no strict; exists $$x[0]->[1] [return] ok 3582 - our $x; local $x; no strict; exists $$x[0]->[1] [variable] ok 3583 - my @x; exists $x[0]->[1] [exception] ok 3584 - my @x; exists $x[0]->[1] [return] ok 3585 - my @x; exists $x[0]->[1] [variable] ok 3586 - our @x; local @x; use strict; exists $x[0]->[1] [exception] ok 3587 - our @x; local @x; use strict; exists $x[0]->[1] [return] ok 3588 - our @x; local @x; use strict; exists $x[0]->[1] [variable] ok 3589 - our @x; local @x; no strict; exists $x[0]->[1] [exception] ok 3590 - our @x; local @x; no strict; exists $x[0]->[1] [return] ok 3591 - our @x; local @x; no strict; exists $x[0]->[1] [variable] ok 3592 - my $x; exists $x->[0]->[1] [exception] ok 3593 - my $x; exists $x->[0]->[1] [return] ok 3594 - my $x; exists $x->[0]->[1] [variable] ok 3595 - our $x; local $x; use strict; exists $x->[0]->[1] [exception] ok 3596 - our $x; local $x; use strict; exists $x->[0]->[1] [return] ok 3597 - our $x; local $x; use strict; exists $x->[0]->[1] [variable] ok 3598 - our $x; local $x; no strict; exists $x->[0]->[1] [exception] ok 3599 - our $x; local $x; no strict; exists $x->[0]->[1] [return] ok 3600 - our $x; local $x; no strict; exists $x->[0]->[1] [variable] ok 3601 - my $x; exists $$x[0]->[1] [exception] ok 3602 - my $x; exists $$x[0]->[1] [return] ok 3603 - my $x; exists $$x[0]->[1] [variable] ok 3604 - our $x; local $x; use strict; exists $$x[0]->[1] [exception] ok 3605 - our $x; local $x; use strict; exists $$x[0]->[1] [return] ok 3606 - our $x; local $x; use strict; exists $$x[0]->[1] [variable] ok 3607 - our $x; local $x; no strict; exists $$x[0]->[1] [exception] ok 3608 - our $x; local $x; no strict; exists $$x[0]->[1] [return] ok 3609 - our $x; local $x; no strict; exists $$x[0]->[1] [variable] ok 3610 - my @x; exists $x[0]->[1] [exception] ok 3611 - my @x; exists $x[0]->[1] [return] ok 3612 - my @x; exists $x[0]->[1] [variable] ok 3613 - our @x; local @x; use strict; exists $x[0]->[1] [exception] ok 3614 - our @x; local @x; use strict; exists $x[0]->[1] [return] ok 3615 - our @x; local @x; use strict; exists $x[0]->[1] [variable] ok 3616 - our @x; local @x; no strict; exists $x[0]->[1] [exception] ok 3617 - our @x; local @x; no strict; exists $x[0]->[1] [return] ok 3618 - our @x; local @x; no strict; exists $x[0]->[1] [variable] ok 3619 - my $x; exists $x->[0]->[1] <+fetch> [exception] ok 3620 - my $x; exists $x->[0]->[1] <+fetch> [return] ok 3621 - my $x; exists $x->[0]->[1] <+fetch> [variable] ok 3622 - our $x; local $x; use strict; exists $x->[0]->[1] <+fetch> [exception] ok 3623 - our $x; local $x; use strict; exists $x->[0]->[1] <+fetch> [return] ok 3624 - our $x; local $x; use strict; exists $x->[0]->[1] <+fetch> [variable] ok 3625 - our $x; local $x; no strict; exists $x->[0]->[1] <+fetch> [exception] ok 3626 - our $x; local $x; no strict; exists $x->[0]->[1] <+fetch> [return] ok 3627 - our $x; local $x; no strict; exists $x->[0]->[1] <+fetch> [variable] ok 3628 - my $x; exists $$x[0]->[1] <+fetch> [exception] ok 3629 - my $x; exists $$x[0]->[1] <+fetch> [return] ok 3630 - my $x; exists $$x[0]->[1] <+fetch> [variable] ok 3631 - our $x; local $x; use strict; exists $$x[0]->[1] <+fetch> [exception] ok 3632 - our $x; local $x; use strict; exists $$x[0]->[1] <+fetch> [return] ok 3633 - our $x; local $x; use strict; exists $$x[0]->[1] <+fetch> [variable] ok 3634 - our $x; local $x; no strict; exists $$x[0]->[1] <+fetch> [exception] ok 3635 - our $x; local $x; no strict; exists $$x[0]->[1] <+fetch> [return] ok 3636 - our $x; local $x; no strict; exists $$x[0]->[1] <+fetch> [variable] ok 3637 - my @x; exists $x[0]->[1] <+fetch> [exception] ok 3638 - my @x; exists $x[0]->[1] <+fetch> [return] ok 3639 - my @x; exists $x[0]->[1] <+fetch> [variable] ok 3640 - our @x; local @x; use strict; exists $x[0]->[1] <+fetch> [exception] ok 3641 - our @x; local @x; use strict; exists $x[0]->[1] <+fetch> [return] ok 3642 - our @x; local @x; use strict; exists $x[0]->[1] <+fetch> [variable] ok 3643 - our @x; local @x; no strict; exists $x[0]->[1] <+fetch> [exception] ok 3644 - our @x; local @x; no strict; exists $x[0]->[1] <+fetch> [return] ok 3645 - our @x; local @x; no strict; exists $x[0]->[1] <+fetch> [variable] ok 3646 - my $x; exists $x->[0]->[1] <+exists> [exception] ok 3647 - my $x; exists $x->[0]->[1] <+exists> [return] ok 3648 - my $x; exists $x->[0]->[1] <+exists> [variable] ok 3649 - our $x; local $x; use strict; exists $x->[0]->[1] <+exists> [exception] ok 3650 - our $x; local $x; use strict; exists $x->[0]->[1] <+exists> [return] ok 3651 - our $x; local $x; use strict; exists $x->[0]->[1] <+exists> [variable] ok 3652 - our $x; local $x; no strict; exists $x->[0]->[1] <+exists> [exception] ok 3653 - our $x; local $x; no strict; exists $x->[0]->[1] <+exists> [return] ok 3654 - our $x; local $x; no strict; exists $x->[0]->[1] <+exists> [variable] ok 3655 - my $x; exists $$x[0]->[1] <+exists> [exception] ok 3656 - my $x; exists $$x[0]->[1] <+exists> [return] ok 3657 - my $x; exists $$x[0]->[1] <+exists> [variable] ok 3658 - our $x; local $x; use strict; exists $$x[0]->[1] <+exists> [exception] ok 3659 - our $x; local $x; use strict; exists $$x[0]->[1] <+exists> [return] ok 3660 - our $x; local $x; use strict; exists $$x[0]->[1] <+exists> [variable] ok 3661 - our $x; local $x; no strict; exists $$x[0]->[1] <+exists> [exception] ok 3662 - our $x; local $x; no strict; exists $$x[0]->[1] <+exists> [return] ok 3663 - our $x; local $x; no strict; exists $$x[0]->[1] <+exists> [variable] ok 3664 - my @x; exists $x[0]->[1] <+exists> [exception] ok 3665 - my @x; exists $x[0]->[1] <+exists> [return] ok 3666 - my @x; exists $x[0]->[1] <+exists> [variable] ok 3667 - our @x; local @x; use strict; exists $x[0]->[1] <+exists> [exception] ok 3668 - our @x; local @x; use strict; exists $x[0]->[1] <+exists> [return] ok 3669 - our @x; local @x; use strict; exists $x[0]->[1] <+exists> [variable] ok 3670 - our @x; local @x; no strict; exists $x[0]->[1] <+exists> [exception] ok 3671 - our @x; local @x; no strict; exists $x[0]->[1] <+exists> [return] ok 3672 - our @x; local @x; no strict; exists $x[0]->[1] <+exists> [variable] ok 3673 - my $x; exists $x->[0]->[1] <+delete> [exception] ok 3674 - my $x; exists $x->[0]->[1] <+delete> [return] ok 3675 - my $x; exists $x->[0]->[1] <+delete> [variable] ok 3676 - our $x; local $x; use strict; exists $x->[0]->[1] <+delete> [exception] ok 3677 - our $x; local $x; use strict; exists $x->[0]->[1] <+delete> [return] ok 3678 - our $x; local $x; use strict; exists $x->[0]->[1] <+delete> [variable] ok 3679 - our $x; local $x; no strict; exists $x->[0]->[1] <+delete> [exception] ok 3680 - our $x; local $x; no strict; exists $x->[0]->[1] <+delete> [return] ok 3681 - our $x; local $x; no strict; exists $x->[0]->[1] <+delete> [variable] ok 3682 - my $x; exists $$x[0]->[1] <+delete> [exception] ok 3683 - my $x; exists $$x[0]->[1] <+delete> [return] ok 3684 - my $x; exists $$x[0]->[1] <+delete> [variable] ok 3685 - our $x; local $x; use strict; exists $$x[0]->[1] <+delete> [exception] ok 3686 - our $x; local $x; use strict; exists $$x[0]->[1] <+delete> [return] ok 3687 - our $x; local $x; use strict; exists $$x[0]->[1] <+delete> [variable] ok 3688 - our $x; local $x; no strict; exists $$x[0]->[1] <+delete> [exception] ok 3689 - our $x; local $x; no strict; exists $$x[0]->[1] <+delete> [return] ok 3690 - our $x; local $x; no strict; exists $$x[0]->[1] <+delete> [variable] ok 3691 - my @x; exists $x[0]->[1] <+delete> [exception] ok 3692 - my @x; exists $x[0]->[1] <+delete> [return] ok 3693 - my @x; exists $x[0]->[1] <+delete> [variable] ok 3694 - our @x; local @x; use strict; exists $x[0]->[1] <+delete> [exception] ok 3695 - our @x; local @x; use strict; exists $x[0]->[1] <+delete> [return] ok 3696 - our @x; local @x; use strict; exists $x[0]->[1] <+delete> [variable] ok 3697 - our @x; local @x; no strict; exists $x[0]->[1] <+delete> [exception] ok 3698 - our @x; local @x; no strict; exists $x[0]->[1] <+delete> [return] ok 3699 - our @x; local @x; no strict; exists $x[0]->[1] <+delete> [variable] ok 3700 - my $x; exists $x->[0]->[1] <+store> [exception] ok 3701 - my $x; exists $x->[0]->[1] <+store> [return] ok 3702 - my $x; exists $x->[0]->[1] <+store> [variable] ok 3703 - our $x; local $x; use strict; exists $x->[0]->[1] <+store> [exception] ok 3704 - our $x; local $x; use strict; exists $x->[0]->[1] <+store> [return] ok 3705 - our $x; local $x; use strict; exists $x->[0]->[1] <+store> [variable] ok 3706 - our $x; local $x; no strict; exists $x->[0]->[1] <+store> [exception] ok 3707 - our $x; local $x; no strict; exists $x->[0]->[1] <+store> [return] ok 3708 - our $x; local $x; no strict; exists $x->[0]->[1] <+store> [variable] ok 3709 - my $x; exists $$x[0]->[1] <+store> [exception] ok 3710 - my $x; exists $$x[0]->[1] <+store> [return] ok 3711 - my $x; exists $$x[0]->[1] <+store> [variable] ok 3712 - our $x; local $x; use strict; exists $$x[0]->[1] <+store> [exception] ok 3713 - our $x; local $x; use strict; exists $$x[0]->[1] <+store> [return] ok 3714 - our $x; local $x; use strict; exists $$x[0]->[1] <+store> [variable] ok 3715 - our $x; local $x; no strict; exists $$x[0]->[1] <+store> [exception] ok 3716 - our $x; local $x; no strict; exists $$x[0]->[1] <+store> [return] ok 3717 - our $x; local $x; no strict; exists $$x[0]->[1] <+store> [variable] ok 3718 - my @x; exists $x[0]->[1] <+store> [exception] ok 3719 - my @x; exists $x[0]->[1] <+store> [return] ok 3720 - my @x; exists $x[0]->[1] <+store> [variable] ok 3721 - our @x; local @x; use strict; exists $x[0]->[1] <+store> [exception] ok 3722 - our @x; local @x; use strict; exists $x[0]->[1] <+store> [return] ok 3723 - our @x; local @x; use strict; exists $x[0]->[1] <+store> [variable] ok 3724 - our @x; local @x; no strict; exists $x[0]->[1] <+store> [exception] ok 3725 - our @x; local @x; no strict; exists $x[0]->[1] <+store> [return] ok 3726 - our @x; local @x; no strict; exists $x[0]->[1] <+store> [variable] ok 3727 - my $x; exists $x->[0]->[1] <+strict +fetch> [exception] ok 3728 - my $x; exists $x->[0]->[1] <+strict +fetch> [return] ok 3729 - my $x; exists $x->[0]->[1] <+strict +fetch> [variable] ok 3730 - our $x; local $x; use strict; exists $x->[0]->[1] <+strict +fetch> [exception] ok 3731 - our $x; local $x; use strict; exists $x->[0]->[1] <+strict +fetch> [return] ok 3732 - our $x; local $x; use strict; exists $x->[0]->[1] <+strict +fetch> [variable] ok 3733 - our $x; local $x; no strict; exists $x->[0]->[1] <+strict +fetch> [exception] ok 3734 - our $x; local $x; no strict; exists $x->[0]->[1] <+strict +fetch> [return] ok 3735 - our $x; local $x; no strict; exists $x->[0]->[1] <+strict +fetch> [variable] ok 3736 - my $x; exists $$x[0]->[1] <+strict +fetch> [exception] ok 3737 - my $x; exists $$x[0]->[1] <+strict +fetch> [return] ok 3738 - my $x; exists $$x[0]->[1] <+strict +fetch> [variable] ok 3739 - our $x; local $x; use strict; exists $$x[0]->[1] <+strict +fetch> [exception] ok 3740 - our $x; local $x; use strict; exists $$x[0]->[1] <+strict +fetch> [return] ok 3741 - our $x; local $x; use strict; exists $$x[0]->[1] <+strict +fetch> [variable] ok 3742 - our $x; local $x; no strict; exists $$x[0]->[1] <+strict +fetch> [exception] ok 3743 - our $x; local $x; no strict; exists $$x[0]->[1] <+strict +fetch> [return] ok 3744 - our $x; local $x; no strict; exists $$x[0]->[1] <+strict +fetch> [variable] ok 3745 - my @x; exists $x[0]->[1] <+strict +fetch> [exception] ok 3746 - my @x; exists $x[0]->[1] <+strict +fetch> [return] ok 3747 - my @x; exists $x[0]->[1] <+strict +fetch> [variable] ok 3748 - our @x; local @x; use strict; exists $x[0]->[1] <+strict +fetch> [exception] ok 3749 - our @x; local @x; use strict; exists $x[0]->[1] <+strict +fetch> [return] ok 3750 - our @x; local @x; use strict; exists $x[0]->[1] <+strict +fetch> [variable] ok 3751 - our @x; local @x; no strict; exists $x[0]->[1] <+strict +fetch> [exception] ok 3752 - our @x; local @x; no strict; exists $x[0]->[1] <+strict +fetch> [return] ok 3753 - our @x; local @x; no strict; exists $x[0]->[1] <+strict +fetch> [variable] ok 3754 - my $x; exists $x->[0]->[1] <+strict +exists> [exception] ok 3755 - my $x; exists $x->[0]->[1] <+strict +exists> [return] ok 3756 - my $x; exists $x->[0]->[1] <+strict +exists> [variable] ok 3757 - our $x; local $x; use strict; exists $x->[0]->[1] <+strict +exists> [exception] ok 3758 - our $x; local $x; use strict; exists $x->[0]->[1] <+strict +exists> [return] ok 3759 - our $x; local $x; use strict; exists $x->[0]->[1] <+strict +exists> [variable] ok 3760 - our $x; local $x; no strict; exists $x->[0]->[1] <+strict +exists> [exception] ok 3761 - our $x; local $x; no strict; exists $x->[0]->[1] <+strict +exists> [return] ok 3762 - our $x; local $x; no strict; exists $x->[0]->[1] <+strict +exists> [variable] ok 3763 - my $x; exists $$x[0]->[1] <+strict +exists> [exception] ok 3764 - my $x; exists $$x[0]->[1] <+strict +exists> [return] ok 3765 - my $x; exists $$x[0]->[1] <+strict +exists> [variable] ok 3766 - our $x; local $x; use strict; exists $$x[0]->[1] <+strict +exists> [exception] ok 3767 - our $x; local $x; use strict; exists $$x[0]->[1] <+strict +exists> [return] ok 3768 - our $x; local $x; use strict; exists $$x[0]->[1] <+strict +exists> [variable] ok 3769 - our $x; local $x; no strict; exists $$x[0]->[1] <+strict +exists> [exception] ok 3770 - our $x; local $x; no strict; exists $$x[0]->[1] <+strict +exists> [return] ok 3771 - our $x; local $x; no strict; exists $$x[0]->[1] <+strict +exists> [variable] ok 3772 - my @x; exists $x[0]->[1] <+strict +exists> [exception] ok 3773 - my @x; exists $x[0]->[1] <+strict +exists> [return] ok 3774 - my @x; exists $x[0]->[1] <+strict +exists> [variable] ok 3775 - our @x; local @x; use strict; exists $x[0]->[1] <+strict +exists> [exception] ok 3776 - our @x; local @x; use strict; exists $x[0]->[1] <+strict +exists> [return] ok 3777 - our @x; local @x; use strict; exists $x[0]->[1] <+strict +exists> [variable] ok 3778 - our @x; local @x; no strict; exists $x[0]->[1] <+strict +exists> [exception] ok 3779 - our @x; local @x; no strict; exists $x[0]->[1] <+strict +exists> [return] ok 3780 - our @x; local @x; no strict; exists $x[0]->[1] <+strict +exists> [variable] ok 3781 - my $x; exists $x->[0]->[1] <+strict +delete> [exception] ok 3782 - my $x; exists $x->[0]->[1] <+strict +delete> [return] ok 3783 - my $x; exists $x->[0]->[1] <+strict +delete> [variable] ok 3784 - our $x; local $x; use strict; exists $x->[0]->[1] <+strict +delete> [exception] ok 3785 - our $x; local $x; use strict; exists $x->[0]->[1] <+strict +delete> [return] ok 3786 - our $x; local $x; use strict; exists $x->[0]->[1] <+strict +delete> [variable] ok 3787 - our $x; local $x; no strict; exists $x->[0]->[1] <+strict +delete> [exception] ok 3788 - our $x; local $x; no strict; exists $x->[0]->[1] <+strict +delete> [return] ok 3789 - our $x; local $x; no strict; exists $x->[0]->[1] <+strict +delete> [variable] ok 3790 - my $x; exists $$x[0]->[1] <+strict +delete> [exception] ok 3791 - my $x; exists $$x[0]->[1] <+strict +delete> [return] ok 3792 - my $x; exists $$x[0]->[1] <+strict +delete> [variable] ok 3793 - our $x; local $x; use strict; exists $$x[0]->[1] <+strict +delete> [exception] ok 3794 - our $x; local $x; use strict; exists $$x[0]->[1] <+strict +delete> [return] ok 3795 - our $x; local $x; use strict; exists $$x[0]->[1] <+strict +delete> [variable] ok 3796 - our $x; local $x; no strict; exists $$x[0]->[1] <+strict +delete> [exception] ok 3797 - our $x; local $x; no strict; exists $$x[0]->[1] <+strict +delete> [return] ok 3798 - our $x; local $x; no strict; exists $$x[0]->[1] <+strict +delete> [variable] ok 3799 - my @x; exists $x[0]->[1] <+strict +delete> [exception] ok 3800 - my @x; exists $x[0]->[1] <+strict +delete> [return] ok 3801 - my @x; exists $x[0]->[1] <+strict +delete> [variable] ok 3802 - our @x; local @x; use strict; exists $x[0]->[1] <+strict +delete> [exception] ok 3803 - our @x; local @x; use strict; exists $x[0]->[1] <+strict +delete> [return] ok 3804 - our @x; local @x; use strict; exists $x[0]->[1] <+strict +delete> [variable] ok 3805 - our @x; local @x; no strict; exists $x[0]->[1] <+strict +delete> [exception] ok 3806 - our @x; local @x; no strict; exists $x[0]->[1] <+strict +delete> [return] ok 3807 - our @x; local @x; no strict; exists $x[0]->[1] <+strict +delete> [variable] ok 3808 - my $x; exists $x->[0]->[1] <+strict +store> [exception] ok 3809 - my $x; exists $x->[0]->[1] <+strict +store> [return] ok 3810 - my $x; exists $x->[0]->[1] <+strict +store> [variable] ok 3811 - our $x; local $x; use strict; exists $x->[0]->[1] <+strict +store> [exception] ok 3812 - our $x; local $x; use strict; exists $x->[0]->[1] <+strict +store> [return] ok 3813 - our $x; local $x; use strict; exists $x->[0]->[1] <+strict +store> [variable] ok 3814 - our $x; local $x; no strict; exists $x->[0]->[1] <+strict +store> [exception] ok 3815 - our $x; local $x; no strict; exists $x->[0]->[1] <+strict +store> [return] ok 3816 - our $x; local $x; no strict; exists $x->[0]->[1] <+strict +store> [variable] ok 3817 - my $x; exists $$x[0]->[1] <+strict +store> [exception] ok 3818 - my $x; exists $$x[0]->[1] <+strict +store> [return] ok 3819 - my $x; exists $$x[0]->[1] <+strict +store> [variable] ok 3820 - our $x; local $x; use strict; exists $$x[0]->[1] <+strict +store> [exception] ok 3821 - our $x; local $x; use strict; exists $$x[0]->[1] <+strict +store> [return] ok 3822 - our $x; local $x; use strict; exists $$x[0]->[1] <+strict +store> [variable] ok 3823 - our $x; local $x; no strict; exists $$x[0]->[1] <+strict +store> [exception] ok 3824 - our $x; local $x; no strict; exists $$x[0]->[1] <+strict +store> [return] ok 3825 - our $x; local $x; no strict; exists $$x[0]->[1] <+strict +store> [variable] ok 3826 - my @x; exists $x[0]->[1] <+strict +store> [exception] ok 3827 - my @x; exists $x[0]->[1] <+strict +store> [return] ok 3828 - my @x; exists $x[0]->[1] <+strict +store> [variable] ok 3829 - our @x; local @x; use strict; exists $x[0]->[1] <+strict +store> [exception] ok 3830 - our @x; local @x; use strict; exists $x[0]->[1] <+strict +store> [return] ok 3831 - our @x; local @x; use strict; exists $x[0]->[1] <+strict +store> [variable] ok 3832 - our @x; local @x; no strict; exists $x[0]->[1] <+strict +store> [exception] ok 3833 - our @x; local @x; no strict; exists $x[0]->[1] <+strict +store> [return] ok 3834 - our @x; local @x; no strict; exists $x[0]->[1] <+strict +store> [variable] ok 3835 - my $x; $x->[0] = 1; exists $x->[0] <+fetch> [exception] ok 3836 - my $x; $x->[0] = 1; exists $x->[0] <+fetch> [return] ok 3837 - my $x; $x->[0] = 1; exists $x->[0] <+fetch> [variable] ok 3838 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+fetch> [exception] ok 3839 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+fetch> [return] ok 3840 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+fetch> [variable] ok 3841 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+fetch> [exception] ok 3842 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+fetch> [return] ok 3843 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+fetch> [variable] ok 3844 - my $x; $x->[0] = 1; exists $$x[0] <+fetch> [exception] ok 3845 - my $x; $x->[0] = 1; exists $$x[0] <+fetch> [return] ok 3846 - my $x; $x->[0] = 1; exists $$x[0] <+fetch> [variable] ok 3847 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+fetch> [exception] ok 3848 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+fetch> [return] ok 3849 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+fetch> [variable] ok 3850 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+fetch> [exception] ok 3851 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+fetch> [return] ok 3852 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+fetch> [variable] ok 3853 - my @x; $x[0] = 1; exists $x[0] <+fetch> [exception] ok 3854 - my @x; $x[0] = 1; exists $x[0] <+fetch> [return] ok 3855 - my @x; $x[0] = 1; exists $x[0] <+fetch> [variable] ok 3856 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+fetch> [exception] ok 3857 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+fetch> [return] ok 3858 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+fetch> [variable] ok 3859 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+fetch> [exception] ok 3860 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+fetch> [return] ok 3861 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+fetch> [variable] ok 3862 - my $x; $x->[0] = 1; exists $x->[1] <+fetch> [exception] ok 3863 - my $x; $x->[0] = 1; exists $x->[1] <+fetch> [return] ok 3864 - my $x; $x->[0] = 1; exists $x->[1] <+fetch> [variable] ok 3865 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+fetch> [exception] ok 3866 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+fetch> [return] ok 3867 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+fetch> [variable] ok 3868 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+fetch> [exception] ok 3869 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+fetch> [return] ok 3870 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+fetch> [variable] ok 3871 - my $x; $x->[0] = 1; exists $$x[1] <+fetch> [exception] ok 3872 - my $x; $x->[0] = 1; exists $$x[1] <+fetch> [return] ok 3873 - my $x; $x->[0] = 1; exists $$x[1] <+fetch> [variable] ok 3874 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+fetch> [exception] ok 3875 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+fetch> [return] ok 3876 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+fetch> [variable] ok 3877 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+fetch> [exception] ok 3878 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+fetch> [return] ok 3879 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+fetch> [variable] ok 3880 - my @x; $x[0] = 1; exists $x[1] <+fetch> [exception] ok 3881 - my @x; $x[0] = 1; exists $x[1] <+fetch> [return] ok 3882 - my @x; $x[0] = 1; exists $x[1] <+fetch> [variable] ok 3883 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+fetch> [exception] ok 3884 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+fetch> [return] ok 3885 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+fetch> [variable] ok 3886 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+fetch> [exception] ok 3887 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+fetch> [return] ok 3888 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+fetch> [variable] ok 3889 - my $x; $x->[0] = 1; exists $x->[0] <+exists> [exception] ok 3890 - my $x; $x->[0] = 1; exists $x->[0] <+exists> [return] ok 3891 - my $x; $x->[0] = 1; exists $x->[0] <+exists> [variable] ok 3892 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+exists> [exception] ok 3893 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+exists> [return] ok 3894 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+exists> [variable] ok 3895 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+exists> [exception] ok 3896 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+exists> [return] ok 3897 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+exists> [variable] ok 3898 - my $x; $x->[0] = 1; exists $$x[0] <+exists> [exception] ok 3899 - my $x; $x->[0] = 1; exists $$x[0] <+exists> [return] ok 3900 - my $x; $x->[0] = 1; exists $$x[0] <+exists> [variable] ok 3901 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+exists> [exception] ok 3902 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+exists> [return] ok 3903 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+exists> [variable] ok 3904 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+exists> [exception] ok 3905 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+exists> [return] ok 3906 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+exists> [variable] ok 3907 - my @x; $x[0] = 1; exists $x[0] <+exists> [exception] ok 3908 - my @x; $x[0] = 1; exists $x[0] <+exists> [return] ok 3909 - my @x; $x[0] = 1; exists $x[0] <+exists> [variable] ok 3910 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+exists> [exception] ok 3911 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+exists> [return] ok 3912 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+exists> [variable] ok 3913 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+exists> [exception] ok 3914 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+exists> [return] ok 3915 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+exists> [variable] ok 3916 - my $x; $x->[0] = 1; exists $x->[1] <+exists> [exception] ok 3917 - my $x; $x->[0] = 1; exists $x->[1] <+exists> [return] ok 3918 - my $x; $x->[0] = 1; exists $x->[1] <+exists> [variable] ok 3919 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+exists> [exception] ok 3920 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+exists> [return] ok 3921 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+exists> [variable] ok 3922 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+exists> [exception] ok 3923 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+exists> [return] ok 3924 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+exists> [variable] ok 3925 - my $x; $x->[0] = 1; exists $$x[1] <+exists> [exception] ok 3926 - my $x; $x->[0] = 1; exists $$x[1] <+exists> [return] ok 3927 - my $x; $x->[0] = 1; exists $$x[1] <+exists> [variable] ok 3928 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+exists> [exception] ok 3929 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+exists> [return] ok 3930 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+exists> [variable] ok 3931 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+exists> [exception] ok 3932 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+exists> [return] ok 3933 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+exists> [variable] ok 3934 - my @x; $x[0] = 1; exists $x[1] <+exists> [exception] ok 3935 - my @x; $x[0] = 1; exists $x[1] <+exists> [return] ok 3936 - my @x; $x[0] = 1; exists $x[1] <+exists> [variable] ok 3937 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+exists> [exception] ok 3938 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+exists> [return] ok 3939 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+exists> [variable] ok 3940 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+exists> [exception] ok 3941 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+exists> [return] ok 3942 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+exists> [variable] ok 3943 - my $x; $x->[0] = 1; exists $x->[0] <+delete> [exception] ok 3944 - my $x; $x->[0] = 1; exists $x->[0] <+delete> [return] ok 3945 - my $x; $x->[0] = 1; exists $x->[0] <+delete> [variable] ok 3946 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+delete> [exception] ok 3947 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+delete> [return] ok 3948 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+delete> [variable] ok 3949 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+delete> [exception] ok 3950 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+delete> [return] ok 3951 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+delete> [variable] ok 3952 - my $x; $x->[0] = 1; exists $$x[0] <+delete> [exception] ok 3953 - my $x; $x->[0] = 1; exists $$x[0] <+delete> [return] ok 3954 - my $x; $x->[0] = 1; exists $$x[0] <+delete> [variable] ok 3955 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+delete> [exception] ok 3956 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+delete> [return] ok 3957 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+delete> [variable] ok 3958 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+delete> [exception] ok 3959 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+delete> [return] ok 3960 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+delete> [variable] ok 3961 - my @x; $x[0] = 1; exists $x[0] <+delete> [exception] ok 3962 - my @x; $x[0] = 1; exists $x[0] <+delete> [return] ok 3963 - my @x; $x[0] = 1; exists $x[0] <+delete> [variable] ok 3964 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+delete> [exception] ok 3965 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+delete> [return] ok 3966 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+delete> [variable] ok 3967 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+delete> [exception] ok 3968 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+delete> [return] ok 3969 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+delete> [variable] ok 3970 - my $x; $x->[0] = 1; exists $x->[1] <+delete> [exception] ok 3971 - my $x; $x->[0] = 1; exists $x->[1] <+delete> [return] ok 3972 - my $x; $x->[0] = 1; exists $x->[1] <+delete> [variable] ok 3973 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+delete> [exception] ok 3974 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+delete> [return] ok 3975 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+delete> [variable] ok 3976 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+delete> [exception] ok 3977 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+delete> [return] ok 3978 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+delete> [variable] ok 3979 - my $x; $x->[0] = 1; exists $$x[1] <+delete> [exception] ok 3980 - my $x; $x->[0] = 1; exists $$x[1] <+delete> [return] ok 3981 - my $x; $x->[0] = 1; exists $$x[1] <+delete> [variable] ok 3982 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+delete> [exception] ok 3983 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+delete> [return] ok 3984 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+delete> [variable] ok 3985 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+delete> [exception] ok 3986 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+delete> [return] ok 3987 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+delete> [variable] ok 3988 - my @x; $x[0] = 1; exists $x[1] <+delete> [exception] ok 3989 - my @x; $x[0] = 1; exists $x[1] <+delete> [return] ok 3990 - my @x; $x[0] = 1; exists $x[1] <+delete> [variable] ok 3991 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+delete> [exception] ok 3992 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+delete> [return] ok 3993 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+delete> [variable] ok 3994 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+delete> [exception] ok 3995 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+delete> [return] ok 3996 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+delete> [variable] ok 3997 - my $x; $x->[0] = 1; exists $x->[0] <+store> [exception] ok 3998 - my $x; $x->[0] = 1; exists $x->[0] <+store> [return] ok 3999 - my $x; $x->[0] = 1; exists $x->[0] <+store> [variable] ok 4000 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+store> [exception] ok 4001 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+store> [return] ok 4002 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+store> [variable] ok 4003 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+store> [exception] ok 4004 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+store> [return] ok 4005 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+store> [variable] ok 4006 - my $x; $x->[0] = 1; exists $$x[0] <+store> [exception] ok 4007 - my $x; $x->[0] = 1; exists $$x[0] <+store> [return] ok 4008 - my $x; $x->[0] = 1; exists $$x[0] <+store> [variable] ok 4009 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+store> [exception] ok 4010 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+store> [return] ok 4011 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+store> [variable] ok 4012 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+store> [exception] ok 4013 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+store> [return] ok 4014 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+store> [variable] ok 4015 - my @x; $x[0] = 1; exists $x[0] <+store> [exception] ok 4016 - my @x; $x[0] = 1; exists $x[0] <+store> [return] ok 4017 - my @x; $x[0] = 1; exists $x[0] <+store> [variable] ok 4018 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+store> [exception] ok 4019 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+store> [return] ok 4020 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+store> [variable] ok 4021 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+store> [exception] ok 4022 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+store> [return] ok 4023 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+store> [variable] ok 4024 - my $x; $x->[0] = 1; exists $x->[1] <+store> [exception] ok 4025 - my $x; $x->[0] = 1; exists $x->[1] <+store> [return] ok 4026 - my $x; $x->[0] = 1; exists $x->[1] <+store> [variable] ok 4027 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+store> [exception] ok 4028 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+store> [return] ok 4029 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+store> [variable] ok 4030 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+store> [exception] ok 4031 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+store> [return] ok 4032 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+store> [variable] ok 4033 - my $x; $x->[0] = 1; exists $$x[1] <+store> [exception] ok 4034 - my $x; $x->[0] = 1; exists $$x[1] <+store> [return] ok 4035 - my $x; $x->[0] = 1; exists $$x[1] <+store> [variable] ok 4036 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+store> [exception] ok 4037 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+store> [return] ok 4038 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+store> [variable] ok 4039 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+store> [exception] ok 4040 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+store> [return] ok 4041 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+store> [variable] ok 4042 - my @x; $x[0] = 1; exists $x[1] <+store> [exception] ok 4043 - my @x; $x[0] = 1; exists $x[1] <+store> [return] ok 4044 - my @x; $x[0] = 1; exists $x[1] <+store> [variable] ok 4045 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+store> [exception] ok 4046 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+store> [return] ok 4047 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+store> [variable] ok 4048 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+store> [exception] ok 4049 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+store> [return] ok 4050 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+store> [variable] ok 4051 - my $x; $x->[0] = 1; exists $x->[0] <+strict +fetch> [exception] ok 4052 - my $x; $x->[0] = 1; exists $x->[0] <+strict +fetch> [return] ok 4053 - my $x; $x->[0] = 1; exists $x->[0] <+strict +fetch> [variable] ok 4054 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+strict +fetch> [exception] ok 4055 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+strict +fetch> [return] ok 4056 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+strict +fetch> [variable] ok 4057 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+strict +fetch> [exception] ok 4058 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+strict +fetch> [return] ok 4059 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+strict +fetch> [variable] ok 4060 - my $x; $x->[0] = 1; exists $$x[0] <+strict +fetch> [exception] ok 4061 - my $x; $x->[0] = 1; exists $$x[0] <+strict +fetch> [return] ok 4062 - my $x; $x->[0] = 1; exists $$x[0] <+strict +fetch> [variable] ok 4063 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+strict +fetch> [exception] ok 4064 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+strict +fetch> [return] ok 4065 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+strict +fetch> [variable] ok 4066 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+strict +fetch> [exception] ok 4067 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+strict +fetch> [return] ok 4068 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+strict +fetch> [variable] ok 4069 - my @x; $x[0] = 1; exists $x[0] <+strict +fetch> [exception] ok 4070 - my @x; $x[0] = 1; exists $x[0] <+strict +fetch> [return] ok 4071 - my @x; $x[0] = 1; exists $x[0] <+strict +fetch> [variable] ok 4072 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+strict +fetch> [exception] ok 4073 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+strict +fetch> [return] ok 4074 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+strict +fetch> [variable] ok 4075 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+strict +fetch> [exception] ok 4076 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+strict +fetch> [return] ok 4077 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+strict +fetch> [variable] ok 4078 - my $x; $x->[0] = 1; exists $x->[1] <+strict +fetch> [exception] ok 4079 - my $x; $x->[0] = 1; exists $x->[1] <+strict +fetch> [return] ok 4080 - my $x; $x->[0] = 1; exists $x->[1] <+strict +fetch> [variable] ok 4081 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+strict +fetch> [exception] ok 4082 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+strict +fetch> [return] ok 4083 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+strict +fetch> [variable] ok 4084 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+strict +fetch> [exception] ok 4085 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+strict +fetch> [return] ok 4086 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+strict +fetch> [variable] ok 4087 - my $x; $x->[0] = 1; exists $$x[1] <+strict +fetch> [exception] ok 4088 - my $x; $x->[0] = 1; exists $$x[1] <+strict +fetch> [return] ok 4089 - my $x; $x->[0] = 1; exists $$x[1] <+strict +fetch> [variable] ok 4090 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+strict +fetch> [exception] ok 4091 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+strict +fetch> [return] ok 4092 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+strict +fetch> [variable] ok 4093 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+strict +fetch> [exception] ok 4094 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+strict +fetch> [return] ok 4095 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+strict +fetch> [variable] ok 4096 - my @x; $x[0] = 1; exists $x[1] <+strict +fetch> [exception] ok 4097 - my @x; $x[0] = 1; exists $x[1] <+strict +fetch> [return] ok 4098 - my @x; $x[0] = 1; exists $x[1] <+strict +fetch> [variable] ok 4099 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+strict +fetch> [exception] ok 4100 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+strict +fetch> [return] ok 4101 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+strict +fetch> [variable] ok 4102 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+strict +fetch> [exception] ok 4103 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+strict +fetch> [return] ok 4104 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+strict +fetch> [variable] ok 4105 - my $x; $x->[0] = 1; exists $x->[0] <+strict +exists> [exception] ok 4106 - my $x; $x->[0] = 1; exists $x->[0] <+strict +exists> [return] ok 4107 - my $x; $x->[0] = 1; exists $x->[0] <+strict +exists> [variable] ok 4108 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+strict +exists> [exception] ok 4109 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+strict +exists> [return] ok 4110 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+strict +exists> [variable] ok 4111 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+strict +exists> [exception] ok 4112 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+strict +exists> [return] ok 4113 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+strict +exists> [variable] ok 4114 - my $x; $x->[0] = 1; exists $$x[0] <+strict +exists> [exception] ok 4115 - my $x; $x->[0] = 1; exists $$x[0] <+strict +exists> [return] ok 4116 - my $x; $x->[0] = 1; exists $$x[0] <+strict +exists> [variable] ok 4117 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+strict +exists> [exception] ok 4118 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+strict +exists> [return] ok 4119 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+strict +exists> [variable] ok 4120 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+strict +exists> [exception] ok 4121 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+strict +exists> [return] ok 4122 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+strict +exists> [variable] ok 4123 - my @x; $x[0] = 1; exists $x[0] <+strict +exists> [exception] ok 4124 - my @x; $x[0] = 1; exists $x[0] <+strict +exists> [return] ok 4125 - my @x; $x[0] = 1; exists $x[0] <+strict +exists> [variable] ok 4126 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+strict +exists> [exception] ok 4127 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+strict +exists> [return] ok 4128 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+strict +exists> [variable] ok 4129 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+strict +exists> [exception] ok 4130 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+strict +exists> [return] ok 4131 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+strict +exists> [variable] ok 4132 - my $x; $x->[0] = 1; exists $x->[1] <+strict +exists> [exception] ok 4133 - my $x; $x->[0] = 1; exists $x->[1] <+strict +exists> [return] ok 4134 - my $x; $x->[0] = 1; exists $x->[1] <+strict +exists> [variable] ok 4135 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+strict +exists> [exception] ok 4136 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+strict +exists> [return] ok 4137 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+strict +exists> [variable] ok 4138 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+strict +exists> [exception] ok 4139 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+strict +exists> [return] ok 4140 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+strict +exists> [variable] ok 4141 - my $x; $x->[0] = 1; exists $$x[1] <+strict +exists> [exception] ok 4142 - my $x; $x->[0] = 1; exists $$x[1] <+strict +exists> [return] ok 4143 - my $x; $x->[0] = 1; exists $$x[1] <+strict +exists> [variable] ok 4144 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+strict +exists> [exception] ok 4145 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+strict +exists> [return] ok 4146 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+strict +exists> [variable] ok 4147 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+strict +exists> [exception] ok 4148 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+strict +exists> [return] ok 4149 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+strict +exists> [variable] ok 4150 - my @x; $x[0] = 1; exists $x[1] <+strict +exists> [exception] ok 4151 - my @x; $x[0] = 1; exists $x[1] <+strict +exists> [return] ok 4152 - my @x; $x[0] = 1; exists $x[1] <+strict +exists> [variable] ok 4153 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+strict +exists> [exception] ok 4154 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+strict +exists> [return] ok 4155 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+strict +exists> [variable] ok 4156 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+strict +exists> [exception] ok 4157 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+strict +exists> [return] ok 4158 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+strict +exists> [variable] ok 4159 - my $x; $x->[0] = 1; exists $x->[0] <+strict +delete> [exception] ok 4160 - my $x; $x->[0] = 1; exists $x->[0] <+strict +delete> [return] ok 4161 - my $x; $x->[0] = 1; exists $x->[0] <+strict +delete> [variable] ok 4162 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+strict +delete> [exception] ok 4163 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+strict +delete> [return] ok 4164 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+strict +delete> [variable] ok 4165 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+strict +delete> [exception] ok 4166 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+strict +delete> [return] ok 4167 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+strict +delete> [variable] ok 4168 - my $x; $x->[0] = 1; exists $$x[0] <+strict +delete> [exception] ok 4169 - my $x; $x->[0] = 1; exists $$x[0] <+strict +delete> [return] ok 4170 - my $x; $x->[0] = 1; exists $$x[0] <+strict +delete> [variable] ok 4171 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+strict +delete> [exception] ok 4172 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+strict +delete> [return] ok 4173 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+strict +delete> [variable] ok 4174 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+strict +delete> [exception] ok 4175 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+strict +delete> [return] ok 4176 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+strict +delete> [variable] ok 4177 - my @x; $x[0] = 1; exists $x[0] <+strict +delete> [exception] ok 4178 - my @x; $x[0] = 1; exists $x[0] <+strict +delete> [return] ok 4179 - my @x; $x[0] = 1; exists $x[0] <+strict +delete> [variable] ok 4180 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+strict +delete> [exception] ok 4181 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+strict +delete> [return] ok 4182 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+strict +delete> [variable] ok 4183 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+strict +delete> [exception] ok 4184 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+strict +delete> [return] ok 4185 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+strict +delete> [variable] ok 4186 - my $x; $x->[0] = 1; exists $x->[1] <+strict +delete> [exception] ok 4187 - my $x; $x->[0] = 1; exists $x->[1] <+strict +delete> [return] ok 4188 - my $x; $x->[0] = 1; exists $x->[1] <+strict +delete> [variable] ok 4189 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+strict +delete> [exception] ok 4190 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+strict +delete> [return] ok 4191 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+strict +delete> [variable] ok 4192 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+strict +delete> [exception] ok 4193 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+strict +delete> [return] ok 4194 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+strict +delete> [variable] ok 4195 - my $x; $x->[0] = 1; exists $$x[1] <+strict +delete> [exception] ok 4196 - my $x; $x->[0] = 1; exists $$x[1] <+strict +delete> [return] ok 4197 - my $x; $x->[0] = 1; exists $$x[1] <+strict +delete> [variable] ok 4198 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+strict +delete> [exception] ok 4199 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+strict +delete> [return] ok 4200 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+strict +delete> [variable] ok 4201 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+strict +delete> [exception] ok 4202 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+strict +delete> [return] ok 4203 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+strict +delete> [variable] ok 4204 - my @x; $x[0] = 1; exists $x[1] <+strict +delete> [exception] ok 4205 - my @x; $x[0] = 1; exists $x[1] <+strict +delete> [return] ok 4206 - my @x; $x[0] = 1; exists $x[1] <+strict +delete> [variable] ok 4207 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+strict +delete> [exception] ok 4208 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+strict +delete> [return] ok 4209 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+strict +delete> [variable] ok 4210 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+strict +delete> [exception] ok 4211 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+strict +delete> [return] ok 4212 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+strict +delete> [variable] ok 4213 - my $x; $x->[0] = 1; exists $x->[0] <+strict +store> [exception] ok 4214 - my $x; $x->[0] = 1; exists $x->[0] <+strict +store> [return] ok 4215 - my $x; $x->[0] = 1; exists $x->[0] <+strict +store> [variable] ok 4216 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+strict +store> [exception] ok 4217 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+strict +store> [return] ok 4218 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[0] <+strict +store> [variable] ok 4219 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+strict +store> [exception] ok 4220 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+strict +store> [return] ok 4221 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[0] <+strict +store> [variable] ok 4222 - my $x; $x->[0] = 1; exists $$x[0] <+strict +store> [exception] ok 4223 - my $x; $x->[0] = 1; exists $$x[0] <+strict +store> [return] ok 4224 - my $x; $x->[0] = 1; exists $$x[0] <+strict +store> [variable] ok 4225 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+strict +store> [exception] ok 4226 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+strict +store> [return] ok 4227 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[0] <+strict +store> [variable] ok 4228 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+strict +store> [exception] ok 4229 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+strict +store> [return] ok 4230 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[0] <+strict +store> [variable] ok 4231 - my @x; $x[0] = 1; exists $x[0] <+strict +store> [exception] ok 4232 - my @x; $x[0] = 1; exists $x[0] <+strict +store> [return] ok 4233 - my @x; $x[0] = 1; exists $x[0] <+strict +store> [variable] ok 4234 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+strict +store> [exception] ok 4235 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+strict +store> [return] ok 4236 - our @x; local @x; use strict; $x[0] = 1; exists $x[0] <+strict +store> [variable] ok 4237 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+strict +store> [exception] ok 4238 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+strict +store> [return] ok 4239 - our @x; local @x; no strict; $x[0] = 1; exists $x[0] <+strict +store> [variable] ok 4240 - my $x; $x->[0] = 1; exists $x->[1] <+strict +store> [exception] ok 4241 - my $x; $x->[0] = 1; exists $x->[1] <+strict +store> [return] ok 4242 - my $x; $x->[0] = 1; exists $x->[1] <+strict +store> [variable] ok 4243 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+strict +store> [exception] ok 4244 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+strict +store> [return] ok 4245 - our $x; local $x; use strict; $x->[0] = 1; exists $x->[1] <+strict +store> [variable] ok 4246 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+strict +store> [exception] ok 4247 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+strict +store> [return] ok 4248 - our $x; local $x; no strict; $x->[0] = 1; exists $x->[1] <+strict +store> [variable] ok 4249 - my $x; $x->[0] = 1; exists $$x[1] <+strict +store> [exception] ok 4250 - my $x; $x->[0] = 1; exists $$x[1] <+strict +store> [return] ok 4251 - my $x; $x->[0] = 1; exists $$x[1] <+strict +store> [variable] ok 4252 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+strict +store> [exception] ok 4253 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+strict +store> [return] ok 4254 - our $x; local $x; use strict; $x->[0] = 1; exists $$x[1] <+strict +store> [variable] ok 4255 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+strict +store> [exception] ok 4256 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+strict +store> [return] ok 4257 - our $x; local $x; no strict; $x->[0] = 1; exists $$x[1] <+strict +store> [variable] ok 4258 - my @x; $x[0] = 1; exists $x[1] <+strict +store> [exception] ok 4259 - my @x; $x[0] = 1; exists $x[1] <+strict +store> [return] ok 4260 - my @x; $x[0] = 1; exists $x[1] <+strict +store> [variable] ok 4261 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+strict +store> [exception] ok 4262 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+strict +store> [return] ok 4263 - our @x; local @x; use strict; $x[0] = 1; exists $x[1] <+strict +store> [variable] ok 4264 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+strict +store> [exception] ok 4265 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+strict +store> [return] ok 4266 - our @x; local @x; no strict; $x[0] = 1; exists $x[1] <+strict +store> [variable] ok 4267 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+fetch> [exception] ok 4268 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+fetch> [return] ok 4269 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+fetch> [variable] ok 4270 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+fetch> [exception] ok 4271 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+fetch> [return] ok 4272 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+fetch> [variable] ok 4273 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+fetch> [exception] ok 4274 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+fetch> [return] ok 4275 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+fetch> [variable] ok 4276 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+fetch> [exception] ok 4277 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+fetch> [return] ok 4278 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+fetch> [variable] ok 4279 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+fetch> [exception] ok 4280 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+fetch> [return] ok 4281 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+fetch> [variable] ok 4282 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+fetch> [exception] ok 4283 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+fetch> [return] ok 4284 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+fetch> [variable] ok 4285 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+fetch> [exception] ok 4286 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+fetch> [return] ok 4287 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+fetch> [variable] ok 4288 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+fetch> [exception] ok 4289 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+fetch> [return] ok 4290 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+fetch> [variable] ok 4291 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+fetch> [exception] ok 4292 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+fetch> [return] ok 4293 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+fetch> [variable] ok 4294 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+fetch> [exception] ok 4295 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+fetch> [return] ok 4296 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+fetch> [variable] ok 4297 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+fetch> [exception] ok 4298 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+fetch> [return] ok 4299 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+fetch> [variable] ok 4300 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+fetch> [exception] ok 4301 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+fetch> [return] ok 4302 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+fetch> [variable] ok 4303 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+fetch> [exception] ok 4304 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+fetch> [return] ok 4305 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+fetch> [variable] ok 4306 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+fetch> [exception] ok 4307 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+fetch> [return] ok 4308 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+fetch> [variable] ok 4309 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+fetch> [exception] ok 4310 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+fetch> [return] ok 4311 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+fetch> [variable] ok 4312 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+fetch> [exception] ok 4313 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+fetch> [return] ok 4314 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+fetch> [variable] ok 4315 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+fetch> [exception] ok 4316 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+fetch> [return] ok 4317 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+fetch> [variable] ok 4318 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+fetch> [exception] ok 4319 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+fetch> [return] ok 4320 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+fetch> [variable] ok 4321 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+fetch> [exception] ok 4322 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+fetch> [return] ok 4323 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+fetch> [variable] ok 4324 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+fetch> [exception] ok 4325 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+fetch> [return] ok 4326 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+fetch> [variable] ok 4327 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+fetch> [exception] ok 4328 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+fetch> [return] ok 4329 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+fetch> [variable] ok 4330 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+fetch> [exception] ok 4331 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+fetch> [return] ok 4332 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+fetch> [variable] ok 4333 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+fetch> [exception] ok 4334 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+fetch> [return] ok 4335 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+fetch> [variable] ok 4336 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+fetch> [exception] ok 4337 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+fetch> [return] ok 4338 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+fetch> [variable] ok 4339 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+fetch> [exception] ok 4340 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+fetch> [return] ok 4341 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+fetch> [variable] ok 4342 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+fetch> [exception] ok 4343 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+fetch> [return] ok 4344 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+fetch> [variable] ok 4345 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+fetch> [exception] ok 4346 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+fetch> [return] ok 4347 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+fetch> [variable] ok 4348 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+exists> [exception] ok 4349 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+exists> [return] ok 4350 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+exists> [variable] ok 4351 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+exists> [exception] ok 4352 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+exists> [return] ok 4353 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+exists> [variable] ok 4354 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+exists> [exception] ok 4355 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+exists> [return] ok 4356 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+exists> [variable] ok 4357 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+exists> [exception] ok 4358 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+exists> [return] ok 4359 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+exists> [variable] ok 4360 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+exists> [exception] ok 4361 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+exists> [return] ok 4362 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+exists> [variable] ok 4363 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+exists> [exception] ok 4364 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+exists> [return] ok 4365 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+exists> [variable] ok 4366 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+exists> [exception] ok 4367 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+exists> [return] ok 4368 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+exists> [variable] ok 4369 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+exists> [exception] ok 4370 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+exists> [return] ok 4371 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+exists> [variable] ok 4372 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+exists> [exception] ok 4373 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+exists> [return] ok 4374 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+exists> [variable] ok 4375 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+exists> [exception] ok 4376 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+exists> [return] ok 4377 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+exists> [variable] ok 4378 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+exists> [exception] ok 4379 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+exists> [return] ok 4380 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+exists> [variable] ok 4381 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+exists> [exception] ok 4382 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+exists> [return] ok 4383 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+exists> [variable] ok 4384 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+exists> [exception] ok 4385 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+exists> [return] ok 4386 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+exists> [variable] ok 4387 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+exists> [exception] ok 4388 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+exists> [return] ok 4389 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+exists> [variable] ok 4390 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+exists> [exception] ok 4391 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+exists> [return] ok 4392 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+exists> [variable] ok 4393 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+exists> [exception] ok 4394 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+exists> [return] ok 4395 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+exists> [variable] ok 4396 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+exists> [exception] ok 4397 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+exists> [return] ok 4398 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+exists> [variable] ok 4399 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+exists> [exception] ok 4400 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+exists> [return] ok 4401 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+exists> [variable] ok 4402 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+exists> [exception] ok 4403 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+exists> [return] ok 4404 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+exists> [variable] ok 4405 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+exists> [exception] ok 4406 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+exists> [return] ok 4407 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+exists> [variable] ok 4408 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+exists> [exception] ok 4409 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+exists> [return] ok 4410 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+exists> [variable] ok 4411 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+exists> [exception] ok 4412 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+exists> [return] ok 4413 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+exists> [variable] ok 4414 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+exists> [exception] ok 4415 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+exists> [return] ok 4416 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+exists> [variable] ok 4417 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+exists> [exception] ok 4418 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+exists> [return] ok 4419 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+exists> [variable] ok 4420 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+exists> [exception] ok 4421 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+exists> [return] ok 4422 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+exists> [variable] ok 4423 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+exists> [exception] ok 4424 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+exists> [return] ok 4425 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+exists> [variable] ok 4426 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+exists> [exception] ok 4427 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+exists> [return] ok 4428 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+exists> [variable] ok 4429 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+delete> [exception] ok 4430 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+delete> [return] ok 4431 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+delete> [variable] ok 4432 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+delete> [exception] ok 4433 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+delete> [return] ok 4434 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+delete> [variable] ok 4435 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+delete> [exception] ok 4436 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+delete> [return] ok 4437 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+delete> [variable] ok 4438 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+delete> [exception] ok 4439 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+delete> [return] ok 4440 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+delete> [variable] ok 4441 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+delete> [exception] ok 4442 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+delete> [return] ok 4443 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+delete> [variable] ok 4444 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+delete> [exception] ok 4445 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+delete> [return] ok 4446 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+delete> [variable] ok 4447 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+delete> [exception] ok 4448 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+delete> [return] ok 4449 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+delete> [variable] ok 4450 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+delete> [exception] ok 4451 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+delete> [return] ok 4452 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+delete> [variable] ok 4453 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+delete> [exception] ok 4454 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+delete> [return] ok 4455 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+delete> [variable] ok 4456 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+delete> [exception] ok 4457 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+delete> [return] ok 4458 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+delete> [variable] ok 4459 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+delete> [exception] ok 4460 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+delete> [return] ok 4461 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+delete> [variable] ok 4462 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+delete> [exception] ok 4463 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+delete> [return] ok 4464 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+delete> [variable] ok 4465 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+delete> [exception] ok 4466 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+delete> [return] ok 4467 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+delete> [variable] ok 4468 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+delete> [exception] ok 4469 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+delete> [return] ok 4470 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+delete> [variable] ok 4471 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+delete> [exception] ok 4472 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+delete> [return] ok 4473 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+delete> [variable] ok 4474 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+delete> [exception] ok 4475 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+delete> [return] ok 4476 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+delete> [variable] ok 4477 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+delete> [exception] ok 4478 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+delete> [return] ok 4479 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+delete> [variable] ok 4480 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+delete> [exception] ok 4481 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+delete> [return] ok 4482 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+delete> [variable] ok 4483 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+delete> [exception] ok 4484 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+delete> [return] ok 4485 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+delete> [variable] ok 4486 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+delete> [exception] ok 4487 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+delete> [return] ok 4488 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+delete> [variable] ok 4489 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+delete> [exception] ok 4490 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+delete> [return] ok 4491 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+delete> [variable] ok 4492 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+delete> [exception] ok 4493 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+delete> [return] ok 4494 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+delete> [variable] ok 4495 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+delete> [exception] ok 4496 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+delete> [return] ok 4497 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+delete> [variable] ok 4498 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+delete> [exception] ok 4499 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+delete> [return] ok 4500 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+delete> [variable] ok 4501 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+delete> [exception] ok 4502 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+delete> [return] ok 4503 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+delete> [variable] ok 4504 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+delete> [exception] ok 4505 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+delete> [return] ok 4506 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+delete> [variable] ok 4507 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+delete> [exception] ok 4508 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+delete> [return] ok 4509 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+delete> [variable] ok 4510 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+store> [exception] ok 4511 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+store> [return] ok 4512 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+store> [variable] ok 4513 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+store> [exception] ok 4514 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+store> [return] ok 4515 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+store> [variable] ok 4516 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+store> [exception] ok 4517 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+store> [return] ok 4518 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+store> [variable] ok 4519 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+store> [exception] ok 4520 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+store> [return] ok 4521 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+store> [variable] ok 4522 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+store> [exception] ok 4523 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+store> [return] ok 4524 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+store> [variable] ok 4525 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+store> [exception] ok 4526 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+store> [return] ok 4527 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+store> [variable] ok 4528 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+store> [exception] ok 4529 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+store> [return] ok 4530 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+store> [variable] ok 4531 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+store> [exception] ok 4532 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+store> [return] ok 4533 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+store> [variable] ok 4534 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+store> [exception] ok 4535 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+store> [return] ok 4536 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+store> [variable] ok 4537 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+store> [exception] ok 4538 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+store> [return] ok 4539 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+store> [variable] ok 4540 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+store> [exception] ok 4541 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+store> [return] ok 4542 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+store> [variable] ok 4543 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+store> [exception] ok 4544 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+store> [return] ok 4545 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+store> [variable] ok 4546 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+store> [exception] ok 4547 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+store> [return] ok 4548 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+store> [variable] ok 4549 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+store> [exception] ok 4550 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+store> [return] ok 4551 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+store> [variable] ok 4552 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+store> [exception] ok 4553 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+store> [return] ok 4554 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+store> [variable] ok 4555 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+store> [exception] ok 4556 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+store> [return] ok 4557 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+store> [variable] ok 4558 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+store> [exception] ok 4559 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+store> [return] ok 4560 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+store> [variable] ok 4561 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+store> [exception] ok 4562 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+store> [return] ok 4563 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+store> [variable] ok 4564 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+store> [exception] ok 4565 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+store> [return] ok 4566 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+store> [variable] ok 4567 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+store> [exception] ok 4568 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+store> [return] ok 4569 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+store> [variable] ok 4570 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+store> [exception] ok 4571 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+store> [return] ok 4572 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+store> [variable] ok 4573 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+store> [exception] ok 4574 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+store> [return] ok 4575 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+store> [variable] ok 4576 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+store> [exception] ok 4577 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+store> [return] ok 4578 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+store> [variable] ok 4579 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+store> [exception] ok 4580 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+store> [return] ok 4581 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+store> [variable] ok 4582 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+store> [exception] ok 4583 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+store> [return] ok 4584 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+store> [variable] ok 4585 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+store> [exception] ok 4586 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+store> [return] ok 4587 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+store> [variable] ok 4588 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+store> [exception] ok 4589 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+store> [return] ok 4590 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+store> [variable] ok 4591 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +fetch> [exception] ok 4592 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +fetch> [return] ok 4593 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +fetch> [variable] ok 4594 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +fetch> [exception] ok 4595 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +fetch> [return] ok 4596 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +fetch> [variable] ok 4597 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +fetch> [exception] ok 4598 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +fetch> [return] ok 4599 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +fetch> [variable] ok 4600 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +fetch> [exception] ok 4601 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +fetch> [return] ok 4602 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +fetch> [variable] ok 4603 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +fetch> [exception] ok 4604 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +fetch> [return] ok 4605 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +fetch> [variable] ok 4606 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +fetch> [exception] ok 4607 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +fetch> [return] ok 4608 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +fetch> [variable] ok 4609 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +fetch> [exception] ok 4610 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +fetch> [return] ok 4611 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +fetch> [variable] ok 4612 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +fetch> [exception] ok 4613 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +fetch> [return] ok 4614 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +fetch> [variable] ok 4615 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +fetch> [exception] ok 4616 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +fetch> [return] ok 4617 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +fetch> [variable] ok 4618 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +fetch> [exception] ok 4619 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +fetch> [return] ok 4620 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +fetch> [variable] ok 4621 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +fetch> [exception] ok 4622 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +fetch> [return] ok 4623 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +fetch> [variable] ok 4624 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +fetch> [exception] ok 4625 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +fetch> [return] ok 4626 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +fetch> [variable] ok 4627 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +fetch> [exception] ok 4628 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +fetch> [return] ok 4629 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +fetch> [variable] ok 4630 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +fetch> [exception] ok 4631 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +fetch> [return] ok 4632 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +fetch> [variable] ok 4633 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +fetch> [exception] ok 4634 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +fetch> [return] ok 4635 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +fetch> [variable] ok 4636 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +fetch> [exception] ok 4637 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +fetch> [return] ok 4638 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +fetch> [variable] ok 4639 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +fetch> [exception] ok 4640 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +fetch> [return] ok 4641 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +fetch> [variable] ok 4642 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +fetch> [exception] ok 4643 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +fetch> [return] ok 4644 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +fetch> [variable] ok 4645 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +fetch> [exception] ok 4646 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +fetch> [return] ok 4647 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +fetch> [variable] ok 4648 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +fetch> [exception] ok 4649 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +fetch> [return] ok 4650 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +fetch> [variable] ok 4651 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +fetch> [exception] ok 4652 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +fetch> [return] ok 4653 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +fetch> [variable] ok 4654 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +fetch> [exception] ok 4655 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +fetch> [return] ok 4656 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +fetch> [variable] ok 4657 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +fetch> [exception] ok 4658 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +fetch> [return] ok 4659 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +fetch> [variable] ok 4660 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +fetch> [exception] ok 4661 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +fetch> [return] ok 4662 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +fetch> [variable] ok 4663 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +fetch> [exception] ok 4664 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +fetch> [return] ok 4665 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +fetch> [variable] ok 4666 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +fetch> [exception] ok 4667 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +fetch> [return] ok 4668 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +fetch> [variable] ok 4669 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +fetch> [exception] ok 4670 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +fetch> [return] ok 4671 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +fetch> [variable] ok 4672 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +exists> [exception] ok 4673 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +exists> [return] ok 4674 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +exists> [variable] ok 4675 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +exists> [exception] ok 4676 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +exists> [return] ok 4677 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +exists> [variable] ok 4678 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +exists> [exception] ok 4679 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +exists> [return] ok 4680 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +exists> [variable] ok 4681 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +exists> [exception] ok 4682 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +exists> [return] ok 4683 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +exists> [variable] ok 4684 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +exists> [exception] ok 4685 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +exists> [return] ok 4686 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +exists> [variable] ok 4687 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +exists> [exception] ok 4688 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +exists> [return] ok 4689 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +exists> [variable] ok 4690 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +exists> [exception] ok 4691 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +exists> [return] ok 4692 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +exists> [variable] ok 4693 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +exists> [exception] ok 4694 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +exists> [return] ok 4695 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +exists> [variable] ok 4696 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +exists> [exception] ok 4697 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +exists> [return] ok 4698 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +exists> [variable] ok 4699 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +exists> [exception] ok 4700 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +exists> [return] ok 4701 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +exists> [variable] ok 4702 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +exists> [exception] ok 4703 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +exists> [return] ok 4704 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +exists> [variable] ok 4705 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +exists> [exception] ok 4706 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +exists> [return] ok 4707 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +exists> [variable] ok 4708 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +exists> [exception] ok 4709 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +exists> [return] ok 4710 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +exists> [variable] ok 4711 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +exists> [exception] ok 4712 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +exists> [return] ok 4713 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +exists> [variable] ok 4714 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +exists> [exception] ok 4715 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +exists> [return] ok 4716 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +exists> [variable] ok 4717 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +exists> [exception] ok 4718 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +exists> [return] ok 4719 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +exists> [variable] ok 4720 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +exists> [exception] ok 4721 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +exists> [return] ok 4722 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +exists> [variable] ok 4723 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +exists> [exception] ok 4724 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +exists> [return] ok 4725 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +exists> [variable] ok 4726 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +exists> [exception] ok 4727 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +exists> [return] ok 4728 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +exists> [variable] ok 4729 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +exists> [exception] ok 4730 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +exists> [return] ok 4731 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +exists> [variable] ok 4732 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +exists> [exception] ok 4733 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +exists> [return] ok 4734 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +exists> [variable] ok 4735 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +exists> [exception] ok 4736 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +exists> [return] ok 4737 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +exists> [variable] ok 4738 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +exists> [exception] ok 4739 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +exists> [return] ok 4740 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +exists> [variable] ok 4741 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +exists> [exception] ok 4742 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +exists> [return] ok 4743 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +exists> [variable] ok 4744 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +exists> [exception] ok 4745 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +exists> [return] ok 4746 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +exists> [variable] ok 4747 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +exists> [exception] ok 4748 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +exists> [return] ok 4749 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +exists> [variable] ok 4750 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +exists> [exception] ok 4751 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +exists> [return] ok 4752 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +exists> [variable] ok 4753 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +delete> [exception] ok 4754 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +delete> [return] ok 4755 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +delete> [variable] ok 4756 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +delete> [exception] ok 4757 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +delete> [return] ok 4758 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +delete> [variable] ok 4759 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +delete> [exception] ok 4760 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +delete> [return] ok 4761 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +delete> [variable] ok 4762 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +delete> [exception] ok 4763 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +delete> [return] ok 4764 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +delete> [variable] ok 4765 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +delete> [exception] ok 4766 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +delete> [return] ok 4767 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +delete> [variable] ok 4768 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +delete> [exception] ok 4769 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +delete> [return] ok 4770 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +delete> [variable] ok 4771 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +delete> [exception] ok 4772 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +delete> [return] ok 4773 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +delete> [variable] ok 4774 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +delete> [exception] ok 4775 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +delete> [return] ok 4776 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +delete> [variable] ok 4777 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +delete> [exception] ok 4778 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +delete> [return] ok 4779 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +delete> [variable] ok 4780 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +delete> [exception] ok 4781 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +delete> [return] ok 4782 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +delete> [variable] ok 4783 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +delete> [exception] ok 4784 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +delete> [return] ok 4785 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +delete> [variable] ok 4786 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +delete> [exception] ok 4787 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +delete> [return] ok 4788 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +delete> [variable] ok 4789 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +delete> [exception] ok 4790 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +delete> [return] ok 4791 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +delete> [variable] ok 4792 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +delete> [exception] ok 4793 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +delete> [return] ok 4794 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +delete> [variable] ok 4795 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +delete> [exception] ok 4796 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +delete> [return] ok 4797 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +delete> [variable] ok 4798 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +delete> [exception] ok 4799 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +delete> [return] ok 4800 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +delete> [variable] ok 4801 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +delete> [exception] ok 4802 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +delete> [return] ok 4803 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +delete> [variable] ok 4804 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +delete> [exception] ok 4805 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +delete> [return] ok 4806 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +delete> [variable] ok 4807 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +delete> [exception] ok 4808 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +delete> [return] ok 4809 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +delete> [variable] ok 4810 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +delete> [exception] ok 4811 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +delete> [return] ok 4812 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +delete> [variable] ok 4813 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +delete> [exception] ok 4814 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +delete> [return] ok 4815 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +delete> [variable] ok 4816 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +delete> [exception] ok 4817 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +delete> [return] ok 4818 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +delete> [variable] ok 4819 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +delete> [exception] ok 4820 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +delete> [return] ok 4821 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +delete> [variable] ok 4822 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +delete> [exception] ok 4823 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +delete> [return] ok 4824 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +delete> [variable] ok 4825 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +delete> [exception] ok 4826 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +delete> [return] ok 4827 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +delete> [variable] ok 4828 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +delete> [exception] ok 4829 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +delete> [return] ok 4830 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +delete> [variable] ok 4831 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +delete> [exception] ok 4832 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +delete> [return] ok 4833 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +delete> [variable] ok 4834 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +store> [exception] ok 4835 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +store> [return] ok 4836 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +store> [variable] ok 4837 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +store> [exception] ok 4838 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +store> [return] ok 4839 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +store> [variable] ok 4840 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +store> [exception] ok 4841 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +store> [return] ok 4842 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[1] <+strict +store> [variable] ok 4843 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +store> [exception] ok 4844 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +store> [return] ok 4845 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +store> [variable] ok 4846 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +store> [exception] ok 4847 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +store> [return] ok 4848 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +store> [variable] ok 4849 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +store> [exception] ok 4850 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +store> [return] ok 4851 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[1] <+strict +store> [variable] ok 4852 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +store> [exception] ok 4853 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +store> [return] ok 4854 - my @x; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +store> [variable] ok 4855 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +store> [exception] ok 4856 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +store> [return] ok 4857 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +store> [variable] ok 4858 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +store> [exception] ok 4859 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +store> [return] ok 4860 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[1] <+strict +store> [variable] ok 4861 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +store> [exception] ok 4862 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +store> [return] ok 4863 - my $x; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +store> [variable] ok 4864 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +store> [exception] ok 4865 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +store> [return] ok 4866 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +store> [variable] ok 4867 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +store> [exception] ok 4868 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +store> [return] ok 4869 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[0]->[3] <+strict +store> [variable] ok 4870 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +store> [exception] ok 4871 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +store> [return] ok 4872 - my $x; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +store> [variable] ok 4873 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +store> [exception] ok 4874 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +store> [return] ok 4875 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +store> [variable] ok 4876 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +store> [exception] ok 4877 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +store> [return] ok 4878 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[0]->[3] <+strict +store> [variable] ok 4879 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +store> [exception] ok 4880 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +store> [return] ok 4881 - my @x; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +store> [variable] ok 4882 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +store> [exception] ok 4883 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +store> [return] ok 4884 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +store> [variable] ok 4885 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +store> [exception] ok 4886 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +store> [return] ok 4887 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[0]->[3] <+strict +store> [variable] ok 4888 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +store> [exception] ok 4889 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +store> [return] ok 4890 - my $x; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +store> [variable] ok 4891 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +store> [exception] ok 4892 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +store> [return] ok 4893 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +store> [variable] ok 4894 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +store> [exception] ok 4895 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +store> [return] ok 4896 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $x->[2]->[3] <+strict +store> [variable] ok 4897 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +store> [exception] ok 4898 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +store> [return] ok 4899 - my $x; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +store> [variable] ok 4900 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +store> [exception] ok 4901 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +store> [return] ok 4902 - our $x; local $x; use strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +store> [variable] ok 4903 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +store> [exception] ok 4904 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +store> [return] ok 4905 - our $x; local $x; no strict; $x->[0]->[1] = 1; exists $$x[2]->[3] <+strict +store> [variable] ok 4906 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +store> [exception] ok 4907 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +store> [return] ok 4908 - my @x; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +store> [variable] ok 4909 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +store> [exception] ok 4910 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +store> [return] ok 4911 - our @x; local @x; use strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +store> [variable] ok 4912 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +store> [exception] ok 4913 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +store> [return] ok 4914 - our @x; local @x; no strict; $x[0]->[1] = 1; exists $x[2]->[3] <+strict +store> [variable] ok 4915 - my $x; delete $x->[0] [exception] ok 4916 - my $x; delete $x->[0] [return] ok 4917 - my $x; delete $x->[0] [variable] ok 4918 - our $x; local $x; use strict; delete $x->[0] [exception] ok 4919 - our $x; local $x; use strict; delete $x->[0] [return] ok 4920 - our $x; local $x; use strict; delete $x->[0] [variable] ok 4921 - our $x; local $x; no strict; delete $x->[0] [exception] ok 4922 - our $x; local $x; no strict; delete $x->[0] [return] ok 4923 - our $x; local $x; no strict; delete $x->[0] [variable] ok 4924 - my $x; delete $$x[0] [exception] ok 4925 - my $x; delete $$x[0] [return] ok 4926 - my $x; delete $$x[0] [variable] ok 4927 - our $x; local $x; use strict; delete $$x[0] [exception] ok 4928 - our $x; local $x; use strict; delete $$x[0] [return] ok 4929 - our $x; local $x; use strict; delete $$x[0] [variable] ok 4930 - our $x; local $x; no strict; delete $$x[0] [exception] ok 4931 - our $x; local $x; no strict; delete $$x[0] [return] ok 4932 - our $x; local $x; no strict; delete $$x[0] [variable] ok 4933 - my @x; delete $x[0] [exception] ok 4934 - my @x; delete $x[0] [return] ok 4935 - my @x; delete $x[0] [variable] ok 4936 - our @x; local @x; use strict; delete $x[0] [exception] ok 4937 - our @x; local @x; use strict; delete $x[0] [return] ok 4938 - our @x; local @x; use strict; delete $x[0] [variable] ok 4939 - our @x; local @x; no strict; delete $x[0] [exception] ok 4940 - our @x; local @x; no strict; delete $x[0] [return] ok 4941 - our @x; local @x; no strict; delete $x[0] [variable] ok 4942 - my $x; delete $x->[0] [exception] ok 4943 - my $x; delete $x->[0] [return] ok 4944 - my $x; delete $x->[0] [variable] ok 4945 - our $x; local $x; use strict; delete $x->[0] [exception] ok 4946 - our $x; local $x; use strict; delete $x->[0] [return] ok 4947 - our $x; local $x; use strict; delete $x->[0] [variable] ok 4948 - our $x; local $x; no strict; delete $x->[0] [exception] ok 4949 - our $x; local $x; no strict; delete $x->[0] [return] ok 4950 - our $x; local $x; no strict; delete $x->[0] [variable] ok 4951 - my $x; delete $$x[0] [exception] ok 4952 - my $x; delete $$x[0] [return] ok 4953 - my $x; delete $$x[0] [variable] ok 4954 - our $x; local $x; use strict; delete $$x[0] [exception] ok 4955 - our $x; local $x; use strict; delete $$x[0] [return] ok 4956 - our $x; local $x; use strict; delete $$x[0] [variable] ok 4957 - our $x; local $x; no strict; delete $$x[0] [exception] ok 4958 - our $x; local $x; no strict; delete $$x[0] [return] ok 4959 - our $x; local $x; no strict; delete $$x[0] [variable] ok 4960 - my @x; delete $x[0] [exception] ok 4961 - my @x; delete $x[0] [return] ok 4962 - my @x; delete $x[0] [variable] ok 4963 - our @x; local @x; use strict; delete $x[0] [exception] ok 4964 - our @x; local @x; use strict; delete $x[0] [return] ok 4965 - our @x; local @x; use strict; delete $x[0] [variable] ok 4966 - our @x; local @x; no strict; delete $x[0] [exception] ok 4967 - our @x; local @x; no strict; delete $x[0] [return] ok 4968 - our @x; local @x; no strict; delete $x[0] [variable] ok 4969 - my $x; delete $x->[0] <+fetch> [exception] ok 4970 - my $x; delete $x->[0] <+fetch> [return] ok 4971 - my $x; delete $x->[0] <+fetch> [variable] ok 4972 - our $x; local $x; use strict; delete $x->[0] <+fetch> [exception] ok 4973 - our $x; local $x; use strict; delete $x->[0] <+fetch> [return] ok 4974 - our $x; local $x; use strict; delete $x->[0] <+fetch> [variable] ok 4975 - our $x; local $x; no strict; delete $x->[0] <+fetch> [exception] ok 4976 - our $x; local $x; no strict; delete $x->[0] <+fetch> [return] ok 4977 - our $x; local $x; no strict; delete $x->[0] <+fetch> [variable] ok 4978 - my $x; delete $$x[0] <+fetch> [exception] ok 4979 - my $x; delete $$x[0] <+fetch> [return] ok 4980 - my $x; delete $$x[0] <+fetch> [variable] ok 4981 - our $x; local $x; use strict; delete $$x[0] <+fetch> [exception] ok 4982 - our $x; local $x; use strict; delete $$x[0] <+fetch> [return] ok 4983 - our $x; local $x; use strict; delete $$x[0] <+fetch> [variable] ok 4984 - our $x; local $x; no strict; delete $$x[0] <+fetch> [exception] ok 4985 - our $x; local $x; no strict; delete $$x[0] <+fetch> [return] ok 4986 - our $x; local $x; no strict; delete $$x[0] <+fetch> [variable] ok 4987 - my @x; delete $x[0] <+fetch> [exception] ok 4988 - my @x; delete $x[0] <+fetch> [return] ok 4989 - my @x; delete $x[0] <+fetch> [variable] ok 4990 - our @x; local @x; use strict; delete $x[0] <+fetch> [exception] ok 4991 - our @x; local @x; use strict; delete $x[0] <+fetch> [return] ok 4992 - our @x; local @x; use strict; delete $x[0] <+fetch> [variable] ok 4993 - our @x; local @x; no strict; delete $x[0] <+fetch> [exception] ok 4994 - our @x; local @x; no strict; delete $x[0] <+fetch> [return] ok 4995 - our @x; local @x; no strict; delete $x[0] <+fetch> [variable] ok 4996 - my $x; delete $x->[0] <+exists> [exception] ok 4997 - my $x; delete $x->[0] <+exists> [return] ok 4998 - my $x; delete $x->[0] <+exists> [variable] ok 4999 - our $x; local $x; use strict; delete $x->[0] <+exists> [exception] ok 5000 - our $x; local $x; use strict; delete $x->[0] <+exists> [return] ok 5001 - our $x; local $x; use strict; delete $x->[0] <+exists> [variable] ok 5002 - our $x; local $x; no strict; delete $x->[0] <+exists> [exception] ok 5003 - our $x; local $x; no strict; delete $x->[0] <+exists> [return] ok 5004 - our $x; local $x; no strict; delete $x->[0] <+exists> [variable] ok 5005 - my $x; delete $$x[0] <+exists> [exception] ok 5006 - my $x; delete $$x[0] <+exists> [return] ok 5007 - my $x; delete $$x[0] <+exists> [variable] ok 5008 - our $x; local $x; use strict; delete $$x[0] <+exists> [exception] ok 5009 - our $x; local $x; use strict; delete $$x[0] <+exists> [return] ok 5010 - our $x; local $x; use strict; delete $$x[0] <+exists> [variable] ok 5011 - our $x; local $x; no strict; delete $$x[0] <+exists> [exception] ok 5012 - our $x; local $x; no strict; delete $$x[0] <+exists> [return] ok 5013 - our $x; local $x; no strict; delete $$x[0] <+exists> [variable] ok 5014 - my @x; delete $x[0] <+exists> [exception] ok 5015 - my @x; delete $x[0] <+exists> [return] ok 5016 - my @x; delete $x[0] <+exists> [variable] ok 5017 - our @x; local @x; use strict; delete $x[0] <+exists> [exception] ok 5018 - our @x; local @x; use strict; delete $x[0] <+exists> [return] ok 5019 - our @x; local @x; use strict; delete $x[0] <+exists> [variable] ok 5020 - our @x; local @x; no strict; delete $x[0] <+exists> [exception] ok 5021 - our @x; local @x; no strict; delete $x[0] <+exists> [return] ok 5022 - our @x; local @x; no strict; delete $x[0] <+exists> [variable] ok 5023 - my $x; delete $x->[0] <+delete> [exception] ok 5024 - my $x; delete $x->[0] <+delete> [return] ok 5025 - my $x; delete $x->[0] <+delete> [variable] ok 5026 - our $x; local $x; use strict; delete $x->[0] <+delete> [exception] ok 5027 - our $x; local $x; use strict; delete $x->[0] <+delete> [return] ok 5028 - our $x; local $x; use strict; delete $x->[0] <+delete> [variable] ok 5029 - our $x; local $x; no strict; delete $x->[0] <+delete> [exception] ok 5030 - our $x; local $x; no strict; delete $x->[0] <+delete> [return] ok 5031 - our $x; local $x; no strict; delete $x->[0] <+delete> [variable] ok 5032 - my $x; delete $$x[0] <+delete> [exception] ok 5033 - my $x; delete $$x[0] <+delete> [return] ok 5034 - my $x; delete $$x[0] <+delete> [variable] ok 5035 - our $x; local $x; use strict; delete $$x[0] <+delete> [exception] ok 5036 - our $x; local $x; use strict; delete $$x[0] <+delete> [return] ok 5037 - our $x; local $x; use strict; delete $$x[0] <+delete> [variable] ok 5038 - our $x; local $x; no strict; delete $$x[0] <+delete> [exception] ok 5039 - our $x; local $x; no strict; delete $$x[0] <+delete> [return] ok 5040 - our $x; local $x; no strict; delete $$x[0] <+delete> [variable] ok 5041 - my @x; delete $x[0] <+delete> [exception] ok 5042 - my @x; delete $x[0] <+delete> [return] ok 5043 - my @x; delete $x[0] <+delete> [variable] ok 5044 - our @x; local @x; use strict; delete $x[0] <+delete> [exception] ok 5045 - our @x; local @x; use strict; delete $x[0] <+delete> [return] ok 5046 - our @x; local @x; use strict; delete $x[0] <+delete> [variable] ok 5047 - our @x; local @x; no strict; delete $x[0] <+delete> [exception] ok 5048 - our @x; local @x; no strict; delete $x[0] <+delete> [return] ok 5049 - our @x; local @x; no strict; delete $x[0] <+delete> [variable] ok 5050 - my $x; delete $x->[0] <+store> [exception] ok 5051 - my $x; delete $x->[0] <+store> [return] ok 5052 - my $x; delete $x->[0] <+store> [variable] ok 5053 - our $x; local $x; use strict; delete $x->[0] <+store> [exception] ok 5054 - our $x; local $x; use strict; delete $x->[0] <+store> [return] ok 5055 - our $x; local $x; use strict; delete $x->[0] <+store> [variable] ok 5056 - our $x; local $x; no strict; delete $x->[0] <+store> [exception] ok 5057 - our $x; local $x; no strict; delete $x->[0] <+store> [return] ok 5058 - our $x; local $x; no strict; delete $x->[0] <+store> [variable] ok 5059 - my $x; delete $$x[0] <+store> [exception] ok 5060 - my $x; delete $$x[0] <+store> [return] ok 5061 - my $x; delete $$x[0] <+store> [variable] ok 5062 - our $x; local $x; use strict; delete $$x[0] <+store> [exception] ok 5063 - our $x; local $x; use strict; delete $$x[0] <+store> [return] ok 5064 - our $x; local $x; use strict; delete $$x[0] <+store> [variable] ok 5065 - our $x; local $x; no strict; delete $$x[0] <+store> [exception] ok 5066 - our $x; local $x; no strict; delete $$x[0] <+store> [return] ok 5067 - our $x; local $x; no strict; delete $$x[0] <+store> [variable] ok 5068 - my @x; delete $x[0] <+store> [exception] ok 5069 - my @x; delete $x[0] <+store> [return] ok 5070 - my @x; delete $x[0] <+store> [variable] ok 5071 - our @x; local @x; use strict; delete $x[0] <+store> [exception] ok 5072 - our @x; local @x; use strict; delete $x[0] <+store> [return] ok 5073 - our @x; local @x; use strict; delete $x[0] <+store> [variable] ok 5074 - our @x; local @x; no strict; delete $x[0] <+store> [exception] ok 5075 - our @x; local @x; no strict; delete $x[0] <+store> [return] ok 5076 - our @x; local @x; no strict; delete $x[0] <+store> [variable] ok 5077 - my $x; delete $x->[0] <+strict +fetch> [exception] ok 5078 - my $x; delete $x->[0] <+strict +fetch> [return] ok 5079 - my $x; delete $x->[0] <+strict +fetch> [variable] ok 5080 - our $x; local $x; use strict; delete $x->[0] <+strict +fetch> [exception] ok 5081 - our $x; local $x; use strict; delete $x->[0] <+strict +fetch> [return] ok 5082 - our $x; local $x; use strict; delete $x->[0] <+strict +fetch> [variable] ok 5083 - our $x; local $x; no strict; delete $x->[0] <+strict +fetch> [exception] ok 5084 - our $x; local $x; no strict; delete $x->[0] <+strict +fetch> [return] ok 5085 - our $x; local $x; no strict; delete $x->[0] <+strict +fetch> [variable] ok 5086 - my $x; delete $$x[0] <+strict +fetch> [exception] ok 5087 - my $x; delete $$x[0] <+strict +fetch> [return] ok 5088 - my $x; delete $$x[0] <+strict +fetch> [variable] ok 5089 - our $x; local $x; use strict; delete $$x[0] <+strict +fetch> [exception] ok 5090 - our $x; local $x; use strict; delete $$x[0] <+strict +fetch> [return] ok 5091 - our $x; local $x; use strict; delete $$x[0] <+strict +fetch> [variable] ok 5092 - our $x; local $x; no strict; delete $$x[0] <+strict +fetch> [exception] ok 5093 - our $x; local $x; no strict; delete $$x[0] <+strict +fetch> [return] ok 5094 - our $x; local $x; no strict; delete $$x[0] <+strict +fetch> [variable] ok 5095 - my @x; delete $x[0] <+strict +fetch> [exception] ok 5096 - my @x; delete $x[0] <+strict +fetch> [return] ok 5097 - my @x; delete $x[0] <+strict +fetch> [variable] ok 5098 - our @x; local @x; use strict; delete $x[0] <+strict +fetch> [exception] ok 5099 - our @x; local @x; use strict; delete $x[0] <+strict +fetch> [return] ok 5100 - our @x; local @x; use strict; delete $x[0] <+strict +fetch> [variable] ok 5101 - our @x; local @x; no strict; delete $x[0] <+strict +fetch> [exception] ok 5102 - our @x; local @x; no strict; delete $x[0] <+strict +fetch> [return] ok 5103 - our @x; local @x; no strict; delete $x[0] <+strict +fetch> [variable] ok 5104 - my $x; delete $x->[0] <+strict +exists> [exception] ok 5105 - my $x; delete $x->[0] <+strict +exists> [return] ok 5106 - my $x; delete $x->[0] <+strict +exists> [variable] ok 5107 - our $x; local $x; use strict; delete $x->[0] <+strict +exists> [exception] ok 5108 - our $x; local $x; use strict; delete $x->[0] <+strict +exists> [return] ok 5109 - our $x; local $x; use strict; delete $x->[0] <+strict +exists> [variable] ok 5110 - our $x; local $x; no strict; delete $x->[0] <+strict +exists> [exception] ok 5111 - our $x; local $x; no strict; delete $x->[0] <+strict +exists> [return] ok 5112 - our $x; local $x; no strict; delete $x->[0] <+strict +exists> [variable] ok 5113 - my $x; delete $$x[0] <+strict +exists> [exception] ok 5114 - my $x; delete $$x[0] <+strict +exists> [return] ok 5115 - my $x; delete $$x[0] <+strict +exists> [variable] ok 5116 - our $x; local $x; use strict; delete $$x[0] <+strict +exists> [exception] ok 5117 - our $x; local $x; use strict; delete $$x[0] <+strict +exists> [return] ok 5118 - our $x; local $x; use strict; delete $$x[0] <+strict +exists> [variable] ok 5119 - our $x; local $x; no strict; delete $$x[0] <+strict +exists> [exception] ok 5120 - our $x; local $x; no strict; delete $$x[0] <+strict +exists> [return] ok 5121 - our $x; local $x; no strict; delete $$x[0] <+strict +exists> [variable] ok 5122 - my @x; delete $x[0] <+strict +exists> [exception] ok 5123 - my @x; delete $x[0] <+strict +exists> [return] ok 5124 - my @x; delete $x[0] <+strict +exists> [variable] ok 5125 - our @x; local @x; use strict; delete $x[0] <+strict +exists> [exception] ok 5126 - our @x; local @x; use strict; delete $x[0] <+strict +exists> [return] ok 5127 - our @x; local @x; use strict; delete $x[0] <+strict +exists> [variable] ok 5128 - our @x; local @x; no strict; delete $x[0] <+strict +exists> [exception] ok 5129 - our @x; local @x; no strict; delete $x[0] <+strict +exists> [return] ok 5130 - our @x; local @x; no strict; delete $x[0] <+strict +exists> [variable] ok 5131 - my $x; delete $x->[0] <+strict +delete> [exception] ok 5132 - my $x; delete $x->[0] <+strict +delete> [return] ok 5133 - my $x; delete $x->[0] <+strict +delete> [variable] ok 5134 - our $x; local $x; use strict; delete $x->[0] <+strict +delete> [exception] ok 5135 - our $x; local $x; use strict; delete $x->[0] <+strict +delete> [return] ok 5136 - our $x; local $x; use strict; delete $x->[0] <+strict +delete> [variable] ok 5137 - our $x; local $x; no strict; delete $x->[0] <+strict +delete> [exception] ok 5138 - our $x; local $x; no strict; delete $x->[0] <+strict +delete> [return] ok 5139 - our $x; local $x; no strict; delete $x->[0] <+strict +delete> [variable] ok 5140 - my $x; delete $$x[0] <+strict +delete> [exception] ok 5141 - my $x; delete $$x[0] <+strict +delete> [return] ok 5142 - my $x; delete $$x[0] <+strict +delete> [variable] ok 5143 - our $x; local $x; use strict; delete $$x[0] <+strict +delete> [exception] ok 5144 - our $x; local $x; use strict; delete $$x[0] <+strict +delete> [return] ok 5145 - our $x; local $x; use strict; delete $$x[0] <+strict +delete> [variable] ok 5146 - our $x; local $x; no strict; delete $$x[0] <+strict +delete> [exception] ok 5147 - our $x; local $x; no strict; delete $$x[0] <+strict +delete> [return] ok 5148 - our $x; local $x; no strict; delete $$x[0] <+strict +delete> [variable] ok 5149 - my @x; 1 <+strict +delete> [exception] ok 5150 - my @x; 1 <+strict +delete> [return] ok 5151 - my @x; 1 <+strict +delete> [variable] ok 5152 - our @x; local @x; use strict; 1 <+strict +delete> [exception] ok 5153 - our @x; local @x; use strict; 1 <+strict +delete> [return] ok 5154 - our @x; local @x; use strict; 1 <+strict +delete> [variable] ok 5155 - our @x; local @x; no strict; 1 <+strict +delete> [exception] ok 5156 - our @x; local @x; no strict; 1 <+strict +delete> [return] ok 5157 - our @x; local @x; no strict; 1 <+strict +delete> [variable] ok 5158 - my $x; delete $x->[0] <+strict +store> [exception] ok 5159 - my $x; delete $x->[0] <+strict +store> [return] ok 5160 - my $x; delete $x->[0] <+strict +store> [variable] ok 5161 - our $x; local $x; use strict; delete $x->[0] <+strict +store> [exception] ok 5162 - our $x; local $x; use strict; delete $x->[0] <+strict +store> [return] ok 5163 - our $x; local $x; use strict; delete $x->[0] <+strict +store> [variable] ok 5164 - our $x; local $x; no strict; delete $x->[0] <+strict +store> [exception] ok 5165 - our $x; local $x; no strict; delete $x->[0] <+strict +store> [return] ok 5166 - our $x; local $x; no strict; delete $x->[0] <+strict +store> [variable] ok 5167 - my $x; delete $$x[0] <+strict +store> [exception] ok 5168 - my $x; delete $$x[0] <+strict +store> [return] ok 5169 - my $x; delete $$x[0] <+strict +store> [variable] ok 5170 - our $x; local $x; use strict; delete $$x[0] <+strict +store> [exception] ok 5171 - our $x; local $x; use strict; delete $$x[0] <+strict +store> [return] ok 5172 - our $x; local $x; use strict; delete $$x[0] <+strict +store> [variable] ok 5173 - our $x; local $x; no strict; delete $$x[0] <+strict +store> [exception] ok 5174 - our $x; local $x; no strict; delete $$x[0] <+strict +store> [return] ok 5175 - our $x; local $x; no strict; delete $$x[0] <+strict +store> [variable] ok 5176 - my @x; delete $x[0] <+strict +store> [exception] ok 5177 - my @x; delete $x[0] <+strict +store> [return] ok 5178 - my @x; delete $x[0] <+strict +store> [variable] ok 5179 - our @x; local @x; use strict; delete $x[0] <+strict +store> [exception] ok 5180 - our @x; local @x; use strict; delete $x[0] <+strict +store> [return] ok 5181 - our @x; local @x; use strict; delete $x[0] <+strict +store> [variable] ok 5182 - our @x; local @x; no strict; delete $x[0] <+strict +store> [exception] ok 5183 - our @x; local @x; no strict; delete $x[0] <+strict +store> [return] ok 5184 - our @x; local @x; no strict; delete $x[0] <+strict +store> [variable] ok 5185 - my $x; delete $x->[0]->[1] [exception] ok 5186 - my $x; delete $x->[0]->[1] [return] ok 5187 - my $x; delete $x->[0]->[1] [variable] ok 5188 - our $x; local $x; use strict; delete $x->[0]->[1] [exception] ok 5189 - our $x; local $x; use strict; delete $x->[0]->[1] [return] ok 5190 - our $x; local $x; use strict; delete $x->[0]->[1] [variable] ok 5191 - our $x; local $x; no strict; delete $x->[0]->[1] [exception] ok 5192 - our $x; local $x; no strict; delete $x->[0]->[1] [return] ok 5193 - our $x; local $x; no strict; delete $x->[0]->[1] [variable] ok 5194 - my $x; delete $$x[0]->[1] [exception] ok 5195 - my $x; delete $$x[0]->[1] [return] ok 5196 - my $x; delete $$x[0]->[1] [variable] ok 5197 - our $x; local $x; use strict; delete $$x[0]->[1] [exception] ok 5198 - our $x; local $x; use strict; delete $$x[0]->[1] [return] ok 5199 - our $x; local $x; use strict; delete $$x[0]->[1] [variable] ok 5200 - our $x; local $x; no strict; delete $$x[0]->[1] [exception] ok 5201 - our $x; local $x; no strict; delete $$x[0]->[1] [return] ok 5202 - our $x; local $x; no strict; delete $$x[0]->[1] [variable] ok 5203 - my @x; delete $x[0]->[1] [exception] ok 5204 - my @x; delete $x[0]->[1] [return] ok 5205 - my @x; delete $x[0]->[1] [variable] ok 5206 - our @x; local @x; use strict; delete $x[0]->[1] [exception] ok 5207 - our @x; local @x; use strict; delete $x[0]->[1] [return] ok 5208 - our @x; local @x; use strict; delete $x[0]->[1] [variable] ok 5209 - our @x; local @x; no strict; delete $x[0]->[1] [exception] ok 5210 - our @x; local @x; no strict; delete $x[0]->[1] [return] ok 5211 - our @x; local @x; no strict; delete $x[0]->[1] [variable] ok 5212 - my $x; delete $x->[0]->[1] [exception] ok 5213 - my $x; delete $x->[0]->[1] [return] ok 5214 - my $x; delete $x->[0]->[1] [variable] ok 5215 - our $x; local $x; use strict; delete $x->[0]->[1] [exception] ok 5216 - our $x; local $x; use strict; delete $x->[0]->[1] [return] ok 5217 - our $x; local $x; use strict; delete $x->[0]->[1] [variable] ok 5218 - our $x; local $x; no strict; delete $x->[0]->[1] [exception] ok 5219 - our $x; local $x; no strict; delete $x->[0]->[1] [return] ok 5220 - our $x; local $x; no strict; delete $x->[0]->[1] [variable] ok 5221 - my $x; delete $$x[0]->[1] [exception] ok 5222 - my $x; delete $$x[0]->[1] [return] ok 5223 - my $x; delete $$x[0]->[1] [variable] ok 5224 - our $x; local $x; use strict; delete $$x[0]->[1] [exception] ok 5225 - our $x; local $x; use strict; delete $$x[0]->[1] [return] ok 5226 - our $x; local $x; use strict; delete $$x[0]->[1] [variable] ok 5227 - our $x; local $x; no strict; delete $$x[0]->[1] [exception] ok 5228 - our $x; local $x; no strict; delete $$x[0]->[1] [return] ok 5229 - our $x; local $x; no strict; delete $$x[0]->[1] [variable] ok 5230 - my @x; delete $x[0]->[1] [exception] ok 5231 - my @x; delete $x[0]->[1] [return] ok 5232 - my @x; delete $x[0]->[1] [variable] ok 5233 - our @x; local @x; use strict; delete $x[0]->[1] [exception] ok 5234 - our @x; local @x; use strict; delete $x[0]->[1] [return] ok 5235 - our @x; local @x; use strict; delete $x[0]->[1] [variable] ok 5236 - our @x; local @x; no strict; delete $x[0]->[1] [exception] ok 5237 - our @x; local @x; no strict; delete $x[0]->[1] [return] ok 5238 - our @x; local @x; no strict; delete $x[0]->[1] [variable] ok 5239 - my $x; delete $x->[0]->[1] <+fetch> [exception] ok 5240 - my $x; delete $x->[0]->[1] <+fetch> [return] ok 5241 - my $x; delete $x->[0]->[1] <+fetch> [variable] ok 5242 - our $x; local $x; use strict; delete $x->[0]->[1] <+fetch> [exception] ok 5243 - our $x; local $x; use strict; delete $x->[0]->[1] <+fetch> [return] ok 5244 - our $x; local $x; use strict; delete $x->[0]->[1] <+fetch> [variable] ok 5245 - our $x; local $x; no strict; delete $x->[0]->[1] <+fetch> [exception] ok 5246 - our $x; local $x; no strict; delete $x->[0]->[1] <+fetch> [return] ok 5247 - our $x; local $x; no strict; delete $x->[0]->[1] <+fetch> [variable] ok 5248 - my $x; delete $$x[0]->[1] <+fetch> [exception] ok 5249 - my $x; delete $$x[0]->[1] <+fetch> [return] ok 5250 - my $x; delete $$x[0]->[1] <+fetch> [variable] ok 5251 - our $x; local $x; use strict; delete $$x[0]->[1] <+fetch> [exception] ok 5252 - our $x; local $x; use strict; delete $$x[0]->[1] <+fetch> [return] ok 5253 - our $x; local $x; use strict; delete $$x[0]->[1] <+fetch> [variable] ok 5254 - our $x; local $x; no strict; delete $$x[0]->[1] <+fetch> [exception] ok 5255 - our $x; local $x; no strict; delete $$x[0]->[1] <+fetch> [return] ok 5256 - our $x; local $x; no strict; delete $$x[0]->[1] <+fetch> [variable] ok 5257 - my @x; delete $x[0]->[1] <+fetch> [exception] ok 5258 - my @x; delete $x[0]->[1] <+fetch> [return] ok 5259 - my @x; delete $x[0]->[1] <+fetch> [variable] ok 5260 - our @x; local @x; use strict; delete $x[0]->[1] <+fetch> [exception] ok 5261 - our @x; local @x; use strict; delete $x[0]->[1] <+fetch> [return] ok 5262 - our @x; local @x; use strict; delete $x[0]->[1] <+fetch> [variable] ok 5263 - our @x; local @x; no strict; delete $x[0]->[1] <+fetch> [exception] ok 5264 - our @x; local @x; no strict; delete $x[0]->[1] <+fetch> [return] ok 5265 - our @x; local @x; no strict; delete $x[0]->[1] <+fetch> [variable] ok 5266 - my $x; delete $x->[0]->[1] <+exists> [exception] ok 5267 - my $x; delete $x->[0]->[1] <+exists> [return] ok 5268 - my $x; delete $x->[0]->[1] <+exists> [variable] ok 5269 - our $x; local $x; use strict; delete $x->[0]->[1] <+exists> [exception] ok 5270 - our $x; local $x; use strict; delete $x->[0]->[1] <+exists> [return] ok 5271 - our $x; local $x; use strict; delete $x->[0]->[1] <+exists> [variable] ok 5272 - our $x; local $x; no strict; delete $x->[0]->[1] <+exists> [exception] ok 5273 - our $x; local $x; no strict; delete $x->[0]->[1] <+exists> [return] ok 5274 - our $x; local $x; no strict; delete $x->[0]->[1] <+exists> [variable] ok 5275 - my $x; delete $$x[0]->[1] <+exists> [exception] ok 5276 - my $x; delete $$x[0]->[1] <+exists> [return] ok 5277 - my $x; delete $$x[0]->[1] <+exists> [variable] ok 5278 - our $x; local $x; use strict; delete $$x[0]->[1] <+exists> [exception] ok 5279 - our $x; local $x; use strict; delete $$x[0]->[1] <+exists> [return] ok 5280 - our $x; local $x; use strict; delete $$x[0]->[1] <+exists> [variable] ok 5281 - our $x; local $x; no strict; delete $$x[0]->[1] <+exists> [exception] ok 5282 - our $x; local $x; no strict; delete $$x[0]->[1] <+exists> [return] ok 5283 - our $x; local $x; no strict; delete $$x[0]->[1] <+exists> [variable] ok 5284 - my @x; delete $x[0]->[1] <+exists> [exception] ok 5285 - my @x; delete $x[0]->[1] <+exists> [return] ok 5286 - my @x; delete $x[0]->[1] <+exists> [variable] ok 5287 - our @x; local @x; use strict; delete $x[0]->[1] <+exists> [exception] ok 5288 - our @x; local @x; use strict; delete $x[0]->[1] <+exists> [return] ok 5289 - our @x; local @x; use strict; delete $x[0]->[1] <+exists> [variable] ok 5290 - our @x; local @x; no strict; delete $x[0]->[1] <+exists> [exception] ok 5291 - our @x; local @x; no strict; delete $x[0]->[1] <+exists> [return] ok 5292 - our @x; local @x; no strict; delete $x[0]->[1] <+exists> [variable] ok 5293 - my $x; delete $x->[0]->[1] <+delete> [exception] ok 5294 - my $x; delete $x->[0]->[1] <+delete> [return] ok 5295 - my $x; delete $x->[0]->[1] <+delete> [variable] ok 5296 - our $x; local $x; use strict; delete $x->[0]->[1] <+delete> [exception] ok 5297 - our $x; local $x; use strict; delete $x->[0]->[1] <+delete> [return] ok 5298 - our $x; local $x; use strict; delete $x->[0]->[1] <+delete> [variable] ok 5299 - our $x; local $x; no strict; delete $x->[0]->[1] <+delete> [exception] ok 5300 - our $x; local $x; no strict; delete $x->[0]->[1] <+delete> [return] ok 5301 - our $x; local $x; no strict; delete $x->[0]->[1] <+delete> [variable] ok 5302 - my $x; delete $$x[0]->[1] <+delete> [exception] ok 5303 - my $x; delete $$x[0]->[1] <+delete> [return] ok 5304 - my $x; delete $$x[0]->[1] <+delete> [variable] ok 5305 - our $x; local $x; use strict; delete $$x[0]->[1] <+delete> [exception] ok 5306 - our $x; local $x; use strict; delete $$x[0]->[1] <+delete> [return] ok 5307 - our $x; local $x; use strict; delete $$x[0]->[1] <+delete> [variable] ok 5308 - our $x; local $x; no strict; delete $$x[0]->[1] <+delete> [exception] ok 5309 - our $x; local $x; no strict; delete $$x[0]->[1] <+delete> [return] ok 5310 - our $x; local $x; no strict; delete $$x[0]->[1] <+delete> [variable] ok 5311 - my @x; delete $x[0]->[1] <+delete> [exception] ok 5312 - my @x; delete $x[0]->[1] <+delete> [return] ok 5313 - my @x; delete $x[0]->[1] <+delete> [variable] ok 5314 - our @x; local @x; use strict; delete $x[0]->[1] <+delete> [exception] ok 5315 - our @x; local @x; use strict; delete $x[0]->[1] <+delete> [return] ok 5316 - our @x; local @x; use strict; delete $x[0]->[1] <+delete> [variable] ok 5317 - our @x; local @x; no strict; delete $x[0]->[1] <+delete> [exception] ok 5318 - our @x; local @x; no strict; delete $x[0]->[1] <+delete> [return] ok 5319 - our @x; local @x; no strict; delete $x[0]->[1] <+delete> [variable] ok 5320 - my $x; delete $x->[0]->[1] <+store> [exception] ok 5321 - my $x; delete $x->[0]->[1] <+store> [return] ok 5322 - my $x; delete $x->[0]->[1] <+store> [variable] ok 5323 - our $x; local $x; use strict; delete $x->[0]->[1] <+store> [exception] ok 5324 - our $x; local $x; use strict; delete $x->[0]->[1] <+store> [return] ok 5325 - our $x; local $x; use strict; delete $x->[0]->[1] <+store> [variable] ok 5326 - our $x; local $x; no strict; delete $x->[0]->[1] <+store> [exception] ok 5327 - our $x; local $x; no strict; delete $x->[0]->[1] <+store> [return] ok 5328 - our $x; local $x; no strict; delete $x->[0]->[1] <+store> [variable] ok 5329 - my $x; delete $$x[0]->[1] <+store> [exception] ok 5330 - my $x; delete $$x[0]->[1] <+store> [return] ok 5331 - my $x; delete $$x[0]->[1] <+store> [variable] ok 5332 - our $x; local $x; use strict; delete $$x[0]->[1] <+store> [exception] ok 5333 - our $x; local $x; use strict; delete $$x[0]->[1] <+store> [return] ok 5334 - our $x; local $x; use strict; delete $$x[0]->[1] <+store> [variable] ok 5335 - our $x; local $x; no strict; delete $$x[0]->[1] <+store> [exception] ok 5336 - our $x; local $x; no strict; delete $$x[0]->[1] <+store> [return] ok 5337 - our $x; local $x; no strict; delete $$x[0]->[1] <+store> [variable] ok 5338 - my @x; delete $x[0]->[1] <+store> [exception] ok 5339 - my @x; delete $x[0]->[1] <+store> [return] ok 5340 - my @x; delete $x[0]->[1] <+store> [variable] ok 5341 - our @x; local @x; use strict; delete $x[0]->[1] <+store> [exception] ok 5342 - our @x; local @x; use strict; delete $x[0]->[1] <+store> [return] ok 5343 - our @x; local @x; use strict; delete $x[0]->[1] <+store> [variable] ok 5344 - our @x; local @x; no strict; delete $x[0]->[1] <+store> [exception] ok 5345 - our @x; local @x; no strict; delete $x[0]->[1] <+store> [return] ok 5346 - our @x; local @x; no strict; delete $x[0]->[1] <+store> [variable] ok 5347 - my $x; delete $x->[0]->[1] <+strict +fetch> [exception] ok 5348 - my $x; delete $x->[0]->[1] <+strict +fetch> [return] ok 5349 - my $x; delete $x->[0]->[1] <+strict +fetch> [variable] ok 5350 - our $x; local $x; use strict; delete $x->[0]->[1] <+strict +fetch> [exception] ok 5351 - our $x; local $x; use strict; delete $x->[0]->[1] <+strict +fetch> [return] ok 5352 - our $x; local $x; use strict; delete $x->[0]->[1] <+strict +fetch> [variable] ok 5353 - our $x; local $x; no strict; delete $x->[0]->[1] <+strict +fetch> [exception] ok 5354 - our $x; local $x; no strict; delete $x->[0]->[1] <+strict +fetch> [return] ok 5355 - our $x; local $x; no strict; delete $x->[0]->[1] <+strict +fetch> [variable] ok 5356 - my $x; delete $$x[0]->[1] <+strict +fetch> [exception] ok 5357 - my $x; delete $$x[0]->[1] <+strict +fetch> [return] ok 5358 - my $x; delete $$x[0]->[1] <+strict +fetch> [variable] ok 5359 - our $x; local $x; use strict; delete $$x[0]->[1] <+strict +fetch> [exception] ok 5360 - our $x; local $x; use strict; delete $$x[0]->[1] <+strict +fetch> [return] ok 5361 - our $x; local $x; use strict; delete $$x[0]->[1] <+strict +fetch> [variable] ok 5362 - our $x; local $x; no strict; delete $$x[0]->[1] <+strict +fetch> [exception] ok 5363 - our $x; local $x; no strict; delete $$x[0]->[1] <+strict +fetch> [return] ok 5364 - our $x; local $x; no strict; delete $$x[0]->[1] <+strict +fetch> [variable] ok 5365 - my @x; delete $x[0]->[1] <+strict +fetch> [exception] ok 5366 - my @x; delete $x[0]->[1] <+strict +fetch> [return] ok 5367 - my @x; delete $x[0]->[1] <+strict +fetch> [variable] ok 5368 - our @x; local @x; use strict; delete $x[0]->[1] <+strict +fetch> [exception] ok 5369 - our @x; local @x; use strict; delete $x[0]->[1] <+strict +fetch> [return] ok 5370 - our @x; local @x; use strict; delete $x[0]->[1] <+strict +fetch> [variable] ok 5371 - our @x; local @x; no strict; delete $x[0]->[1] <+strict +fetch> [exception] ok 5372 - our @x; local @x; no strict; delete $x[0]->[1] <+strict +fetch> [return] ok 5373 - our @x; local @x; no strict; delete $x[0]->[1] <+strict +fetch> [variable] ok 5374 - my $x; delete $x->[0]->[1] <+strict +exists> [exception] ok 5375 - my $x; delete $x->[0]->[1] <+strict +exists> [return] ok 5376 - my $x; delete $x->[0]->[1] <+strict +exists> [variable] ok 5377 - our $x; local $x; use strict; delete $x->[0]->[1] <+strict +exists> [exception] ok 5378 - our $x; local $x; use strict; delete $x->[0]->[1] <+strict +exists> [return] ok 5379 - our $x; local $x; use strict; delete $x->[0]->[1] <+strict +exists> [variable] ok 5380 - our $x; local $x; no strict; delete $x->[0]->[1] <+strict +exists> [exception] ok 5381 - our $x; local $x; no strict; delete $x->[0]->[1] <+strict +exists> [return] ok 5382 - our $x; local $x; no strict; delete $x->[0]->[1] <+strict +exists> [variable] ok 5383 - my $x; delete $$x[0]->[1] <+strict +exists> [exception] ok 5384 - my $x; delete $$x[0]->[1] <+strict +exists> [return] ok 5385 - my $x; delete $$x[0]->[1] <+strict +exists> [variable] ok 5386 - our $x; local $x; use strict; delete $$x[0]->[1] <+strict +exists> [exception] ok 5387 - our $x; local $x; use strict; delete $$x[0]->[1] <+strict +exists> [return] ok 5388 - our $x; local $x; use strict; delete $$x[0]->[1] <+strict +exists> [variable] ok 5389 - our $x; local $x; no strict; delete $$x[0]->[1] <+strict +exists> [exception] ok 5390 - our $x; local $x; no strict; delete $$x[0]->[1] <+strict +exists> [return] ok 5391 - our $x; local $x; no strict; delete $$x[0]->[1] <+strict +exists> [variable] ok 5392 - my @x; delete $x[0]->[1] <+strict +exists> [exception] ok 5393 - my @x; delete $x[0]->[1] <+strict +exists> [return] ok 5394 - my @x; delete $x[0]->[1] <+strict +exists> [variable] ok 5395 - our @x; local @x; use strict; delete $x[0]->[1] <+strict +exists> [exception] ok 5396 - our @x; local @x; use strict; delete $x[0]->[1] <+strict +exists> [return] ok 5397 - our @x; local @x; use strict; delete $x[0]->[1] <+strict +exists> [variable] ok 5398 - our @x; local @x; no strict; delete $x[0]->[1] <+strict +exists> [exception] ok 5399 - our @x; local @x; no strict; delete $x[0]->[1] <+strict +exists> [return] ok 5400 - our @x; local @x; no strict; delete $x[0]->[1] <+strict +exists> [variable] ok 5401 - my $x; delete $x->[0]->[1] <+strict +delete> [exception] ok 5402 - my $x; delete $x->[0]->[1] <+strict +delete> [return] ok 5403 - my $x; delete $x->[0]->[1] <+strict +delete> [variable] ok 5404 - our $x; local $x; use strict; delete $x->[0]->[1] <+strict +delete> [exception] ok 5405 - our $x; local $x; use strict; delete $x->[0]->[1] <+strict +delete> [return] ok 5406 - our $x; local $x; use strict; delete $x->[0]->[1] <+strict +delete> [variable] ok 5407 - our $x; local $x; no strict; delete $x->[0]->[1] <+strict +delete> [exception] ok 5408 - our $x; local $x; no strict; delete $x->[0]->[1] <+strict +delete> [return] ok 5409 - our $x; local $x; no strict; delete $x->[0]->[1] <+strict +delete> [variable] ok 5410 - my $x; delete $$x[0]->[1] <+strict +delete> [exception] ok 5411 - my $x; delete $$x[0]->[1] <+strict +delete> [return] ok 5412 - my $x; delete $$x[0]->[1] <+strict +delete> [variable] ok 5413 - our $x; local $x; use strict; delete $$x[0]->[1] <+strict +delete> [exception] ok 5414 - our $x; local $x; use strict; delete $$x[0]->[1] <+strict +delete> [return] ok 5415 - our $x; local $x; use strict; delete $$x[0]->[1] <+strict +delete> [variable] ok 5416 - our $x; local $x; no strict; delete $$x[0]->[1] <+strict +delete> [exception] ok 5417 - our $x; local $x; no strict; delete $$x[0]->[1] <+strict +delete> [return] ok 5418 - our $x; local $x; no strict; delete $$x[0]->[1] <+strict +delete> [variable] ok 5419 - my @x; delete $x[0]->[1] <+strict +delete> [exception] ok 5420 - my @x; delete $x[0]->[1] <+strict +delete> [return] ok 5421 - my @x; delete $x[0]->[1] <+strict +delete> [variable] ok 5422 - our @x; local @x; use strict; delete $x[0]->[1] <+strict +delete> [exception] ok 5423 - our @x; local @x; use strict; delete $x[0]->[1] <+strict +delete> [return] ok 5424 - our @x; local @x; use strict; delete $x[0]->[1] <+strict +delete> [variable] ok 5425 - our @x; local @x; no strict; delete $x[0]->[1] <+strict +delete> [exception] ok 5426 - our @x; local @x; no strict; delete $x[0]->[1] <+strict +delete> [return] ok 5427 - our @x; local @x; no strict; delete $x[0]->[1] <+strict +delete> [variable] ok 5428 - my $x; delete $x->[0]->[1] <+strict +store> [exception] ok 5429 - my $x; delete $x->[0]->[1] <+strict +store> [return] ok 5430 - my $x; delete $x->[0]->[1] <+strict +store> [variable] ok 5431 - our $x; local $x; use strict; delete $x->[0]->[1] <+strict +store> [exception] ok 5432 - our $x; local $x; use strict; delete $x->[0]->[1] <+strict +store> [return] ok 5433 - our $x; local $x; use strict; delete $x->[0]->[1] <+strict +store> [variable] ok 5434 - our $x; local $x; no strict; delete $x->[0]->[1] <+strict +store> [exception] ok 5435 - our $x; local $x; no strict; delete $x->[0]->[1] <+strict +store> [return] ok 5436 - our $x; local $x; no strict; delete $x->[0]->[1] <+strict +store> [variable] ok 5437 - my $x; delete $$x[0]->[1] <+strict +store> [exception] ok 5438 - my $x; delete $$x[0]->[1] <+strict +store> [return] ok 5439 - my $x; delete $$x[0]->[1] <+strict +store> [variable] ok 5440 - our $x; local $x; use strict; delete $$x[0]->[1] <+strict +store> [exception] ok 5441 - our $x; local $x; use strict; delete $$x[0]->[1] <+strict +store> [return] ok 5442 - our $x; local $x; use strict; delete $$x[0]->[1] <+strict +store> [variable] ok 5443 - our $x; local $x; no strict; delete $$x[0]->[1] <+strict +store> [exception] ok 5444 - our $x; local $x; no strict; delete $$x[0]->[1] <+strict +store> [return] ok 5445 - our $x; local $x; no strict; delete $$x[0]->[1] <+strict +store> [variable] ok 5446 - my @x; delete $x[0]->[1] <+strict +store> [exception] ok 5447 - my @x; delete $x[0]->[1] <+strict +store> [return] ok 5448 - my @x; delete $x[0]->[1] <+strict +store> [variable] ok 5449 - our @x; local @x; use strict; delete $x[0]->[1] <+strict +store> [exception] ok 5450 - our @x; local @x; use strict; delete $x[0]->[1] <+strict +store> [return] ok 5451 - our @x; local @x; use strict; delete $x[0]->[1] <+strict +store> [variable] ok 5452 - our @x; local @x; no strict; delete $x[0]->[1] <+strict +store> [exception] ok 5453 - our @x; local @x; no strict; delete $x[0]->[1] <+strict +store> [return] ok 5454 - our @x; local @x; no strict; delete $x[0]->[1] <+strict +store> [variable] ok 5455 - my $x; $x->[0] = 1; delete $x->[0] <+fetch> [exception] ok 5456 - my $x; $x->[0] = 1; delete $x->[0] <+fetch> [return] ok 5457 - my $x; $x->[0] = 1; delete $x->[0] <+fetch> [variable] ok 5458 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+fetch> [exception] ok 5459 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+fetch> [return] ok 5460 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+fetch> [variable] ok 5461 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+fetch> [exception] ok 5462 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+fetch> [return] ok 5463 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+fetch> [variable] ok 5464 - my $x; $x->[0] = 1; delete $$x[0] <+fetch> [exception] ok 5465 - my $x; $x->[0] = 1; delete $$x[0] <+fetch> [return] ok 5466 - my $x; $x->[0] = 1; delete $$x[0] <+fetch> [variable] ok 5467 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+fetch> [exception] ok 5468 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+fetch> [return] ok 5469 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+fetch> [variable] ok 5470 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+fetch> [exception] ok 5471 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+fetch> [return] ok 5472 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+fetch> [variable] ok 5473 - my @x; $x[0] = 1; delete $x[0] <+fetch> [exception] ok 5474 - my @x; $x[0] = 1; delete $x[0] <+fetch> [return] ok 5475 - my @x; $x[0] = 1; delete $x[0] <+fetch> [variable] ok 5476 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+fetch> [exception] ok 5477 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+fetch> [return] ok 5478 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+fetch> [variable] ok 5479 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+fetch> [exception] ok 5480 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+fetch> [return] ok 5481 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+fetch> [variable] ok 5482 - my $x; $x->[0] = 1; delete $x->[1] <+fetch> [exception] ok 5483 - my $x; $x->[0] = 1; delete $x->[1] <+fetch> [return] ok 5484 - my $x; $x->[0] = 1; delete $x->[1] <+fetch> [variable] ok 5485 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+fetch> [exception] ok 5486 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+fetch> [return] ok 5487 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+fetch> [variable] ok 5488 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+fetch> [exception] ok 5489 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+fetch> [return] ok 5490 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+fetch> [variable] ok 5491 - my $x; $x->[0] = 1; delete $$x[1] <+fetch> [exception] ok 5492 - my $x; $x->[0] = 1; delete $$x[1] <+fetch> [return] ok 5493 - my $x; $x->[0] = 1; delete $$x[1] <+fetch> [variable] ok 5494 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+fetch> [exception] ok 5495 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+fetch> [return] ok 5496 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+fetch> [variable] ok 5497 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+fetch> [exception] ok 5498 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+fetch> [return] ok 5499 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+fetch> [variable] ok 5500 - my @x; $x[0] = 1; delete $x[1] <+fetch> [exception] ok 5501 - my @x; $x[0] = 1; delete $x[1] <+fetch> [return] ok 5502 - my @x; $x[0] = 1; delete $x[1] <+fetch> [variable] ok 5503 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+fetch> [exception] ok 5504 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+fetch> [return] ok 5505 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+fetch> [variable] ok 5506 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+fetch> [exception] ok 5507 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+fetch> [return] ok 5508 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+fetch> [variable] ok 5509 - my $x; $x->[0] = 1; delete $x->[0] <+exists> [exception] ok 5510 - my $x; $x->[0] = 1; delete $x->[0] <+exists> [return] ok 5511 - my $x; $x->[0] = 1; delete $x->[0] <+exists> [variable] ok 5512 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+exists> [exception] ok 5513 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+exists> [return] ok 5514 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+exists> [variable] ok 5515 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+exists> [exception] ok 5516 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+exists> [return] ok 5517 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+exists> [variable] ok 5518 - my $x; $x->[0] = 1; delete $$x[0] <+exists> [exception] ok 5519 - my $x; $x->[0] = 1; delete $$x[0] <+exists> [return] ok 5520 - my $x; $x->[0] = 1; delete $$x[0] <+exists> [variable] ok 5521 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+exists> [exception] ok 5522 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+exists> [return] ok 5523 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+exists> [variable] ok 5524 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+exists> [exception] ok 5525 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+exists> [return] ok 5526 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+exists> [variable] ok 5527 - my @x; $x[0] = 1; delete $x[0] <+exists> [exception] ok 5528 - my @x; $x[0] = 1; delete $x[0] <+exists> [return] ok 5529 - my @x; $x[0] = 1; delete $x[0] <+exists> [variable] ok 5530 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+exists> [exception] ok 5531 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+exists> [return] ok 5532 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+exists> [variable] ok 5533 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+exists> [exception] ok 5534 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+exists> [return] ok 5535 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+exists> [variable] ok 5536 - my $x; $x->[0] = 1; delete $x->[1] <+exists> [exception] ok 5537 - my $x; $x->[0] = 1; delete $x->[1] <+exists> [return] ok 5538 - my $x; $x->[0] = 1; delete $x->[1] <+exists> [variable] ok 5539 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+exists> [exception] ok 5540 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+exists> [return] ok 5541 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+exists> [variable] ok 5542 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+exists> [exception] ok 5543 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+exists> [return] ok 5544 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+exists> [variable] ok 5545 - my $x; $x->[0] = 1; delete $$x[1] <+exists> [exception] ok 5546 - my $x; $x->[0] = 1; delete $$x[1] <+exists> [return] ok 5547 - my $x; $x->[0] = 1; delete $$x[1] <+exists> [variable] ok 5548 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+exists> [exception] ok 5549 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+exists> [return] ok 5550 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+exists> [variable] ok 5551 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+exists> [exception] ok 5552 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+exists> [return] ok 5553 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+exists> [variable] ok 5554 - my @x; $x[0] = 1; delete $x[1] <+exists> [exception] ok 5555 - my @x; $x[0] = 1; delete $x[1] <+exists> [return] ok 5556 - my @x; $x[0] = 1; delete $x[1] <+exists> [variable] ok 5557 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+exists> [exception] ok 5558 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+exists> [return] ok 5559 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+exists> [variable] ok 5560 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+exists> [exception] ok 5561 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+exists> [return] ok 5562 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+exists> [variable] ok 5563 - my $x; $x->[0] = 1; delete $x->[0] <+delete> [exception] ok 5564 - my $x; $x->[0] = 1; delete $x->[0] <+delete> [return] ok 5565 - my $x; $x->[0] = 1; delete $x->[0] <+delete> [variable] ok 5566 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+delete> [exception] ok 5567 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+delete> [return] ok 5568 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+delete> [variable] ok 5569 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+delete> [exception] ok 5570 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+delete> [return] ok 5571 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+delete> [variable] ok 5572 - my $x; $x->[0] = 1; delete $$x[0] <+delete> [exception] ok 5573 - my $x; $x->[0] = 1; delete $$x[0] <+delete> [return] ok 5574 - my $x; $x->[0] = 1; delete $$x[0] <+delete> [variable] ok 5575 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+delete> [exception] ok 5576 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+delete> [return] ok 5577 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+delete> [variable] ok 5578 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+delete> [exception] ok 5579 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+delete> [return] ok 5580 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+delete> [variable] ok 5581 - my @x; $x[0] = 1; delete $x[0] <+delete> [exception] ok 5582 - my @x; $x[0] = 1; delete $x[0] <+delete> [return] ok 5583 - my @x; $x[0] = 1; delete $x[0] <+delete> [variable] ok 5584 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+delete> [exception] ok 5585 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+delete> [return] ok 5586 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+delete> [variable] ok 5587 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+delete> [exception] ok 5588 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+delete> [return] ok 5589 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+delete> [variable] ok 5590 - my $x; $x->[0] = 1; delete $x->[1] <+delete> [exception] ok 5591 - my $x; $x->[0] = 1; delete $x->[1] <+delete> [return] ok 5592 - my $x; $x->[0] = 1; delete $x->[1] <+delete> [variable] ok 5593 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+delete> [exception] ok 5594 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+delete> [return] ok 5595 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+delete> [variable] ok 5596 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+delete> [exception] ok 5597 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+delete> [return] ok 5598 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+delete> [variable] ok 5599 - my $x; $x->[0] = 1; delete $$x[1] <+delete> [exception] ok 5600 - my $x; $x->[0] = 1; delete $$x[1] <+delete> [return] ok 5601 - my $x; $x->[0] = 1; delete $$x[1] <+delete> [variable] ok 5602 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+delete> [exception] ok 5603 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+delete> [return] ok 5604 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+delete> [variable] ok 5605 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+delete> [exception] ok 5606 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+delete> [return] ok 5607 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+delete> [variable] ok 5608 - my @x; $x[0] = 1; delete $x[1] <+delete> [exception] ok 5609 - my @x; $x[0] = 1; delete $x[1] <+delete> [return] ok 5610 - my @x; $x[0] = 1; delete $x[1] <+delete> [variable] ok 5611 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+delete> [exception] ok 5612 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+delete> [return] ok 5613 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+delete> [variable] ok 5614 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+delete> [exception] ok 5615 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+delete> [return] ok 5616 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+delete> [variable] ok 5617 - my $x; $x->[0] = 1; delete $x->[0] <+store> [exception] ok 5618 - my $x; $x->[0] = 1; delete $x->[0] <+store> [return] ok 5619 - my $x; $x->[0] = 1; delete $x->[0] <+store> [variable] ok 5620 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+store> [exception] ok 5621 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+store> [return] ok 5622 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+store> [variable] ok 5623 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+store> [exception] ok 5624 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+store> [return] ok 5625 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+store> [variable] ok 5626 - my $x; $x->[0] = 1; delete $$x[0] <+store> [exception] ok 5627 - my $x; $x->[0] = 1; delete $$x[0] <+store> [return] ok 5628 - my $x; $x->[0] = 1; delete $$x[0] <+store> [variable] ok 5629 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+store> [exception] ok 5630 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+store> [return] ok 5631 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+store> [variable] ok 5632 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+store> [exception] ok 5633 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+store> [return] ok 5634 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+store> [variable] ok 5635 - my @x; $x[0] = 1; delete $x[0] <+store> [exception] ok 5636 - my @x; $x[0] = 1; delete $x[0] <+store> [return] ok 5637 - my @x; $x[0] = 1; delete $x[0] <+store> [variable] ok 5638 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+store> [exception] ok 5639 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+store> [return] ok 5640 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+store> [variable] ok 5641 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+store> [exception] ok 5642 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+store> [return] ok 5643 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+store> [variable] ok 5644 - my $x; $x->[0] = 1; delete $x->[1] <+store> [exception] ok 5645 - my $x; $x->[0] = 1; delete $x->[1] <+store> [return] ok 5646 - my $x; $x->[0] = 1; delete $x->[1] <+store> [variable] ok 5647 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+store> [exception] ok 5648 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+store> [return] ok 5649 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+store> [variable] ok 5650 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+store> [exception] ok 5651 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+store> [return] ok 5652 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+store> [variable] ok 5653 - my $x; $x->[0] = 1; delete $$x[1] <+store> [exception] ok 5654 - my $x; $x->[0] = 1; delete $$x[1] <+store> [return] ok 5655 - my $x; $x->[0] = 1; delete $$x[1] <+store> [variable] ok 5656 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+store> [exception] ok 5657 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+store> [return] ok 5658 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+store> [variable] ok 5659 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+store> [exception] ok 5660 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+store> [return] ok 5661 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+store> [variable] ok 5662 - my @x; $x[0] = 1; delete $x[1] <+store> [exception] ok 5663 - my @x; $x[0] = 1; delete $x[1] <+store> [return] ok 5664 - my @x; $x[0] = 1; delete $x[1] <+store> [variable] ok 5665 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+store> [exception] ok 5666 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+store> [return] ok 5667 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+store> [variable] ok 5668 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+store> [exception] ok 5669 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+store> [return] ok 5670 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+store> [variable] ok 5671 - my $x; $x->[0] = 1; delete $x->[0] <+strict +fetch> [exception] ok 5672 - my $x; $x->[0] = 1; delete $x->[0] <+strict +fetch> [return] ok 5673 - my $x; $x->[0] = 1; delete $x->[0] <+strict +fetch> [variable] ok 5674 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+strict +fetch> [exception] ok 5675 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+strict +fetch> [return] ok 5676 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+strict +fetch> [variable] ok 5677 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+strict +fetch> [exception] ok 5678 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+strict +fetch> [return] ok 5679 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+strict +fetch> [variable] ok 5680 - my $x; $x->[0] = 1; delete $$x[0] <+strict +fetch> [exception] ok 5681 - my $x; $x->[0] = 1; delete $$x[0] <+strict +fetch> [return] ok 5682 - my $x; $x->[0] = 1; delete $$x[0] <+strict +fetch> [variable] ok 5683 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+strict +fetch> [exception] ok 5684 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+strict +fetch> [return] ok 5685 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+strict +fetch> [variable] ok 5686 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+strict +fetch> [exception] ok 5687 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+strict +fetch> [return] ok 5688 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+strict +fetch> [variable] ok 5689 - my @x; $x[0] = 1; delete $x[0] <+strict +fetch> [exception] ok 5690 - my @x; $x[0] = 1; delete $x[0] <+strict +fetch> [return] ok 5691 - my @x; $x[0] = 1; delete $x[0] <+strict +fetch> [variable] ok 5692 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+strict +fetch> [exception] ok 5693 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+strict +fetch> [return] ok 5694 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+strict +fetch> [variable] ok 5695 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+strict +fetch> [exception] ok 5696 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+strict +fetch> [return] ok 5697 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+strict +fetch> [variable] ok 5698 - my $x; $x->[0] = 1; delete $x->[1] <+strict +fetch> [exception] ok 5699 - my $x; $x->[0] = 1; delete $x->[1] <+strict +fetch> [return] ok 5700 - my $x; $x->[0] = 1; delete $x->[1] <+strict +fetch> [variable] ok 5701 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+strict +fetch> [exception] ok 5702 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+strict +fetch> [return] ok 5703 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+strict +fetch> [variable] ok 5704 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+strict +fetch> [exception] ok 5705 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+strict +fetch> [return] ok 5706 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+strict +fetch> [variable] ok 5707 - my $x; $x->[0] = 1; delete $$x[1] <+strict +fetch> [exception] ok 5708 - my $x; $x->[0] = 1; delete $$x[1] <+strict +fetch> [return] ok 5709 - my $x; $x->[0] = 1; delete $$x[1] <+strict +fetch> [variable] ok 5710 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+strict +fetch> [exception] ok 5711 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+strict +fetch> [return] ok 5712 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+strict +fetch> [variable] ok 5713 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+strict +fetch> [exception] ok 5714 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+strict +fetch> [return] ok 5715 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+strict +fetch> [variable] ok 5716 - my @x; $x[0] = 1; delete $x[1] <+strict +fetch> [exception] ok 5717 - my @x; $x[0] = 1; delete $x[1] <+strict +fetch> [return] ok 5718 - my @x; $x[0] = 1; delete $x[1] <+strict +fetch> [variable] ok 5719 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+strict +fetch> [exception] ok 5720 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+strict +fetch> [return] ok 5721 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+strict +fetch> [variable] ok 5722 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+strict +fetch> [exception] ok 5723 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+strict +fetch> [return] ok 5724 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+strict +fetch> [variable] ok 5725 - my $x; $x->[0] = 1; delete $x->[0] <+strict +exists> [exception] ok 5726 - my $x; $x->[0] = 1; delete $x->[0] <+strict +exists> [return] ok 5727 - my $x; $x->[0] = 1; delete $x->[0] <+strict +exists> [variable] ok 5728 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+strict +exists> [exception] ok 5729 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+strict +exists> [return] ok 5730 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+strict +exists> [variable] ok 5731 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+strict +exists> [exception] ok 5732 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+strict +exists> [return] ok 5733 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+strict +exists> [variable] ok 5734 - my $x; $x->[0] = 1; delete $$x[0] <+strict +exists> [exception] ok 5735 - my $x; $x->[0] = 1; delete $$x[0] <+strict +exists> [return] ok 5736 - my $x; $x->[0] = 1; delete $$x[0] <+strict +exists> [variable] ok 5737 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+strict +exists> [exception] ok 5738 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+strict +exists> [return] ok 5739 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+strict +exists> [variable] ok 5740 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+strict +exists> [exception] ok 5741 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+strict +exists> [return] ok 5742 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+strict +exists> [variable] ok 5743 - my @x; $x[0] = 1; delete $x[0] <+strict +exists> [exception] ok 5744 - my @x; $x[0] = 1; delete $x[0] <+strict +exists> [return] ok 5745 - my @x; $x[0] = 1; delete $x[0] <+strict +exists> [variable] ok 5746 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+strict +exists> [exception] ok 5747 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+strict +exists> [return] ok 5748 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+strict +exists> [variable] ok 5749 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+strict +exists> [exception] ok 5750 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+strict +exists> [return] ok 5751 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+strict +exists> [variable] ok 5752 - my $x; $x->[0] = 1; delete $x->[1] <+strict +exists> [exception] ok 5753 - my $x; $x->[0] = 1; delete $x->[1] <+strict +exists> [return] ok 5754 - my $x; $x->[0] = 1; delete $x->[1] <+strict +exists> [variable] ok 5755 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+strict +exists> [exception] ok 5756 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+strict +exists> [return] ok 5757 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+strict +exists> [variable] ok 5758 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+strict +exists> [exception] ok 5759 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+strict +exists> [return] ok 5760 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+strict +exists> [variable] ok 5761 - my $x; $x->[0] = 1; delete $$x[1] <+strict +exists> [exception] ok 5762 - my $x; $x->[0] = 1; delete $$x[1] <+strict +exists> [return] ok 5763 - my $x; $x->[0] = 1; delete $$x[1] <+strict +exists> [variable] ok 5764 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+strict +exists> [exception] ok 5765 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+strict +exists> [return] ok 5766 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+strict +exists> [variable] ok 5767 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+strict +exists> [exception] ok 5768 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+strict +exists> [return] ok 5769 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+strict +exists> [variable] ok 5770 - my @x; $x[0] = 1; delete $x[1] <+strict +exists> [exception] ok 5771 - my @x; $x[0] = 1; delete $x[1] <+strict +exists> [return] ok 5772 - my @x; $x[0] = 1; delete $x[1] <+strict +exists> [variable] ok 5773 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+strict +exists> [exception] ok 5774 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+strict +exists> [return] ok 5775 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+strict +exists> [variable] ok 5776 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+strict +exists> [exception] ok 5777 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+strict +exists> [return] ok 5778 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+strict +exists> [variable] ok 5779 - my $x; $x->[0] = 1; delete $x->[0] <+strict +delete> [exception] ok 5780 - my $x; $x->[0] = 1; delete $x->[0] <+strict +delete> [return] ok 5781 - my $x; $x->[0] = 1; delete $x->[0] <+strict +delete> [variable] ok 5782 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+strict +delete> [exception] ok 5783 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+strict +delete> [return] ok 5784 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+strict +delete> [variable] ok 5785 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+strict +delete> [exception] ok 5786 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+strict +delete> [return] ok 5787 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+strict +delete> [variable] ok 5788 - my $x; $x->[0] = 1; delete $$x[0] <+strict +delete> [exception] ok 5789 - my $x; $x->[0] = 1; delete $$x[0] <+strict +delete> [return] ok 5790 - my $x; $x->[0] = 1; delete $$x[0] <+strict +delete> [variable] ok 5791 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+strict +delete> [exception] ok 5792 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+strict +delete> [return] ok 5793 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+strict +delete> [variable] ok 5794 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+strict +delete> [exception] ok 5795 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+strict +delete> [return] ok 5796 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+strict +delete> [variable] ok 5797 - my @x; $x[0] = 1; delete $x[0] <+strict +delete> [exception] ok 5798 - my @x; $x[0] = 1; delete $x[0] <+strict +delete> [return] ok 5799 - my @x; $x[0] = 1; delete $x[0] <+strict +delete> [variable] ok 5800 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+strict +delete> [exception] ok 5801 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+strict +delete> [return] ok 5802 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+strict +delete> [variable] ok 5803 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+strict +delete> [exception] ok 5804 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+strict +delete> [return] ok 5805 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+strict +delete> [variable] ok 5806 - my $x; $x->[0] = 1; delete $x->[1] <+strict +delete> [exception] ok 5807 - my $x; $x->[0] = 1; delete $x->[1] <+strict +delete> [return] ok 5808 - my $x; $x->[0] = 1; delete $x->[1] <+strict +delete> [variable] ok 5809 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+strict +delete> [exception] ok 5810 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+strict +delete> [return] ok 5811 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+strict +delete> [variable] ok 5812 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+strict +delete> [exception] ok 5813 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+strict +delete> [return] ok 5814 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+strict +delete> [variable] ok 5815 - my $x; $x->[0] = 1; delete $$x[1] <+strict +delete> [exception] ok 5816 - my $x; $x->[0] = 1; delete $$x[1] <+strict +delete> [return] ok 5817 - my $x; $x->[0] = 1; delete $$x[1] <+strict +delete> [variable] ok 5818 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+strict +delete> [exception] ok 5819 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+strict +delete> [return] ok 5820 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+strict +delete> [variable] ok 5821 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+strict +delete> [exception] ok 5822 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+strict +delete> [return] ok 5823 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+strict +delete> [variable] ok 5824 - my @x; $x[0] = 1; delete $x[1] <+strict +delete> [exception] ok 5825 - my @x; $x[0] = 1; delete $x[1] <+strict +delete> [return] ok 5826 - my @x; $x[0] = 1; delete $x[1] <+strict +delete> [variable] ok 5827 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+strict +delete> [exception] ok 5828 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+strict +delete> [return] ok 5829 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+strict +delete> [variable] ok 5830 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+strict +delete> [exception] ok 5831 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+strict +delete> [return] ok 5832 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+strict +delete> [variable] ok 5833 - my $x; $x->[0] = 1; delete $x->[0] <+strict +store> [exception] ok 5834 - my $x; $x->[0] = 1; delete $x->[0] <+strict +store> [return] ok 5835 - my $x; $x->[0] = 1; delete $x->[0] <+strict +store> [variable] ok 5836 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+strict +store> [exception] ok 5837 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+strict +store> [return] ok 5838 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[0] <+strict +store> [variable] ok 5839 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+strict +store> [exception] ok 5840 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+strict +store> [return] ok 5841 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[0] <+strict +store> [variable] ok 5842 - my $x; $x->[0] = 1; delete $$x[0] <+strict +store> [exception] ok 5843 - my $x; $x->[0] = 1; delete $$x[0] <+strict +store> [return] ok 5844 - my $x; $x->[0] = 1; delete $$x[0] <+strict +store> [variable] ok 5845 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+strict +store> [exception] ok 5846 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+strict +store> [return] ok 5847 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[0] <+strict +store> [variable] ok 5848 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+strict +store> [exception] ok 5849 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+strict +store> [return] ok 5850 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[0] <+strict +store> [variable] ok 5851 - my @x; $x[0] = 1; delete $x[0] <+strict +store> [exception] ok 5852 - my @x; $x[0] = 1; delete $x[0] <+strict +store> [return] ok 5853 - my @x; $x[0] = 1; delete $x[0] <+strict +store> [variable] ok 5854 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+strict +store> [exception] ok 5855 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+strict +store> [return] ok 5856 - our @x; local @x; use strict; $x[0] = 1; delete $x[0] <+strict +store> [variable] ok 5857 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+strict +store> [exception] ok 5858 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+strict +store> [return] ok 5859 - our @x; local @x; no strict; $x[0] = 1; delete $x[0] <+strict +store> [variable] ok 5860 - my $x; $x->[0] = 1; delete $x->[1] <+strict +store> [exception] ok 5861 - my $x; $x->[0] = 1; delete $x->[1] <+strict +store> [return] ok 5862 - my $x; $x->[0] = 1; delete $x->[1] <+strict +store> [variable] ok 5863 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+strict +store> [exception] ok 5864 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+strict +store> [return] ok 5865 - our $x; local $x; use strict; $x->[0] = 1; delete $x->[1] <+strict +store> [variable] ok 5866 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+strict +store> [exception] ok 5867 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+strict +store> [return] ok 5868 - our $x; local $x; no strict; $x->[0] = 1; delete $x->[1] <+strict +store> [variable] ok 5869 - my $x; $x->[0] = 1; delete $$x[1] <+strict +store> [exception] ok 5870 - my $x; $x->[0] = 1; delete $$x[1] <+strict +store> [return] ok 5871 - my $x; $x->[0] = 1; delete $$x[1] <+strict +store> [variable] ok 5872 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+strict +store> [exception] ok 5873 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+strict +store> [return] ok 5874 - our $x; local $x; use strict; $x->[0] = 1; delete $$x[1] <+strict +store> [variable] ok 5875 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+strict +store> [exception] ok 5876 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+strict +store> [return] ok 5877 - our $x; local $x; no strict; $x->[0] = 1; delete $$x[1] <+strict +store> [variable] ok 5878 - my @x; $x[0] = 1; delete $x[1] <+strict +store> [exception] ok 5879 - my @x; $x[0] = 1; delete $x[1] <+strict +store> [return] ok 5880 - my @x; $x[0] = 1; delete $x[1] <+strict +store> [variable] ok 5881 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+strict +store> [exception] ok 5882 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+strict +store> [return] ok 5883 - our @x; local @x; use strict; $x[0] = 1; delete $x[1] <+strict +store> [variable] ok 5884 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+strict +store> [exception] ok 5885 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+strict +store> [return] ok 5886 - our @x; local @x; no strict; $x[0] = 1; delete $x[1] <+strict +store> [variable] ok 5887 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+fetch> [exception] ok 5888 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+fetch> [return] ok 5889 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+fetch> [variable] ok 5890 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+fetch> [exception] ok 5891 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+fetch> [return] ok 5892 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+fetch> [variable] ok 5893 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+fetch> [exception] ok 5894 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+fetch> [return] ok 5895 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+fetch> [variable] ok 5896 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+fetch> [exception] ok 5897 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+fetch> [return] ok 5898 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+fetch> [variable] ok 5899 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+fetch> [exception] ok 5900 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+fetch> [return] ok 5901 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+fetch> [variable] ok 5902 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+fetch> [exception] ok 5903 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+fetch> [return] ok 5904 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+fetch> [variable] ok 5905 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+fetch> [exception] ok 5906 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+fetch> [return] ok 5907 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+fetch> [variable] ok 5908 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+fetch> [exception] ok 5909 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+fetch> [return] ok 5910 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+fetch> [variable] ok 5911 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+fetch> [exception] ok 5912 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+fetch> [return] ok 5913 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+fetch> [variable] ok 5914 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+fetch> [exception] ok 5915 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+fetch> [return] ok 5916 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+fetch> [variable] ok 5917 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+fetch> [exception] ok 5918 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+fetch> [return] ok 5919 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+fetch> [variable] ok 5920 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+fetch> [exception] ok 5921 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+fetch> [return] ok 5922 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+fetch> [variable] ok 5923 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+fetch> [exception] ok 5924 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+fetch> [return] ok 5925 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+fetch> [variable] ok 5926 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+fetch> [exception] ok 5927 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+fetch> [return] ok 5928 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+fetch> [variable] ok 5929 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+fetch> [exception] ok 5930 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+fetch> [return] ok 5931 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+fetch> [variable] ok 5932 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+fetch> [exception] ok 5933 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+fetch> [return] ok 5934 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+fetch> [variable] ok 5935 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+fetch> [exception] ok 5936 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+fetch> [return] ok 5937 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+fetch> [variable] ok 5938 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+fetch> [exception] ok 5939 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+fetch> [return] ok 5940 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+fetch> [variable] ok 5941 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+fetch> [exception] ok 5942 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+fetch> [return] ok 5943 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+fetch> [variable] ok 5944 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+fetch> [exception] ok 5945 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+fetch> [return] ok 5946 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+fetch> [variable] ok 5947 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+fetch> [exception] ok 5948 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+fetch> [return] ok 5949 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+fetch> [variable] ok 5950 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+fetch> [exception] ok 5951 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+fetch> [return] ok 5952 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+fetch> [variable] ok 5953 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+fetch> [exception] ok 5954 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+fetch> [return] ok 5955 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+fetch> [variable] ok 5956 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+fetch> [exception] ok 5957 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+fetch> [return] ok 5958 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+fetch> [variable] ok 5959 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+fetch> [exception] ok 5960 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+fetch> [return] ok 5961 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+fetch> [variable] ok 5962 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+fetch> [exception] ok 5963 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+fetch> [return] ok 5964 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+fetch> [variable] ok 5965 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+fetch> [exception] ok 5966 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+fetch> [return] ok 5967 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+fetch> [variable] ok 5968 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+exists> [exception] ok 5969 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+exists> [return] ok 5970 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+exists> [variable] ok 5971 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+exists> [exception] ok 5972 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+exists> [return] ok 5973 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+exists> [variable] ok 5974 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+exists> [exception] ok 5975 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+exists> [return] ok 5976 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+exists> [variable] ok 5977 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+exists> [exception] ok 5978 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+exists> [return] ok 5979 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+exists> [variable] ok 5980 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+exists> [exception] ok 5981 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+exists> [return] ok 5982 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+exists> [variable] ok 5983 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+exists> [exception] ok 5984 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+exists> [return] ok 5985 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+exists> [variable] ok 5986 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+exists> [exception] ok 5987 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+exists> [return] ok 5988 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+exists> [variable] ok 5989 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+exists> [exception] ok 5990 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+exists> [return] ok 5991 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+exists> [variable] ok 5992 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+exists> [exception] ok 5993 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+exists> [return] ok 5994 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+exists> [variable] ok 5995 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+exists> [exception] ok 5996 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+exists> [return] ok 5997 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+exists> [variable] ok 5998 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+exists> [exception] ok 5999 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+exists> [return] ok 6000 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+exists> [variable] ok 6001 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+exists> [exception] ok 6002 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+exists> [return] ok 6003 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+exists> [variable] ok 6004 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+exists> [exception] ok 6005 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+exists> [return] ok 6006 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+exists> [variable] ok 6007 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+exists> [exception] ok 6008 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+exists> [return] ok 6009 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+exists> [variable] ok 6010 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+exists> [exception] ok 6011 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+exists> [return] ok 6012 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+exists> [variable] ok 6013 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+exists> [exception] ok 6014 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+exists> [return] ok 6015 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+exists> [variable] ok 6016 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+exists> [exception] ok 6017 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+exists> [return] ok 6018 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+exists> [variable] ok 6019 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+exists> [exception] ok 6020 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+exists> [return] ok 6021 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+exists> [variable] ok 6022 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+exists> [exception] ok 6023 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+exists> [return] ok 6024 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+exists> [variable] ok 6025 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+exists> [exception] ok 6026 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+exists> [return] ok 6027 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+exists> [variable] ok 6028 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+exists> [exception] ok 6029 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+exists> [return] ok 6030 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+exists> [variable] ok 6031 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+exists> [exception] ok 6032 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+exists> [return] ok 6033 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+exists> [variable] ok 6034 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+exists> [exception] ok 6035 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+exists> [return] ok 6036 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+exists> [variable] ok 6037 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+exists> [exception] ok 6038 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+exists> [return] ok 6039 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+exists> [variable] ok 6040 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+exists> [exception] ok 6041 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+exists> [return] ok 6042 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+exists> [variable] ok 6043 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+exists> [exception] ok 6044 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+exists> [return] ok 6045 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+exists> [variable] ok 6046 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+exists> [exception] ok 6047 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+exists> [return] ok 6048 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+exists> [variable] ok 6049 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+delete> [exception] ok 6050 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+delete> [return] ok 6051 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+delete> [variable] ok 6052 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+delete> [exception] ok 6053 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+delete> [return] ok 6054 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+delete> [variable] ok 6055 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+delete> [exception] ok 6056 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+delete> [return] ok 6057 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+delete> [variable] ok 6058 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+delete> [exception] ok 6059 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+delete> [return] ok 6060 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+delete> [variable] ok 6061 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+delete> [exception] ok 6062 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+delete> [return] ok 6063 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+delete> [variable] ok 6064 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+delete> [exception] ok 6065 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+delete> [return] ok 6066 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+delete> [variable] ok 6067 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+delete> [exception] ok 6068 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+delete> [return] ok 6069 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+delete> [variable] ok 6070 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+delete> [exception] ok 6071 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+delete> [return] ok 6072 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+delete> [variable] ok 6073 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+delete> [exception] ok 6074 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+delete> [return] ok 6075 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+delete> [variable] ok 6076 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+delete> [exception] ok 6077 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+delete> [return] ok 6078 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+delete> [variable] ok 6079 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+delete> [exception] ok 6080 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+delete> [return] ok 6081 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+delete> [variable] ok 6082 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+delete> [exception] ok 6083 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+delete> [return] ok 6084 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+delete> [variable] ok 6085 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+delete> [exception] ok 6086 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+delete> [return] ok 6087 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+delete> [variable] ok 6088 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+delete> [exception] ok 6089 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+delete> [return] ok 6090 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+delete> [variable] ok 6091 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+delete> [exception] ok 6092 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+delete> [return] ok 6093 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+delete> [variable] ok 6094 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+delete> [exception] ok 6095 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+delete> [return] ok 6096 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+delete> [variable] ok 6097 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+delete> [exception] ok 6098 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+delete> [return] ok 6099 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+delete> [variable] ok 6100 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+delete> [exception] ok 6101 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+delete> [return] ok 6102 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+delete> [variable] ok 6103 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+delete> [exception] ok 6104 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+delete> [return] ok 6105 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+delete> [variable] ok 6106 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+delete> [exception] ok 6107 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+delete> [return] ok 6108 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+delete> [variable] ok 6109 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+delete> [exception] ok 6110 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+delete> [return] ok 6111 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+delete> [variable] ok 6112 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+delete> [exception] ok 6113 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+delete> [return] ok 6114 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+delete> [variable] ok 6115 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+delete> [exception] ok 6116 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+delete> [return] ok 6117 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+delete> [variable] ok 6118 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+delete> [exception] ok 6119 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+delete> [return] ok 6120 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+delete> [variable] ok 6121 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+delete> [exception] ok 6122 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+delete> [return] ok 6123 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+delete> [variable] ok 6124 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+delete> [exception] ok 6125 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+delete> [return] ok 6126 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+delete> [variable] ok 6127 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+delete> [exception] ok 6128 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+delete> [return] ok 6129 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+delete> [variable] ok 6130 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+store> [exception] ok 6131 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+store> [return] ok 6132 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+store> [variable] ok 6133 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+store> [exception] ok 6134 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+store> [return] ok 6135 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+store> [variable] ok 6136 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+store> [exception] ok 6137 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+store> [return] ok 6138 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+store> [variable] ok 6139 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+store> [exception] ok 6140 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+store> [return] ok 6141 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+store> [variable] ok 6142 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+store> [exception] ok 6143 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+store> [return] ok 6144 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+store> [variable] ok 6145 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+store> [exception] ok 6146 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+store> [return] ok 6147 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+store> [variable] ok 6148 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+store> [exception] ok 6149 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+store> [return] ok 6150 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+store> [variable] ok 6151 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+store> [exception] ok 6152 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+store> [return] ok 6153 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+store> [variable] ok 6154 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+store> [exception] ok 6155 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+store> [return] ok 6156 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+store> [variable] ok 6157 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+store> [exception] ok 6158 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+store> [return] ok 6159 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+store> [variable] ok 6160 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+store> [exception] ok 6161 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+store> [return] ok 6162 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+store> [variable] ok 6163 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+store> [exception] ok 6164 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+store> [return] ok 6165 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+store> [variable] ok 6166 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+store> [exception] ok 6167 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+store> [return] ok 6168 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+store> [variable] ok 6169 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+store> [exception] ok 6170 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+store> [return] ok 6171 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+store> [variable] ok 6172 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+store> [exception] ok 6173 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+store> [return] ok 6174 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+store> [variable] ok 6175 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+store> [exception] ok 6176 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+store> [return] ok 6177 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+store> [variable] ok 6178 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+store> [exception] ok 6179 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+store> [return] ok 6180 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+store> [variable] ok 6181 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+store> [exception] ok 6182 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+store> [return] ok 6183 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+store> [variable] ok 6184 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+store> [exception] ok 6185 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+store> [return] ok 6186 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+store> [variable] ok 6187 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+store> [exception] ok 6188 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+store> [return] ok 6189 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+store> [variable] ok 6190 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+store> [exception] ok 6191 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+store> [return] ok 6192 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+store> [variable] ok 6193 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+store> [exception] ok 6194 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+store> [return] ok 6195 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+store> [variable] ok 6196 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+store> [exception] ok 6197 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+store> [return] ok 6198 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+store> [variable] ok 6199 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+store> [exception] ok 6200 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+store> [return] ok 6201 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+store> [variable] ok 6202 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+store> [exception] ok 6203 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+store> [return] ok 6204 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+store> [variable] ok 6205 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+store> [exception] ok 6206 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+store> [return] ok 6207 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+store> [variable] ok 6208 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+store> [exception] ok 6209 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+store> [return] ok 6210 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+store> [variable] ok 6211 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +fetch> [exception] ok 6212 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +fetch> [return] ok 6213 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +fetch> [variable] ok 6214 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +fetch> [exception] ok 6215 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +fetch> [return] ok 6216 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +fetch> [variable] ok 6217 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +fetch> [exception] ok 6218 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +fetch> [return] ok 6219 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +fetch> [variable] ok 6220 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +fetch> [exception] ok 6221 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +fetch> [return] ok 6222 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +fetch> [variable] ok 6223 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +fetch> [exception] ok 6224 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +fetch> [return] ok 6225 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +fetch> [variable] ok 6226 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +fetch> [exception] ok 6227 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +fetch> [return] ok 6228 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +fetch> [variable] ok 6229 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +fetch> [exception] ok 6230 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +fetch> [return] ok 6231 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +fetch> [variable] ok 6232 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +fetch> [exception] ok 6233 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +fetch> [return] ok 6234 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +fetch> [variable] ok 6235 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +fetch> [exception] ok 6236 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +fetch> [return] ok 6237 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +fetch> [variable] ok 6238 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +fetch> [exception] ok 6239 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +fetch> [return] ok 6240 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +fetch> [variable] ok 6241 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +fetch> [exception] ok 6242 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +fetch> [return] ok 6243 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +fetch> [variable] ok 6244 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +fetch> [exception] ok 6245 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +fetch> [return] ok 6246 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +fetch> [variable] ok 6247 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +fetch> [exception] ok 6248 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +fetch> [return] ok 6249 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +fetch> [variable] ok 6250 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +fetch> [exception] ok 6251 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +fetch> [return] ok 6252 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +fetch> [variable] ok 6253 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +fetch> [exception] ok 6254 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +fetch> [return] ok 6255 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +fetch> [variable] ok 6256 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +fetch> [exception] ok 6257 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +fetch> [return] ok 6258 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +fetch> [variable] ok 6259 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +fetch> [exception] ok 6260 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +fetch> [return] ok 6261 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +fetch> [variable] ok 6262 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +fetch> [exception] ok 6263 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +fetch> [return] ok 6264 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +fetch> [variable] ok 6265 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +fetch> [exception] ok 6266 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +fetch> [return] ok 6267 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +fetch> [variable] ok 6268 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +fetch> [exception] ok 6269 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +fetch> [return] ok 6270 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +fetch> [variable] ok 6271 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +fetch> [exception] ok 6272 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +fetch> [return] ok 6273 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +fetch> [variable] ok 6274 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +fetch> [exception] ok 6275 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +fetch> [return] ok 6276 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +fetch> [variable] ok 6277 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +fetch> [exception] ok 6278 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +fetch> [return] ok 6279 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +fetch> [variable] ok 6280 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +fetch> [exception] ok 6281 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +fetch> [return] ok 6282 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +fetch> [variable] ok 6283 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +fetch> [exception] ok 6284 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +fetch> [return] ok 6285 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +fetch> [variable] ok 6286 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +fetch> [exception] ok 6287 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +fetch> [return] ok 6288 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +fetch> [variable] ok 6289 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +fetch> [exception] ok 6290 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +fetch> [return] ok 6291 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +fetch> [variable] ok 6292 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +exists> [exception] ok 6293 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +exists> [return] ok 6294 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +exists> [variable] ok 6295 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +exists> [exception] ok 6296 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +exists> [return] ok 6297 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +exists> [variable] ok 6298 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +exists> [exception] ok 6299 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +exists> [return] ok 6300 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +exists> [variable] ok 6301 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +exists> [exception] ok 6302 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +exists> [return] ok 6303 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +exists> [variable] ok 6304 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +exists> [exception] ok 6305 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +exists> [return] ok 6306 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +exists> [variable] ok 6307 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +exists> [exception] ok 6308 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +exists> [return] ok 6309 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +exists> [variable] ok 6310 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +exists> [exception] ok 6311 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +exists> [return] ok 6312 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +exists> [variable] ok 6313 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +exists> [exception] ok 6314 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +exists> [return] ok 6315 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +exists> [variable] ok 6316 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +exists> [exception] ok 6317 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +exists> [return] ok 6318 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +exists> [variable] ok 6319 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +exists> [exception] ok 6320 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +exists> [return] ok 6321 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +exists> [variable] ok 6322 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +exists> [exception] ok 6323 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +exists> [return] ok 6324 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +exists> [variable] ok 6325 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +exists> [exception] ok 6326 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +exists> [return] ok 6327 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +exists> [variable] ok 6328 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +exists> [exception] ok 6329 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +exists> [return] ok 6330 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +exists> [variable] ok 6331 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +exists> [exception] ok 6332 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +exists> [return] ok 6333 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +exists> [variable] ok 6334 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +exists> [exception] ok 6335 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +exists> [return] ok 6336 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +exists> [variable] ok 6337 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +exists> [exception] ok 6338 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +exists> [return] ok 6339 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +exists> [variable] ok 6340 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +exists> [exception] ok 6341 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +exists> [return] ok 6342 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +exists> [variable] ok 6343 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +exists> [exception] ok 6344 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +exists> [return] ok 6345 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +exists> [variable] ok 6346 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +exists> [exception] ok 6347 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +exists> [return] ok 6348 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +exists> [variable] ok 6349 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +exists> [exception] ok 6350 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +exists> [return] ok 6351 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +exists> [variable] ok 6352 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +exists> [exception] ok 6353 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +exists> [return] ok 6354 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +exists> [variable] ok 6355 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +exists> [exception] ok 6356 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +exists> [return] ok 6357 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +exists> [variable] ok 6358 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +exists> [exception] ok 6359 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +exists> [return] ok 6360 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +exists> [variable] ok 6361 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +exists> [exception] ok 6362 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +exists> [return] ok 6363 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +exists> [variable] ok 6364 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +exists> [exception] ok 6365 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +exists> [return] ok 6366 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +exists> [variable] ok 6367 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +exists> [exception] ok 6368 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +exists> [return] ok 6369 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +exists> [variable] ok 6370 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +exists> [exception] ok 6371 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +exists> [return] ok 6372 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +exists> [variable] ok 6373 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +delete> [exception] ok 6374 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +delete> [return] ok 6375 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +delete> [variable] ok 6376 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +delete> [exception] ok 6377 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +delete> [return] ok 6378 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +delete> [variable] ok 6379 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +delete> [exception] ok 6380 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +delete> [return] ok 6381 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +delete> [variable] ok 6382 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +delete> [exception] ok 6383 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +delete> [return] ok 6384 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +delete> [variable] ok 6385 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +delete> [exception] ok 6386 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +delete> [return] ok 6387 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +delete> [variable] ok 6388 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +delete> [exception] ok 6389 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +delete> [return] ok 6390 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +delete> [variable] ok 6391 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +delete> [exception] ok 6392 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +delete> [return] ok 6393 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +delete> [variable] ok 6394 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +delete> [exception] ok 6395 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +delete> [return] ok 6396 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +delete> [variable] ok 6397 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +delete> [exception] ok 6398 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +delete> [return] ok 6399 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +delete> [variable] ok 6400 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +delete> [exception] ok 6401 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +delete> [return] ok 6402 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +delete> [variable] ok 6403 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +delete> [exception] ok 6404 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +delete> [return] ok 6405 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +delete> [variable] ok 6406 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +delete> [exception] ok 6407 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +delete> [return] ok 6408 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +delete> [variable] ok 6409 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +delete> [exception] ok 6410 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +delete> [return] ok 6411 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +delete> [variable] ok 6412 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +delete> [exception] ok 6413 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +delete> [return] ok 6414 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +delete> [variable] ok 6415 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +delete> [exception] ok 6416 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +delete> [return] ok 6417 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +delete> [variable] ok 6418 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +delete> [exception] ok 6419 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +delete> [return] ok 6420 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +delete> [variable] ok 6421 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +delete> [exception] ok 6422 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +delete> [return] ok 6423 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +delete> [variable] ok 6424 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +delete> [exception] ok 6425 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +delete> [return] ok 6426 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +delete> [variable] ok 6427 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +delete> [exception] ok 6428 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +delete> [return] ok 6429 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +delete> [variable] ok 6430 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +delete> [exception] ok 6431 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +delete> [return] ok 6432 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +delete> [variable] ok 6433 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +delete> [exception] ok 6434 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +delete> [return] ok 6435 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +delete> [variable] ok 6436 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +delete> [exception] ok 6437 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +delete> [return] ok 6438 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +delete> [variable] ok 6439 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +delete> [exception] ok 6440 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +delete> [return] ok 6441 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +delete> [variable] ok 6442 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +delete> [exception] ok 6443 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +delete> [return] ok 6444 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +delete> [variable] ok 6445 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +delete> [exception] ok 6446 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +delete> [return] ok 6447 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +delete> [variable] ok 6448 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +delete> [exception] ok 6449 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +delete> [return] ok 6450 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +delete> [variable] ok 6451 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +delete> [exception] ok 6452 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +delete> [return] ok 6453 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +delete> [variable] ok 6454 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +store> [exception] ok 6455 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +store> [return] ok 6456 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +store> [variable] ok 6457 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +store> [exception] ok 6458 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +store> [return] ok 6459 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +store> [variable] ok 6460 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +store> [exception] ok 6461 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +store> [return] ok 6462 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[1] <+strict +store> [variable] ok 6463 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +store> [exception] ok 6464 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +store> [return] ok 6465 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +store> [variable] ok 6466 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +store> [exception] ok 6467 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +store> [return] ok 6468 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +store> [variable] ok 6469 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +store> [exception] ok 6470 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +store> [return] ok 6471 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[1] <+strict +store> [variable] ok 6472 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +store> [exception] ok 6473 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +store> [return] ok 6474 - my @x; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +store> [variable] ok 6475 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +store> [exception] ok 6476 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +store> [return] ok 6477 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +store> [variable] ok 6478 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +store> [exception] ok 6479 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +store> [return] ok 6480 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[1] <+strict +store> [variable] ok 6481 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +store> [exception] ok 6482 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +store> [return] ok 6483 - my $x; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +store> [variable] ok 6484 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +store> [exception] ok 6485 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +store> [return] ok 6486 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +store> [variable] ok 6487 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +store> [exception] ok 6488 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +store> [return] ok 6489 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[0]->[3] <+strict +store> [variable] ok 6490 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +store> [exception] ok 6491 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +store> [return] ok 6492 - my $x; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +store> [variable] ok 6493 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +store> [exception] ok 6494 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +store> [return] ok 6495 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +store> [variable] ok 6496 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +store> [exception] ok 6497 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +store> [return] ok 6498 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[0]->[3] <+strict +store> [variable] ok 6499 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +store> [exception] ok 6500 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +store> [return] ok 6501 - my @x; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +store> [variable] ok 6502 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +store> [exception] ok 6503 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +store> [return] ok 6504 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +store> [variable] ok 6505 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +store> [exception] ok 6506 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +store> [return] ok 6507 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[0]->[3] <+strict +store> [variable] ok 6508 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +store> [exception] ok 6509 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +store> [return] ok 6510 - my $x; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +store> [variable] ok 6511 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +store> [exception] ok 6512 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +store> [return] ok 6513 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +store> [variable] ok 6514 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +store> [exception] ok 6515 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +store> [return] ok 6516 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $x->[2]->[3] <+strict +store> [variable] ok 6517 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +store> [exception] ok 6518 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +store> [return] ok 6519 - my $x; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +store> [variable] ok 6520 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +store> [exception] ok 6521 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +store> [return] ok 6522 - our $x; local $x; use strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +store> [variable] ok 6523 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +store> [exception] ok 6524 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +store> [return] ok 6525 - our $x; local $x; no strict; $x->[0]->[1] = 1; delete $$x[2]->[3] <+strict +store> [variable] ok 6526 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +store> [exception] ok 6527 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +store> [return] ok 6528 - my @x; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +store> [variable] ok 6529 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +store> [exception] ok 6530 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +store> [return] ok 6531 - our @x; local @x; use strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +store> [variable] ok 6532 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +store> [exception] ok 6533 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +store> [return] ok 6534 - our @x; local @x; no strict; $x[0]->[1] = 1; delete $x[2]->[3] <+strict +store> [variable] ok 6535 - my $x; $x->[0] = 1 [exception] ok 6536 - my $x; $x->[0] = 1 [return] ok 6537 - my $x; $x->[0] = 1 [variable] ok 6538 - our $x; local $x; use strict; $x->[0] = 1 [exception] ok 6539 - our $x; local $x; use strict; $x->[0] = 1 [return] ok 6540 - our $x; local $x; use strict; $x->[0] = 1 [variable] ok 6541 - our $x; local $x; no strict; $x->[0] = 1 [exception] ok 6542 - our $x; local $x; no strict; $x->[0] = 1 [return] ok 6543 - our $x; local $x; no strict; $x->[0] = 1 [variable] ok 6544 - my $x; $$x[0] = 1 [exception] ok 6545 - my $x; $$x[0] = 1 [return] ok 6546 - my $x; $$x[0] = 1 [variable] ok 6547 - our $x; local $x; use strict; $$x[0] = 1 [exception] ok 6548 - our $x; local $x; use strict; $$x[0] = 1 [return] ok 6549 - our $x; local $x; use strict; $$x[0] = 1 [variable] ok 6550 - our $x; local $x; no strict; $$x[0] = 1 [exception] ok 6551 - our $x; local $x; no strict; $$x[0] = 1 [return] ok 6552 - our $x; local $x; no strict; $$x[0] = 1 [variable] ok 6553 - my @x; $x[0] = 1 [exception] ok 6554 - my @x; $x[0] = 1 [return] ok 6555 - my @x; $x[0] = 1 [variable] ok 6556 - our @x; local @x; use strict; $x[0] = 1 [exception] ok 6557 - our @x; local @x; use strict; $x[0] = 1 [return] ok 6558 - our @x; local @x; use strict; $x[0] = 1 [variable] ok 6559 - our @x; local @x; no strict; $x[0] = 1 [exception] ok 6560 - our @x; local @x; no strict; $x[0] = 1 [return] ok 6561 - our @x; local @x; no strict; $x[0] = 1 [variable] ok 6562 - my $x; $x->[0] = 1 [exception] ok 6563 - my $x; $x->[0] = 1 [return] ok 6564 - my $x; $x->[0] = 1 [variable] ok 6565 - our $x; local $x; use strict; $x->[0] = 1 [exception] ok 6566 - our $x; local $x; use strict; $x->[0] = 1 [return] ok 6567 - our $x; local $x; use strict; $x->[0] = 1 [variable] ok 6568 - our $x; local $x; no strict; $x->[0] = 1 [exception] ok 6569 - our $x; local $x; no strict; $x->[0] = 1 [return] ok 6570 - our $x; local $x; no strict; $x->[0] = 1 [variable] ok 6571 - my $x; $$x[0] = 1 [exception] ok 6572 - my $x; $$x[0] = 1 [return] ok 6573 - my $x; $$x[0] = 1 [variable] ok 6574 - our $x; local $x; use strict; $$x[0] = 1 [exception] ok 6575 - our $x; local $x; use strict; $$x[0] = 1 [return] ok 6576 - our $x; local $x; use strict; $$x[0] = 1 [variable] ok 6577 - our $x; local $x; no strict; $$x[0] = 1 [exception] ok 6578 - our $x; local $x; no strict; $$x[0] = 1 [return] ok 6579 - our $x; local $x; no strict; $$x[0] = 1 [variable] ok 6580 - my @x; $x[0] = 1 [exception] ok 6581 - my @x; $x[0] = 1 [return] ok 6582 - my @x; $x[0] = 1 [variable] ok 6583 - our @x; local @x; use strict; $x[0] = 1 [exception] ok 6584 - our @x; local @x; use strict; $x[0] = 1 [return] ok 6585 - our @x; local @x; use strict; $x[0] = 1 [variable] ok 6586 - our @x; local @x; no strict; $x[0] = 1 [exception] ok 6587 - our @x; local @x; no strict; $x[0] = 1 [return] ok 6588 - our @x; local @x; no strict; $x[0] = 1 [variable] ok 6589 - my $x; $x->[0] = 1 <+fetch> [exception] ok 6590 - my $x; $x->[0] = 1 <+fetch> [return] ok 6591 - my $x; $x->[0] = 1 <+fetch> [variable] ok 6592 - our $x; local $x; use strict; $x->[0] = 1 <+fetch> [exception] ok 6593 - our $x; local $x; use strict; $x->[0] = 1 <+fetch> [return] ok 6594 - our $x; local $x; use strict; $x->[0] = 1 <+fetch> [variable] ok 6595 - our $x; local $x; no strict; $x->[0] = 1 <+fetch> [exception] ok 6596 - our $x; local $x; no strict; $x->[0] = 1 <+fetch> [return] ok 6597 - our $x; local $x; no strict; $x->[0] = 1 <+fetch> [variable] ok 6598 - my $x; $$x[0] = 1 <+fetch> [exception] ok 6599 - my $x; $$x[0] = 1 <+fetch> [return] ok 6600 - my $x; $$x[0] = 1 <+fetch> [variable] ok 6601 - our $x; local $x; use strict; $$x[0] = 1 <+fetch> [exception] ok 6602 - our $x; local $x; use strict; $$x[0] = 1 <+fetch> [return] ok 6603 - our $x; local $x; use strict; $$x[0] = 1 <+fetch> [variable] ok 6604 - our $x; local $x; no strict; $$x[0] = 1 <+fetch> [exception] ok 6605 - our $x; local $x; no strict; $$x[0] = 1 <+fetch> [return] ok 6606 - our $x; local $x; no strict; $$x[0] = 1 <+fetch> [variable] ok 6607 - my @x; $x[0] = 1 <+fetch> [exception] ok 6608 - my @x; $x[0] = 1 <+fetch> [return] ok 6609 - my @x; $x[0] = 1 <+fetch> [variable] ok 6610 - our @x; local @x; use strict; $x[0] = 1 <+fetch> [exception] ok 6611 - our @x; local @x; use strict; $x[0] = 1 <+fetch> [return] ok 6612 - our @x; local @x; use strict; $x[0] = 1 <+fetch> [variable] ok 6613 - our @x; local @x; no strict; $x[0] = 1 <+fetch> [exception] ok 6614 - our @x; local @x; no strict; $x[0] = 1 <+fetch> [return] ok 6615 - our @x; local @x; no strict; $x[0] = 1 <+fetch> [variable] ok 6616 - my $x; $x->[0] = 1 <+exists> [exception] ok 6617 - my $x; $x->[0] = 1 <+exists> [return] ok 6618 - my $x; $x->[0] = 1 <+exists> [variable] ok 6619 - our $x; local $x; use strict; $x->[0] = 1 <+exists> [exception] ok 6620 - our $x; local $x; use strict; $x->[0] = 1 <+exists> [return] ok 6621 - our $x; local $x; use strict; $x->[0] = 1 <+exists> [variable] ok 6622 - our $x; local $x; no strict; $x->[0] = 1 <+exists> [exception] ok 6623 - our $x; local $x; no strict; $x->[0] = 1 <+exists> [return] ok 6624 - our $x; local $x; no strict; $x->[0] = 1 <+exists> [variable] ok 6625 - my $x; $$x[0] = 1 <+exists> [exception] ok 6626 - my $x; $$x[0] = 1 <+exists> [return] ok 6627 - my $x; $$x[0] = 1 <+exists> [variable] ok 6628 - our $x; local $x; use strict; $$x[0] = 1 <+exists> [exception] ok 6629 - our $x; local $x; use strict; $$x[0] = 1 <+exists> [return] ok 6630 - our $x; local $x; use strict; $$x[0] = 1 <+exists> [variable] ok 6631 - our $x; local $x; no strict; $$x[0] = 1 <+exists> [exception] ok 6632 - our $x; local $x; no strict; $$x[0] = 1 <+exists> [return] ok 6633 - our $x; local $x; no strict; $$x[0] = 1 <+exists> [variable] ok 6634 - my @x; $x[0] = 1 <+exists> [exception] ok 6635 - my @x; $x[0] = 1 <+exists> [return] ok 6636 - my @x; $x[0] = 1 <+exists> [variable] ok 6637 - our @x; local @x; use strict; $x[0] = 1 <+exists> [exception] ok 6638 - our @x; local @x; use strict; $x[0] = 1 <+exists> [return] ok 6639 - our @x; local @x; use strict; $x[0] = 1 <+exists> [variable] ok 6640 - our @x; local @x; no strict; $x[0] = 1 <+exists> [exception] ok 6641 - our @x; local @x; no strict; $x[0] = 1 <+exists> [return] ok 6642 - our @x; local @x; no strict; $x[0] = 1 <+exists> [variable] ok 6643 - my $x; $x->[0] = 1 <+delete> [exception] ok 6644 - my $x; $x->[0] = 1 <+delete> [return] ok 6645 - my $x; $x->[0] = 1 <+delete> [variable] ok 6646 - our $x; local $x; use strict; $x->[0] = 1 <+delete> [exception] ok 6647 - our $x; local $x; use strict; $x->[0] = 1 <+delete> [return] ok 6648 - our $x; local $x; use strict; $x->[0] = 1 <+delete> [variable] ok 6649 - our $x; local $x; no strict; $x->[0] = 1 <+delete> [exception] ok 6650 - our $x; local $x; no strict; $x->[0] = 1 <+delete> [return] ok 6651 - our $x; local $x; no strict; $x->[0] = 1 <+delete> [variable] ok 6652 - my $x; $$x[0] = 1 <+delete> [exception] ok 6653 - my $x; $$x[0] = 1 <+delete> [return] ok 6654 - my $x; $$x[0] = 1 <+delete> [variable] ok 6655 - our $x; local $x; use strict; $$x[0] = 1 <+delete> [exception] ok 6656 - our $x; local $x; use strict; $$x[0] = 1 <+delete> [return] ok 6657 - our $x; local $x; use strict; $$x[0] = 1 <+delete> [variable] ok 6658 - our $x; local $x; no strict; $$x[0] = 1 <+delete> [exception] ok 6659 - our $x; local $x; no strict; $$x[0] = 1 <+delete> [return] ok 6660 - our $x; local $x; no strict; $$x[0] = 1 <+delete> [variable] ok 6661 - my @x; $x[0] = 1 <+delete> [exception] ok 6662 - my @x; $x[0] = 1 <+delete> [return] ok 6663 - my @x; $x[0] = 1 <+delete> [variable] ok 6664 - our @x; local @x; use strict; $x[0] = 1 <+delete> [exception] ok 6665 - our @x; local @x; use strict; $x[0] = 1 <+delete> [return] ok 6666 - our @x; local @x; use strict; $x[0] = 1 <+delete> [variable] ok 6667 - our @x; local @x; no strict; $x[0] = 1 <+delete> [exception] ok 6668 - our @x; local @x; no strict; $x[0] = 1 <+delete> [return] ok 6669 - our @x; local @x; no strict; $x[0] = 1 <+delete> [variable] ok 6670 - my $x; $x->[0] = 1 <+store> [exception] ok 6671 - my $x; $x->[0] = 1 <+store> [return] ok 6672 - my $x; $x->[0] = 1 <+store> [variable] ok 6673 - our $x; local $x; use strict; $x->[0] = 1 <+store> [exception] ok 6674 - our $x; local $x; use strict; $x->[0] = 1 <+store> [return] ok 6675 - our $x; local $x; use strict; $x->[0] = 1 <+store> [variable] ok 6676 - our $x; local $x; no strict; $x->[0] = 1 <+store> [exception] ok 6677 - our $x; local $x; no strict; $x->[0] = 1 <+store> [return] ok 6678 - our $x; local $x; no strict; $x->[0] = 1 <+store> [variable] ok 6679 - my $x; $$x[0] = 1 <+store> [exception] ok 6680 - my $x; $$x[0] = 1 <+store> [return] ok 6681 - my $x; $$x[0] = 1 <+store> [variable] ok 6682 - our $x; local $x; use strict; $$x[0] = 1 <+store> [exception] ok 6683 - our $x; local $x; use strict; $$x[0] = 1 <+store> [return] ok 6684 - our $x; local $x; use strict; $$x[0] = 1 <+store> [variable] ok 6685 - our $x; local $x; no strict; $$x[0] = 1 <+store> [exception] ok 6686 - our $x; local $x; no strict; $$x[0] = 1 <+store> [return] ok 6687 - our $x; local $x; no strict; $$x[0] = 1 <+store> [variable] ok 6688 - my @x; 1 <+store> [exception] ok 6689 - my @x; 1 <+store> [return] ok 6690 - my @x; 1 <+store> [variable] ok 6691 - our @x; local @x; use strict; 1 <+store> [exception] ok 6692 - our @x; local @x; use strict; 1 <+store> [return] ok 6693 - our @x; local @x; use strict; 1 <+store> [variable] ok 6694 - our @x; local @x; no strict; 1 <+store> [exception] ok 6695 - our @x; local @x; no strict; 1 <+store> [return] ok 6696 - our @x; local @x; no strict; 1 <+store> [variable] ok 6697 - my $x; $x->[0] = 1 <+strict +fetch> [exception] ok 6698 - my $x; $x->[0] = 1 <+strict +fetch> [return] ok 6699 - my $x; $x->[0] = 1 <+strict +fetch> [variable] ok 6700 - our $x; local $x; use strict; $x->[0] = 1 <+strict +fetch> [exception] ok 6701 - our $x; local $x; use strict; $x->[0] = 1 <+strict +fetch> [return] ok 6702 - our $x; local $x; use strict; $x->[0] = 1 <+strict +fetch> [variable] ok 6703 - our $x; local $x; no strict; $x->[0] = 1 <+strict +fetch> [exception] ok 6704 - our $x; local $x; no strict; $x->[0] = 1 <+strict +fetch> [return] ok 6705 - our $x; local $x; no strict; $x->[0] = 1 <+strict +fetch> [variable] ok 6706 - my $x; $$x[0] = 1 <+strict +fetch> [exception] ok 6707 - my $x; $$x[0] = 1 <+strict +fetch> [return] ok 6708 - my $x; $$x[0] = 1 <+strict +fetch> [variable] ok 6709 - our $x; local $x; use strict; $$x[0] = 1 <+strict +fetch> [exception] ok 6710 - our $x; local $x; use strict; $$x[0] = 1 <+strict +fetch> [return] ok 6711 - our $x; local $x; use strict; $$x[0] = 1 <+strict +fetch> [variable] ok 6712 - our $x; local $x; no strict; $$x[0] = 1 <+strict +fetch> [exception] ok 6713 - our $x; local $x; no strict; $$x[0] = 1 <+strict +fetch> [return] ok 6714 - our $x; local $x; no strict; $$x[0] = 1 <+strict +fetch> [variable] ok 6715 - my @x; $x[0] = 1 <+strict +fetch> [exception] ok 6716 - my @x; $x[0] = 1 <+strict +fetch> [return] ok 6717 - my @x; $x[0] = 1 <+strict +fetch> [variable] ok 6718 - our @x; local @x; use strict; $x[0] = 1 <+strict +fetch> [exception] ok 6719 - our @x; local @x; use strict; $x[0] = 1 <+strict +fetch> [return] ok 6720 - our @x; local @x; use strict; $x[0] = 1 <+strict +fetch> [variable] ok 6721 - our @x; local @x; no strict; $x[0] = 1 <+strict +fetch> [exception] ok 6722 - our @x; local @x; no strict; $x[0] = 1 <+strict +fetch> [return] ok 6723 - our @x; local @x; no strict; $x[0] = 1 <+strict +fetch> [variable] ok 6724 - my $x; $x->[0] = 1 <+strict +exists> [exception] ok 6725 - my $x; $x->[0] = 1 <+strict +exists> [return] ok 6726 - my $x; $x->[0] = 1 <+strict +exists> [variable] ok 6727 - our $x; local $x; use strict; $x->[0] = 1 <+strict +exists> [exception] ok 6728 - our $x; local $x; use strict; $x->[0] = 1 <+strict +exists> [return] ok 6729 - our $x; local $x; use strict; $x->[0] = 1 <+strict +exists> [variable] ok 6730 - our $x; local $x; no strict; $x->[0] = 1 <+strict +exists> [exception] ok 6731 - our $x; local $x; no strict; $x->[0] = 1 <+strict +exists> [return] ok 6732 - our $x; local $x; no strict; $x->[0] = 1 <+strict +exists> [variable] ok 6733 - my $x; $$x[0] = 1 <+strict +exists> [exception] ok 6734 - my $x; $$x[0] = 1 <+strict +exists> [return] ok 6735 - my $x; $$x[0] = 1 <+strict +exists> [variable] ok 6736 - our $x; local $x; use strict; $$x[0] = 1 <+strict +exists> [exception] ok 6737 - our $x; local $x; use strict; $$x[0] = 1 <+strict +exists> [return] ok 6738 - our $x; local $x; use strict; $$x[0] = 1 <+strict +exists> [variable] ok 6739 - our $x; local $x; no strict; $$x[0] = 1 <+strict +exists> [exception] ok 6740 - our $x; local $x; no strict; $$x[0] = 1 <+strict +exists> [return] ok 6741 - our $x; local $x; no strict; $$x[0] = 1 <+strict +exists> [variable] ok 6742 - my @x; $x[0] = 1 <+strict +exists> [exception] ok 6743 - my @x; $x[0] = 1 <+strict +exists> [return] ok 6744 - my @x; $x[0] = 1 <+strict +exists> [variable] ok 6745 - our @x; local @x; use strict; $x[0] = 1 <+strict +exists> [exception] ok 6746 - our @x; local @x; use strict; $x[0] = 1 <+strict +exists> [return] ok 6747 - our @x; local @x; use strict; $x[0] = 1 <+strict +exists> [variable] ok 6748 - our @x; local @x; no strict; $x[0] = 1 <+strict +exists> [exception] ok 6749 - our @x; local @x; no strict; $x[0] = 1 <+strict +exists> [return] ok 6750 - our @x; local @x; no strict; $x[0] = 1 <+strict +exists> [variable] ok 6751 - my $x; $x->[0] = 1 <+strict +delete> [exception] ok 6752 - my $x; $x->[0] = 1 <+strict +delete> [return] ok 6753 - my $x; $x->[0] = 1 <+strict +delete> [variable] ok 6754 - our $x; local $x; use strict; $x->[0] = 1 <+strict +delete> [exception] ok 6755 - our $x; local $x; use strict; $x->[0] = 1 <+strict +delete> [return] ok 6756 - our $x; local $x; use strict; $x->[0] = 1 <+strict +delete> [variable] ok 6757 - our $x; local $x; no strict; $x->[0] = 1 <+strict +delete> [exception] ok 6758 - our $x; local $x; no strict; $x->[0] = 1 <+strict +delete> [return] ok 6759 - our $x; local $x; no strict; $x->[0] = 1 <+strict +delete> [variable] ok 6760 - my $x; $$x[0] = 1 <+strict +delete> [exception] ok 6761 - my $x; $$x[0] = 1 <+strict +delete> [return] ok 6762 - my $x; $$x[0] = 1 <+strict +delete> [variable] ok 6763 - our $x; local $x; use strict; $$x[0] = 1 <+strict +delete> [exception] ok 6764 - our $x; local $x; use strict; $$x[0] = 1 <+strict +delete> [return] ok 6765 - our $x; local $x; use strict; $$x[0] = 1 <+strict +delete> [variable] ok 6766 - our $x; local $x; no strict; $$x[0] = 1 <+strict +delete> [exception] ok 6767 - our $x; local $x; no strict; $$x[0] = 1 <+strict +delete> [return] ok 6768 - our $x; local $x; no strict; $$x[0] = 1 <+strict +delete> [variable] ok 6769 - my @x; $x[0] = 1 <+strict +delete> [exception] ok 6770 - my @x; $x[0] = 1 <+strict +delete> [return] ok 6771 - my @x; $x[0] = 1 <+strict +delete> [variable] ok 6772 - our @x; local @x; use strict; $x[0] = 1 <+strict +delete> [exception] ok 6773 - our @x; local @x; use strict; $x[0] = 1 <+strict +delete> [return] ok 6774 - our @x; local @x; use strict; $x[0] = 1 <+strict +delete> [variable] ok 6775 - our @x; local @x; no strict; $x[0] = 1 <+strict +delete> [exception] ok 6776 - our @x; local @x; no strict; $x[0] = 1 <+strict +delete> [return] ok 6777 - our @x; local @x; no strict; $x[0] = 1 <+strict +delete> [variable] ok 6778 - my $x; $x->[0] = 1 <+strict +store> [exception] ok 6779 - my $x; $x->[0] = 1 <+strict +store> [return] ok 6780 - my $x; $x->[0] = 1 <+strict +store> [variable] ok 6781 - our $x; local $x; use strict; $x->[0] = 1 <+strict +store> [exception] ok 6782 - our $x; local $x; use strict; $x->[0] = 1 <+strict +store> [return] ok 6783 - our $x; local $x; use strict; $x->[0] = 1 <+strict +store> [variable] ok 6784 - our $x; local $x; no strict; $x->[0] = 1 <+strict +store> [exception] ok 6785 - our $x; local $x; no strict; $x->[0] = 1 <+strict +store> [return] ok 6786 - our $x; local $x; no strict; $x->[0] = 1 <+strict +store> [variable] ok 6787 - my $x; $$x[0] = 1 <+strict +store> [exception] ok 6788 - my $x; $$x[0] = 1 <+strict +store> [return] ok 6789 - my $x; $$x[0] = 1 <+strict +store> [variable] ok 6790 - our $x; local $x; use strict; $$x[0] = 1 <+strict +store> [exception] ok 6791 - our $x; local $x; use strict; $$x[0] = 1 <+strict +store> [return] ok 6792 - our $x; local $x; use strict; $$x[0] = 1 <+strict +store> [variable] ok 6793 - our $x; local $x; no strict; $$x[0] = 1 <+strict +store> [exception] ok 6794 - our $x; local $x; no strict; $$x[0] = 1 <+strict +store> [return] ok 6795 - our $x; local $x; no strict; $$x[0] = 1 <+strict +store> [variable] ok 6796 - my @x; 1 <+strict +store> [exception] ok 6797 - my @x; 1 <+strict +store> [return] ok 6798 - my @x; 1 <+strict +store> [variable] ok 6799 - our @x; local @x; use strict; 1 <+strict +store> [exception] ok 6800 - our @x; local @x; use strict; 1 <+strict +store> [return] ok 6801 - our @x; local @x; use strict; 1 <+strict +store> [variable] ok 6802 - our @x; local @x; no strict; 1 <+strict +store> [exception] ok 6803 - our @x; local @x; no strict; 1 <+strict +store> [return] ok 6804 - our @x; local @x; no strict; 1 <+strict +store> [variable] ok 6805 - my $x; $x->[0]->[1] = 1 [exception] ok 6806 - my $x; $x->[0]->[1] = 1 [return] ok 6807 - my $x; $x->[0]->[1] = 1 [variable] ok 6808 - our $x; local $x; use strict; $x->[0]->[1] = 1 [exception] ok 6809 - our $x; local $x; use strict; $x->[0]->[1] = 1 [return] ok 6810 - our $x; local $x; use strict; $x->[0]->[1] = 1 [variable] ok 6811 - our $x; local $x; no strict; $x->[0]->[1] = 1 [exception] ok 6812 - our $x; local $x; no strict; $x->[0]->[1] = 1 [return] ok 6813 - our $x; local $x; no strict; $x->[0]->[1] = 1 [variable] ok 6814 - my $x; $$x[0]->[1] = 1 [exception] ok 6815 - my $x; $$x[0]->[1] = 1 [return] ok 6816 - my $x; $$x[0]->[1] = 1 [variable] ok 6817 - our $x; local $x; use strict; $$x[0]->[1] = 1 [exception] ok 6818 - our $x; local $x; use strict; $$x[0]->[1] = 1 [return] ok 6819 - our $x; local $x; use strict; $$x[0]->[1] = 1 [variable] ok 6820 - our $x; local $x; no strict; $$x[0]->[1] = 1 [exception] ok 6821 - our $x; local $x; no strict; $$x[0]->[1] = 1 [return] ok 6822 - our $x; local $x; no strict; $$x[0]->[1] = 1 [variable] ok 6823 - my @x; $x[0]->[1] = 1 [exception] ok 6824 - my @x; $x[0]->[1] = 1 [return] ok 6825 - my @x; $x[0]->[1] = 1 [variable] ok 6826 - our @x; local @x; use strict; $x[0]->[1] = 1 [exception] ok 6827 - our @x; local @x; use strict; $x[0]->[1] = 1 [return] ok 6828 - our @x; local @x; use strict; $x[0]->[1] = 1 [variable] ok 6829 - our @x; local @x; no strict; $x[0]->[1] = 1 [exception] ok 6830 - our @x; local @x; no strict; $x[0]->[1] = 1 [return] ok 6831 - our @x; local @x; no strict; $x[0]->[1] = 1 [variable] ok 6832 - my $x; $x->[0]->[1] = 1 [exception] ok 6833 - my $x; $x->[0]->[1] = 1 [return] ok 6834 - my $x; $x->[0]->[1] = 1 [variable] ok 6835 - our $x; local $x; use strict; $x->[0]->[1] = 1 [exception] ok 6836 - our $x; local $x; use strict; $x->[0]->[1] = 1 [return] ok 6837 - our $x; local $x; use strict; $x->[0]->[1] = 1 [variable] ok 6838 - our $x; local $x; no strict; $x->[0]->[1] = 1 [exception] ok 6839 - our $x; local $x; no strict; $x->[0]->[1] = 1 [return] ok 6840 - our $x; local $x; no strict; $x->[0]->[1] = 1 [variable] ok 6841 - my $x; $$x[0]->[1] = 1 [exception] ok 6842 - my $x; $$x[0]->[1] = 1 [return] ok 6843 - my $x; $$x[0]->[1] = 1 [variable] ok 6844 - our $x; local $x; use strict; $$x[0]->[1] = 1 [exception] ok 6845 - our $x; local $x; use strict; $$x[0]->[1] = 1 [return] ok 6846 - our $x; local $x; use strict; $$x[0]->[1] = 1 [variable] ok 6847 - our $x; local $x; no strict; $$x[0]->[1] = 1 [exception] ok 6848 - our $x; local $x; no strict; $$x[0]->[1] = 1 [return] ok 6849 - our $x; local $x; no strict; $$x[0]->[1] = 1 [variable] ok 6850 - my @x; $x[0]->[1] = 1 [exception] ok 6851 - my @x; $x[0]->[1] = 1 [return] ok 6852 - my @x; $x[0]->[1] = 1 [variable] ok 6853 - our @x; local @x; use strict; $x[0]->[1] = 1 [exception] ok 6854 - our @x; local @x; use strict; $x[0]->[1] = 1 [return] ok 6855 - our @x; local @x; use strict; $x[0]->[1] = 1 [variable] ok 6856 - our @x; local @x; no strict; $x[0]->[1] = 1 [exception] ok 6857 - our @x; local @x; no strict; $x[0]->[1] = 1 [return] ok 6858 - our @x; local @x; no strict; $x[0]->[1] = 1 [variable] ok 6859 - my $x; $x->[0]->[1] = 1 <+fetch> [exception] ok 6860 - my $x; $x->[0]->[1] = 1 <+fetch> [return] ok 6861 - my $x; $x->[0]->[1] = 1 <+fetch> [variable] ok 6862 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+fetch> [exception] ok 6863 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+fetch> [return] ok 6864 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+fetch> [variable] ok 6865 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+fetch> [exception] ok 6866 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+fetch> [return] ok 6867 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+fetch> [variable] ok 6868 - my $x; $$x[0]->[1] = 1 <+fetch> [exception] ok 6869 - my $x; $$x[0]->[1] = 1 <+fetch> [return] ok 6870 - my $x; $$x[0]->[1] = 1 <+fetch> [variable] ok 6871 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+fetch> [exception] ok 6872 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+fetch> [return] ok 6873 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+fetch> [variable] ok 6874 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+fetch> [exception] ok 6875 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+fetch> [return] ok 6876 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+fetch> [variable] ok 6877 - my @x; $x[0]->[1] = 1 <+fetch> [exception] ok 6878 - my @x; $x[0]->[1] = 1 <+fetch> [return] ok 6879 - my @x; $x[0]->[1] = 1 <+fetch> [variable] ok 6880 - our @x; local @x; use strict; $x[0]->[1] = 1 <+fetch> [exception] ok 6881 - our @x; local @x; use strict; $x[0]->[1] = 1 <+fetch> [return] ok 6882 - our @x; local @x; use strict; $x[0]->[1] = 1 <+fetch> [variable] ok 6883 - our @x; local @x; no strict; $x[0]->[1] = 1 <+fetch> [exception] ok 6884 - our @x; local @x; no strict; $x[0]->[1] = 1 <+fetch> [return] ok 6885 - our @x; local @x; no strict; $x[0]->[1] = 1 <+fetch> [variable] ok 6886 - my $x; $x->[0]->[1] = 1 <+exists> [exception] ok 6887 - my $x; $x->[0]->[1] = 1 <+exists> [return] ok 6888 - my $x; $x->[0]->[1] = 1 <+exists> [variable] ok 6889 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+exists> [exception] ok 6890 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+exists> [return] ok 6891 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+exists> [variable] ok 6892 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+exists> [exception] ok 6893 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+exists> [return] ok 6894 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+exists> [variable] ok 6895 - my $x; $$x[0]->[1] = 1 <+exists> [exception] ok 6896 - my $x; $$x[0]->[1] = 1 <+exists> [return] ok 6897 - my $x; $$x[0]->[1] = 1 <+exists> [variable] ok 6898 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+exists> [exception] ok 6899 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+exists> [return] ok 6900 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+exists> [variable] ok 6901 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+exists> [exception] ok 6902 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+exists> [return] ok 6903 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+exists> [variable] ok 6904 - my @x; $x[0]->[1] = 1 <+exists> [exception] ok 6905 - my @x; $x[0]->[1] = 1 <+exists> [return] ok 6906 - my @x; $x[0]->[1] = 1 <+exists> [variable] ok 6907 - our @x; local @x; use strict; $x[0]->[1] = 1 <+exists> [exception] ok 6908 - our @x; local @x; use strict; $x[0]->[1] = 1 <+exists> [return] ok 6909 - our @x; local @x; use strict; $x[0]->[1] = 1 <+exists> [variable] ok 6910 - our @x; local @x; no strict; $x[0]->[1] = 1 <+exists> [exception] ok 6911 - our @x; local @x; no strict; $x[0]->[1] = 1 <+exists> [return] ok 6912 - our @x; local @x; no strict; $x[0]->[1] = 1 <+exists> [variable] ok 6913 - my $x; $x->[0]->[1] = 1 <+delete> [exception] ok 6914 - my $x; $x->[0]->[1] = 1 <+delete> [return] ok 6915 - my $x; $x->[0]->[1] = 1 <+delete> [variable] ok 6916 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+delete> [exception] ok 6917 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+delete> [return] ok 6918 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+delete> [variable] ok 6919 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+delete> [exception] ok 6920 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+delete> [return] ok 6921 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+delete> [variable] ok 6922 - my $x; $$x[0]->[1] = 1 <+delete> [exception] ok 6923 - my $x; $$x[0]->[1] = 1 <+delete> [return] ok 6924 - my $x; $$x[0]->[1] = 1 <+delete> [variable] ok 6925 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+delete> [exception] ok 6926 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+delete> [return] ok 6927 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+delete> [variable] ok 6928 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+delete> [exception] ok 6929 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+delete> [return] ok 6930 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+delete> [variable] ok 6931 - my @x; $x[0]->[1] = 1 <+delete> [exception] ok 6932 - my @x; $x[0]->[1] = 1 <+delete> [return] ok 6933 - my @x; $x[0]->[1] = 1 <+delete> [variable] ok 6934 - our @x; local @x; use strict; $x[0]->[1] = 1 <+delete> [exception] ok 6935 - our @x; local @x; use strict; $x[0]->[1] = 1 <+delete> [return] ok 6936 - our @x; local @x; use strict; $x[0]->[1] = 1 <+delete> [variable] ok 6937 - our @x; local @x; no strict; $x[0]->[1] = 1 <+delete> [exception] ok 6938 - our @x; local @x; no strict; $x[0]->[1] = 1 <+delete> [return] ok 6939 - our @x; local @x; no strict; $x[0]->[1] = 1 <+delete> [variable] ok 6940 - my $x; $x->[0]->[1] = 1 <+store> [exception] ok 6941 - my $x; $x->[0]->[1] = 1 <+store> [return] ok 6942 - my $x; $x->[0]->[1] = 1 <+store> [variable] ok 6943 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+store> [exception] ok 6944 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+store> [return] ok 6945 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+store> [variable] ok 6946 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+store> [exception] ok 6947 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+store> [return] ok 6948 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+store> [variable] ok 6949 - my $x; $$x[0]->[1] = 1 <+store> [exception] ok 6950 - my $x; $$x[0]->[1] = 1 <+store> [return] ok 6951 - my $x; $$x[0]->[1] = 1 <+store> [variable] ok 6952 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+store> [exception] ok 6953 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+store> [return] ok 6954 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+store> [variable] ok 6955 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+store> [exception] ok 6956 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+store> [return] ok 6957 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+store> [variable] ok 6958 - my @x; $x[0]->[1] = 1 <+store> [exception] ok 6959 - my @x; $x[0]->[1] = 1 <+store> [return] ok 6960 - my @x; $x[0]->[1] = 1 <+store> [variable] ok 6961 - our @x; local @x; use strict; $x[0]->[1] = 1 <+store> [exception] ok 6962 - our @x; local @x; use strict; $x[0]->[1] = 1 <+store> [return] ok 6963 - our @x; local @x; use strict; $x[0]->[1] = 1 <+store> [variable] ok 6964 - our @x; local @x; no strict; $x[0]->[1] = 1 <+store> [exception] ok 6965 - our @x; local @x; no strict; $x[0]->[1] = 1 <+store> [return] ok 6966 - our @x; local @x; no strict; $x[0]->[1] = 1 <+store> [variable] ok 6967 - my $x; $x->[0]->[1] = 1 <+strict +fetch> [exception] ok 6968 - my $x; $x->[0]->[1] = 1 <+strict +fetch> [return] ok 6969 - my $x; $x->[0]->[1] = 1 <+strict +fetch> [variable] ok 6970 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+strict +fetch> [exception] ok 6971 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+strict +fetch> [return] ok 6972 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+strict +fetch> [variable] ok 6973 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+strict +fetch> [exception] ok 6974 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+strict +fetch> [return] ok 6975 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+strict +fetch> [variable] ok 6976 - my $x; $$x[0]->[1] = 1 <+strict +fetch> [exception] ok 6977 - my $x; $$x[0]->[1] = 1 <+strict +fetch> [return] ok 6978 - my $x; $$x[0]->[1] = 1 <+strict +fetch> [variable] ok 6979 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+strict +fetch> [exception] ok 6980 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+strict +fetch> [return] ok 6981 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+strict +fetch> [variable] ok 6982 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+strict +fetch> [exception] ok 6983 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+strict +fetch> [return] ok 6984 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+strict +fetch> [variable] ok 6985 - my @x; $x[0]->[1] = 1 <+strict +fetch> [exception] ok 6986 - my @x; $x[0]->[1] = 1 <+strict +fetch> [return] ok 6987 - my @x; $x[0]->[1] = 1 <+strict +fetch> [variable] ok 6988 - our @x; local @x; use strict; $x[0]->[1] = 1 <+strict +fetch> [exception] ok 6989 - our @x; local @x; use strict; $x[0]->[1] = 1 <+strict +fetch> [return] ok 6990 - our @x; local @x; use strict; $x[0]->[1] = 1 <+strict +fetch> [variable] ok 6991 - our @x; local @x; no strict; $x[0]->[1] = 1 <+strict +fetch> [exception] ok 6992 - our @x; local @x; no strict; $x[0]->[1] = 1 <+strict +fetch> [return] ok 6993 - our @x; local @x; no strict; $x[0]->[1] = 1 <+strict +fetch> [variable] ok 6994 - my $x; $x->[0]->[1] = 1 <+strict +exists> [exception] ok 6995 - my $x; $x->[0]->[1] = 1 <+strict +exists> [return] ok 6996 - my $x; $x->[0]->[1] = 1 <+strict +exists> [variable] ok 6997 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+strict +exists> [exception] ok 6998 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+strict +exists> [return] ok 6999 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+strict +exists> [variable] ok 7000 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+strict +exists> [exception] ok 7001 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+strict +exists> [return] ok 7002 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+strict +exists> [variable] ok 7003 - my $x; $$x[0]->[1] = 1 <+strict +exists> [exception] ok 7004 - my $x; $$x[0]->[1] = 1 <+strict +exists> [return] ok 7005 - my $x; $$x[0]->[1] = 1 <+strict +exists> [variable] ok 7006 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+strict +exists> [exception] ok 7007 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+strict +exists> [return] ok 7008 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+strict +exists> [variable] ok 7009 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+strict +exists> [exception] ok 7010 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+strict +exists> [return] ok 7011 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+strict +exists> [variable] ok 7012 - my @x; $x[0]->[1] = 1 <+strict +exists> [exception] ok 7013 - my @x; $x[0]->[1] = 1 <+strict +exists> [return] ok 7014 - my @x; $x[0]->[1] = 1 <+strict +exists> [variable] ok 7015 - our @x; local @x; use strict; $x[0]->[1] = 1 <+strict +exists> [exception] ok 7016 - our @x; local @x; use strict; $x[0]->[1] = 1 <+strict +exists> [return] ok 7017 - our @x; local @x; use strict; $x[0]->[1] = 1 <+strict +exists> [variable] ok 7018 - our @x; local @x; no strict; $x[0]->[1] = 1 <+strict +exists> [exception] ok 7019 - our @x; local @x; no strict; $x[0]->[1] = 1 <+strict +exists> [return] ok 7020 - our @x; local @x; no strict; $x[0]->[1] = 1 <+strict +exists> [variable] ok 7021 - my $x; $x->[0]->[1] = 1 <+strict +delete> [exception] ok 7022 - my $x; $x->[0]->[1] = 1 <+strict +delete> [return] ok 7023 - my $x; $x->[0]->[1] = 1 <+strict +delete> [variable] ok 7024 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+strict +delete> [exception] ok 7025 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+strict +delete> [return] ok 7026 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+strict +delete> [variable] ok 7027 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+strict +delete> [exception] ok 7028 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+strict +delete> [return] ok 7029 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+strict +delete> [variable] ok 7030 - my $x; $$x[0]->[1] = 1 <+strict +delete> [exception] ok 7031 - my $x; $$x[0]->[1] = 1 <+strict +delete> [return] ok 7032 - my $x; $$x[0]->[1] = 1 <+strict +delete> [variable] ok 7033 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+strict +delete> [exception] ok 7034 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+strict +delete> [return] ok 7035 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+strict +delete> [variable] ok 7036 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+strict +delete> [exception] ok 7037 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+strict +delete> [return] ok 7038 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+strict +delete> [variable] ok 7039 - my @x; $x[0]->[1] = 1 <+strict +delete> [exception] ok 7040 - my @x; $x[0]->[1] = 1 <+strict +delete> [return] ok 7041 - my @x; $x[0]->[1] = 1 <+strict +delete> [variable] ok 7042 - our @x; local @x; use strict; $x[0]->[1] = 1 <+strict +delete> [exception] ok 7043 - our @x; local @x; use strict; $x[0]->[1] = 1 <+strict +delete> [return] ok 7044 - our @x; local @x; use strict; $x[0]->[1] = 1 <+strict +delete> [variable] ok 7045 - our @x; local @x; no strict; $x[0]->[1] = 1 <+strict +delete> [exception] ok 7046 - our @x; local @x; no strict; $x[0]->[1] = 1 <+strict +delete> [return] ok 7047 - our @x; local @x; no strict; $x[0]->[1] = 1 <+strict +delete> [variable] ok 7048 - my $x; $x->[0]->[1] = 1 <+strict +store> [exception] ok 7049 - my $x; $x->[0]->[1] = 1 <+strict +store> [return] ok 7050 - my $x; $x->[0]->[1] = 1 <+strict +store> [variable] ok 7051 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+strict +store> [exception] ok 7052 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+strict +store> [return] ok 7053 - our $x; local $x; use strict; $x->[0]->[1] = 1 <+strict +store> [variable] ok 7054 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+strict +store> [exception] ok 7055 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+strict +store> [return] ok 7056 - our $x; local $x; no strict; $x->[0]->[1] = 1 <+strict +store> [variable] ok 7057 - my $x; $$x[0]->[1] = 1 <+strict +store> [exception] ok 7058 - my $x; $$x[0]->[1] = 1 <+strict +store> [return] ok 7059 - my $x; $$x[0]->[1] = 1 <+strict +store> [variable] ok 7060 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+strict +store> [exception] ok 7061 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+strict +store> [return] ok 7062 - our $x; local $x; use strict; $$x[0]->[1] = 1 <+strict +store> [variable] ok 7063 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+strict +store> [exception] ok 7064 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+strict +store> [return] ok 7065 - our $x; local $x; no strict; $$x[0]->[1] = 1 <+strict +store> [variable] ok 7066 - my @x; $x[0]->[1] = 1 <+strict +store> [exception] ok 7067 - my @x; $x[0]->[1] = 1 <+strict +store> [return] ok 7068 - my @x; $x[0]->[1] = 1 <+strict +store> [variable] ok 7069 - our @x; local @x; use strict; $x[0]->[1] = 1 <+strict +store> [exception] ok 7070 - our @x; local @x; use strict; $x[0]->[1] = 1 <+strict +store> [return] ok 7071 - our @x; local @x; use strict; $x[0]->[1] = 1 <+strict +store> [variable] ok 7072 - our @x; local @x; no strict; $x[0]->[1] = 1 <+strict +store> [exception] ok 7073 - our @x; local @x; no strict; $x[0]->[1] = 1 <+strict +store> [return] ok 7074 - our @x; local @x; no strict; $x[0]->[1] = 1 <+strict +store> [variable] ok 7075 - my $x; $x->[0] = 1; $x->[0] = 2 <+fetch> [exception] ok 7076 - my $x; $x->[0] = 1; $x->[0] = 2 <+fetch> [return] ok 7077 - my $x; $x->[0] = 1; $x->[0] = 2 <+fetch> [variable] ok 7078 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+fetch> [exception] ok 7079 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+fetch> [return] ok 7080 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+fetch> [variable] ok 7081 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+fetch> [exception] ok 7082 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+fetch> [return] ok 7083 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+fetch> [variable] ok 7084 - my $x; $x->[0] = 1; $$x[0] = 2 <+fetch> [exception] ok 7085 - my $x; $x->[0] = 1; $$x[0] = 2 <+fetch> [return] ok 7086 - my $x; $x->[0] = 1; $$x[0] = 2 <+fetch> [variable] ok 7087 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+fetch> [exception] ok 7088 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+fetch> [return] ok 7089 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+fetch> [variable] ok 7090 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+fetch> [exception] ok 7091 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+fetch> [return] ok 7092 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+fetch> [variable] ok 7093 - my @x; $x[0] = 1; $x[0] = 2 <+fetch> [exception] ok 7094 - my @x; $x[0] = 1; $x[0] = 2 <+fetch> [return] ok 7095 - my @x; $x[0] = 1; $x[0] = 2 <+fetch> [variable] ok 7096 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+fetch> [exception] ok 7097 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+fetch> [return] ok 7098 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+fetch> [variable] ok 7099 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+fetch> [exception] ok 7100 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+fetch> [return] ok 7101 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+fetch> [variable] ok 7102 - my $x; $x->[0] = 1; $x->[1] = 2 <+fetch> [exception] ok 7103 - my $x; $x->[0] = 1; $x->[1] = 2 <+fetch> [return] ok 7104 - my $x; $x->[0] = 1; $x->[1] = 2 <+fetch> [variable] ok 7105 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+fetch> [exception] ok 7106 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+fetch> [return] ok 7107 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+fetch> [variable] ok 7108 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+fetch> [exception] ok 7109 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+fetch> [return] ok 7110 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+fetch> [variable] ok 7111 - my $x; $x->[0] = 1; $$x[1] = 2 <+fetch> [exception] ok 7112 - my $x; $x->[0] = 1; $$x[1] = 2 <+fetch> [return] ok 7113 - my $x; $x->[0] = 1; $$x[1] = 2 <+fetch> [variable] ok 7114 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+fetch> [exception] ok 7115 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+fetch> [return] ok 7116 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+fetch> [variable] ok 7117 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+fetch> [exception] ok 7118 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+fetch> [return] ok 7119 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+fetch> [variable] ok 7120 - my @x; $x[0] = 1; $x[1] = 2 <+fetch> [exception] ok 7121 - my @x; $x[0] = 1; $x[1] = 2 <+fetch> [return] ok 7122 - my @x; $x[0] = 1; $x[1] = 2 <+fetch> [variable] ok 7123 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+fetch> [exception] ok 7124 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+fetch> [return] ok 7125 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+fetch> [variable] ok 7126 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+fetch> [exception] ok 7127 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+fetch> [return] ok 7128 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+fetch> [variable] ok 7129 - my $x; $x->[0] = 1; $x->[0] = 2 <+exists> [exception] ok 7130 - my $x; $x->[0] = 1; $x->[0] = 2 <+exists> [return] ok 7131 - my $x; $x->[0] = 1; $x->[0] = 2 <+exists> [variable] ok 7132 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+exists> [exception] ok 7133 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+exists> [return] ok 7134 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+exists> [variable] ok 7135 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+exists> [exception] ok 7136 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+exists> [return] ok 7137 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+exists> [variable] ok 7138 - my $x; $x->[0] = 1; $$x[0] = 2 <+exists> [exception] ok 7139 - my $x; $x->[0] = 1; $$x[0] = 2 <+exists> [return] ok 7140 - my $x; $x->[0] = 1; $$x[0] = 2 <+exists> [variable] ok 7141 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+exists> [exception] ok 7142 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+exists> [return] ok 7143 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+exists> [variable] ok 7144 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+exists> [exception] ok 7145 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+exists> [return] ok 7146 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+exists> [variable] ok 7147 - my @x; $x[0] = 1; $x[0] = 2 <+exists> [exception] ok 7148 - my @x; $x[0] = 1; $x[0] = 2 <+exists> [return] ok 7149 - my @x; $x[0] = 1; $x[0] = 2 <+exists> [variable] ok 7150 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+exists> [exception] ok 7151 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+exists> [return] ok 7152 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+exists> [variable] ok 7153 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+exists> [exception] ok 7154 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+exists> [return] ok 7155 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+exists> [variable] ok 7156 - my $x; $x->[0] = 1; $x->[1] = 2 <+exists> [exception] ok 7157 - my $x; $x->[0] = 1; $x->[1] = 2 <+exists> [return] ok 7158 - my $x; $x->[0] = 1; $x->[1] = 2 <+exists> [variable] ok 7159 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+exists> [exception] ok 7160 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+exists> [return] ok 7161 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+exists> [variable] ok 7162 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+exists> [exception] ok 7163 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+exists> [return] ok 7164 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+exists> [variable] ok 7165 - my $x; $x->[0] = 1; $$x[1] = 2 <+exists> [exception] ok 7166 - my $x; $x->[0] = 1; $$x[1] = 2 <+exists> [return] ok 7167 - my $x; $x->[0] = 1; $$x[1] = 2 <+exists> [variable] ok 7168 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+exists> [exception] ok 7169 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+exists> [return] ok 7170 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+exists> [variable] ok 7171 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+exists> [exception] ok 7172 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+exists> [return] ok 7173 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+exists> [variable] ok 7174 - my @x; $x[0] = 1; $x[1] = 2 <+exists> [exception] ok 7175 - my @x; $x[0] = 1; $x[1] = 2 <+exists> [return] ok 7176 - my @x; $x[0] = 1; $x[1] = 2 <+exists> [variable] ok 7177 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+exists> [exception] ok 7178 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+exists> [return] ok 7179 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+exists> [variable] ok 7180 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+exists> [exception] ok 7181 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+exists> [return] ok 7182 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+exists> [variable] ok 7183 - my $x; $x->[0] = 1; $x->[0] = 2 <+delete> [exception] ok 7184 - my $x; $x->[0] = 1; $x->[0] = 2 <+delete> [return] ok 7185 - my $x; $x->[0] = 1; $x->[0] = 2 <+delete> [variable] ok 7186 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+delete> [exception] ok 7187 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+delete> [return] ok 7188 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+delete> [variable] ok 7189 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+delete> [exception] ok 7190 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+delete> [return] ok 7191 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+delete> [variable] ok 7192 - my $x; $x->[0] = 1; $$x[0] = 2 <+delete> [exception] ok 7193 - my $x; $x->[0] = 1; $$x[0] = 2 <+delete> [return] ok 7194 - my $x; $x->[0] = 1; $$x[0] = 2 <+delete> [variable] ok 7195 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+delete> [exception] ok 7196 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+delete> [return] ok 7197 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+delete> [variable] ok 7198 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+delete> [exception] ok 7199 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+delete> [return] ok 7200 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+delete> [variable] ok 7201 - my @x; $x[0] = 1; $x[0] = 2 <+delete> [exception] ok 7202 - my @x; $x[0] = 1; $x[0] = 2 <+delete> [return] ok 7203 - my @x; $x[0] = 1; $x[0] = 2 <+delete> [variable] ok 7204 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+delete> [exception] ok 7205 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+delete> [return] ok 7206 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+delete> [variable] ok 7207 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+delete> [exception] ok 7208 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+delete> [return] ok 7209 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+delete> [variable] ok 7210 - my $x; $x->[0] = 1; $x->[1] = 2 <+delete> [exception] ok 7211 - my $x; $x->[0] = 1; $x->[1] = 2 <+delete> [return] ok 7212 - my $x; $x->[0] = 1; $x->[1] = 2 <+delete> [variable] ok 7213 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+delete> [exception] ok 7214 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+delete> [return] ok 7215 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+delete> [variable] ok 7216 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+delete> [exception] ok 7217 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+delete> [return] ok 7218 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+delete> [variable] ok 7219 - my $x; $x->[0] = 1; $$x[1] = 2 <+delete> [exception] ok 7220 - my $x; $x->[0] = 1; $$x[1] = 2 <+delete> [return] ok 7221 - my $x; $x->[0] = 1; $$x[1] = 2 <+delete> [variable] ok 7222 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+delete> [exception] ok 7223 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+delete> [return] ok 7224 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+delete> [variable] ok 7225 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+delete> [exception] ok 7226 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+delete> [return] ok 7227 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+delete> [variable] ok 7228 - my @x; $x[0] = 1; $x[1] = 2 <+delete> [exception] ok 7229 - my @x; $x[0] = 1; $x[1] = 2 <+delete> [return] ok 7230 - my @x; $x[0] = 1; $x[1] = 2 <+delete> [variable] ok 7231 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+delete> [exception] ok 7232 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+delete> [return] ok 7233 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+delete> [variable] ok 7234 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+delete> [exception] ok 7235 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+delete> [return] ok 7236 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+delete> [variable] ok 7237 - my $x; $x->[0] = 1; $x->[0] = 2 <+store> [exception] ok 7238 - my $x; $x->[0] = 1; $x->[0] = 2 <+store> [return] ok 7239 - my $x; $x->[0] = 1; $x->[0] = 2 <+store> [variable] ok 7240 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+store> [exception] ok 7241 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+store> [return] ok 7242 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+store> [variable] ok 7243 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+store> [exception] ok 7244 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+store> [return] ok 7245 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+store> [variable] ok 7246 - my $x; $x->[0] = 1; $$x[0] = 2 <+store> [exception] ok 7247 - my $x; $x->[0] = 1; $$x[0] = 2 <+store> [return] ok 7248 - my $x; $x->[0] = 1; $$x[0] = 2 <+store> [variable] ok 7249 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+store> [exception] ok 7250 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+store> [return] ok 7251 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+store> [variable] ok 7252 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+store> [exception] ok 7253 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+store> [return] ok 7254 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+store> [variable] ok 7255 - my @x; $x[0] = 1; $x[0] = 2 <+store> [exception] ok 7256 - my @x; $x[0] = 1; $x[0] = 2 <+store> [return] ok 7257 - my @x; $x[0] = 1; $x[0] = 2 <+store> [variable] ok 7258 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+store> [exception] ok 7259 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+store> [return] ok 7260 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+store> [variable] ok 7261 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+store> [exception] ok 7262 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+store> [return] ok 7263 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+store> [variable] ok 7264 - my $x; $x->[0] = 1; $x->[1] = 2 <+store> [exception] ok 7265 - my $x; $x->[0] = 1; $x->[1] = 2 <+store> [return] ok 7266 - my $x; $x->[0] = 1; $x->[1] = 2 <+store> [variable] ok 7267 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+store> [exception] ok 7268 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+store> [return] ok 7269 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+store> [variable] ok 7270 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+store> [exception] ok 7271 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+store> [return] ok 7272 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+store> [variable] ok 7273 - my $x; $x->[0] = 1; $$x[1] = 2 <+store> [exception] ok 7274 - my $x; $x->[0] = 1; $$x[1] = 2 <+store> [return] ok 7275 - my $x; $x->[0] = 1; $$x[1] = 2 <+store> [variable] ok 7276 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+store> [exception] ok 7277 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+store> [return] ok 7278 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+store> [variable] ok 7279 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+store> [exception] ok 7280 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+store> [return] ok 7281 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+store> [variable] ok 7282 - my @x; $x[0] = 1; $x[1] = 2 <+store> [exception] ok 7283 - my @x; $x[0] = 1; $x[1] = 2 <+store> [return] ok 7284 - my @x; $x[0] = 1; $x[1] = 2 <+store> [variable] ok 7285 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+store> [exception] ok 7286 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+store> [return] ok 7287 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+store> [variable] ok 7288 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+store> [exception] ok 7289 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+store> [return] ok 7290 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+store> [variable] ok 7291 - my $x; $x->[0] = 1; $x->[0] = 2 <+strict +fetch> [exception] ok 7292 - my $x; $x->[0] = 1; $x->[0] = 2 <+strict +fetch> [return] ok 7293 - my $x; $x->[0] = 1; $x->[0] = 2 <+strict +fetch> [variable] ok 7294 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+strict +fetch> [exception] ok 7295 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+strict +fetch> [return] ok 7296 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+strict +fetch> [variable] ok 7297 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+strict +fetch> [exception] ok 7298 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+strict +fetch> [return] ok 7299 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+strict +fetch> [variable] ok 7300 - my $x; $x->[0] = 1; $$x[0] = 2 <+strict +fetch> [exception] ok 7301 - my $x; $x->[0] = 1; $$x[0] = 2 <+strict +fetch> [return] ok 7302 - my $x; $x->[0] = 1; $$x[0] = 2 <+strict +fetch> [variable] ok 7303 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+strict +fetch> [exception] ok 7304 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+strict +fetch> [return] ok 7305 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+strict +fetch> [variable] ok 7306 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+strict +fetch> [exception] ok 7307 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+strict +fetch> [return] ok 7308 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+strict +fetch> [variable] ok 7309 - my @x; $x[0] = 1; $x[0] = 2 <+strict +fetch> [exception] ok 7310 - my @x; $x[0] = 1; $x[0] = 2 <+strict +fetch> [return] ok 7311 - my @x; $x[0] = 1; $x[0] = 2 <+strict +fetch> [variable] ok 7312 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+strict +fetch> [exception] ok 7313 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+strict +fetch> [return] ok 7314 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+strict +fetch> [variable] ok 7315 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+strict +fetch> [exception] ok 7316 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+strict +fetch> [return] ok 7317 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+strict +fetch> [variable] ok 7318 - my $x; $x->[0] = 1; $x->[1] = 2 <+strict +fetch> [exception] ok 7319 - my $x; $x->[0] = 1; $x->[1] = 2 <+strict +fetch> [return] ok 7320 - my $x; $x->[0] = 1; $x->[1] = 2 <+strict +fetch> [variable] ok 7321 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+strict +fetch> [exception] ok 7322 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+strict +fetch> [return] ok 7323 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+strict +fetch> [variable] ok 7324 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+strict +fetch> [exception] ok 7325 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+strict +fetch> [return] ok 7326 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+strict +fetch> [variable] ok 7327 - my $x; $x->[0] = 1; $$x[1] = 2 <+strict +fetch> [exception] ok 7328 - my $x; $x->[0] = 1; $$x[1] = 2 <+strict +fetch> [return] ok 7329 - my $x; $x->[0] = 1; $$x[1] = 2 <+strict +fetch> [variable] ok 7330 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+strict +fetch> [exception] ok 7331 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+strict +fetch> [return] ok 7332 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+strict +fetch> [variable] ok 7333 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+strict +fetch> [exception] ok 7334 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+strict +fetch> [return] ok 7335 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+strict +fetch> [variable] ok 7336 - my @x; $x[0] = 1; $x[1] = 2 <+strict +fetch> [exception] ok 7337 - my @x; $x[0] = 1; $x[1] = 2 <+strict +fetch> [return] ok 7338 - my @x; $x[0] = 1; $x[1] = 2 <+strict +fetch> [variable] ok 7339 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+strict +fetch> [exception] ok 7340 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+strict +fetch> [return] ok 7341 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+strict +fetch> [variable] ok 7342 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+strict +fetch> [exception] ok 7343 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+strict +fetch> [return] ok 7344 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+strict +fetch> [variable] ok 7345 - my $x; $x->[0] = 1; $x->[0] = 2 <+strict +exists> [exception] ok 7346 - my $x; $x->[0] = 1; $x->[0] = 2 <+strict +exists> [return] ok 7347 - my $x; $x->[0] = 1; $x->[0] = 2 <+strict +exists> [variable] ok 7348 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+strict +exists> [exception] ok 7349 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+strict +exists> [return] ok 7350 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+strict +exists> [variable] ok 7351 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+strict +exists> [exception] ok 7352 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+strict +exists> [return] ok 7353 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+strict +exists> [variable] ok 7354 - my $x; $x->[0] = 1; $$x[0] = 2 <+strict +exists> [exception] ok 7355 - my $x; $x->[0] = 1; $$x[0] = 2 <+strict +exists> [return] ok 7356 - my $x; $x->[0] = 1; $$x[0] = 2 <+strict +exists> [variable] ok 7357 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+strict +exists> [exception] ok 7358 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+strict +exists> [return] ok 7359 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+strict +exists> [variable] ok 7360 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+strict +exists> [exception] ok 7361 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+strict +exists> [return] ok 7362 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+strict +exists> [variable] ok 7363 - my @x; $x[0] = 1; $x[0] = 2 <+strict +exists> [exception] ok 7364 - my @x; $x[0] = 1; $x[0] = 2 <+strict +exists> [return] ok 7365 - my @x; $x[0] = 1; $x[0] = 2 <+strict +exists> [variable] ok 7366 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+strict +exists> [exception] ok 7367 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+strict +exists> [return] ok 7368 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+strict +exists> [variable] ok 7369 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+strict +exists> [exception] ok 7370 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+strict +exists> [return] ok 7371 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+strict +exists> [variable] ok 7372 - my $x; $x->[0] = 1; $x->[1] = 2 <+strict +exists> [exception] ok 7373 - my $x; $x->[0] = 1; $x->[1] = 2 <+strict +exists> [return] ok 7374 - my $x; $x->[0] = 1; $x->[1] = 2 <+strict +exists> [variable] ok 7375 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+strict +exists> [exception] ok 7376 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+strict +exists> [return] ok 7377 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+strict +exists> [variable] ok 7378 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+strict +exists> [exception] ok 7379 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+strict +exists> [return] ok 7380 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+strict +exists> [variable] ok 7381 - my $x; $x->[0] = 1; $$x[1] = 2 <+strict +exists> [exception] ok 7382 - my $x; $x->[0] = 1; $$x[1] = 2 <+strict +exists> [return] ok 7383 - my $x; $x->[0] = 1; $$x[1] = 2 <+strict +exists> [variable] ok 7384 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+strict +exists> [exception] ok 7385 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+strict +exists> [return] ok 7386 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+strict +exists> [variable] ok 7387 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+strict +exists> [exception] ok 7388 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+strict +exists> [return] ok 7389 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+strict +exists> [variable] ok 7390 - my @x; $x[0] = 1; $x[1] = 2 <+strict +exists> [exception] ok 7391 - my @x; $x[0] = 1; $x[1] = 2 <+strict +exists> [return] ok 7392 - my @x; $x[0] = 1; $x[1] = 2 <+strict +exists> [variable] ok 7393 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+strict +exists> [exception] ok 7394 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+strict +exists> [return] ok 7395 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+strict +exists> [variable] ok 7396 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+strict +exists> [exception] ok 7397 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+strict +exists> [return] ok 7398 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+strict +exists> [variable] ok 7399 - my $x; $x->[0] = 1; $x->[0] = 2 <+strict +delete> [exception] ok 7400 - my $x; $x->[0] = 1; $x->[0] = 2 <+strict +delete> [return] ok 7401 - my $x; $x->[0] = 1; $x->[0] = 2 <+strict +delete> [variable] ok 7402 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+strict +delete> [exception] ok 7403 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+strict +delete> [return] ok 7404 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+strict +delete> [variable] ok 7405 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+strict +delete> [exception] ok 7406 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+strict +delete> [return] ok 7407 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+strict +delete> [variable] ok 7408 - my $x; $x->[0] = 1; $$x[0] = 2 <+strict +delete> [exception] ok 7409 - my $x; $x->[0] = 1; $$x[0] = 2 <+strict +delete> [return] ok 7410 - my $x; $x->[0] = 1; $$x[0] = 2 <+strict +delete> [variable] ok 7411 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+strict +delete> [exception] ok 7412 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+strict +delete> [return] ok 7413 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+strict +delete> [variable] ok 7414 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+strict +delete> [exception] ok 7415 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+strict +delete> [return] ok 7416 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+strict +delete> [variable] ok 7417 - my @x; $x[0] = 1; $x[0] = 2 <+strict +delete> [exception] ok 7418 - my @x; $x[0] = 1; $x[0] = 2 <+strict +delete> [return] ok 7419 - my @x; $x[0] = 1; $x[0] = 2 <+strict +delete> [variable] ok 7420 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+strict +delete> [exception] ok 7421 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+strict +delete> [return] ok 7422 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+strict +delete> [variable] ok 7423 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+strict +delete> [exception] ok 7424 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+strict +delete> [return] ok 7425 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+strict +delete> [variable] ok 7426 - my $x; $x->[0] = 1; $x->[1] = 2 <+strict +delete> [exception] ok 7427 - my $x; $x->[0] = 1; $x->[1] = 2 <+strict +delete> [return] ok 7428 - my $x; $x->[0] = 1; $x->[1] = 2 <+strict +delete> [variable] ok 7429 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+strict +delete> [exception] ok 7430 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+strict +delete> [return] ok 7431 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+strict +delete> [variable] ok 7432 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+strict +delete> [exception] ok 7433 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+strict +delete> [return] ok 7434 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+strict +delete> [variable] ok 7435 - my $x; $x->[0] = 1; $$x[1] = 2 <+strict +delete> [exception] ok 7436 - my $x; $x->[0] = 1; $$x[1] = 2 <+strict +delete> [return] ok 7437 - my $x; $x->[0] = 1; $$x[1] = 2 <+strict +delete> [variable] ok 7438 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+strict +delete> [exception] ok 7439 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+strict +delete> [return] ok 7440 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+strict +delete> [variable] ok 7441 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+strict +delete> [exception] ok 7442 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+strict +delete> [return] ok 7443 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+strict +delete> [variable] ok 7444 - my @x; $x[0] = 1; $x[1] = 2 <+strict +delete> [exception] ok 7445 - my @x; $x[0] = 1; $x[1] = 2 <+strict +delete> [return] ok 7446 - my @x; $x[0] = 1; $x[1] = 2 <+strict +delete> [variable] ok 7447 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+strict +delete> [exception] ok 7448 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+strict +delete> [return] ok 7449 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+strict +delete> [variable] ok 7450 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+strict +delete> [exception] ok 7451 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+strict +delete> [return] ok 7452 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+strict +delete> [variable] ok 7453 - my $x; $x->[0] = 1; $x->[0] = 2 <+strict +store> [exception] ok 7454 - my $x; $x->[0] = 1; $x->[0] = 2 <+strict +store> [return] ok 7455 - my $x; $x->[0] = 1; $x->[0] = 2 <+strict +store> [variable] ok 7456 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+strict +store> [exception] ok 7457 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+strict +store> [return] ok 7458 - our $x; local $x; use strict; $x->[0] = 1; $x->[0] = 2 <+strict +store> [variable] ok 7459 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+strict +store> [exception] ok 7460 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+strict +store> [return] ok 7461 - our $x; local $x; no strict; $x->[0] = 1; $x->[0] = 2 <+strict +store> [variable] ok 7462 - my $x; $x->[0] = 1; $$x[0] = 2 <+strict +store> [exception] ok 7463 - my $x; $x->[0] = 1; $$x[0] = 2 <+strict +store> [return] ok 7464 - my $x; $x->[0] = 1; $$x[0] = 2 <+strict +store> [variable] ok 7465 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+strict +store> [exception] ok 7466 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+strict +store> [return] ok 7467 - our $x; local $x; use strict; $x->[0] = 1; $$x[0] = 2 <+strict +store> [variable] ok 7468 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+strict +store> [exception] ok 7469 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+strict +store> [return] ok 7470 - our $x; local $x; no strict; $x->[0] = 1; $$x[0] = 2 <+strict +store> [variable] ok 7471 - my @x; $x[0] = 1; $x[0] = 2 <+strict +store> [exception] ok 7472 - my @x; $x[0] = 1; $x[0] = 2 <+strict +store> [return] ok 7473 - my @x; $x[0] = 1; $x[0] = 2 <+strict +store> [variable] ok 7474 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+strict +store> [exception] ok 7475 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+strict +store> [return] ok 7476 - our @x; local @x; use strict; $x[0] = 1; $x[0] = 2 <+strict +store> [variable] ok 7477 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+strict +store> [exception] ok 7478 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+strict +store> [return] ok 7479 - our @x; local @x; no strict; $x[0] = 1; $x[0] = 2 <+strict +store> [variable] ok 7480 - my $x; $x->[0] = 1; $x->[1] = 2 <+strict +store> [exception] ok 7481 - my $x; $x->[0] = 1; $x->[1] = 2 <+strict +store> [return] ok 7482 - my $x; $x->[0] = 1; $x->[1] = 2 <+strict +store> [variable] ok 7483 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+strict +store> [exception] ok 7484 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+strict +store> [return] ok 7485 - our $x; local $x; use strict; $x->[0] = 1; $x->[1] = 2 <+strict +store> [variable] ok 7486 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+strict +store> [exception] ok 7487 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+strict +store> [return] ok 7488 - our $x; local $x; no strict; $x->[0] = 1; $x->[1] = 2 <+strict +store> [variable] ok 7489 - my $x; $x->[0] = 1; $$x[1] = 2 <+strict +store> [exception] ok 7490 - my $x; $x->[0] = 1; $$x[1] = 2 <+strict +store> [return] ok 7491 - my $x; $x->[0] = 1; $$x[1] = 2 <+strict +store> [variable] ok 7492 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+strict +store> [exception] ok 7493 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+strict +store> [return] ok 7494 - our $x; local $x; use strict; $x->[0] = 1; $$x[1] = 2 <+strict +store> [variable] ok 7495 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+strict +store> [exception] ok 7496 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+strict +store> [return] ok 7497 - our $x; local $x; no strict; $x->[0] = 1; $$x[1] = 2 <+strict +store> [variable] ok 7498 - my @x; $x[0] = 1; $x[1] = 2 <+strict +store> [exception] ok 7499 - my @x; $x[0] = 1; $x[1] = 2 <+strict +store> [return] ok 7500 - my @x; $x[0] = 1; $x[1] = 2 <+strict +store> [variable] ok 7501 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+strict +store> [exception] ok 7502 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+strict +store> [return] ok 7503 - our @x; local @x; use strict; $x[0] = 1; $x[1] = 2 <+strict +store> [variable] ok 7504 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+strict +store> [exception] ok 7505 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+strict +store> [return] ok 7506 - our @x; local @x; no strict; $x[0] = 1; $x[1] = 2 <+strict +store> [variable] ok 7507 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+fetch> [exception] ok 7508 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+fetch> [return] ok 7509 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+fetch> [variable] ok 7510 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+fetch> [exception] ok 7511 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+fetch> [return] ok 7512 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+fetch> [variable] ok 7513 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+fetch> [exception] ok 7514 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+fetch> [return] ok 7515 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+fetch> [variable] ok 7516 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+fetch> [exception] ok 7517 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+fetch> [return] ok 7518 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+fetch> [variable] ok 7519 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+fetch> [exception] ok 7520 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+fetch> [return] ok 7521 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+fetch> [variable] ok 7522 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+fetch> [exception] ok 7523 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+fetch> [return] ok 7524 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+fetch> [variable] ok 7525 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+fetch> [exception] ok 7526 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+fetch> [return] ok 7527 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+fetch> [variable] ok 7528 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+fetch> [exception] ok 7529 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+fetch> [return] ok 7530 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+fetch> [variable] ok 7531 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+fetch> [exception] ok 7532 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+fetch> [return] ok 7533 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+fetch> [variable] ok 7534 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+fetch> [exception] ok 7535 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+fetch> [return] ok 7536 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+fetch> [variable] ok 7537 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+fetch> [exception] ok 7538 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+fetch> [return] ok 7539 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+fetch> [variable] ok 7540 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+fetch> [exception] ok 7541 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+fetch> [return] ok 7542 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+fetch> [variable] ok 7543 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+fetch> [exception] ok 7544 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+fetch> [return] ok 7545 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+fetch> [variable] ok 7546 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+fetch> [exception] ok 7547 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+fetch> [return] ok 7548 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+fetch> [variable] ok 7549 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+fetch> [exception] ok 7550 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+fetch> [return] ok 7551 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+fetch> [variable] ok 7552 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+fetch> [exception] ok 7553 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+fetch> [return] ok 7554 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+fetch> [variable] ok 7555 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+fetch> [exception] ok 7556 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+fetch> [return] ok 7557 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+fetch> [variable] ok 7558 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+fetch> [exception] ok 7559 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+fetch> [return] ok 7560 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+fetch> [variable] ok 7561 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+fetch> [exception] ok 7562 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+fetch> [return] ok 7563 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+fetch> [variable] ok 7564 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+fetch> [exception] ok 7565 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+fetch> [return] ok 7566 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+fetch> [variable] ok 7567 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+fetch> [exception] ok 7568 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+fetch> [return] ok 7569 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+fetch> [variable] ok 7570 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+fetch> [exception] ok 7571 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+fetch> [return] ok 7572 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+fetch> [variable] ok 7573 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+fetch> [exception] ok 7574 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+fetch> [return] ok 7575 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+fetch> [variable] ok 7576 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+fetch> [exception] ok 7577 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+fetch> [return] ok 7578 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+fetch> [variable] ok 7579 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+fetch> [exception] ok 7580 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+fetch> [return] ok 7581 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+fetch> [variable] ok 7582 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+fetch> [exception] ok 7583 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+fetch> [return] ok 7584 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+fetch> [variable] ok 7585 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+fetch> [exception] ok 7586 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+fetch> [return] ok 7587 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+fetch> [variable] ok 7588 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+exists> [exception] ok 7589 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+exists> [return] ok 7590 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+exists> [variable] ok 7591 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+exists> [exception] ok 7592 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+exists> [return] ok 7593 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+exists> [variable] ok 7594 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+exists> [exception] ok 7595 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+exists> [return] ok 7596 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+exists> [variable] ok 7597 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+exists> [exception] ok 7598 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+exists> [return] ok 7599 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+exists> [variable] ok 7600 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+exists> [exception] ok 7601 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+exists> [return] ok 7602 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+exists> [variable] ok 7603 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+exists> [exception] ok 7604 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+exists> [return] ok 7605 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+exists> [variable] ok 7606 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+exists> [exception] ok 7607 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+exists> [return] ok 7608 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+exists> [variable] ok 7609 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+exists> [exception] ok 7610 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+exists> [return] ok 7611 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+exists> [variable] ok 7612 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+exists> [exception] ok 7613 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+exists> [return] ok 7614 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+exists> [variable] ok 7615 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+exists> [exception] ok 7616 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+exists> [return] ok 7617 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+exists> [variable] ok 7618 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+exists> [exception] ok 7619 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+exists> [return] ok 7620 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+exists> [variable] ok 7621 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+exists> [exception] ok 7622 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+exists> [return] ok 7623 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+exists> [variable] ok 7624 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+exists> [exception] ok 7625 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+exists> [return] ok 7626 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+exists> [variable] ok 7627 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+exists> [exception] ok 7628 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+exists> [return] ok 7629 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+exists> [variable] ok 7630 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+exists> [exception] ok 7631 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+exists> [return] ok 7632 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+exists> [variable] ok 7633 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+exists> [exception] ok 7634 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+exists> [return] ok 7635 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+exists> [variable] ok 7636 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+exists> [exception] ok 7637 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+exists> [return] ok 7638 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+exists> [variable] ok 7639 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+exists> [exception] ok 7640 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+exists> [return] ok 7641 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+exists> [variable] ok 7642 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+exists> [exception] ok 7643 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+exists> [return] ok 7644 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+exists> [variable] ok 7645 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+exists> [exception] ok 7646 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+exists> [return] ok 7647 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+exists> [variable] ok 7648 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+exists> [exception] ok 7649 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+exists> [return] ok 7650 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+exists> [variable] ok 7651 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+exists> [exception] ok 7652 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+exists> [return] ok 7653 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+exists> [variable] ok 7654 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+exists> [exception] ok 7655 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+exists> [return] ok 7656 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+exists> [variable] ok 7657 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+exists> [exception] ok 7658 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+exists> [return] ok 7659 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+exists> [variable] ok 7660 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+exists> [exception] ok 7661 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+exists> [return] ok 7662 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+exists> [variable] ok 7663 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+exists> [exception] ok 7664 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+exists> [return] ok 7665 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+exists> [variable] ok 7666 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+exists> [exception] ok 7667 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+exists> [return] ok 7668 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+exists> [variable] ok 7669 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+delete> [exception] ok 7670 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+delete> [return] ok 7671 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+delete> [variable] ok 7672 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+delete> [exception] ok 7673 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+delete> [return] ok 7674 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+delete> [variable] ok 7675 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+delete> [exception] ok 7676 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+delete> [return] ok 7677 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+delete> [variable] ok 7678 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+delete> [exception] ok 7679 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+delete> [return] ok 7680 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+delete> [variable] ok 7681 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+delete> [exception] ok 7682 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+delete> [return] ok 7683 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+delete> [variable] ok 7684 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+delete> [exception] ok 7685 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+delete> [return] ok 7686 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+delete> [variable] ok 7687 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+delete> [exception] ok 7688 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+delete> [return] ok 7689 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+delete> [variable] ok 7690 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+delete> [exception] ok 7691 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+delete> [return] ok 7692 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+delete> [variable] ok 7693 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+delete> [exception] ok 7694 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+delete> [return] ok 7695 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+delete> [variable] ok 7696 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+delete> [exception] ok 7697 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+delete> [return] ok 7698 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+delete> [variable] ok 7699 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+delete> [exception] ok 7700 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+delete> [return] ok 7701 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+delete> [variable] ok 7702 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+delete> [exception] ok 7703 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+delete> [return] ok 7704 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+delete> [variable] ok 7705 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+delete> [exception] ok 7706 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+delete> [return] ok 7707 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+delete> [variable] ok 7708 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+delete> [exception] ok 7709 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+delete> [return] ok 7710 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+delete> [variable] ok 7711 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+delete> [exception] ok 7712 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+delete> [return] ok 7713 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+delete> [variable] ok 7714 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+delete> [exception] ok 7715 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+delete> [return] ok 7716 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+delete> [variable] ok 7717 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+delete> [exception] ok 7718 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+delete> [return] ok 7719 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+delete> [variable] ok 7720 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+delete> [exception] ok 7721 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+delete> [return] ok 7722 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+delete> [variable] ok 7723 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+delete> [exception] ok 7724 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+delete> [return] ok 7725 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+delete> [variable] ok 7726 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+delete> [exception] ok 7727 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+delete> [return] ok 7728 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+delete> [variable] ok 7729 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+delete> [exception] ok 7730 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+delete> [return] ok 7731 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+delete> [variable] ok 7732 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+delete> [exception] ok 7733 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+delete> [return] ok 7734 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+delete> [variable] ok 7735 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+delete> [exception] ok 7736 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+delete> [return] ok 7737 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+delete> [variable] ok 7738 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+delete> [exception] ok 7739 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+delete> [return] ok 7740 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+delete> [variable] ok 7741 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+delete> [exception] ok 7742 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+delete> [return] ok 7743 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+delete> [variable] ok 7744 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+delete> [exception] ok 7745 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+delete> [return] ok 7746 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+delete> [variable] ok 7747 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+delete> [exception] ok 7748 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+delete> [return] ok 7749 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+delete> [variable] ok 7750 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+store> [exception] ok 7751 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+store> [return] ok 7752 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+store> [variable] ok 7753 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+store> [exception] ok 7754 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+store> [return] ok 7755 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+store> [variable] ok 7756 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+store> [exception] ok 7757 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+store> [return] ok 7758 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+store> [variable] ok 7759 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+store> [exception] ok 7760 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+store> [return] ok 7761 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+store> [variable] ok 7762 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+store> [exception] ok 7763 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+store> [return] ok 7764 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+store> [variable] ok 7765 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+store> [exception] ok 7766 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+store> [return] ok 7767 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+store> [variable] ok 7768 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+store> [exception] ok 7769 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+store> [return] ok 7770 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+store> [variable] ok 7771 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+store> [exception] ok 7772 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+store> [return] ok 7773 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+store> [variable] ok 7774 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+store> [exception] ok 7775 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+store> [return] ok 7776 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+store> [variable] ok 7777 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+store> [exception] ok 7778 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+store> [return] ok 7779 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+store> [variable] ok 7780 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+store> [exception] ok 7781 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+store> [return] ok 7782 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+store> [variable] ok 7783 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+store> [exception] ok 7784 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+store> [return] ok 7785 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+store> [variable] ok 7786 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+store> [exception] ok 7787 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+store> [return] ok 7788 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+store> [variable] ok 7789 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+store> [exception] ok 7790 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+store> [return] ok 7791 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+store> [variable] ok 7792 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+store> [exception] ok 7793 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+store> [return] ok 7794 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+store> [variable] ok 7795 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+store> [exception] ok 7796 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+store> [return] ok 7797 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+store> [variable] ok 7798 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+store> [exception] ok 7799 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+store> [return] ok 7800 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+store> [variable] ok 7801 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+store> [exception] ok 7802 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+store> [return] ok 7803 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+store> [variable] ok 7804 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+store> [exception] ok 7805 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+store> [return] ok 7806 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+store> [variable] ok 7807 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+store> [exception] ok 7808 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+store> [return] ok 7809 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+store> [variable] ok 7810 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+store> [exception] ok 7811 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+store> [return] ok 7812 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+store> [variable] ok 7813 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+store> [exception] ok 7814 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+store> [return] ok 7815 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+store> [variable] ok 7816 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+store> [exception] ok 7817 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+store> [return] ok 7818 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+store> [variable] ok 7819 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+store> [exception] ok 7820 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+store> [return] ok 7821 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+store> [variable] ok 7822 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+store> [exception] ok 7823 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+store> [return] ok 7824 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+store> [variable] ok 7825 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+store> [exception] ok 7826 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+store> [return] ok 7827 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+store> [variable] ok 7828 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+store> [exception] ok 7829 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+store> [return] ok 7830 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+store> [variable] ok 7831 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +fetch> [exception] ok 7832 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +fetch> [return] ok 7833 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +fetch> [variable] ok 7834 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +fetch> [exception] ok 7835 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +fetch> [return] ok 7836 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +fetch> [variable] ok 7837 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +fetch> [exception] ok 7838 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +fetch> [return] ok 7839 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +fetch> [variable] ok 7840 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +fetch> [exception] ok 7841 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +fetch> [return] ok 7842 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +fetch> [variable] ok 7843 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +fetch> [exception] ok 7844 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +fetch> [return] ok 7845 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +fetch> [variable] ok 7846 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +fetch> [exception] ok 7847 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +fetch> [return] ok 7848 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +fetch> [variable] ok 7849 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +fetch> [exception] ok 7850 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +fetch> [return] ok 7851 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +fetch> [variable] ok 7852 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +fetch> [exception] ok 7853 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +fetch> [return] ok 7854 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +fetch> [variable] ok 7855 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +fetch> [exception] ok 7856 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +fetch> [return] ok 7857 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +fetch> [variable] ok 7858 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +fetch> [exception] ok 7859 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +fetch> [return] ok 7860 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +fetch> [variable] ok 7861 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +fetch> [exception] ok 7862 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +fetch> [return] ok 7863 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +fetch> [variable] ok 7864 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +fetch> [exception] ok 7865 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +fetch> [return] ok 7866 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +fetch> [variable] ok 7867 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +fetch> [exception] ok 7868 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +fetch> [return] ok 7869 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +fetch> [variable] ok 7870 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +fetch> [exception] ok 7871 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +fetch> [return] ok 7872 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +fetch> [variable] ok 7873 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +fetch> [exception] ok 7874 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +fetch> [return] ok 7875 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +fetch> [variable] ok 7876 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +fetch> [exception] ok 7877 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +fetch> [return] ok 7878 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +fetch> [variable] ok 7879 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +fetch> [exception] ok 7880 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +fetch> [return] ok 7881 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +fetch> [variable] ok 7882 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +fetch> [exception] ok 7883 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +fetch> [return] ok 7884 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +fetch> [variable] ok 7885 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +fetch> [exception] ok 7886 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +fetch> [return] ok 7887 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +fetch> [variable] ok 7888 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +fetch> [exception] ok 7889 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +fetch> [return] ok 7890 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +fetch> [variable] ok 7891 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +fetch> [exception] ok 7892 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +fetch> [return] ok 7893 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +fetch> [variable] ok 7894 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +fetch> [exception] ok 7895 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +fetch> [return] ok 7896 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +fetch> [variable] ok 7897 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +fetch> [exception] ok 7898 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +fetch> [return] ok 7899 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +fetch> [variable] ok 7900 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +fetch> [exception] ok 7901 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +fetch> [return] ok 7902 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +fetch> [variable] ok 7903 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +fetch> [exception] ok 7904 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +fetch> [return] ok 7905 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +fetch> [variable] ok 7906 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +fetch> [exception] ok 7907 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +fetch> [return] ok 7908 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +fetch> [variable] ok 7909 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +fetch> [exception] ok 7910 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +fetch> [return] ok 7911 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +fetch> [variable] ok 7912 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +exists> [exception] ok 7913 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +exists> [return] ok 7914 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +exists> [variable] ok 7915 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +exists> [exception] ok 7916 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +exists> [return] ok 7917 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +exists> [variable] ok 7918 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +exists> [exception] ok 7919 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +exists> [return] ok 7920 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +exists> [variable] ok 7921 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +exists> [exception] ok 7922 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +exists> [return] ok 7923 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +exists> [variable] ok 7924 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +exists> [exception] ok 7925 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +exists> [return] ok 7926 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +exists> [variable] ok 7927 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +exists> [exception] ok 7928 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +exists> [return] ok 7929 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +exists> [variable] ok 7930 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +exists> [exception] ok 7931 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +exists> [return] ok 7932 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +exists> [variable] ok 7933 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +exists> [exception] ok 7934 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +exists> [return] ok 7935 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +exists> [variable] ok 7936 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +exists> [exception] ok 7937 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +exists> [return] ok 7938 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +exists> [variable] ok 7939 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +exists> [exception] ok 7940 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +exists> [return] ok 7941 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +exists> [variable] ok 7942 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +exists> [exception] ok 7943 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +exists> [return] ok 7944 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +exists> [variable] ok 7945 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +exists> [exception] ok 7946 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +exists> [return] ok 7947 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +exists> [variable] ok 7948 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +exists> [exception] ok 7949 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +exists> [return] ok 7950 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +exists> [variable] ok 7951 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +exists> [exception] ok 7952 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +exists> [return] ok 7953 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +exists> [variable] ok 7954 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +exists> [exception] ok 7955 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +exists> [return] ok 7956 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +exists> [variable] ok 7957 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +exists> [exception] ok 7958 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +exists> [return] ok 7959 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +exists> [variable] ok 7960 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +exists> [exception] ok 7961 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +exists> [return] ok 7962 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +exists> [variable] ok 7963 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +exists> [exception] ok 7964 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +exists> [return] ok 7965 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +exists> [variable] ok 7966 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +exists> [exception] ok 7967 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +exists> [return] ok 7968 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +exists> [variable] ok 7969 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +exists> [exception] ok 7970 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +exists> [return] ok 7971 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +exists> [variable] ok 7972 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +exists> [exception] ok 7973 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +exists> [return] ok 7974 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +exists> [variable] ok 7975 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +exists> [exception] ok 7976 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +exists> [return] ok 7977 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +exists> [variable] ok 7978 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +exists> [exception] ok 7979 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +exists> [return] ok 7980 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +exists> [variable] ok 7981 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +exists> [exception] ok 7982 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +exists> [return] ok 7983 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +exists> [variable] ok 7984 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +exists> [exception] ok 7985 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +exists> [return] ok 7986 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +exists> [variable] ok 7987 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +exists> [exception] ok 7988 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +exists> [return] ok 7989 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +exists> [variable] ok 7990 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +exists> [exception] ok 7991 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +exists> [return] ok 7992 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +exists> [variable] ok 7993 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +delete> [exception] ok 7994 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +delete> [return] ok 7995 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +delete> [variable] ok 7996 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +delete> [exception] ok 7997 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +delete> [return] ok 7998 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +delete> [variable] ok 7999 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +delete> [exception] ok 8000 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +delete> [return] ok 8001 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +delete> [variable] ok 8002 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +delete> [exception] ok 8003 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +delete> [return] ok 8004 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +delete> [variable] ok 8005 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +delete> [exception] ok 8006 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +delete> [return] ok 8007 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +delete> [variable] ok 8008 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +delete> [exception] ok 8009 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +delete> [return] ok 8010 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +delete> [variable] ok 8011 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +delete> [exception] ok 8012 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +delete> [return] ok 8013 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +delete> [variable] ok 8014 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +delete> [exception] ok 8015 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +delete> [return] ok 8016 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +delete> [variable] ok 8017 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +delete> [exception] ok 8018 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +delete> [return] ok 8019 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +delete> [variable] ok 8020 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +delete> [exception] ok 8021 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +delete> [return] ok 8022 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +delete> [variable] ok 8023 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +delete> [exception] ok 8024 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +delete> [return] ok 8025 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +delete> [variable] ok 8026 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +delete> [exception] ok 8027 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +delete> [return] ok 8028 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +delete> [variable] ok 8029 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +delete> [exception] ok 8030 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +delete> [return] ok 8031 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +delete> [variable] ok 8032 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +delete> [exception] ok 8033 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +delete> [return] ok 8034 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +delete> [variable] ok 8035 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +delete> [exception] ok 8036 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +delete> [return] ok 8037 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +delete> [variable] ok 8038 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +delete> [exception] ok 8039 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +delete> [return] ok 8040 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +delete> [variable] ok 8041 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +delete> [exception] ok 8042 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +delete> [return] ok 8043 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +delete> [variable] ok 8044 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +delete> [exception] ok 8045 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +delete> [return] ok 8046 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +delete> [variable] ok 8047 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +delete> [exception] ok 8048 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +delete> [return] ok 8049 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +delete> [variable] ok 8050 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +delete> [exception] ok 8051 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +delete> [return] ok 8052 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +delete> [variable] ok 8053 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +delete> [exception] ok 8054 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +delete> [return] ok 8055 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +delete> [variable] ok 8056 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +delete> [exception] ok 8057 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +delete> [return] ok 8058 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +delete> [variable] ok 8059 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +delete> [exception] ok 8060 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +delete> [return] ok 8061 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +delete> [variable] ok 8062 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +delete> [exception] ok 8063 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +delete> [return] ok 8064 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +delete> [variable] ok 8065 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +delete> [exception] ok 8066 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +delete> [return] ok 8067 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +delete> [variable] ok 8068 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +delete> [exception] ok 8069 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +delete> [return] ok 8070 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +delete> [variable] ok 8071 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +delete> [exception] ok 8072 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +delete> [return] ok 8073 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +delete> [variable] ok 8074 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +store> [exception] ok 8075 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +store> [return] ok 8076 - my $x; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +store> [variable] ok 8077 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +store> [exception] ok 8078 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +store> [return] ok 8079 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +store> [variable] ok 8080 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +store> [exception] ok 8081 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +store> [return] ok 8082 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[1] = 2 <+strict +store> [variable] ok 8083 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +store> [exception] ok 8084 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +store> [return] ok 8085 - my $x; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +store> [variable] ok 8086 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +store> [exception] ok 8087 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +store> [return] ok 8088 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +store> [variable] ok 8089 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +store> [exception] ok 8090 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +store> [return] ok 8091 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[1] = 2 <+strict +store> [variable] ok 8092 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +store> [exception] ok 8093 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +store> [return] ok 8094 - my @x; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +store> [variable] ok 8095 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +store> [exception] ok 8096 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +store> [return] ok 8097 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +store> [variable] ok 8098 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +store> [exception] ok 8099 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +store> [return] ok 8100 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[1] = 2 <+strict +store> [variable] ok 8101 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +store> [exception] ok 8102 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +store> [return] ok 8103 - my $x; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +store> [variable] ok 8104 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +store> [exception] ok 8105 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +store> [return] ok 8106 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +store> [variable] ok 8107 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +store> [exception] ok 8108 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +store> [return] ok 8109 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[0]->[3] = 2 <+strict +store> [variable] ok 8110 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +store> [exception] ok 8111 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +store> [return] ok 8112 - my $x; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +store> [variable] ok 8113 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +store> [exception] ok 8114 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +store> [return] ok 8115 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +store> [variable] ok 8116 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +store> [exception] ok 8117 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +store> [return] ok 8118 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[0]->[3] = 2 <+strict +store> [variable] ok 8119 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +store> [exception] ok 8120 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +store> [return] ok 8121 - my @x; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +store> [variable] ok 8122 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +store> [exception] ok 8123 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +store> [return] ok 8124 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +store> [variable] ok 8125 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +store> [exception] ok 8126 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +store> [return] ok 8127 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[0]->[3] = 2 <+strict +store> [variable] ok 8128 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +store> [exception] ok 8129 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +store> [return] ok 8130 - my $x; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +store> [variable] ok 8131 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +store> [exception] ok 8132 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +store> [return] ok 8133 - our $x; local $x; use strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +store> [variable] ok 8134 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +store> [exception] ok 8135 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +store> [return] ok 8136 - our $x; local $x; no strict; $x->[0]->[1] = 1; $x->[2]->[3] = 2 <+strict +store> [variable] ok 8137 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +store> [exception] ok 8138 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +store> [return] ok 8139 - my $x; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +store> [variable] ok 8140 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +store> [exception] ok 8141 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +store> [return] ok 8142 - our $x; local $x; use strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +store> [variable] ok 8143 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +store> [exception] ok 8144 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +store> [return] ok 8145 - our $x; local $x; no strict; $x->[0]->[1] = 1; $$x[2]->[3] = 2 <+strict +store> [variable] ok 8146 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +store> [exception] ok 8147 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +store> [return] ok 8148 - my @x; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +store> [variable] ok 8149 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +store> [exception] ok 8150 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +store> [return] ok 8151 - our @x; local @x; use strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +store> [variable] ok 8152 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +store> [exception] ok 8153 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +store> [return] ok 8154 - our @x; local @x; no strict; $x[0]->[1] = 1; $x[2]->[3] = 2 <+strict +store> [variable] ok t/32-array-kv.t ........... 1..1728 ok 1 - my $x; keys @$x [exception] ok 2 - my $x; keys @$x [return] ok 3 - my $x; keys @$x [variable] ok 4 - our $x; local $x; use strict; keys @$x [exception] ok 5 - our $x; local $x; use strict; keys @$x [return] ok 6 - our $x; local $x; use strict; keys @$x [variable] ok 7 - our $x; local $x; no strict; keys @$x [exception] ok 8 - our $x; local $x; no strict; keys @$x [return] ok 9 - our $x; local $x; no strict; keys @$x [variable] ok 10 - my $x; keys @$x [exception] ok 11 - my $x; keys @$x [return] ok 12 - my $x; keys @$x [variable] ok 13 - our $x; local $x; use strict; keys @$x [exception] ok 14 - our $x; local $x; use strict; keys @$x [return] ok 15 - our $x; local $x; use strict; keys @$x [variable] ok 16 - our $x; local $x; no strict; keys @$x [exception] ok 17 - our $x; local $x; no strict; keys @$x [return] ok 18 - our $x; local $x; no strict; keys @$x [variable] ok 19 - my @x; keys @x [exception] ok 20 - my @x; keys @x [return] ok 21 - my @x; keys @x [variable] ok 22 - our @x; local @x; use strict; keys @x [exception] ok 23 - our @x; local @x; use strict; keys @x [return] ok 24 - our @x; local @x; use strict; keys @x [variable] ok 25 - our @x; local @x; no strict; keys @x [exception] ok 26 - our @x; local @x; no strict; keys @x [return] ok 27 - our @x; local @x; no strict; keys @x [variable] ok 28 - my $x; keys @$x [exception] ok 29 - my $x; keys @$x [return] ok 30 - my $x; keys @$x [variable] ok 31 - our $x; local $x; use strict; keys @$x [exception] ok 32 - our $x; local $x; use strict; keys @$x [return] ok 33 - our $x; local $x; use strict; keys @$x [variable] ok 34 - our $x; local $x; no strict; keys @$x [exception] ok 35 - our $x; local $x; no strict; keys @$x [return] ok 36 - our $x; local $x; no strict; keys @$x [variable] ok 37 - my $x; keys @$x [exception] ok 38 - my $x; keys @$x [return] ok 39 - my $x; keys @$x [variable] ok 40 - our $x; local $x; use strict; keys @$x [exception] ok 41 - our $x; local $x; use strict; keys @$x [return] ok 42 - our $x; local $x; use strict; keys @$x [variable] ok 43 - our $x; local $x; no strict; keys @$x [exception] ok 44 - our $x; local $x; no strict; keys @$x [return] ok 45 - our $x; local $x; no strict; keys @$x [variable] ok 46 - my @x; keys @x [exception] ok 47 - my @x; keys @x [return] ok 48 - my @x; keys @x [variable] ok 49 - our @x; local @x; use strict; keys @x [exception] ok 50 - our @x; local @x; use strict; keys @x [return] ok 51 - our @x; local @x; use strict; keys @x [variable] ok 52 - our @x; local @x; no strict; keys @x [exception] ok 53 - our @x; local @x; no strict; keys @x [return] ok 54 - our @x; local @x; no strict; keys @x [variable] ok 55 - my $x; keys @$x <+fetch> [exception] ok 56 - my $x; keys @$x <+fetch> [return] ok 57 - my $x; keys @$x <+fetch> [variable] ok 58 - our $x; local $x; use strict; keys @$x <+fetch> [exception] ok 59 - our $x; local $x; use strict; keys @$x <+fetch> [return] ok 60 - our $x; local $x; use strict; keys @$x <+fetch> [variable] ok 61 - our $x; local $x; no strict; keys @$x <+fetch> [exception] ok 62 - our $x; local $x; no strict; keys @$x <+fetch> [return] ok 63 - our $x; local $x; no strict; keys @$x <+fetch> [variable] ok 64 - my $x; keys @$x <+fetch> [exception] ok 65 - my $x; keys @$x <+fetch> [return] ok 66 - my $x; keys @$x <+fetch> [variable] ok 67 - our $x; local $x; use strict; keys @$x <+fetch> [exception] ok 68 - our $x; local $x; use strict; keys @$x <+fetch> [return] ok 69 - our $x; local $x; use strict; keys @$x <+fetch> [variable] ok 70 - our $x; local $x; no strict; keys @$x <+fetch> [exception] ok 71 - our $x; local $x; no strict; keys @$x <+fetch> [return] ok 72 - our $x; local $x; no strict; keys @$x <+fetch> [variable] ok 73 - my @x; keys @x <+fetch> [exception] ok 74 - my @x; keys @x <+fetch> [return] ok 75 - my @x; keys @x <+fetch> [variable] ok 76 - our @x; local @x; use strict; keys @x <+fetch> [exception] ok 77 - our @x; local @x; use strict; keys @x <+fetch> [return] ok 78 - our @x; local @x; use strict; keys @x <+fetch> [variable] ok 79 - our @x; local @x; no strict; keys @x <+fetch> [exception] ok 80 - our @x; local @x; no strict; keys @x <+fetch> [return] ok 81 - our @x; local @x; no strict; keys @x <+fetch> [variable] ok 82 - my $x; keys @$x <+exists> [exception] ok 83 - my $x; keys @$x <+exists> [return] ok 84 - my $x; keys @$x <+exists> [variable] ok 85 - our $x; local $x; use strict; keys @$x <+exists> [exception] ok 86 - our $x; local $x; use strict; keys @$x <+exists> [return] ok 87 - our $x; local $x; use strict; keys @$x <+exists> [variable] ok 88 - our $x; local $x; no strict; keys @$x <+exists> [exception] ok 89 - our $x; local $x; no strict; keys @$x <+exists> [return] ok 90 - our $x; local $x; no strict; keys @$x <+exists> [variable] ok 91 - my $x; keys @$x <+exists> [exception] ok 92 - my $x; keys @$x <+exists> [return] ok 93 - my $x; keys @$x <+exists> [variable] ok 94 - our $x; local $x; use strict; keys @$x <+exists> [exception] ok 95 - our $x; local $x; use strict; keys @$x <+exists> [return] ok 96 - our $x; local $x; use strict; keys @$x <+exists> [variable] ok 97 - our $x; local $x; no strict; keys @$x <+exists> [exception] ok 98 - our $x; local $x; no strict; keys @$x <+exists> [return] ok 99 - our $x; local $x; no strict; keys @$x <+exists> [variable] ok 100 - my @x; keys @x <+exists> [exception] ok 101 - my @x; keys @x <+exists> [return] ok 102 - my @x; keys @x <+exists> [variable] ok 103 - our @x; local @x; use strict; keys @x <+exists> [exception] ok 104 - our @x; local @x; use strict; keys @x <+exists> [return] ok 105 - our @x; local @x; use strict; keys @x <+exists> [variable] ok 106 - our @x; local @x; no strict; keys @x <+exists> [exception] ok 107 - our @x; local @x; no strict; keys @x <+exists> [return] ok 108 - our @x; local @x; no strict; keys @x <+exists> [variable] ok 109 - my $x; keys @$x <+delete> [exception] ok 110 - my $x; keys @$x <+delete> [return] ok 111 - my $x; keys @$x <+delete> [variable] ok 112 - our $x; local $x; use strict; keys @$x <+delete> [exception] ok 113 - our $x; local $x; use strict; keys @$x <+delete> [return] ok 114 - our $x; local $x; use strict; keys @$x <+delete> [variable] ok 115 - our $x; local $x; no strict; keys @$x <+delete> [exception] ok 116 - our $x; local $x; no strict; keys @$x <+delete> [return] ok 117 - our $x; local $x; no strict; keys @$x <+delete> [variable] ok 118 - my $x; keys @$x <+delete> [exception] ok 119 - my $x; keys @$x <+delete> [return] ok 120 - my $x; keys @$x <+delete> [variable] ok 121 - our $x; local $x; use strict; keys @$x <+delete> [exception] ok 122 - our $x; local $x; use strict; keys @$x <+delete> [return] ok 123 - our $x; local $x; use strict; keys @$x <+delete> [variable] ok 124 - our $x; local $x; no strict; keys @$x <+delete> [exception] ok 125 - our $x; local $x; no strict; keys @$x <+delete> [return] ok 126 - our $x; local $x; no strict; keys @$x <+delete> [variable] ok 127 - my @x; keys @x <+delete> [exception] ok 128 - my @x; keys @x <+delete> [return] ok 129 - my @x; keys @x <+delete> [variable] ok 130 - our @x; local @x; use strict; keys @x <+delete> [exception] ok 131 - our @x; local @x; use strict; keys @x <+delete> [return] ok 132 - our @x; local @x; use strict; keys @x <+delete> [variable] ok 133 - our @x; local @x; no strict; keys @x <+delete> [exception] ok 134 - our @x; local @x; no strict; keys @x <+delete> [return] ok 135 - our @x; local @x; no strict; keys @x <+delete> [variable] ok 136 - my $x; keys @$x <+store> [exception] ok 137 - my $x; keys @$x <+store> [return] ok 138 - my $x; keys @$x <+store> [variable] ok 139 - our $x; local $x; use strict; keys @$x <+store> [exception] ok 140 - our $x; local $x; use strict; keys @$x <+store> [return] ok 141 - our $x; local $x; use strict; keys @$x <+store> [variable] ok 142 - our $x; local $x; no strict; keys @$x <+store> [exception] ok 143 - our $x; local $x; no strict; keys @$x <+store> [return] ok 144 - our $x; local $x; no strict; keys @$x <+store> [variable] ok 145 - my $x; keys @$x <+store> [exception] ok 146 - my $x; keys @$x <+store> [return] ok 147 - my $x; keys @$x <+store> [variable] ok 148 - our $x; local $x; use strict; keys @$x <+store> [exception] ok 149 - our $x; local $x; use strict; keys @$x <+store> [return] ok 150 - our $x; local $x; use strict; keys @$x <+store> [variable] ok 151 - our $x; local $x; no strict; keys @$x <+store> [exception] ok 152 - our $x; local $x; no strict; keys @$x <+store> [return] ok 153 - our $x; local $x; no strict; keys @$x <+store> [variable] ok 154 - my @x; keys @x <+store> [exception] ok 155 - my @x; keys @x <+store> [return] ok 156 - my @x; keys @x <+store> [variable] ok 157 - our @x; local @x; use strict; keys @x <+store> [exception] ok 158 - our @x; local @x; use strict; keys @x <+store> [return] ok 159 - our @x; local @x; use strict; keys @x <+store> [variable] ok 160 - our @x; local @x; no strict; keys @x <+store> [exception] ok 161 - our @x; local @x; no strict; keys @x <+store> [return] ok 162 - our @x; local @x; no strict; keys @x <+store> [variable] ok 163 - my $x; keys @$x <+strict +fetch> [exception] ok 164 - my $x; keys @$x <+strict +fetch> [return] ok 165 - my $x; keys @$x <+strict +fetch> [variable] ok 166 - our $x; local $x; use strict; keys @$x <+strict +fetch> [exception] ok 167 - our $x; local $x; use strict; keys @$x <+strict +fetch> [return] ok 168 - our $x; local $x; use strict; keys @$x <+strict +fetch> [variable] ok 169 - our $x; local $x; no strict; keys @$x <+strict +fetch> [exception] ok 170 - our $x; local $x; no strict; keys @$x <+strict +fetch> [return] ok 171 - our $x; local $x; no strict; keys @$x <+strict +fetch> [variable] ok 172 - my $x; keys @$x <+strict +fetch> [exception] ok 173 - my $x; keys @$x <+strict +fetch> [return] ok 174 - my $x; keys @$x <+strict +fetch> [variable] ok 175 - our $x; local $x; use strict; keys @$x <+strict +fetch> [exception] ok 176 - our $x; local $x; use strict; keys @$x <+strict +fetch> [return] ok 177 - our $x; local $x; use strict; keys @$x <+strict +fetch> [variable] ok 178 - our $x; local $x; no strict; keys @$x <+strict +fetch> [exception] ok 179 - our $x; local $x; no strict; keys @$x <+strict +fetch> [return] ok 180 - our $x; local $x; no strict; keys @$x <+strict +fetch> [variable] ok 181 - my @x; 1 <+strict +fetch> [exception] ok 182 - my @x; 1 <+strict +fetch> [return] ok 183 - my @x; 1 <+strict +fetch> [variable] ok 184 - our @x; local @x; use strict; 1 <+strict +fetch> [exception] ok 185 - our @x; local @x; use strict; 1 <+strict +fetch> [return] ok 186 - our @x; local @x; use strict; 1 <+strict +fetch> [variable] ok 187 - our @x; local @x; no strict; 1 <+strict +fetch> [exception] ok 188 - our @x; local @x; no strict; 1 <+strict +fetch> [return] ok 189 - our @x; local @x; no strict; 1 <+strict +fetch> [variable] ok 190 - my $x; keys @$x <+strict +exists> [exception] ok 191 - my $x; keys @$x <+strict +exists> [return] ok 192 - my $x; keys @$x <+strict +exists> [variable] ok 193 - our $x; local $x; use strict; keys @$x <+strict +exists> [exception] ok 194 - our $x; local $x; use strict; keys @$x <+strict +exists> [return] ok 195 - our $x; local $x; use strict; keys @$x <+strict +exists> [variable] ok 196 - our $x; local $x; no strict; keys @$x <+strict +exists> [exception] ok 197 - our $x; local $x; no strict; keys @$x <+strict +exists> [return] ok 198 - our $x; local $x; no strict; keys @$x <+strict +exists> [variable] ok 199 - my $x; keys @$x <+strict +exists> [exception] ok 200 - my $x; keys @$x <+strict +exists> [return] ok 201 - my $x; keys @$x <+strict +exists> [variable] ok 202 - our $x; local $x; use strict; keys @$x <+strict +exists> [exception] ok 203 - our $x; local $x; use strict; keys @$x <+strict +exists> [return] ok 204 - our $x; local $x; use strict; keys @$x <+strict +exists> [variable] ok 205 - our $x; local $x; no strict; keys @$x <+strict +exists> [exception] ok 206 - our $x; local $x; no strict; keys @$x <+strict +exists> [return] ok 207 - our $x; local $x; no strict; keys @$x <+strict +exists> [variable] ok 208 - my @x; keys @x <+strict +exists> [exception] ok 209 - my @x; keys @x <+strict +exists> [return] ok 210 - my @x; keys @x <+strict +exists> [variable] ok 211 - our @x; local @x; use strict; keys @x <+strict +exists> [exception] ok 212 - our @x; local @x; use strict; keys @x <+strict +exists> [return] ok 213 - our @x; local @x; use strict; keys @x <+strict +exists> [variable] ok 214 - our @x; local @x; no strict; keys @x <+strict +exists> [exception] ok 215 - our @x; local @x; no strict; keys @x <+strict +exists> [return] ok 216 - our @x; local @x; no strict; keys @x <+strict +exists> [variable] ok 217 - my $x; keys @$x <+strict +delete> [exception] ok 218 - my $x; keys @$x <+strict +delete> [return] ok 219 - my $x; keys @$x <+strict +delete> [variable] ok 220 - our $x; local $x; use strict; keys @$x <+strict +delete> [exception] ok 221 - our $x; local $x; use strict; keys @$x <+strict +delete> [return] ok 222 - our $x; local $x; use strict; keys @$x <+strict +delete> [variable] ok 223 - our $x; local $x; no strict; keys @$x <+strict +delete> [exception] ok 224 - our $x; local $x; no strict; keys @$x <+strict +delete> [return] ok 225 - our $x; local $x; no strict; keys @$x <+strict +delete> [variable] ok 226 - my $x; keys @$x <+strict +delete> [exception] ok 227 - my $x; keys @$x <+strict +delete> [return] ok 228 - my $x; keys @$x <+strict +delete> [variable] ok 229 - our $x; local $x; use strict; keys @$x <+strict +delete> [exception] ok 230 - our $x; local $x; use strict; keys @$x <+strict +delete> [return] ok 231 - our $x; local $x; use strict; keys @$x <+strict +delete> [variable] ok 232 - our $x; local $x; no strict; keys @$x <+strict +delete> [exception] ok 233 - our $x; local $x; no strict; keys @$x <+strict +delete> [return] ok 234 - our $x; local $x; no strict; keys @$x <+strict +delete> [variable] ok 235 - my @x; keys @x <+strict +delete> [exception] ok 236 - my @x; keys @x <+strict +delete> [return] ok 237 - my @x; keys @x <+strict +delete> [variable] ok 238 - our @x; local @x; use strict; keys @x <+strict +delete> [exception] ok 239 - our @x; local @x; use strict; keys @x <+strict +delete> [return] ok 240 - our @x; local @x; use strict; keys @x <+strict +delete> [variable] ok 241 - our @x; local @x; no strict; keys @x <+strict +delete> [exception] ok 242 - our @x; local @x; no strict; keys @x <+strict +delete> [return] ok 243 - our @x; local @x; no strict; keys @x <+strict +delete> [variable] ok 244 - my $x; keys @$x <+strict +store> [exception] ok 245 - my $x; keys @$x <+strict +store> [return] ok 246 - my $x; keys @$x <+strict +store> [variable] ok 247 - our $x; local $x; use strict; keys @$x <+strict +store> [exception] ok 248 - our $x; local $x; use strict; keys @$x <+strict +store> [return] ok 249 - our $x; local $x; use strict; keys @$x <+strict +store> [variable] ok 250 - our $x; local $x; no strict; keys @$x <+strict +store> [exception] ok 251 - our $x; local $x; no strict; keys @$x <+strict +store> [return] ok 252 - our $x; local $x; no strict; keys @$x <+strict +store> [variable] ok 253 - my $x; keys @$x <+strict +store> [exception] ok 254 - my $x; keys @$x <+strict +store> [return] ok 255 - my $x; keys @$x <+strict +store> [variable] ok 256 - our $x; local $x; use strict; keys @$x <+strict +store> [exception] ok 257 - our $x; local $x; use strict; keys @$x <+strict +store> [return] ok 258 - our $x; local $x; use strict; keys @$x <+strict +store> [variable] ok 259 - our $x; local $x; no strict; keys @$x <+strict +store> [exception] ok 260 - our $x; local $x; no strict; keys @$x <+strict +store> [return] ok 261 - our $x; local $x; no strict; keys @$x <+strict +store> [variable] ok 262 - my @x; keys @x <+strict +store> [exception] ok 263 - my @x; keys @x <+strict +store> [return] ok 264 - my @x; keys @x <+strict +store> [variable] ok 265 - our @x; local @x; use strict; keys @x <+strict +store> [exception] ok 266 - our @x; local @x; use strict; keys @x <+strict +store> [return] ok 267 - our @x; local @x; use strict; keys @x <+strict +store> [variable] ok 268 - our @x; local @x; no strict; keys @x <+strict +store> [exception] ok 269 - our @x; local @x; no strict; keys @x <+strict +store> [return] ok 270 - our @x; local @x; no strict; keys @x <+strict +store> [variable] ok 271 - my $x; [ keys @$x ] [exception] ok 272 - my $x; [ keys @$x ] [return] ok 273 - my $x; [ keys @$x ] [variable] ok 274 - our $x; local $x; use strict; [ keys @$x ] [exception] ok 275 - our $x; local $x; use strict; [ keys @$x ] [return] ok 276 - our $x; local $x; use strict; [ keys @$x ] [variable] ok 277 - our $x; local $x; no strict; [ keys @$x ] [exception] ok 278 - our $x; local $x; no strict; [ keys @$x ] [return] ok 279 - our $x; local $x; no strict; [ keys @$x ] [variable] ok 280 - my $x; [ keys @$x ] [exception] ok 281 - my $x; [ keys @$x ] [return] ok 282 - my $x; [ keys @$x ] [variable] ok 283 - our $x; local $x; use strict; [ keys @$x ] [exception] ok 284 - our $x; local $x; use strict; [ keys @$x ] [return] ok 285 - our $x; local $x; use strict; [ keys @$x ] [variable] ok 286 - our $x; local $x; no strict; [ keys @$x ] [exception] ok 287 - our $x; local $x; no strict; [ keys @$x ] [return] ok 288 - our $x; local $x; no strict; [ keys @$x ] [variable] ok 289 - my @x; [ keys @x ] [exception] ok 290 - my @x; [ keys @x ] [return] ok 291 - my @x; [ keys @x ] [variable] ok 292 - our @x; local @x; use strict; [ keys @x ] [exception] ok 293 - our @x; local @x; use strict; [ keys @x ] [return] ok 294 - our @x; local @x; use strict; [ keys @x ] [variable] ok 295 - our @x; local @x; no strict; [ keys @x ] [exception] ok 296 - our @x; local @x; no strict; [ keys @x ] [return] ok 297 - our @x; local @x; no strict; [ keys @x ] [variable] ok 298 - my $x; [ keys @$x ] [exception] ok 299 - my $x; [ keys @$x ] [return] ok 300 - my $x; [ keys @$x ] [variable] ok 301 - our $x; local $x; use strict; [ keys @$x ] [exception] ok 302 - our $x; local $x; use strict; [ keys @$x ] [return] ok 303 - our $x; local $x; use strict; [ keys @$x ] [variable] ok 304 - our $x; local $x; no strict; [ keys @$x ] [exception] ok 305 - our $x; local $x; no strict; [ keys @$x ] [return] ok 306 - our $x; local $x; no strict; [ keys @$x ] [variable] ok 307 - my $x; [ keys @$x ] [exception] ok 308 - my $x; [ keys @$x ] [return] ok 309 - my $x; [ keys @$x ] [variable] ok 310 - our $x; local $x; use strict; [ keys @$x ] [exception] ok 311 - our $x; local $x; use strict; [ keys @$x ] [return] ok 312 - our $x; local $x; use strict; [ keys @$x ] [variable] ok 313 - our $x; local $x; no strict; [ keys @$x ] [exception] ok 314 - our $x; local $x; no strict; [ keys @$x ] [return] ok 315 - our $x; local $x; no strict; [ keys @$x ] [variable] ok 316 - my @x; [ keys @x ] [exception] ok 317 - my @x; [ keys @x ] [return] ok 318 - my @x; [ keys @x ] [variable] ok 319 - our @x; local @x; use strict; [ keys @x ] [exception] ok 320 - our @x; local @x; use strict; [ keys @x ] [return] ok 321 - our @x; local @x; use strict; [ keys @x ] [variable] ok 322 - our @x; local @x; no strict; [ keys @x ] [exception] ok 323 - our @x; local @x; no strict; [ keys @x ] [return] ok 324 - our @x; local @x; no strict; [ keys @x ] [variable] ok 325 - my $x; [ keys @$x ] <+fetch> [exception] ok 326 - my $x; [ keys @$x ] <+fetch> [return] ok 327 - my $x; [ keys @$x ] <+fetch> [variable] ok 328 - our $x; local $x; use strict; [ keys @$x ] <+fetch> [exception] ok 329 - our $x; local $x; use strict; [ keys @$x ] <+fetch> [return] ok 330 - our $x; local $x; use strict; [ keys @$x ] <+fetch> [variable] ok 331 - our $x; local $x; no strict; [ keys @$x ] <+fetch> [exception] ok 332 - our $x; local $x; no strict; [ keys @$x ] <+fetch> [return] ok 333 - our $x; local $x; no strict; [ keys @$x ] <+fetch> [variable] ok 334 - my $x; [ keys @$x ] <+fetch> [exception] ok 335 - my $x; [ keys @$x ] <+fetch> [return] ok 336 - my $x; [ keys @$x ] <+fetch> [variable] ok 337 - our $x; local $x; use strict; [ keys @$x ] <+fetch> [exception] ok 338 - our $x; local $x; use strict; [ keys @$x ] <+fetch> [return] ok 339 - our $x; local $x; use strict; [ keys @$x ] <+fetch> [variable] ok 340 - our $x; local $x; no strict; [ keys @$x ] <+fetch> [exception] ok 341 - our $x; local $x; no strict; [ keys @$x ] <+fetch> [return] ok 342 - our $x; local $x; no strict; [ keys @$x ] <+fetch> [variable] ok 343 - my @x; [ keys @x ] <+fetch> [exception] ok 344 - my @x; [ keys @x ] <+fetch> [return] ok 345 - my @x; [ keys @x ] <+fetch> [variable] ok 346 - our @x; local @x; use strict; [ keys @x ] <+fetch> [exception] ok 347 - our @x; local @x; use strict; [ keys @x ] <+fetch> [return] ok 348 - our @x; local @x; use strict; [ keys @x ] <+fetch> [variable] ok 349 - our @x; local @x; no strict; [ keys @x ] <+fetch> [exception] ok 350 - our @x; local @x; no strict; [ keys @x ] <+fetch> [return] ok 351 - our @x; local @x; no strict; [ keys @x ] <+fetch> [variable] ok 352 - my $x; [ keys @$x ] <+exists +delete +store> [exception] ok 353 - my $x; [ keys @$x ] <+exists +delete +store> [return] ok 354 - my $x; [ keys @$x ] <+exists +delete +store> [variable] ok 355 - our $x; local $x; use strict; [ keys @$x ] <+exists +delete +store> [exception] ok 356 - our $x; local $x; use strict; [ keys @$x ] <+exists +delete +store> [return] ok 357 - our $x; local $x; use strict; [ keys @$x ] <+exists +delete +store> [variable] ok 358 - our $x; local $x; no strict; [ keys @$x ] <+exists +delete +store> [exception] ok 359 - our $x; local $x; no strict; [ keys @$x ] <+exists +delete +store> [return] ok 360 - our $x; local $x; no strict; [ keys @$x ] <+exists +delete +store> [variable] ok 361 - my $x; [ keys @$x ] <+exists +delete +store> [exception] ok 362 - my $x; [ keys @$x ] <+exists +delete +store> [return] ok 363 - my $x; [ keys @$x ] <+exists +delete +store> [variable] ok 364 - our $x; local $x; use strict; [ keys @$x ] <+exists +delete +store> [exception] ok 365 - our $x; local $x; use strict; [ keys @$x ] <+exists +delete +store> [return] ok 366 - our $x; local $x; use strict; [ keys @$x ] <+exists +delete +store> [variable] ok 367 - our $x; local $x; no strict; [ keys @$x ] <+exists +delete +store> [exception] ok 368 - our $x; local $x; no strict; [ keys @$x ] <+exists +delete +store> [return] ok 369 - our $x; local $x; no strict; [ keys @$x ] <+exists +delete +store> [variable] ok 370 - my @x; [ keys @x ] <+exists +delete +store> [exception] ok 371 - my @x; [ keys @x ] <+exists +delete +store> [return] ok 372 - my @x; [ keys @x ] <+exists +delete +store> [variable] ok 373 - our @x; local @x; use strict; [ keys @x ] <+exists +delete +store> [exception] ok 374 - our @x; local @x; use strict; [ keys @x ] <+exists +delete +store> [return] ok 375 - our @x; local @x; use strict; [ keys @x ] <+exists +delete +store> [variable] ok 376 - our @x; local @x; no strict; [ keys @x ] <+exists +delete +store> [exception] ok 377 - our @x; local @x; no strict; [ keys @x ] <+exists +delete +store> [return] ok 378 - our @x; local @x; no strict; [ keys @x ] <+exists +delete +store> [variable] ok 379 - my $x; $x->[0] = 1; [ keys @$x ] [exception] ok 380 - my $x; $x->[0] = 1; [ keys @$x ] [return] ok 381 - my $x; $x->[0] = 1; [ keys @$x ] [variable] ok 382 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] [exception] ok 383 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] [return] ok 384 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] [variable] ok 385 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] [exception] ok 386 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] [return] ok 387 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] [variable] ok 388 - my $x; $x->[0] = 1; [ keys @$x ] [exception] ok 389 - my $x; $x->[0] = 1; [ keys @$x ] [return] ok 390 - my $x; $x->[0] = 1; [ keys @$x ] [variable] ok 391 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] [exception] ok 392 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] [return] ok 393 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] [variable] ok 394 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] [exception] ok 395 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] [return] ok 396 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] [variable] ok 397 - my @x; $x[0] = 1; [ keys @x ] [exception] ok 398 - my @x; $x[0] = 1; [ keys @x ] [return] ok 399 - my @x; $x[0] = 1; [ keys @x ] [variable] ok 400 - our @x; local @x; use strict; $x[0] = 1; [ keys @x ] [exception] ok 401 - our @x; local @x; use strict; $x[0] = 1; [ keys @x ] [return] ok 402 - our @x; local @x; use strict; $x[0] = 1; [ keys @x ] [variable] ok 403 - our @x; local @x; no strict; $x[0] = 1; [ keys @x ] [exception] ok 404 - our @x; local @x; no strict; $x[0] = 1; [ keys @x ] [return] ok 405 - our @x; local @x; no strict; $x[0] = 1; [ keys @x ] [variable] ok 406 - my $x; $x->[0] = 1; [ keys @$x ] [exception] ok 407 - my $x; $x->[0] = 1; [ keys @$x ] [return] ok 408 - my $x; $x->[0] = 1; [ keys @$x ] [variable] ok 409 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] [exception] ok 410 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] [return] ok 411 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] [variable] ok 412 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] [exception] ok 413 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] [return] ok 414 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] [variable] ok 415 - my $x; $x->[0] = 1; [ keys @$x ] [exception] ok 416 - my $x; $x->[0] = 1; [ keys @$x ] [return] ok 417 - my $x; $x->[0] = 1; [ keys @$x ] [variable] ok 418 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] [exception] ok 419 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] [return] ok 420 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] [variable] ok 421 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] [exception] ok 422 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] [return] ok 423 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] [variable] ok 424 - my @x; $x[0] = 1; [ keys @x ] [exception] ok 425 - my @x; $x[0] = 1; [ keys @x ] [return] ok 426 - my @x; $x[0] = 1; [ keys @x ] [variable] ok 427 - our @x; local @x; use strict; $x[0] = 1; [ keys @x ] [exception] ok 428 - our @x; local @x; use strict; $x[0] = 1; [ keys @x ] [return] ok 429 - our @x; local @x; use strict; $x[0] = 1; [ keys @x ] [variable] ok 430 - our @x; local @x; no strict; $x[0] = 1; [ keys @x ] [exception] ok 431 - our @x; local @x; no strict; $x[0] = 1; [ keys @x ] [return] ok 432 - our @x; local @x; no strict; $x[0] = 1; [ keys @x ] [variable] ok 433 - my $x; $x->[0] = 1; [ keys @$x ] <+fetch> [exception] ok 434 - my $x; $x->[0] = 1; [ keys @$x ] <+fetch> [return] ok 435 - my $x; $x->[0] = 1; [ keys @$x ] <+fetch> [variable] ok 436 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] <+fetch> [exception] ok 437 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] <+fetch> [return] ok 438 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] <+fetch> [variable] ok 439 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] <+fetch> [exception] ok 440 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] <+fetch> [return] ok 441 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] <+fetch> [variable] ok 442 - my $x; $x->[0] = 1; [ keys @$x ] <+fetch> [exception] ok 443 - my $x; $x->[0] = 1; [ keys @$x ] <+fetch> [return] ok 444 - my $x; $x->[0] = 1; [ keys @$x ] <+fetch> [variable] ok 445 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] <+fetch> [exception] ok 446 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] <+fetch> [return] ok 447 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] <+fetch> [variable] ok 448 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] <+fetch> [exception] ok 449 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] <+fetch> [return] ok 450 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] <+fetch> [variable] ok 451 - my @x; $x[0] = 1; [ keys @x ] <+fetch> [exception] ok 452 - my @x; $x[0] = 1; [ keys @x ] <+fetch> [return] ok 453 - my @x; $x[0] = 1; [ keys @x ] <+fetch> [variable] ok 454 - our @x; local @x; use strict; $x[0] = 1; [ keys @x ] <+fetch> [exception] ok 455 - our @x; local @x; use strict; $x[0] = 1; [ keys @x ] <+fetch> [return] ok 456 - our @x; local @x; use strict; $x[0] = 1; [ keys @x ] <+fetch> [variable] ok 457 - our @x; local @x; no strict; $x[0] = 1; [ keys @x ] <+fetch> [exception] ok 458 - our @x; local @x; no strict; $x[0] = 1; [ keys @x ] <+fetch> [return] ok 459 - our @x; local @x; no strict; $x[0] = 1; [ keys @x ] <+fetch> [variable] ok 460 - my $x; $x->[0] = 1; [ keys @$x ] <+exists +delete +store> [exception] ok 461 - my $x; $x->[0] = 1; [ keys @$x ] <+exists +delete +store> [return] ok 462 - my $x; $x->[0] = 1; [ keys @$x ] <+exists +delete +store> [variable] ok 463 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] <+exists +delete +store> [exception] ok 464 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] <+exists +delete +store> [return] ok 465 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] <+exists +delete +store> [variable] ok 466 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] <+exists +delete +store> [exception] ok 467 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] <+exists +delete +store> [return] ok 468 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] <+exists +delete +store> [variable] ok 469 - my $x; $x->[0] = 1; [ keys @$x ] <+exists +delete +store> [exception] ok 470 - my $x; $x->[0] = 1; [ keys @$x ] <+exists +delete +store> [return] ok 471 - my $x; $x->[0] = 1; [ keys @$x ] <+exists +delete +store> [variable] ok 472 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] <+exists +delete +store> [exception] ok 473 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] <+exists +delete +store> [return] ok 474 - our $x; local $x; use strict; $x->[0] = 1; [ keys @$x ] <+exists +delete +store> [variable] ok 475 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] <+exists +delete +store> [exception] ok 476 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] <+exists +delete +store> [return] ok 477 - our $x; local $x; no strict; $x->[0] = 1; [ keys @$x ] <+exists +delete +store> [variable] ok 478 - my @x; $x[0] = 1; [ keys @x ] <+exists +delete +store> [exception] ok 479 - my @x; $x[0] = 1; [ keys @x ] <+exists +delete +store> [return] ok 480 - my @x; $x[0] = 1; [ keys @x ] <+exists +delete +store> [variable] ok 481 - our @x; local @x; use strict; $x[0] = 1; [ keys @x ] <+exists +delete +store> [exception] ok 482 - our @x; local @x; use strict; $x[0] = 1; [ keys @x ] <+exists +delete +store> [return] ok 483 - our @x; local @x; use strict; $x[0] = 1; [ keys @x ] <+exists +delete +store> [variable] ok 484 - our @x; local @x; no strict; $x[0] = 1; [ keys @x ] <+exists +delete +store> [exception] ok 485 - our @x; local @x; no strict; $x[0] = 1; [ keys @x ] <+exists +delete +store> [return] ok 486 - our @x; local @x; no strict; $x[0] = 1; [ keys @x ] <+exists +delete +store> [variable] ok 487 - my $x; keys @{$x->[0]} [exception] ok 488 - my $x; keys @{$x->[0]} [return] ok 489 - my $x; keys @{$x->[0]} [variable] ok 490 - our $x; local $x; use strict; keys @{$x->[0]} [exception] ok 491 - our $x; local $x; use strict; keys @{$x->[0]} [return] ok 492 - our $x; local $x; use strict; keys @{$x->[0]} [variable] ok 493 - our $x; local $x; no strict; keys @{$x->[0]} [exception] ok 494 - our $x; local $x; no strict; keys @{$x->[0]} [return] ok 495 - our $x; local $x; no strict; keys @{$x->[0]} [variable] ok 496 - my $x; keys @{$$x[0]} [exception] ok 497 - my $x; keys @{$$x[0]} [return] ok 498 - my $x; keys @{$$x[0]} [variable] ok 499 - our $x; local $x; use strict; keys @{$$x[0]} [exception] ok 500 - our $x; local $x; use strict; keys @{$$x[0]} [return] ok 501 - our $x; local $x; use strict; keys @{$$x[0]} [variable] ok 502 - our $x; local $x; no strict; keys @{$$x[0]} [exception] ok 503 - our $x; local $x; no strict; keys @{$$x[0]} [return] ok 504 - our $x; local $x; no strict; keys @{$$x[0]} [variable] ok 505 - my @x; keys @{$x[0]} [exception] ok 506 - my @x; keys @{$x[0]} [return] ok 507 - my @x; keys @{$x[0]} [variable] ok 508 - our @x; local @x; use strict; keys @{$x[0]} [exception] ok 509 - our @x; local @x; use strict; keys @{$x[0]} [return] ok 510 - our @x; local @x; use strict; keys @{$x[0]} [variable] ok 511 - our @x; local @x; no strict; keys @{$x[0]} [exception] ok 512 - our @x; local @x; no strict; keys @{$x[0]} [return] ok 513 - our @x; local @x; no strict; keys @{$x[0]} [variable] ok 514 - my $x; keys @{$x->[0]} [exception] ok 515 - my $x; keys @{$x->[0]} [return] ok 516 - my $x; keys @{$x->[0]} [variable] ok 517 - our $x; local $x; use strict; keys @{$x->[0]} [exception] ok 518 - our $x; local $x; use strict; keys @{$x->[0]} [return] ok 519 - our $x; local $x; use strict; keys @{$x->[0]} [variable] ok 520 - our $x; local $x; no strict; keys @{$x->[0]} [exception] ok 521 - our $x; local $x; no strict; keys @{$x->[0]} [return] ok 522 - our $x; local $x; no strict; keys @{$x->[0]} [variable] ok 523 - my $x; keys @{$$x[0]} [exception] ok 524 - my $x; keys @{$$x[0]} [return] ok 525 - my $x; keys @{$$x[0]} [variable] ok 526 - our $x; local $x; use strict; keys @{$$x[0]} [exception] ok 527 - our $x; local $x; use strict; keys @{$$x[0]} [return] ok 528 - our $x; local $x; use strict; keys @{$$x[0]} [variable] ok 529 - our $x; local $x; no strict; keys @{$$x[0]} [exception] ok 530 - our $x; local $x; no strict; keys @{$$x[0]} [return] ok 531 - our $x; local $x; no strict; keys @{$$x[0]} [variable] ok 532 - my @x; keys @{$x[0]} [exception] ok 533 - my @x; keys @{$x[0]} [return] ok 534 - my @x; keys @{$x[0]} [variable] ok 535 - our @x; local @x; use strict; keys @{$x[0]} [exception] ok 536 - our @x; local @x; use strict; keys @{$x[0]} [return] ok 537 - our @x; local @x; use strict; keys @{$x[0]} [variable] ok 538 - our @x; local @x; no strict; keys @{$x[0]} [exception] ok 539 - our @x; local @x; no strict; keys @{$x[0]} [return] ok 540 - our @x; local @x; no strict; keys @{$x[0]} [variable] ok 541 - my $x; keys @{$x->[0]} <+fetch> [exception] ok 542 - my $x; keys @{$x->[0]} <+fetch> [return] ok 543 - my $x; keys @{$x->[0]} <+fetch> [variable] ok 544 - our $x; local $x; use strict; keys @{$x->[0]} <+fetch> [exception] ok 545 - our $x; local $x; use strict; keys @{$x->[0]} <+fetch> [return] ok 546 - our $x; local $x; use strict; keys @{$x->[0]} <+fetch> [variable] ok 547 - our $x; local $x; no strict; keys @{$x->[0]} <+fetch> [exception] ok 548 - our $x; local $x; no strict; keys @{$x->[0]} <+fetch> [return] ok 549 - our $x; local $x; no strict; keys @{$x->[0]} <+fetch> [variable] ok 550 - my $x; keys @{$$x[0]} <+fetch> [exception] ok 551 - my $x; keys @{$$x[0]} <+fetch> [return] ok 552 - my $x; keys @{$$x[0]} <+fetch> [variable] ok 553 - our $x; local $x; use strict; keys @{$$x[0]} <+fetch> [exception] ok 554 - our $x; local $x; use strict; keys @{$$x[0]} <+fetch> [return] ok 555 - our $x; local $x; use strict; keys @{$$x[0]} <+fetch> [variable] ok 556 - our $x; local $x; no strict; keys @{$$x[0]} <+fetch> [exception] ok 557 - our $x; local $x; no strict; keys @{$$x[0]} <+fetch> [return] ok 558 - our $x; local $x; no strict; keys @{$$x[0]} <+fetch> [variable] ok 559 - my @x; keys @{$x[0]} <+fetch> [exception] ok 560 - my @x; keys @{$x[0]} <+fetch> [return] ok 561 - my @x; keys @{$x[0]} <+fetch> [variable] ok 562 - our @x; local @x; use strict; keys @{$x[0]} <+fetch> [exception] ok 563 - our @x; local @x; use strict; keys @{$x[0]} <+fetch> [return] ok 564 - our @x; local @x; use strict; keys @{$x[0]} <+fetch> [variable] ok 565 - our @x; local @x; no strict; keys @{$x[0]} <+fetch> [exception] ok 566 - our @x; local @x; no strict; keys @{$x[0]} <+fetch> [return] ok 567 - our @x; local @x; no strict; keys @{$x[0]} <+fetch> [variable] ok 568 - my $x; keys @{$x->[0]} <+exists> [exception] ok 569 - my $x; keys @{$x->[0]} <+exists> [return] ok 570 - my $x; keys @{$x->[0]} <+exists> [variable] ok 571 - our $x; local $x; use strict; keys @{$x->[0]} <+exists> [exception] ok 572 - our $x; local $x; use strict; keys @{$x->[0]} <+exists> [return] ok 573 - our $x; local $x; use strict; keys @{$x->[0]} <+exists> [variable] ok 574 - our $x; local $x; no strict; keys @{$x->[0]} <+exists> [exception] ok 575 - our $x; local $x; no strict; keys @{$x->[0]} <+exists> [return] ok 576 - our $x; local $x; no strict; keys @{$x->[0]} <+exists> [variable] ok 577 - my $x; keys @{$$x[0]} <+exists> [exception] ok 578 - my $x; keys @{$$x[0]} <+exists> [return] ok 579 - my $x; keys @{$$x[0]} <+exists> [variable] ok 580 - our $x; local $x; use strict; keys @{$$x[0]} <+exists> [exception] ok 581 - our $x; local $x; use strict; keys @{$$x[0]} <+exists> [return] ok 582 - our $x; local $x; use strict; keys @{$$x[0]} <+exists> [variable] ok 583 - our $x; local $x; no strict; keys @{$$x[0]} <+exists> [exception] ok 584 - our $x; local $x; no strict; keys @{$$x[0]} <+exists> [return] ok 585 - our $x; local $x; no strict; keys @{$$x[0]} <+exists> [variable] ok 586 - my @x; keys @{$x[0]} <+exists> [exception] ok 587 - my @x; keys @{$x[0]} <+exists> [return] ok 588 - my @x; keys @{$x[0]} <+exists> [variable] ok 589 - our @x; local @x; use strict; keys @{$x[0]} <+exists> [exception] ok 590 - our @x; local @x; use strict; keys @{$x[0]} <+exists> [return] ok 591 - our @x; local @x; use strict; keys @{$x[0]} <+exists> [variable] ok 592 - our @x; local @x; no strict; keys @{$x[0]} <+exists> [exception] ok 593 - our @x; local @x; no strict; keys @{$x[0]} <+exists> [return] ok 594 - our @x; local @x; no strict; keys @{$x[0]} <+exists> [variable] ok 595 - my $x; keys @{$x->[0]} <+delete> [exception] ok 596 - my $x; keys @{$x->[0]} <+delete> [return] ok 597 - my $x; keys @{$x->[0]} <+delete> [variable] ok 598 - our $x; local $x; use strict; keys @{$x->[0]} <+delete> [exception] ok 599 - our $x; local $x; use strict; keys @{$x->[0]} <+delete> [return] ok 600 - our $x; local $x; use strict; keys @{$x->[0]} <+delete> [variable] ok 601 - our $x; local $x; no strict; keys @{$x->[0]} <+delete> [exception] ok 602 - our $x; local $x; no strict; keys @{$x->[0]} <+delete> [return] ok 603 - our $x; local $x; no strict; keys @{$x->[0]} <+delete> [variable] ok 604 - my $x; keys @{$$x[0]} <+delete> [exception] ok 605 - my $x; keys @{$$x[0]} <+delete> [return] ok 606 - my $x; keys @{$$x[0]} <+delete> [variable] ok 607 - our $x; local $x; use strict; keys @{$$x[0]} <+delete> [exception] ok 608 - our $x; local $x; use strict; keys @{$$x[0]} <+delete> [return] ok 609 - our $x; local $x; use strict; keys @{$$x[0]} <+delete> [variable] ok 610 - our $x; local $x; no strict; keys @{$$x[0]} <+delete> [exception] ok 611 - our $x; local $x; no strict; keys @{$$x[0]} <+delete> [return] ok 612 - our $x; local $x; no strict; keys @{$$x[0]} <+delete> [variable] ok 613 - my @x; keys @{$x[0]} <+delete> [exception] ok 614 - my @x; keys @{$x[0]} <+delete> [return] ok 615 - my @x; keys @{$x[0]} <+delete> [variable] ok 616 - our @x; local @x; use strict; keys @{$x[0]} <+delete> [exception] ok 617 - our @x; local @x; use strict; keys @{$x[0]} <+delete> [return] ok 618 - our @x; local @x; use strict; keys @{$x[0]} <+delete> [variable] ok 619 - our @x; local @x; no strict; keys @{$x[0]} <+delete> [exception] ok 620 - our @x; local @x; no strict; keys @{$x[0]} <+delete> [return] ok 621 - our @x; local @x; no strict; keys @{$x[0]} <+delete> [variable] ok 622 - my $x; keys @{$x->[0]} <+store> [exception] ok 623 - my $x; keys @{$x->[0]} <+store> [return] ok 624 - my $x; keys @{$x->[0]} <+store> [variable] ok 625 - our $x; local $x; use strict; keys @{$x->[0]} <+store> [exception] ok 626 - our $x; local $x; use strict; keys @{$x->[0]} <+store> [return] ok 627 - our $x; local $x; use strict; keys @{$x->[0]} <+store> [variable] ok 628 - our $x; local $x; no strict; keys @{$x->[0]} <+store> [exception] ok 629 - our $x; local $x; no strict; keys @{$x->[0]} <+store> [return] ok 630 - our $x; local $x; no strict; keys @{$x->[0]} <+store> [variable] ok 631 - my $x; keys @{$$x[0]} <+store> [exception] ok 632 - my $x; keys @{$$x[0]} <+store> [return] ok 633 - my $x; keys @{$$x[0]} <+store> [variable] ok 634 - our $x; local $x; use strict; keys @{$$x[0]} <+store> [exception] ok 635 - our $x; local $x; use strict; keys @{$$x[0]} <+store> [return] ok 636 - our $x; local $x; use strict; keys @{$$x[0]} <+store> [variable] ok 637 - our $x; local $x; no strict; keys @{$$x[0]} <+store> [exception] ok 638 - our $x; local $x; no strict; keys @{$$x[0]} <+store> [return] ok 639 - our $x; local $x; no strict; keys @{$$x[0]} <+store> [variable] ok 640 - my @x; keys @{$x[0]} <+store> [exception] ok 641 - my @x; keys @{$x[0]} <+store> [return] ok 642 - my @x; keys @{$x[0]} <+store> [variable] ok 643 - our @x; local @x; use strict; keys @{$x[0]} <+store> [exception] ok 644 - our @x; local @x; use strict; keys @{$x[0]} <+store> [return] ok 645 - our @x; local @x; use strict; keys @{$x[0]} <+store> [variable] ok 646 - our @x; local @x; no strict; keys @{$x[0]} <+store> [exception] ok 647 - our @x; local @x; no strict; keys @{$x[0]} <+store> [return] ok 648 - our @x; local @x; no strict; keys @{$x[0]} <+store> [variable] ok 649 - my $x; keys @{$x->[0]} <+strict +fetch> [exception] ok 650 - my $x; keys @{$x->[0]} <+strict +fetch> [return] ok 651 - my $x; keys @{$x->[0]} <+strict +fetch> [variable] ok 652 - our $x; local $x; use strict; keys @{$x->[0]} <+strict +fetch> [exception] ok 653 - our $x; local $x; use strict; keys @{$x->[0]} <+strict +fetch> [return] ok 654 - our $x; local $x; use strict; keys @{$x->[0]} <+strict +fetch> [variable] ok 655 - our $x; local $x; no strict; keys @{$x->[0]} <+strict +fetch> [exception] ok 656 - our $x; local $x; no strict; keys @{$x->[0]} <+strict +fetch> [return] ok 657 - our $x; local $x; no strict; keys @{$x->[0]} <+strict +fetch> [variable] ok 658 - my $x; keys @{$$x[0]} <+strict +fetch> [exception] ok 659 - my $x; keys @{$$x[0]} <+strict +fetch> [return] ok 660 - my $x; keys @{$$x[0]} <+strict +fetch> [variable] ok 661 - our $x; local $x; use strict; keys @{$$x[0]} <+strict +fetch> [exception] ok 662 - our $x; local $x; use strict; keys @{$$x[0]} <+strict +fetch> [return] ok 663 - our $x; local $x; use strict; keys @{$$x[0]} <+strict +fetch> [variable] ok 664 - our $x; local $x; no strict; keys @{$$x[0]} <+strict +fetch> [exception] ok 665 - our $x; local $x; no strict; keys @{$$x[0]} <+strict +fetch> [return] ok 666 - our $x; local $x; no strict; keys @{$$x[0]} <+strict +fetch> [variable] ok 667 - my @x; 1 <+strict +fetch> [exception] ok 668 - my @x; 1 <+strict +fetch> [return] ok 669 - my @x; 1 <+strict +fetch> [variable] ok 670 - our @x; local @x; use strict; 1 <+strict +fetch> [exception] ok 671 - our @x; local @x; use strict; 1 <+strict +fetch> [return] ok 672 - our @x; local @x; use strict; 1 <+strict +fetch> [variable] ok 673 - our @x; local @x; no strict; 1 <+strict +fetch> [exception] ok 674 - our @x; local @x; no strict; 1 <+strict +fetch> [return] ok 675 - our @x; local @x; no strict; 1 <+strict +fetch> [variable] ok 676 - my $x; keys @{$x->[0]} <+strict +exists> [exception] ok 677 - my $x; keys @{$x->[0]} <+strict +exists> [return] ok 678 - my $x; keys @{$x->[0]} <+strict +exists> [variable] ok 679 - our $x; local $x; use strict; keys @{$x->[0]} <+strict +exists> [exception] ok 680 - our $x; local $x; use strict; keys @{$x->[0]} <+strict +exists> [return] ok 681 - our $x; local $x; use strict; keys @{$x->[0]} <+strict +exists> [variable] ok 682 - our $x; local $x; no strict; keys @{$x->[0]} <+strict +exists> [exception] ok 683 - our $x; local $x; no strict; keys @{$x->[0]} <+strict +exists> [return] ok 684 - our $x; local $x; no strict; keys @{$x->[0]} <+strict +exists> [variable] ok 685 - my $x; keys @{$$x[0]} <+strict +exists> [exception] ok 686 - my $x; keys @{$$x[0]} <+strict +exists> [return] ok 687 - my $x; keys @{$$x[0]} <+strict +exists> [variable] ok 688 - our $x; local $x; use strict; keys @{$$x[0]} <+strict +exists> [exception] ok 689 - our $x; local $x; use strict; keys @{$$x[0]} <+strict +exists> [return] ok 690 - our $x; local $x; use strict; keys @{$$x[0]} <+strict +exists> [variable] ok 691 - our $x; local $x; no strict; keys @{$$x[0]} <+strict +exists> [exception] ok 692 - our $x; local $x; no strict; keys @{$$x[0]} <+strict +exists> [return] ok 693 - our $x; local $x; no strict; keys @{$$x[0]} <+strict +exists> [variable] ok 694 - my @x; keys @{$x[0]} <+strict +exists> [exception] ok 695 - my @x; keys @{$x[0]} <+strict +exists> [return] ok 696 - my @x; keys @{$x[0]} <+strict +exists> [variable] ok 697 - our @x; local @x; use strict; keys @{$x[0]} <+strict +exists> [exception] ok 698 - our @x; local @x; use strict; keys @{$x[0]} <+strict +exists> [return] ok 699 - our @x; local @x; use strict; keys @{$x[0]} <+strict +exists> [variable] ok 700 - our @x; local @x; no strict; keys @{$x[0]} <+strict +exists> [exception] ok 701 - our @x; local @x; no strict; keys @{$x[0]} <+strict +exists> [return] ok 702 - our @x; local @x; no strict; keys @{$x[0]} <+strict +exists> [variable] ok 703 - my $x; keys @{$x->[0]} <+strict +delete> [exception] ok 704 - my $x; keys @{$x->[0]} <+strict +delete> [return] ok 705 - my $x; keys @{$x->[0]} <+strict +delete> [variable] ok 706 - our $x; local $x; use strict; keys @{$x->[0]} <+strict +delete> [exception] ok 707 - our $x; local $x; use strict; keys @{$x->[0]} <+strict +delete> [return] ok 708 - our $x; local $x; use strict; keys @{$x->[0]} <+strict +delete> [variable] ok 709 - our $x; local $x; no strict; keys @{$x->[0]} <+strict +delete> [exception] ok 710 - our $x; local $x; no strict; keys @{$x->[0]} <+strict +delete> [return] ok 711 - our $x; local $x; no strict; keys @{$x->[0]} <+strict +delete> [variable] ok 712 - my $x; keys @{$$x[0]} <+strict +delete> [exception] ok 713 - my $x; keys @{$$x[0]} <+strict +delete> [return] ok 714 - my $x; keys @{$$x[0]} <+strict +delete> [variable] ok 715 - our $x; local $x; use strict; keys @{$$x[0]} <+strict +delete> [exception] ok 716 - our $x; local $x; use strict; keys @{$$x[0]} <+strict +delete> [return] ok 717 - our $x; local $x; use strict; keys @{$$x[0]} <+strict +delete> [variable] ok 718 - our $x; local $x; no strict; keys @{$$x[0]} <+strict +delete> [exception] ok 719 - our $x; local $x; no strict; keys @{$$x[0]} <+strict +delete> [return] ok 720 - our $x; local $x; no strict; keys @{$$x[0]} <+strict +delete> [variable] ok 721 - my @x; keys @{$x[0]} <+strict +delete> [exception] ok 722 - my @x; keys @{$x[0]} <+strict +delete> [return] ok 723 - my @x; keys @{$x[0]} <+strict +delete> [variable] ok 724 - our @x; local @x; use strict; keys @{$x[0]} <+strict +delete> [exception] ok 725 - our @x; local @x; use strict; keys @{$x[0]} <+strict +delete> [return] ok 726 - our @x; local @x; use strict; keys @{$x[0]} <+strict +delete> [variable] ok 727 - our @x; local @x; no strict; keys @{$x[0]} <+strict +delete> [exception] ok 728 - our @x; local @x; no strict; keys @{$x[0]} <+strict +delete> [return] ok 729 - our @x; local @x; no strict; keys @{$x[0]} <+strict +delete> [variable] ok 730 - my $x; keys @{$x->[0]} <+strict +store> [exception] ok 731 - my $x; keys @{$x->[0]} <+strict +store> [return] ok 732 - my $x; keys @{$x->[0]} <+strict +store> [variable] ok 733 - our $x; local $x; use strict; keys @{$x->[0]} <+strict +store> [exception] ok 734 - our $x; local $x; use strict; keys @{$x->[0]} <+strict +store> [return] ok 735 - our $x; local $x; use strict; keys @{$x->[0]} <+strict +store> [variable] ok 736 - our $x; local $x; no strict; keys @{$x->[0]} <+strict +store> [exception] ok 737 - our $x; local $x; no strict; keys @{$x->[0]} <+strict +store> [return] ok 738 - our $x; local $x; no strict; keys @{$x->[0]} <+strict +store> [variable] ok 739 - my $x; keys @{$$x[0]} <+strict +store> [exception] ok 740 - my $x; keys @{$$x[0]} <+strict +store> [return] ok 741 - my $x; keys @{$$x[0]} <+strict +store> [variable] ok 742 - our $x; local $x; use strict; keys @{$$x[0]} <+strict +store> [exception] ok 743 - our $x; local $x; use strict; keys @{$$x[0]} <+strict +store> [return] ok 744 - our $x; local $x; use strict; keys @{$$x[0]} <+strict +store> [variable] ok 745 - our $x; local $x; no strict; keys @{$$x[0]} <+strict +store> [exception] ok 746 - our $x; local $x; no strict; keys @{$$x[0]} <+strict +store> [return] ok 747 - our $x; local $x; no strict; keys @{$$x[0]} <+strict +store> [variable] ok 748 - my @x; keys @{$x[0]} <+strict +store> [exception] ok 749 - my @x; keys @{$x[0]} <+strict +store> [return] ok 750 - my @x; keys @{$x[0]} <+strict +store> [variable] ok 751 - our @x; local @x; use strict; keys @{$x[0]} <+strict +store> [exception] ok 752 - our @x; local @x; use strict; keys @{$x[0]} <+strict +store> [return] ok 753 - our @x; local @x; use strict; keys @{$x[0]} <+strict +store> [variable] ok 754 - our @x; local @x; no strict; keys @{$x[0]} <+strict +store> [exception] ok 755 - our @x; local @x; no strict; keys @{$x[0]} <+strict +store> [return] ok 756 - our @x; local @x; no strict; keys @{$x[0]} <+strict +store> [variable] ok 757 - my $x; [ keys @{$x->[0]} ] [exception] ok 758 - my $x; [ keys @{$x->[0]} ] [return] ok 759 - my $x; [ keys @{$x->[0]} ] [variable] ok 760 - our $x; local $x; use strict; [ keys @{$x->[0]} ] [exception] ok 761 - our $x; local $x; use strict; [ keys @{$x->[0]} ] [return] ok 762 - our $x; local $x; use strict; [ keys @{$x->[0]} ] [variable] ok 763 - our $x; local $x; no strict; [ keys @{$x->[0]} ] [exception] ok 764 - our $x; local $x; no strict; [ keys @{$x->[0]} ] [return] ok 765 - our $x; local $x; no strict; [ keys @{$x->[0]} ] [variable] ok 766 - my $x; [ keys @{$$x[0]} ] [exception] ok 767 - my $x; [ keys @{$$x[0]} ] [return] ok 768 - my $x; [ keys @{$$x[0]} ] [variable] ok 769 - our $x; local $x; use strict; [ keys @{$$x[0]} ] [exception] ok 770 - our $x; local $x; use strict; [ keys @{$$x[0]} ] [return] ok 771 - our $x; local $x; use strict; [ keys @{$$x[0]} ] [variable] ok 772 - our $x; local $x; no strict; [ keys @{$$x[0]} ] [exception] ok 773 - our $x; local $x; no strict; [ keys @{$$x[0]} ] [return] ok 774 - our $x; local $x; no strict; [ keys @{$$x[0]} ] [variable] ok 775 - my @x; [ keys @{$x[0]} ] [exception] ok 776 - my @x; [ keys @{$x[0]} ] [return] ok 777 - my @x; [ keys @{$x[0]} ] [variable] ok 778 - our @x; local @x; use strict; [ keys @{$x[0]} ] [exception] ok 779 - our @x; local @x; use strict; [ keys @{$x[0]} ] [return] ok 780 - our @x; local @x; use strict; [ keys @{$x[0]} ] [variable] ok 781 - our @x; local @x; no strict; [ keys @{$x[0]} ] [exception] ok 782 - our @x; local @x; no strict; [ keys @{$x[0]} ] [return] ok 783 - our @x; local @x; no strict; [ keys @{$x[0]} ] [variable] ok 784 - my $x; [ keys @{$x->[0]} ] [exception] ok 785 - my $x; [ keys @{$x->[0]} ] [return] ok 786 - my $x; [ keys @{$x->[0]} ] [variable] ok 787 - our $x; local $x; use strict; [ keys @{$x->[0]} ] [exception] ok 788 - our $x; local $x; use strict; [ keys @{$x->[0]} ] [return] ok 789 - our $x; local $x; use strict; [ keys @{$x->[0]} ] [variable] ok 790 - our $x; local $x; no strict; [ keys @{$x->[0]} ] [exception] ok 791 - our $x; local $x; no strict; [ keys @{$x->[0]} ] [return] ok 792 - our $x; local $x; no strict; [ keys @{$x->[0]} ] [variable] ok 793 - my $x; [ keys @{$$x[0]} ] [exception] ok 794 - my $x; [ keys @{$$x[0]} ] [return] ok 795 - my $x; [ keys @{$$x[0]} ] [variable] ok 796 - our $x; local $x; use strict; [ keys @{$$x[0]} ] [exception] ok 797 - our $x; local $x; use strict; [ keys @{$$x[0]} ] [return] ok 798 - our $x; local $x; use strict; [ keys @{$$x[0]} ] [variable] ok 799 - our $x; local $x; no strict; [ keys @{$$x[0]} ] [exception] ok 800 - our $x; local $x; no strict; [ keys @{$$x[0]} ] [return] ok 801 - our $x; local $x; no strict; [ keys @{$$x[0]} ] [variable] ok 802 - my @x; [ keys @{$x[0]} ] [exception] ok 803 - my @x; [ keys @{$x[0]} ] [return] ok 804 - my @x; [ keys @{$x[0]} ] [variable] ok 805 - our @x; local @x; use strict; [ keys @{$x[0]} ] [exception] ok 806 - our @x; local @x; use strict; [ keys @{$x[0]} ] [return] ok 807 - our @x; local @x; use strict; [ keys @{$x[0]} ] [variable] ok 808 - our @x; local @x; no strict; [ keys @{$x[0]} ] [exception] ok 809 - our @x; local @x; no strict; [ keys @{$x[0]} ] [return] ok 810 - our @x; local @x; no strict; [ keys @{$x[0]} ] [variable] ok 811 - my $x; [ keys @{$x->[0]} ] <+fetch> [exception] ok 812 - my $x; [ keys @{$x->[0]} ] <+fetch> [return] ok 813 - my $x; [ keys @{$x->[0]} ] <+fetch> [variable] ok 814 - our $x; local $x; use strict; [ keys @{$x->[0]} ] <+fetch> [exception] ok 815 - our $x; local $x; use strict; [ keys @{$x->[0]} ] <+fetch> [return] ok 816 - our $x; local $x; use strict; [ keys @{$x->[0]} ] <+fetch> [variable] ok 817 - our $x; local $x; no strict; [ keys @{$x->[0]} ] <+fetch> [exception] ok 818 - our $x; local $x; no strict; [ keys @{$x->[0]} ] <+fetch> [return] ok 819 - our $x; local $x; no strict; [ keys @{$x->[0]} ] <+fetch> [variable] ok 820 - my $x; [ keys @{$$x[0]} ] <+fetch> [exception] ok 821 - my $x; [ keys @{$$x[0]} ] <+fetch> [return] ok 822 - my $x; [ keys @{$$x[0]} ] <+fetch> [variable] ok 823 - our $x; local $x; use strict; [ keys @{$$x[0]} ] <+fetch> [exception] ok 824 - our $x; local $x; use strict; [ keys @{$$x[0]} ] <+fetch> [return] ok 825 - our $x; local $x; use strict; [ keys @{$$x[0]} ] <+fetch> [variable] ok 826 - our $x; local $x; no strict; [ keys @{$$x[0]} ] <+fetch> [exception] ok 827 - our $x; local $x; no strict; [ keys @{$$x[0]} ] <+fetch> [return] ok 828 - our $x; local $x; no strict; [ keys @{$$x[0]} ] <+fetch> [variable] ok 829 - my @x; [ keys @{$x[0]} ] <+fetch> [exception] ok 830 - my @x; [ keys @{$x[0]} ] <+fetch> [return] ok 831 - my @x; [ keys @{$x[0]} ] <+fetch> [variable] ok 832 - our @x; local @x; use strict; [ keys @{$x[0]} ] <+fetch> [exception] ok 833 - our @x; local @x; use strict; [ keys @{$x[0]} ] <+fetch> [return] ok 834 - our @x; local @x; use strict; [ keys @{$x[0]} ] <+fetch> [variable] ok 835 - our @x; local @x; no strict; [ keys @{$x[0]} ] <+fetch> [exception] ok 836 - our @x; local @x; no strict; [ keys @{$x[0]} ] <+fetch> [return] ok 837 - our @x; local @x; no strict; [ keys @{$x[0]} ] <+fetch> [variable] ok 838 - my $x; [ keys @{$x->[0]} ] <+exists +delete +store> [exception] ok 839 - my $x; [ keys @{$x->[0]} ] <+exists +delete +store> [return] ok 840 - my $x; [ keys @{$x->[0]} ] <+exists +delete +store> [variable] ok 841 - our $x; local $x; use strict; [ keys @{$x->[0]} ] <+exists +delete +store> [exception] ok 842 - our $x; local $x; use strict; [ keys @{$x->[0]} ] <+exists +delete +store> [return] ok 843 - our $x; local $x; use strict; [ keys @{$x->[0]} ] <+exists +delete +store> [variable] ok 844 - our $x; local $x; no strict; [ keys @{$x->[0]} ] <+exists +delete +store> [exception] ok 845 - our $x; local $x; no strict; [ keys @{$x->[0]} ] <+exists +delete +store> [return] ok 846 - our $x; local $x; no strict; [ keys @{$x->[0]} ] <+exists +delete +store> [variable] ok 847 - my $x; [ keys @{$$x[0]} ] <+exists +delete +store> [exception] ok 848 - my $x; [ keys @{$$x[0]} ] <+exists +delete +store> [return] ok 849 - my $x; [ keys @{$$x[0]} ] <+exists +delete +store> [variable] ok 850 - our $x; local $x; use strict; [ keys @{$$x[0]} ] <+exists +delete +store> [exception] ok 851 - our $x; local $x; use strict; [ keys @{$$x[0]} ] <+exists +delete +store> [return] ok 852 - our $x; local $x; use strict; [ keys @{$$x[0]} ] <+exists +delete +store> [variable] ok 853 - our $x; local $x; no strict; [ keys @{$$x[0]} ] <+exists +delete +store> [exception] ok 854 - our $x; local $x; no strict; [ keys @{$$x[0]} ] <+exists +delete +store> [return] ok 855 - our $x; local $x; no strict; [ keys @{$$x[0]} ] <+exists +delete +store> [variable] ok 856 - my @x; [ keys @{$x[0]} ] <+exists +delete +store> [exception] ok 857 - my @x; [ keys @{$x[0]} ] <+exists +delete +store> [return] ok 858 - my @x; [ keys @{$x[0]} ] <+exists +delete +store> [variable] ok 859 - our @x; local @x; use strict; [ keys @{$x[0]} ] <+exists +delete +store> [exception] ok 860 - our @x; local @x; use strict; [ keys @{$x[0]} ] <+exists +delete +store> [return] ok 861 - our @x; local @x; use strict; [ keys @{$x[0]} ] <+exists +delete +store> [variable] ok 862 - our @x; local @x; no strict; [ keys @{$x[0]} ] <+exists +delete +store> [exception] ok 863 - our @x; local @x; no strict; [ keys @{$x[0]} ] <+exists +delete +store> [return] ok 864 - our @x; local @x; no strict; [ keys @{$x[0]} ] <+exists +delete +store> [variable] ok 865 - my $x; values @$x [exception] ok 866 - my $x; values @$x [return] ok 867 - my $x; values @$x [variable] ok 868 - our $x; local $x; use strict; values @$x [exception] ok 869 - our $x; local $x; use strict; values @$x [return] ok 870 - our $x; local $x; use strict; values @$x [variable] ok 871 - our $x; local $x; no strict; values @$x [exception] ok 872 - our $x; local $x; no strict; values @$x [return] ok 873 - our $x; local $x; no strict; values @$x [variable] ok 874 - my $x; values @$x [exception] ok 875 - my $x; values @$x [return] ok 876 - my $x; values @$x [variable] ok 877 - our $x; local $x; use strict; values @$x [exception] ok 878 - our $x; local $x; use strict; values @$x [return] ok 879 - our $x; local $x; use strict; values @$x [variable] ok 880 - our $x; local $x; no strict; values @$x [exception] ok 881 - our $x; local $x; no strict; values @$x [return] ok 882 - our $x; local $x; no strict; values @$x [variable] ok 883 - my @x; values @x [exception] ok 884 - my @x; values @x [return] ok 885 - my @x; values @x [variable] ok 886 - our @x; local @x; use strict; values @x [exception] ok 887 - our @x; local @x; use strict; values @x [return] ok 888 - our @x; local @x; use strict; values @x [variable] ok 889 - our @x; local @x; no strict; values @x [exception] ok 890 - our @x; local @x; no strict; values @x [return] ok 891 - our @x; local @x; no strict; values @x [variable] ok 892 - my $x; values @$x [exception] ok 893 - my $x; values @$x [return] ok 894 - my $x; values @$x [variable] ok 895 - our $x; local $x; use strict; values @$x [exception] ok 896 - our $x; local $x; use strict; values @$x [return] ok 897 - our $x; local $x; use strict; values @$x [variable] ok 898 - our $x; local $x; no strict; values @$x [exception] ok 899 - our $x; local $x; no strict; values @$x [return] ok 900 - our $x; local $x; no strict; values @$x [variable] ok 901 - my $x; values @$x [exception] ok 902 - my $x; values @$x [return] ok 903 - my $x; values @$x [variable] ok 904 - our $x; local $x; use strict; values @$x [exception] ok 905 - our $x; local $x; use strict; values @$x [return] ok 906 - our $x; local $x; use strict; values @$x [variable] ok 907 - our $x; local $x; no strict; values @$x [exception] ok 908 - our $x; local $x; no strict; values @$x [return] ok 909 - our $x; local $x; no strict; values @$x [variable] ok 910 - my @x; values @x [exception] ok 911 - my @x; values @x [return] ok 912 - my @x; values @x [variable] ok 913 - our @x; local @x; use strict; values @x [exception] ok 914 - our @x; local @x; use strict; values @x [return] ok 915 - our @x; local @x; use strict; values @x [variable] ok 916 - our @x; local @x; no strict; values @x [exception] ok 917 - our @x; local @x; no strict; values @x [return] ok 918 - our @x; local @x; no strict; values @x [variable] ok 919 - my $x; values @$x <+fetch> [exception] ok 920 - my $x; values @$x <+fetch> [return] ok 921 - my $x; values @$x <+fetch> [variable] ok 922 - our $x; local $x; use strict; values @$x <+fetch> [exception] ok 923 - our $x; local $x; use strict; values @$x <+fetch> [return] ok 924 - our $x; local $x; use strict; values @$x <+fetch> [variable] ok 925 - our $x; local $x; no strict; values @$x <+fetch> [exception] ok 926 - our $x; local $x; no strict; values @$x <+fetch> [return] ok 927 - our $x; local $x; no strict; values @$x <+fetch> [variable] ok 928 - my $x; values @$x <+fetch> [exception] ok 929 - my $x; values @$x <+fetch> [return] ok 930 - my $x; values @$x <+fetch> [variable] ok 931 - our $x; local $x; use strict; values @$x <+fetch> [exception] ok 932 - our $x; local $x; use strict; values @$x <+fetch> [return] ok 933 - our $x; local $x; use strict; values @$x <+fetch> [variable] ok 934 - our $x; local $x; no strict; values @$x <+fetch> [exception] ok 935 - our $x; local $x; no strict; values @$x <+fetch> [return] ok 936 - our $x; local $x; no strict; values @$x <+fetch> [variable] ok 937 - my @x; values @x <+fetch> [exception] ok 938 - my @x; values @x <+fetch> [return] ok 939 - my @x; values @x <+fetch> [variable] ok 940 - our @x; local @x; use strict; values @x <+fetch> [exception] ok 941 - our @x; local @x; use strict; values @x <+fetch> [return] ok 942 - our @x; local @x; use strict; values @x <+fetch> [variable] ok 943 - our @x; local @x; no strict; values @x <+fetch> [exception] ok 944 - our @x; local @x; no strict; values @x <+fetch> [return] ok 945 - our @x; local @x; no strict; values @x <+fetch> [variable] ok 946 - my $x; values @$x <+exists> [exception] ok 947 - my $x; values @$x <+exists> [return] ok 948 - my $x; values @$x <+exists> [variable] ok 949 - our $x; local $x; use strict; values @$x <+exists> [exception] ok 950 - our $x; local $x; use strict; values @$x <+exists> [return] ok 951 - our $x; local $x; use strict; values @$x <+exists> [variable] ok 952 - our $x; local $x; no strict; values @$x <+exists> [exception] ok 953 - our $x; local $x; no strict; values @$x <+exists> [return] ok 954 - our $x; local $x; no strict; values @$x <+exists> [variable] ok 955 - my $x; values @$x <+exists> [exception] ok 956 - my $x; values @$x <+exists> [return] ok 957 - my $x; values @$x <+exists> [variable] ok 958 - our $x; local $x; use strict; values @$x <+exists> [exception] ok 959 - our $x; local $x; use strict; values @$x <+exists> [return] ok 960 - our $x; local $x; use strict; values @$x <+exists> [variable] ok 961 - our $x; local $x; no strict; values @$x <+exists> [exception] ok 962 - our $x; local $x; no strict; values @$x <+exists> [return] ok 963 - our $x; local $x; no strict; values @$x <+exists> [variable] ok 964 - my @x; values @x <+exists> [exception] ok 965 - my @x; values @x <+exists> [return] ok 966 - my @x; values @x <+exists> [variable] ok 967 - our @x; local @x; use strict; values @x <+exists> [exception] ok 968 - our @x; local @x; use strict; values @x <+exists> [return] ok 969 - our @x; local @x; use strict; values @x <+exists> [variable] ok 970 - our @x; local @x; no strict; values @x <+exists> [exception] ok 971 - our @x; local @x; no strict; values @x <+exists> [return] ok 972 - our @x; local @x; no strict; values @x <+exists> [variable] ok 973 - my $x; values @$x <+delete> [exception] ok 974 - my $x; values @$x <+delete> [return] ok 975 - my $x; values @$x <+delete> [variable] ok 976 - our $x; local $x; use strict; values @$x <+delete> [exception] ok 977 - our $x; local $x; use strict; values @$x <+delete> [return] ok 978 - our $x; local $x; use strict; values @$x <+delete> [variable] ok 979 - our $x; local $x; no strict; values @$x <+delete> [exception] ok 980 - our $x; local $x; no strict; values @$x <+delete> [return] ok 981 - our $x; local $x; no strict; values @$x <+delete> [variable] ok 982 - my $x; values @$x <+delete> [exception] ok 983 - my $x; values @$x <+delete> [return] ok 984 - my $x; values @$x <+delete> [variable] ok 985 - our $x; local $x; use strict; values @$x <+delete> [exception] ok 986 - our $x; local $x; use strict; values @$x <+delete> [return] ok 987 - our $x; local $x; use strict; values @$x <+delete> [variable] ok 988 - our $x; local $x; no strict; values @$x <+delete> [exception] ok 989 - our $x; local $x; no strict; values @$x <+delete> [return] ok 990 - our $x; local $x; no strict; values @$x <+delete> [variable] ok 991 - my @x; values @x <+delete> [exception] ok 992 - my @x; values @x <+delete> [return] ok 993 - my @x; values @x <+delete> [variable] ok 994 - our @x; local @x; use strict; values @x <+delete> [exception] ok 995 - our @x; local @x; use strict; values @x <+delete> [return] ok 996 - our @x; local @x; use strict; values @x <+delete> [variable] ok 997 - our @x; local @x; no strict; values @x <+delete> [exception] ok 998 - our @x; local @x; no strict; values @x <+delete> [return] ok 999 - our @x; local @x; no strict; values @x <+delete> [variable] ok 1000 - my $x; values @$x <+store> [exception] ok 1001 - my $x; values @$x <+store> [return] ok 1002 - my $x; values @$x <+store> [variable] ok 1003 - our $x; local $x; use strict; values @$x <+store> [exception] ok 1004 - our $x; local $x; use strict; values @$x <+store> [return] ok 1005 - our $x; local $x; use strict; values @$x <+store> [variable] ok 1006 - our $x; local $x; no strict; values @$x <+store> [exception] ok 1007 - our $x; local $x; no strict; values @$x <+store> [return] ok 1008 - our $x; local $x; no strict; values @$x <+store> [variable] ok 1009 - my $x; values @$x <+store> [exception] ok 1010 - my $x; values @$x <+store> [return] ok 1011 - my $x; values @$x <+store> [variable] ok 1012 - our $x; local $x; use strict; values @$x <+store> [exception] ok 1013 - our $x; local $x; use strict; values @$x <+store> [return] ok 1014 - our $x; local $x; use strict; values @$x <+store> [variable] ok 1015 - our $x; local $x; no strict; values @$x <+store> [exception] ok 1016 - our $x; local $x; no strict; values @$x <+store> [return] ok 1017 - our $x; local $x; no strict; values @$x <+store> [variable] ok 1018 - my @x; values @x <+store> [exception] ok 1019 - my @x; values @x <+store> [return] ok 1020 - my @x; values @x <+store> [variable] ok 1021 - our @x; local @x; use strict; values @x <+store> [exception] ok 1022 - our @x; local @x; use strict; values @x <+store> [return] ok 1023 - our @x; local @x; use strict; values @x <+store> [variable] ok 1024 - our @x; local @x; no strict; values @x <+store> [exception] ok 1025 - our @x; local @x; no strict; values @x <+store> [return] ok 1026 - our @x; local @x; no strict; values @x <+store> [variable] ok 1027 - my $x; values @$x <+strict +fetch> [exception] ok 1028 - my $x; values @$x <+strict +fetch> [return] ok 1029 - my $x; values @$x <+strict +fetch> [variable] ok 1030 - our $x; local $x; use strict; values @$x <+strict +fetch> [exception] ok 1031 - our $x; local $x; use strict; values @$x <+strict +fetch> [return] ok 1032 - our $x; local $x; use strict; values @$x <+strict +fetch> [variable] ok 1033 - our $x; local $x; no strict; values @$x <+strict +fetch> [exception] ok 1034 - our $x; local $x; no strict; values @$x <+strict +fetch> [return] ok 1035 - our $x; local $x; no strict; values @$x <+strict +fetch> [variable] ok 1036 - my $x; values @$x <+strict +fetch> [exception] ok 1037 - my $x; values @$x <+strict +fetch> [return] ok 1038 - my $x; values @$x <+strict +fetch> [variable] ok 1039 - our $x; local $x; use strict; values @$x <+strict +fetch> [exception] ok 1040 - our $x; local $x; use strict; values @$x <+strict +fetch> [return] ok 1041 - our $x; local $x; use strict; values @$x <+strict +fetch> [variable] ok 1042 - our $x; local $x; no strict; values @$x <+strict +fetch> [exception] ok 1043 - our $x; local $x; no strict; values @$x <+strict +fetch> [return] ok 1044 - our $x; local $x; no strict; values @$x <+strict +fetch> [variable] ok 1045 - my @x; 1 <+strict +fetch> [exception] ok 1046 - my @x; 1 <+strict +fetch> [return] ok 1047 - my @x; 1 <+strict +fetch> [variable] ok 1048 - our @x; local @x; use strict; 1 <+strict +fetch> [exception] ok 1049 - our @x; local @x; use strict; 1 <+strict +fetch> [return] ok 1050 - our @x; local @x; use strict; 1 <+strict +fetch> [variable] ok 1051 - our @x; local @x; no strict; 1 <+strict +fetch> [exception] ok 1052 - our @x; local @x; no strict; 1 <+strict +fetch> [return] ok 1053 - our @x; local @x; no strict; 1 <+strict +fetch> [variable] ok 1054 - my $x; values @$x <+strict +exists> [exception] ok 1055 - my $x; values @$x <+strict +exists> [return] ok 1056 - my $x; values @$x <+strict +exists> [variable] ok 1057 - our $x; local $x; use strict; values @$x <+strict +exists> [exception] ok 1058 - our $x; local $x; use strict; values @$x <+strict +exists> [return] ok 1059 - our $x; local $x; use strict; values @$x <+strict +exists> [variable] ok 1060 - our $x; local $x; no strict; values @$x <+strict +exists> [exception] ok 1061 - our $x; local $x; no strict; values @$x <+strict +exists> [return] ok 1062 - our $x; local $x; no strict; values @$x <+strict +exists> [variable] ok 1063 - my $x; values @$x <+strict +exists> [exception] ok 1064 - my $x; values @$x <+strict +exists> [return] ok 1065 - my $x; values @$x <+strict +exists> [variable] ok 1066 - our $x; local $x; use strict; values @$x <+strict +exists> [exception] ok 1067 - our $x; local $x; use strict; values @$x <+strict +exists> [return] ok 1068 - our $x; local $x; use strict; values @$x <+strict +exists> [variable] ok 1069 - our $x; local $x; no strict; values @$x <+strict +exists> [exception] ok 1070 - our $x; local $x; no strict; values @$x <+strict +exists> [return] ok 1071 - our $x; local $x; no strict; values @$x <+strict +exists> [variable] ok 1072 - my @x; values @x <+strict +exists> [exception] ok 1073 - my @x; values @x <+strict +exists> [return] ok 1074 - my @x; values @x <+strict +exists> [variable] ok 1075 - our @x; local @x; use strict; values @x <+strict +exists> [exception] ok 1076 - our @x; local @x; use strict; values @x <+strict +exists> [return] ok 1077 - our @x; local @x; use strict; values @x <+strict +exists> [variable] ok 1078 - our @x; local @x; no strict; values @x <+strict +exists> [exception] ok 1079 - our @x; local @x; no strict; values @x <+strict +exists> [return] ok 1080 - our @x; local @x; no strict; values @x <+strict +exists> [variable] ok 1081 - my $x; values @$x <+strict +delete> [exception] ok 1082 - my $x; values @$x <+strict +delete> [return] ok 1083 - my $x; values @$x <+strict +delete> [variable] ok 1084 - our $x; local $x; use strict; values @$x <+strict +delete> [exception] ok 1085 - our $x; local $x; use strict; values @$x <+strict +delete> [return] ok 1086 - our $x; local $x; use strict; values @$x <+strict +delete> [variable] ok 1087 - our $x; local $x; no strict; values @$x <+strict +delete> [exception] ok 1088 - our $x; local $x; no strict; values @$x <+strict +delete> [return] ok 1089 - our $x; local $x; no strict; values @$x <+strict +delete> [variable] ok 1090 - my $x; values @$x <+strict +delete> [exception] ok 1091 - my $x; values @$x <+strict +delete> [return] ok 1092 - my $x; values @$x <+strict +delete> [variable] ok 1093 - our $x; local $x; use strict; values @$x <+strict +delete> [exception] ok 1094 - our $x; local $x; use strict; values @$x <+strict +delete> [return] ok 1095 - our $x; local $x; use strict; values @$x <+strict +delete> [variable] ok 1096 - our $x; local $x; no strict; values @$x <+strict +delete> [exception] ok 1097 - our $x; local $x; no strict; values @$x <+strict +delete> [return] ok 1098 - our $x; local $x; no strict; values @$x <+strict +delete> [variable] ok 1099 - my @x; values @x <+strict +delete> [exception] ok 1100 - my @x; values @x <+strict +delete> [return] ok 1101 - my @x; values @x <+strict +delete> [variable] ok 1102 - our @x; local @x; use strict; values @x <+strict +delete> [exception] ok 1103 - our @x; local @x; use strict; values @x <+strict +delete> [return] ok 1104 - our @x; local @x; use strict; values @x <+strict +delete> [variable] ok 1105 - our @x; local @x; no strict; values @x <+strict +delete> [exception] ok 1106 - our @x; local @x; no strict; values @x <+strict +delete> [return] ok 1107 - our @x; local @x; no strict; values @x <+strict +delete> [variable] ok 1108 - my $x; values @$x <+strict +store> [exception] ok 1109 - my $x; values @$x <+strict +store> [return] ok 1110 - my $x; values @$x <+strict +store> [variable] ok 1111 - our $x; local $x; use strict; values @$x <+strict +store> [exception] ok 1112 - our $x; local $x; use strict; values @$x <+strict +store> [return] ok 1113 - our $x; local $x; use strict; values @$x <+strict +store> [variable] ok 1114 - our $x; local $x; no strict; values @$x <+strict +store> [exception] ok 1115 - our $x; local $x; no strict; values @$x <+strict +store> [return] ok 1116 - our $x; local $x; no strict; values @$x <+strict +store> [variable] ok 1117 - my $x; values @$x <+strict +store> [exception] ok 1118 - my $x; values @$x <+strict +store> [return] ok 1119 - my $x; values @$x <+strict +store> [variable] ok 1120 - our $x; local $x; use strict; values @$x <+strict +store> [exception] ok 1121 - our $x; local $x; use strict; values @$x <+strict +store> [return] ok 1122 - our $x; local $x; use strict; values @$x <+strict +store> [variable] ok 1123 - our $x; local $x; no strict; values @$x <+strict +store> [exception] ok 1124 - our $x; local $x; no strict; values @$x <+strict +store> [return] ok 1125 - our $x; local $x; no strict; values @$x <+strict +store> [variable] ok 1126 - my @x; values @x <+strict +store> [exception] ok 1127 - my @x; values @x <+strict +store> [return] ok 1128 - my @x; values @x <+strict +store> [variable] ok 1129 - our @x; local @x; use strict; values @x <+strict +store> [exception] ok 1130 - our @x; local @x; use strict; values @x <+strict +store> [return] ok 1131 - our @x; local @x; use strict; values @x <+strict +store> [variable] ok 1132 - our @x; local @x; no strict; values @x <+strict +store> [exception] ok 1133 - our @x; local @x; no strict; values @x <+strict +store> [return] ok 1134 - our @x; local @x; no strict; values @x <+strict +store> [variable] ok 1135 - my $x; [ values @$x ] [exception] ok 1136 - my $x; [ values @$x ] [return] ok 1137 - my $x; [ values @$x ] [variable] ok 1138 - our $x; local $x; use strict; [ values @$x ] [exception] ok 1139 - our $x; local $x; use strict; [ values @$x ] [return] ok 1140 - our $x; local $x; use strict; [ values @$x ] [variable] ok 1141 - our $x; local $x; no strict; [ values @$x ] [exception] ok 1142 - our $x; local $x; no strict; [ values @$x ] [return] ok 1143 - our $x; local $x; no strict; [ values @$x ] [variable] ok 1144 - my $x; [ values @$x ] [exception] ok 1145 - my $x; [ values @$x ] [return] ok 1146 - my $x; [ values @$x ] [variable] ok 1147 - our $x; local $x; use strict; [ values @$x ] [exception] ok 1148 - our $x; local $x; use strict; [ values @$x ] [return] ok 1149 - our $x; local $x; use strict; [ values @$x ] [variable] ok 1150 - our $x; local $x; no strict; [ values @$x ] [exception] ok 1151 - our $x; local $x; no strict; [ values @$x ] [return] ok 1152 - our $x; local $x; no strict; [ values @$x ] [variable] ok 1153 - my @x; [ values @x ] [exception] ok 1154 - my @x; [ values @x ] [return] ok 1155 - my @x; [ values @x ] [variable] ok 1156 - our @x; local @x; use strict; [ values @x ] [exception] ok 1157 - our @x; local @x; use strict; [ values @x ] [return] ok 1158 - our @x; local @x; use strict; [ values @x ] [variable] ok 1159 - our @x; local @x; no strict; [ values @x ] [exception] ok 1160 - our @x; local @x; no strict; [ values @x ] [return] ok 1161 - our @x; local @x; no strict; [ values @x ] [variable] ok 1162 - my $x; [ values @$x ] [exception] ok 1163 - my $x; [ values @$x ] [return] ok 1164 - my $x; [ values @$x ] [variable] ok 1165 - our $x; local $x; use strict; [ values @$x ] [exception] ok 1166 - our $x; local $x; use strict; [ values @$x ] [return] ok 1167 - our $x; local $x; use strict; [ values @$x ] [variable] ok 1168 - our $x; local $x; no strict; [ values @$x ] [exception] ok 1169 - our $x; local $x; no strict; [ values @$x ] [return] ok 1170 - our $x; local $x; no strict; [ values @$x ] [variable] ok 1171 - my $x; [ values @$x ] [exception] ok 1172 - my $x; [ values @$x ] [return] ok 1173 - my $x; [ values @$x ] [variable] ok 1174 - our $x; local $x; use strict; [ values @$x ] [exception] ok 1175 - our $x; local $x; use strict; [ values @$x ] [return] ok 1176 - our $x; local $x; use strict; [ values @$x ] [variable] ok 1177 - our $x; local $x; no strict; [ values @$x ] [exception] ok 1178 - our $x; local $x; no strict; [ values @$x ] [return] ok 1179 - our $x; local $x; no strict; [ values @$x ] [variable] ok 1180 - my @x; [ values @x ] [exception] ok 1181 - my @x; [ values @x ] [return] ok 1182 - my @x; [ values @x ] [variable] ok 1183 - our @x; local @x; use strict; [ values @x ] [exception] ok 1184 - our @x; local @x; use strict; [ values @x ] [return] ok 1185 - our @x; local @x; use strict; [ values @x ] [variable] ok 1186 - our @x; local @x; no strict; [ values @x ] [exception] ok 1187 - our @x; local @x; no strict; [ values @x ] [return] ok 1188 - our @x; local @x; no strict; [ values @x ] [variable] ok 1189 - my $x; [ values @$x ] <+fetch> [exception] ok 1190 - my $x; [ values @$x ] <+fetch> [return] ok 1191 - my $x; [ values @$x ] <+fetch> [variable] ok 1192 - our $x; local $x; use strict; [ values @$x ] <+fetch> [exception] ok 1193 - our $x; local $x; use strict; [ values @$x ] <+fetch> [return] ok 1194 - our $x; local $x; use strict; [ values @$x ] <+fetch> [variable] ok 1195 - our $x; local $x; no strict; [ values @$x ] <+fetch> [exception] ok 1196 - our $x; local $x; no strict; [ values @$x ] <+fetch> [return] ok 1197 - our $x; local $x; no strict; [ values @$x ] <+fetch> [variable] ok 1198 - my $x; [ values @$x ] <+fetch> [exception] ok 1199 - my $x; [ values @$x ] <+fetch> [return] ok 1200 - my $x; [ values @$x ] <+fetch> [variable] ok 1201 - our $x; local $x; use strict; [ values @$x ] <+fetch> [exception] ok 1202 - our $x; local $x; use strict; [ values @$x ] <+fetch> [return] ok 1203 - our $x; local $x; use strict; [ values @$x ] <+fetch> [variable] ok 1204 - our $x; local $x; no strict; [ values @$x ] <+fetch> [exception] ok 1205 - our $x; local $x; no strict; [ values @$x ] <+fetch> [return] ok 1206 - our $x; local $x; no strict; [ values @$x ] <+fetch> [variable] ok 1207 - my @x; [ values @x ] <+fetch> [exception] ok 1208 - my @x; [ values @x ] <+fetch> [return] ok 1209 - my @x; [ values @x ] <+fetch> [variable] ok 1210 - our @x; local @x; use strict; [ values @x ] <+fetch> [exception] ok 1211 - our @x; local @x; use strict; [ values @x ] <+fetch> [return] ok 1212 - our @x; local @x; use strict; [ values @x ] <+fetch> [variable] ok 1213 - our @x; local @x; no strict; [ values @x ] <+fetch> [exception] ok 1214 - our @x; local @x; no strict; [ values @x ] <+fetch> [return] ok 1215 - our @x; local @x; no strict; [ values @x ] <+fetch> [variable] ok 1216 - my $x; [ values @$x ] <+exists +delete +store> [exception] ok 1217 - my $x; [ values @$x ] <+exists +delete +store> [return] ok 1218 - my $x; [ values @$x ] <+exists +delete +store> [variable] ok 1219 - our $x; local $x; use strict; [ values @$x ] <+exists +delete +store> [exception] ok 1220 - our $x; local $x; use strict; [ values @$x ] <+exists +delete +store> [return] ok 1221 - our $x; local $x; use strict; [ values @$x ] <+exists +delete +store> [variable] ok 1222 - our $x; local $x; no strict; [ values @$x ] <+exists +delete +store> [exception] ok 1223 - our $x; local $x; no strict; [ values @$x ] <+exists +delete +store> [return] ok 1224 - our $x; local $x; no strict; [ values @$x ] <+exists +delete +store> [variable] ok 1225 - my $x; [ values @$x ] <+exists +delete +store> [exception] ok 1226 - my $x; [ values @$x ] <+exists +delete +store> [return] ok 1227 - my $x; [ values @$x ] <+exists +delete +store> [variable] ok 1228 - our $x; local $x; use strict; [ values @$x ] <+exists +delete +store> [exception] ok 1229 - our $x; local $x; use strict; [ values @$x ] <+exists +delete +store> [return] ok 1230 - our $x; local $x; use strict; [ values @$x ] <+exists +delete +store> [variable] ok 1231 - our $x; local $x; no strict; [ values @$x ] <+exists +delete +store> [exception] ok 1232 - our $x; local $x; no strict; [ values @$x ] <+exists +delete +store> [return] ok 1233 - our $x; local $x; no strict; [ values @$x ] <+exists +delete +store> [variable] ok 1234 - my @x; [ values @x ] <+exists +delete +store> [exception] ok 1235 - my @x; [ values @x ] <+exists +delete +store> [return] ok 1236 - my @x; [ values @x ] <+exists +delete +store> [variable] ok 1237 - our @x; local @x; use strict; [ values @x ] <+exists +delete +store> [exception] ok 1238 - our @x; local @x; use strict; [ values @x ] <+exists +delete +store> [return] ok 1239 - our @x; local @x; use strict; [ values @x ] <+exists +delete +store> [variable] ok 1240 - our @x; local @x; no strict; [ values @x ] <+exists +delete +store> [exception] ok 1241 - our @x; local @x; no strict; [ values @x ] <+exists +delete +store> [return] ok 1242 - our @x; local @x; no strict; [ values @x ] <+exists +delete +store> [variable] ok 1243 - my $x; $x->[0] = 1; [ values @$x ] [exception] ok 1244 - my $x; $x->[0] = 1; [ values @$x ] [return] ok 1245 - my $x; $x->[0] = 1; [ values @$x ] [variable] ok 1246 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] [exception] ok 1247 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] [return] ok 1248 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] [variable] ok 1249 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] [exception] ok 1250 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] [return] ok 1251 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] [variable] ok 1252 - my $x; $x->[0] = 1; [ values @$x ] [exception] ok 1253 - my $x; $x->[0] = 1; [ values @$x ] [return] ok 1254 - my $x; $x->[0] = 1; [ values @$x ] [variable] ok 1255 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] [exception] ok 1256 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] [return] ok 1257 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] [variable] ok 1258 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] [exception] ok 1259 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] [return] ok 1260 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] [variable] ok 1261 - my @x; $x[0] = 1; [ values @x ] [exception] ok 1262 - my @x; $x[0] = 1; [ values @x ] [return] ok 1263 - my @x; $x[0] = 1; [ values @x ] [variable] ok 1264 - our @x; local @x; use strict; $x[0] = 1; [ values @x ] [exception] ok 1265 - our @x; local @x; use strict; $x[0] = 1; [ values @x ] [return] ok 1266 - our @x; local @x; use strict; $x[0] = 1; [ values @x ] [variable] ok 1267 - our @x; local @x; no strict; $x[0] = 1; [ values @x ] [exception] ok 1268 - our @x; local @x; no strict; $x[0] = 1; [ values @x ] [return] ok 1269 - our @x; local @x; no strict; $x[0] = 1; [ values @x ] [variable] ok 1270 - my $x; $x->[0] = 1; [ values @$x ] [exception] ok 1271 - my $x; $x->[0] = 1; [ values @$x ] [return] ok 1272 - my $x; $x->[0] = 1; [ values @$x ] [variable] ok 1273 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] [exception] ok 1274 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] [return] ok 1275 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] [variable] ok 1276 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] [exception] ok 1277 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] [return] ok 1278 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] [variable] ok 1279 - my $x; $x->[0] = 1; [ values @$x ] [exception] ok 1280 - my $x; $x->[0] = 1; [ values @$x ] [return] ok 1281 - my $x; $x->[0] = 1; [ values @$x ] [variable] ok 1282 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] [exception] ok 1283 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] [return] ok 1284 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] [variable] ok 1285 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] [exception] ok 1286 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] [return] ok 1287 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] [variable] ok 1288 - my @x; $x[0] = 1; [ values @x ] [exception] ok 1289 - my @x; $x[0] = 1; [ values @x ] [return] ok 1290 - my @x; $x[0] = 1; [ values @x ] [variable] ok 1291 - our @x; local @x; use strict; $x[0] = 1; [ values @x ] [exception] ok 1292 - our @x; local @x; use strict; $x[0] = 1; [ values @x ] [return] ok 1293 - our @x; local @x; use strict; $x[0] = 1; [ values @x ] [variable] ok 1294 - our @x; local @x; no strict; $x[0] = 1; [ values @x ] [exception] ok 1295 - our @x; local @x; no strict; $x[0] = 1; [ values @x ] [return] ok 1296 - our @x; local @x; no strict; $x[0] = 1; [ values @x ] [variable] ok 1297 - my $x; $x->[0] = 1; [ values @$x ] <+fetch> [exception] ok 1298 - my $x; $x->[0] = 1; [ values @$x ] <+fetch> [return] ok 1299 - my $x; $x->[0] = 1; [ values @$x ] <+fetch> [variable] ok 1300 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] <+fetch> [exception] ok 1301 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] <+fetch> [return] ok 1302 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] <+fetch> [variable] ok 1303 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] <+fetch> [exception] ok 1304 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] <+fetch> [return] ok 1305 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] <+fetch> [variable] ok 1306 - my $x; $x->[0] = 1; [ values @$x ] <+fetch> [exception] ok 1307 - my $x; $x->[0] = 1; [ values @$x ] <+fetch> [return] ok 1308 - my $x; $x->[0] = 1; [ values @$x ] <+fetch> [variable] ok 1309 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] <+fetch> [exception] ok 1310 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] <+fetch> [return] ok 1311 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] <+fetch> [variable] ok 1312 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] <+fetch> [exception] ok 1313 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] <+fetch> [return] ok 1314 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] <+fetch> [variable] ok 1315 - my @x; $x[0] = 1; [ values @x ] <+fetch> [exception] ok 1316 - my @x; $x[0] = 1; [ values @x ] <+fetch> [return] ok 1317 - my @x; $x[0] = 1; [ values @x ] <+fetch> [variable] ok 1318 - our @x; local @x; use strict; $x[0] = 1; [ values @x ] <+fetch> [exception] ok 1319 - our @x; local @x; use strict; $x[0] = 1; [ values @x ] <+fetch> [return] ok 1320 - our @x; local @x; use strict; $x[0] = 1; [ values @x ] <+fetch> [variable] ok 1321 - our @x; local @x; no strict; $x[0] = 1; [ values @x ] <+fetch> [exception] ok 1322 - our @x; local @x; no strict; $x[0] = 1; [ values @x ] <+fetch> [return] ok 1323 - our @x; local @x; no strict; $x[0] = 1; [ values @x ] <+fetch> [variable] ok 1324 - my $x; $x->[0] = 1; [ values @$x ] <+exists +delete +store> [exception] ok 1325 - my $x; $x->[0] = 1; [ values @$x ] <+exists +delete +store> [return] ok 1326 - my $x; $x->[0] = 1; [ values @$x ] <+exists +delete +store> [variable] ok 1327 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] <+exists +delete +store> [exception] ok 1328 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] <+exists +delete +store> [return] ok 1329 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] <+exists +delete +store> [variable] ok 1330 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] <+exists +delete +store> [exception] ok 1331 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] <+exists +delete +store> [return] ok 1332 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] <+exists +delete +store> [variable] ok 1333 - my $x; $x->[0] = 1; [ values @$x ] <+exists +delete +store> [exception] ok 1334 - my $x; $x->[0] = 1; [ values @$x ] <+exists +delete +store> [return] ok 1335 - my $x; $x->[0] = 1; [ values @$x ] <+exists +delete +store> [variable] ok 1336 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] <+exists +delete +store> [exception] ok 1337 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] <+exists +delete +store> [return] ok 1338 - our $x; local $x; use strict; $x->[0] = 1; [ values @$x ] <+exists +delete +store> [variable] ok 1339 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] <+exists +delete +store> [exception] ok 1340 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] <+exists +delete +store> [return] ok 1341 - our $x; local $x; no strict; $x->[0] = 1; [ values @$x ] <+exists +delete +store> [variable] ok 1342 - my @x; $x[0] = 1; [ values @x ] <+exists +delete +store> [exception] ok 1343 - my @x; $x[0] = 1; [ values @x ] <+exists +delete +store> [return] ok 1344 - my @x; $x[0] = 1; [ values @x ] <+exists +delete +store> [variable] ok 1345 - our @x; local @x; use strict; $x[0] = 1; [ values @x ] <+exists +delete +store> [exception] ok 1346 - our @x; local @x; use strict; $x[0] = 1; [ values @x ] <+exists +delete +store> [return] ok 1347 - our @x; local @x; use strict; $x[0] = 1; [ values @x ] <+exists +delete +store> [variable] ok 1348 - our @x; local @x; no strict; $x[0] = 1; [ values @x ] <+exists +delete +store> [exception] ok 1349 - our @x; local @x; no strict; $x[0] = 1; [ values @x ] <+exists +delete +store> [return] ok 1350 - our @x; local @x; no strict; $x[0] = 1; [ values @x ] <+exists +delete +store> [variable] ok 1351 - my $x; values @{$x->[0]} [exception] ok 1352 - my $x; values @{$x->[0]} [return] ok 1353 - my $x; values @{$x->[0]} [variable] ok 1354 - our $x; local $x; use strict; values @{$x->[0]} [exception] ok 1355 - our $x; local $x; use strict; values @{$x->[0]} [return] ok 1356 - our $x; local $x; use strict; values @{$x->[0]} [variable] ok 1357 - our $x; local $x; no strict; values @{$x->[0]} [exception] ok 1358 - our $x; local $x; no strict; values @{$x->[0]} [return] ok 1359 - our $x; local $x; no strict; values @{$x->[0]} [variable] ok 1360 - my $x; values @{$$x[0]} [exception] ok 1361 - my $x; values @{$$x[0]} [return] ok 1362 - my $x; values @{$$x[0]} [variable] ok 1363 - our $x; local $x; use strict; values @{$$x[0]} [exception] ok 1364 - our $x; local $x; use strict; values @{$$x[0]} [return] ok 1365 - our $x; local $x; use strict; values @{$$x[0]} [variable] ok 1366 - our $x; local $x; no strict; values @{$$x[0]} [exception] ok 1367 - our $x; local $x; no strict; values @{$$x[0]} [return] ok 1368 - our $x; local $x; no strict; values @{$$x[0]} [variable] ok 1369 - my @x; values @{$x[0]} [exception] ok 1370 - my @x; values @{$x[0]} [return] ok 1371 - my @x; values @{$x[0]} [variable] ok 1372 - our @x; local @x; use strict; values @{$x[0]} [exception] ok 1373 - our @x; local @x; use strict; values @{$x[0]} [return] ok 1374 - our @x; local @x; use strict; values @{$x[0]} [variable] ok 1375 - our @x; local @x; no strict; values @{$x[0]} [exception] ok 1376 - our @x; local @x; no strict; values @{$x[0]} [return] ok 1377 - our @x; local @x; no strict; values @{$x[0]} [variable] ok 1378 - my $x; values @{$x->[0]} [exception] ok 1379 - my $x; values @{$x->[0]} [return] ok 1380 - my $x; values @{$x->[0]} [variable] ok 1381 - our $x; local $x; use strict; values @{$x->[0]} [exception] ok 1382 - our $x; local $x; use strict; values @{$x->[0]} [return] ok 1383 - our $x; local $x; use strict; values @{$x->[0]} [variable] ok 1384 - our $x; local $x; no strict; values @{$x->[0]} [exception] ok 1385 - our $x; local $x; no strict; values @{$x->[0]} [return] ok 1386 - our $x; local $x; no strict; values @{$x->[0]} [variable] ok 1387 - my $x; values @{$$x[0]} [exception] ok 1388 - my $x; values @{$$x[0]} [return] ok 1389 - my $x; values @{$$x[0]} [variable] ok 1390 - our $x; local $x; use strict; values @{$$x[0]} [exception] ok 1391 - our $x; local $x; use strict; values @{$$x[0]} [return] ok 1392 - our $x; local $x; use strict; values @{$$x[0]} [variable] ok 1393 - our $x; local $x; no strict; values @{$$x[0]} [exception] ok 1394 - our $x; local $x; no strict; values @{$$x[0]} [return] ok 1395 - our $x; local $x; no strict; values @{$$x[0]} [variable] ok 1396 - my @x; values @{$x[0]} [exception] ok 1397 - my @x; values @{$x[0]} [return] ok 1398 - my @x; values @{$x[0]} [variable] ok 1399 - our @x; local @x; use strict; values @{$x[0]} [exception] ok 1400 - our @x; local @x; use strict; values @{$x[0]} [return] ok 1401 - our @x; local @x; use strict; values @{$x[0]} [variable] ok 1402 - our @x; local @x; no strict; values @{$x[0]} [exception] ok 1403 - our @x; local @x; no strict; values @{$x[0]} [return] ok 1404 - our @x; local @x; no strict; values @{$x[0]} [variable] ok 1405 - my $x; values @{$x->[0]} <+fetch> [exception] ok 1406 - my $x; values @{$x->[0]} <+fetch> [return] ok 1407 - my $x; values @{$x->[0]} <+fetch> [variable] ok 1408 - our $x; local $x; use strict; values @{$x->[0]} <+fetch> [exception] ok 1409 - our $x; local $x; use strict; values @{$x->[0]} <+fetch> [return] ok 1410 - our $x; local $x; use strict; values @{$x->[0]} <+fetch> [variable] ok 1411 - our $x; local $x; no strict; values @{$x->[0]} <+fetch> [exception] ok 1412 - our $x; local $x; no strict; values @{$x->[0]} <+fetch> [return] ok 1413 - our $x; local $x; no strict; values @{$x->[0]} <+fetch> [variable] ok 1414 - my $x; values @{$$x[0]} <+fetch> [exception] ok 1415 - my $x; values @{$$x[0]} <+fetch> [return] ok 1416 - my $x; values @{$$x[0]} <+fetch> [variable] ok 1417 - our $x; local $x; use strict; values @{$$x[0]} <+fetch> [exception] ok 1418 - our $x; local $x; use strict; values @{$$x[0]} <+fetch> [return] ok 1419 - our $x; local $x; use strict; values @{$$x[0]} <+fetch> [variable] ok 1420 - our $x; local $x; no strict; values @{$$x[0]} <+fetch> [exception] ok 1421 - our $x; local $x; no strict; values @{$$x[0]} <+fetch> [return] ok 1422 - our $x; local $x; no strict; values @{$$x[0]} <+fetch> [variable] ok 1423 - my @x; values @{$x[0]} <+fetch> [exception] ok 1424 - my @x; values @{$x[0]} <+fetch> [return] ok 1425 - my @x; values @{$x[0]} <+fetch> [variable] ok 1426 - our @x; local @x; use strict; values @{$x[0]} <+fetch> [exception] ok 1427 - our @x; local @x; use strict; values @{$x[0]} <+fetch> [return] ok 1428 - our @x; local @x; use strict; values @{$x[0]} <+fetch> [variable] ok 1429 - our @x; local @x; no strict; values @{$x[0]} <+fetch> [exception] ok 1430 - our @x; local @x; no strict; values @{$x[0]} <+fetch> [return] ok 1431 - our @x; local @x; no strict; values @{$x[0]} <+fetch> [variable] ok 1432 - my $x; values @{$x->[0]} <+exists> [exception] ok 1433 - my $x; values @{$x->[0]} <+exists> [return] ok 1434 - my $x; values @{$x->[0]} <+exists> [variable] ok 1435 - our $x; local $x; use strict; values @{$x->[0]} <+exists> [exception] ok 1436 - our $x; local $x; use strict; values @{$x->[0]} <+exists> [return] ok 1437 - our $x; local $x; use strict; values @{$x->[0]} <+exists> [variable] ok 1438 - our $x; local $x; no strict; values @{$x->[0]} <+exists> [exception] ok 1439 - our $x; local $x; no strict; values @{$x->[0]} <+exists> [return] ok 1440 - our $x; local $x; no strict; values @{$x->[0]} <+exists> [variable] ok 1441 - my $x; values @{$$x[0]} <+exists> [exception] ok 1442 - my $x; values @{$$x[0]} <+exists> [return] ok 1443 - my $x; values @{$$x[0]} <+exists> [variable] ok 1444 - our $x; local $x; use strict; values @{$$x[0]} <+exists> [exception] ok 1445 - our $x; local $x; use strict; values @{$$x[0]} <+exists> [return] ok 1446 - our $x; local $x; use strict; values @{$$x[0]} <+exists> [variable] ok 1447 - our $x; local $x; no strict; values @{$$x[0]} <+exists> [exception] ok 1448 - our $x; local $x; no strict; values @{$$x[0]} <+exists> [return] ok 1449 - our $x; local $x; no strict; values @{$$x[0]} <+exists> [variable] ok 1450 - my @x; values @{$x[0]} <+exists> [exception] ok 1451 - my @x; values @{$x[0]} <+exists> [return] ok 1452 - my @x; values @{$x[0]} <+exists> [variable] ok 1453 - our @x; local @x; use strict; values @{$x[0]} <+exists> [exception] ok 1454 - our @x; local @x; use strict; values @{$x[0]} <+exists> [return] ok 1455 - our @x; local @x; use strict; values @{$x[0]} <+exists> [variable] ok 1456 - our @x; local @x; no strict; values @{$x[0]} <+exists> [exception] ok 1457 - our @x; local @x; no strict; values @{$x[0]} <+exists> [return] ok 1458 - our @x; local @x; no strict; values @{$x[0]} <+exists> [variable] ok 1459 - my $x; values @{$x->[0]} <+delete> [exception] ok 1460 - my $x; values @{$x->[0]} <+delete> [return] ok 1461 - my $x; values @{$x->[0]} <+delete> [variable] ok 1462 - our $x; local $x; use strict; values @{$x->[0]} <+delete> [exception] ok 1463 - our $x; local $x; use strict; values @{$x->[0]} <+delete> [return] ok 1464 - our $x; local $x; use strict; values @{$x->[0]} <+delete> [variable] ok 1465 - our $x; local $x; no strict; values @{$x->[0]} <+delete> [exception] ok 1466 - our $x; local $x; no strict; values @{$x->[0]} <+delete> [return] ok 1467 - our $x; local $x; no strict; values @{$x->[0]} <+delete> [variable] ok 1468 - my $x; values @{$$x[0]} <+delete> [exception] ok 1469 - my $x; values @{$$x[0]} <+delete> [return] ok 1470 - my $x; values @{$$x[0]} <+delete> [variable] ok 1471 - our $x; local $x; use strict; values @{$$x[0]} <+delete> [exception] ok 1472 - our $x; local $x; use strict; values @{$$x[0]} <+delete> [return] ok 1473 - our $x; local $x; use strict; values @{$$x[0]} <+delete> [variable] ok 1474 - our $x; local $x; no strict; values @{$$x[0]} <+delete> [exception] ok 1475 - our $x; local $x; no strict; values @{$$x[0]} <+delete> [return] ok 1476 - our $x; local $x; no strict; values @{$$x[0]} <+delete> [variable] ok 1477 - my @x; values @{$x[0]} <+delete> [exception] ok 1478 - my @x; values @{$x[0]} <+delete> [return] ok 1479 - my @x; values @{$x[0]} <+delete> [variable] ok 1480 - our @x; local @x; use strict; values @{$x[0]} <+delete> [exception] ok 1481 - our @x; local @x; use strict; values @{$x[0]} <+delete> [return] ok 1482 - our @x; local @x; use strict; values @{$x[0]} <+delete> [variable] ok 1483 - our @x; local @x; no strict; values @{$x[0]} <+delete> [exception] ok 1484 - our @x; local @x; no strict; values @{$x[0]} <+delete> [return] ok 1485 - our @x; local @x; no strict; values @{$x[0]} <+delete> [variable] ok 1486 - my $x; values @{$x->[0]} <+store> [exception] ok 1487 - my $x; values @{$x->[0]} <+store> [return] ok 1488 - my $x; values @{$x->[0]} <+store> [variable] ok 1489 - our $x; local $x; use strict; values @{$x->[0]} <+store> [exception] ok 1490 - our $x; local $x; use strict; values @{$x->[0]} <+store> [return] ok 1491 - our $x; local $x; use strict; values @{$x->[0]} <+store> [variable] ok 1492 - our $x; local $x; no strict; values @{$x->[0]} <+store> [exception] ok 1493 - our $x; local $x; no strict; values @{$x->[0]} <+store> [return] ok 1494 - our $x; local $x; no strict; values @{$x->[0]} <+store> [variable] ok 1495 - my $x; values @{$$x[0]} <+store> [exception] ok 1496 - my $x; values @{$$x[0]} <+store> [return] ok 1497 - my $x; values @{$$x[0]} <+store> [variable] ok 1498 - our $x; local $x; use strict; values @{$$x[0]} <+store> [exception] ok 1499 - our $x; local $x; use strict; values @{$$x[0]} <+store> [return] ok 1500 - our $x; local $x; use strict; values @{$$x[0]} <+store> [variable] ok 1501 - our $x; local $x; no strict; values @{$$x[0]} <+store> [exception] ok 1502 - our $x; local $x; no strict; values @{$$x[0]} <+store> [return] ok 1503 - our $x; local $x; no strict; values @{$$x[0]} <+store> [variable] ok 1504 - my @x; values @{$x[0]} <+store> [exception] ok 1505 - my @x; values @{$x[0]} <+store> [return] ok 1506 - my @x; values @{$x[0]} <+store> [variable] ok 1507 - our @x; local @x; use strict; values @{$x[0]} <+store> [exception] ok 1508 - our @x; local @x; use strict; values @{$x[0]} <+store> [return] ok 1509 - our @x; local @x; use strict; values @{$x[0]} <+store> [variable] ok 1510 - our @x; local @x; no strict; values @{$x[0]} <+store> [exception] ok 1511 - our @x; local @x; no strict; values @{$x[0]} <+store> [return] ok 1512 - our @x; local @x; no strict; values @{$x[0]} <+store> [variable] ok 1513 - my $x; values @{$x->[0]} <+strict +fetch> [exception] ok 1514 - my $x; values @{$x->[0]} <+strict +fetch> [return] ok 1515 - my $x; values @{$x->[0]} <+strict +fetch> [variable] ok 1516 - our $x; local $x; use strict; values @{$x->[0]} <+strict +fetch> [exception] ok 1517 - our $x; local $x; use strict; values @{$x->[0]} <+strict +fetch> [return] ok 1518 - our $x; local $x; use strict; values @{$x->[0]} <+strict +fetch> [variable] ok 1519 - our $x; local $x; no strict; values @{$x->[0]} <+strict +fetch> [exception] ok 1520 - our $x; local $x; no strict; values @{$x->[0]} <+strict +fetch> [return] ok 1521 - our $x; local $x; no strict; values @{$x->[0]} <+strict +fetch> [variable] ok 1522 - my $x; values @{$$x[0]} <+strict +fetch> [exception] ok 1523 - my $x; values @{$$x[0]} <+strict +fetch> [return] ok 1524 - my $x; values @{$$x[0]} <+strict +fetch> [variable] ok 1525 - our $x; local $x; use strict; values @{$$x[0]} <+strict +fetch> [exception] ok 1526 - our $x; local $x; use strict; values @{$$x[0]} <+strict +fetch> [return] ok 1527 - our $x; local $x; use strict; values @{$$x[0]} <+strict +fetch> [variable] ok 1528 - our $x; local $x; no strict; values @{$$x[0]} <+strict +fetch> [exception] ok 1529 - our $x; local $x; no strict; values @{$$x[0]} <+strict +fetch> [return] ok 1530 - our $x; local $x; no strict; values @{$$x[0]} <+strict +fetch> [variable] ok 1531 - my @x; 1 <+strict +fetch> [exception] ok 1532 - my @x; 1 <+strict +fetch> [return] ok 1533 - my @x; 1 <+strict +fetch> [variable] ok 1534 - our @x; local @x; use strict; 1 <+strict +fetch> [exception] ok 1535 - our @x; local @x; use strict; 1 <+strict +fetch> [return] ok 1536 - our @x; local @x; use strict; 1 <+strict +fetch> [variable] ok 1537 - our @x; local @x; no strict; 1 <+strict +fetch> [exception] ok 1538 - our @x; local @x; no strict; 1 <+strict +fetch> [return] ok 1539 - our @x; local @x; no strict; 1 <+strict +fetch> [variable] ok 1540 - my $x; values @{$x->[0]} <+strict +exists> [exception] ok 1541 - my $x; values @{$x->[0]} <+strict +exists> [return] ok 1542 - my $x; values @{$x->[0]} <+strict +exists> [variable] ok 1543 - our $x; local $x; use strict; values @{$x->[0]} <+strict +exists> [exception] ok 1544 - our $x; local $x; use strict; values @{$x->[0]} <+strict +exists> [return] ok 1545 - our $x; local $x; use strict; values @{$x->[0]} <+strict +exists> [variable] ok 1546 - our $x; local $x; no strict; values @{$x->[0]} <+strict +exists> [exception] ok 1547 - our $x; local $x; no strict; values @{$x->[0]} <+strict +exists> [return] ok 1548 - our $x; local $x; no strict; values @{$x->[0]} <+strict +exists> [variable] ok 1549 - my $x; values @{$$x[0]} <+strict +exists> [exception] ok 1550 - my $x; values @{$$x[0]} <+strict +exists> [return] ok 1551 - my $x; values @{$$x[0]} <+strict +exists> [variable] ok 1552 - our $x; local $x; use strict; values @{$$x[0]} <+strict +exists> [exception] ok 1553 - our $x; local $x; use strict; values @{$$x[0]} <+strict +exists> [return] ok 1554 - our $x; local $x; use strict; values @{$$x[0]} <+strict +exists> [variable] ok 1555 - our $x; local $x; no strict; values @{$$x[0]} <+strict +exists> [exception] ok 1556 - our $x; local $x; no strict; values @{$$x[0]} <+strict +exists> [return] ok 1557 - our $x; local $x; no strict; values @{$$x[0]} <+strict +exists> [variable] ok 1558 - my @x; values @{$x[0]} <+strict +exists> [exception] ok 1559 - my @x; values @{$x[0]} <+strict +exists> [return] ok 1560 - my @x; values @{$x[0]} <+strict +exists> [variable] ok 1561 - our @x; local @x; use strict; values @{$x[0]} <+strict +exists> [exception] ok 1562 - our @x; local @x; use strict; values @{$x[0]} <+strict +exists> [return] ok 1563 - our @x; local @x; use strict; values @{$x[0]} <+strict +exists> [variable] ok 1564 - our @x; local @x; no strict; values @{$x[0]} <+strict +exists> [exception] ok 1565 - our @x; local @x; no strict; values @{$x[0]} <+strict +exists> [return] ok 1566 - our @x; local @x; no strict; values @{$x[0]} <+strict +exists> [variable] ok 1567 - my $x; values @{$x->[0]} <+strict +delete> [exception] ok 1568 - my $x; values @{$x->[0]} <+strict +delete> [return] ok 1569 - my $x; values @{$x->[0]} <+strict +delete> [variable] ok 1570 - our $x; local $x; use strict; values @{$x->[0]} <+strict +delete> [exception] ok 1571 - our $x; local $x; use strict; values @{$x->[0]} <+strict +delete> [return] ok 1572 - our $x; local $x; use strict; values @{$x->[0]} <+strict +delete> [variable] ok 1573 - our $x; local $x; no strict; values @{$x->[0]} <+strict +delete> [exception] ok 1574 - our $x; local $x; no strict; values @{$x->[0]} <+strict +delete> [return] ok 1575 - our $x; local $x; no strict; values @{$x->[0]} <+strict +delete> [variable] ok 1576 - my $x; values @{$$x[0]} <+strict +delete> [exception] ok 1577 - my $x; values @{$$x[0]} <+strict +delete> [return] ok 1578 - my $x; values @{$$x[0]} <+strict +delete> [variable] ok 1579 - our $x; local $x; use strict; values @{$$x[0]} <+strict +delete> [exception] ok 1580 - our $x; local $x; use strict; values @{$$x[0]} <+strict +delete> [return] ok 1581 - our $x; local $x; use strict; values @{$$x[0]} <+strict +delete> [variable] ok 1582 - our $x; local $x; no strict; values @{$$x[0]} <+strict +delete> [exception] ok 1583 - our $x; local $x; no strict; values @{$$x[0]} <+strict +delete> [return] ok 1584 - our $x; local $x; no strict; values @{$$x[0]} <+strict +delete> [variable] ok 1585 - my @x; values @{$x[0]} <+strict +delete> [exception] ok 1586 - my @x; values @{$x[0]} <+strict +delete> [return] ok 1587 - my @x; values @{$x[0]} <+strict +delete> [variable] ok 1588 - our @x; local @x; use strict; values @{$x[0]} <+strict +delete> [exception] ok 1589 - our @x; local @x; use strict; values @{$x[0]} <+strict +delete> [return] ok 1590 - our @x; local @x; use strict; values @{$x[0]} <+strict +delete> [variable] ok 1591 - our @x; local @x; no strict; values @{$x[0]} <+strict +delete> [exception] ok 1592 - our @x; local @x; no strict; values @{$x[0]} <+strict +delete> [return] ok 1593 - our @x; local @x; no strict; values @{$x[0]} <+strict +delete> [variable] ok 1594 - my $x; values @{$x->[0]} <+strict +store> [exception] ok 1595 - my $x; values @{$x->[0]} <+strict +store> [return] ok 1596 - my $x; values @{$x->[0]} <+strict +store> [variable] ok 1597 - our $x; local $x; use strict; values @{$x->[0]} <+strict +store> [exception] ok 1598 - our $x; local $x; use strict; values @{$x->[0]} <+strict +store> [return] ok 1599 - our $x; local $x; use strict; values @{$x->[0]} <+strict +store> [variable] ok 1600 - our $x; local $x; no strict; values @{$x->[0]} <+strict +store> [exception] ok 1601 - our $x; local $x; no strict; values @{$x->[0]} <+strict +store> [return] ok 1602 - our $x; local $x; no strict; values @{$x->[0]} <+strict +store> [variable] ok 1603 - my $x; values @{$$x[0]} <+strict +store> [exception] ok 1604 - my $x; values @{$$x[0]} <+strict +store> [return] ok 1605 - my $x; values @{$$x[0]} <+strict +store> [variable] ok 1606 - our $x; local $x; use strict; values @{$$x[0]} <+strict +store> [exception] ok 1607 - our $x; local $x; use strict; values @{$$x[0]} <+strict +store> [return] ok 1608 - our $x; local $x; use strict; values @{$$x[0]} <+strict +store> [variable] ok 1609 - our $x; local $x; no strict; values @{$$x[0]} <+strict +store> [exception] ok 1610 - our $x; local $x; no strict; values @{$$x[0]} <+strict +store> [return] ok 1611 - our $x; local $x; no strict; values @{$$x[0]} <+strict +store> [variable] ok 1612 - my @x; values @{$x[0]} <+strict +store> [exception] ok 1613 - my @x; values @{$x[0]} <+strict +store> [return] ok 1614 - my @x; values @{$x[0]} <+strict +store> [variable] ok 1615 - our @x; local @x; use strict; values @{$x[0]} <+strict +store> [exception] ok 1616 - our @x; local @x; use strict; values @{$x[0]} <+strict +store> [return] ok 1617 - our @x; local @x; use strict; values @{$x[0]} <+strict +store> [variable] ok 1618 - our @x; local @x; no strict; values @{$x[0]} <+strict +store> [exception] ok 1619 - our @x; local @x; no strict; values @{$x[0]} <+strict +store> [return] ok 1620 - our @x; local @x; no strict; values @{$x[0]} <+strict +store> [variable] ok 1621 - my $x; [ values @{$x->[0]} ] [exception] ok 1622 - my $x; [ values @{$x->[0]} ] [return] ok 1623 - my $x; [ values @{$x->[0]} ] [variable] ok 1624 - our $x; local $x; use strict; [ values @{$x->[0]} ] [exception] ok 1625 - our $x; local $x; use strict; [ values @{$x->[0]} ] [return] ok 1626 - our $x; local $x; use strict; [ values @{$x->[0]} ] [variable] ok 1627 - our $x; local $x; no strict; [ values @{$x->[0]} ] [exception] ok 1628 - our $x; local $x; no strict; [ values @{$x->[0]} ] [return] ok 1629 - our $x; local $x; no strict; [ values @{$x->[0]} ] [variable] ok 1630 - my $x; [ values @{$$x[0]} ] [exception] ok 1631 - my $x; [ values @{$$x[0]} ] [return] ok 1632 - my $x; [ values @{$$x[0]} ] [variable] ok 1633 - our $x; local $x; use strict; [ values @{$$x[0]} ] [exception] ok 1634 - our $x; local $x; use strict; [ values @{$$x[0]} ] [return] ok 1635 - our $x; local $x; use strict; [ values @{$$x[0]} ] [variable] ok 1636 - our $x; local $x; no strict; [ values @{$$x[0]} ] [exception] ok 1637 - our $x; local $x; no strict; [ values @{$$x[0]} ] [return] ok 1638 - our $x; local $x; no strict; [ values @{$$x[0]} ] [variable] ok 1639 - my @x; [ values @{$x[0]} ] [exception] ok 1640 - my @x; [ values @{$x[0]} ] [return] ok 1641 - my @x; [ values @{$x[0]} ] [variable] ok 1642 - our @x; local @x; use strict; [ values @{$x[0]} ] [exception] ok 1643 - our @x; local @x; use strict; [ values @{$x[0]} ] [return] ok 1644 - our @x; local @x; use strict; [ values @{$x[0]} ] [variable] ok 1645 - our @x; local @x; no strict; [ values @{$x[0]} ] [exception] ok 1646 - our @x; local @x; no strict; [ values @{$x[0]} ] [return] ok 1647 - our @x; local @x; no strict; [ values @{$x[0]} ] [variable] ok 1648 - my $x; [ values @{$x->[0]} ] [exception] ok 1649 - my $x; [ values @{$x->[0]} ] [return] ok 1650 - my $x; [ values @{$x->[0]} ] [variable] ok 1651 - our $x; local $x; use strict; [ values @{$x->[0]} ] [exception] ok 1652 - our $x; local $x; use strict; [ values @{$x->[0]} ] [return] ok 1653 - our $x; local $x; use strict; [ values @{$x->[0]} ] [variable] ok 1654 - our $x; local $x; no strict; [ values @{$x->[0]} ] [exception] ok 1655 - our $x; local $x; no strict; [ values @{$x->[0]} ] [return] ok 1656 - our $x; local $x; no strict; [ values @{$x->[0]} ] [variable] ok 1657 - my $x; [ values @{$$x[0]} ] [exception] ok 1658 - my $x; [ values @{$$x[0]} ] [return] ok 1659 - my $x; [ values @{$$x[0]} ] [variable] ok 1660 - our $x; local $x; use strict; [ values @{$$x[0]} ] [exception] ok 1661 - our $x; local $x; use strict; [ values @{$$x[0]} ] [return] ok 1662 - our $x; local $x; use strict; [ values @{$$x[0]} ] [variable] ok 1663 - our $x; local $x; no strict; [ values @{$$x[0]} ] [exception] ok 1664 - our $x; local $x; no strict; [ values @{$$x[0]} ] [return] ok 1665 - our $x; local $x; no strict; [ values @{$$x[0]} ] [variable] ok 1666 - my @x; [ values @{$x[0]} ] [exception] ok 1667 - my @x; [ values @{$x[0]} ] [return] ok 1668 - my @x; [ values @{$x[0]} ] [variable] ok 1669 - our @x; local @x; use strict; [ values @{$x[0]} ] [exception] ok 1670 - our @x; local @x; use strict; [ values @{$x[0]} ] [return] ok 1671 - our @x; local @x; use strict; [ values @{$x[0]} ] [variable] ok 1672 - our @x; local @x; no strict; [ values @{$x[0]} ] [exception] ok 1673 - our @x; local @x; no strict; [ values @{$x[0]} ] [return] ok 1674 - our @x; local @x; no strict; [ values @{$x[0]} ] [variable] ok 1675 - my $x; [ values @{$x->[0]} ] <+fetch> [exception] ok 1676 - my $x; [ values @{$x->[0]} ] <+fetch> [return] ok 1677 - my $x; [ values @{$x->[0]} ] <+fetch> [variable] ok 1678 - our $x; local $x; use strict; [ values @{$x->[0]} ] <+fetch> [exception] ok 1679 - our $x; local $x; use strict; [ values @{$x->[0]} ] <+fetch> [return] ok 1680 - our $x; local $x; use strict; [ values @{$x->[0]} ] <+fetch> [variable] ok 1681 - our $x; local $x; no strict; [ values @{$x->[0]} ] <+fetch> [exception] ok 1682 - our $x; local $x; no strict; [ values @{$x->[0]} ] <+fetch> [return] ok 1683 - our $x; local $x; no strict; [ values @{$x->[0]} ] <+fetch> [variable] ok 1684 - my $x; [ values @{$$x[0]} ] <+fetch> [exception] ok 1685 - my $x; [ values @{$$x[0]} ] <+fetch> [return] ok 1686 - my $x; [ values @{$$x[0]} ] <+fetch> [variable] ok 1687 - our $x; local $x; use strict; [ values @{$$x[0]} ] <+fetch> [exception] ok 1688 - our $x; local $x; use strict; [ values @{$$x[0]} ] <+fetch> [return] ok 1689 - our $x; local $x; use strict; [ values @{$$x[0]} ] <+fetch> [variable] ok 1690 - our $x; local $x; no strict; [ values @{$$x[0]} ] <+fetch> [exception] ok 1691 - our $x; local $x; no strict; [ values @{$$x[0]} ] <+fetch> [return] ok 1692 - our $x; local $x; no strict; [ values @{$$x[0]} ] <+fetch> [variable] ok 1693 - my @x; [ values @{$x[0]} ] <+fetch> [exception] ok 1694 - my @x; [ values @{$x[0]} ] <+fetch> [return] ok 1695 - my @x; [ values @{$x[0]} ] <+fetch> [variable] ok 1696 - our @x; local @x; use strict; [ values @{$x[0]} ] <+fetch> [exception] ok 1697 - our @x; local @x; use strict; [ values @{$x[0]} ] <+fetch> [return] ok 1698 - our @x; local @x; use strict; [ values @{$x[0]} ] <+fetch> [variable] ok 1699 - our @x; local @x; no strict; [ values @{$x[0]} ] <+fetch> [exception] ok 1700 - our @x; local @x; no strict; [ values @{$x[0]} ] <+fetch> [return] ok 1701 - our @x; local @x; no strict; [ values @{$x[0]} ] <+fetch> [variable] ok 1702 - my $x; [ values @{$x->[0]} ] <+exists +delete +store> [exception] ok 1703 - my $x; [ values @{$x->[0]} ] <+exists +delete +store> [return] ok 1704 - my $x; [ values @{$x->[0]} ] <+exists +delete +store> [variable] ok 1705 - our $x; local $x; use strict; [ values @{$x->[0]} ] <+exists +delete +store> [exception] ok 1706 - our $x; local $x; use strict; [ values @{$x->[0]} ] <+exists +delete +store> [return] ok 1707 - our $x; local $x; use strict; [ values @{$x->[0]} ] <+exists +delete +store> [variable] ok 1708 - our $x; local $x; no strict; [ values @{$x->[0]} ] <+exists +delete +store> [exception] ok 1709 - our $x; local $x; no strict; [ values @{$x->[0]} ] <+exists +delete +store> [return] ok 1710 - our $x; local $x; no strict; [ values @{$x->[0]} ] <+exists +delete +store> [variable] ok 1711 - my $x; [ values @{$$x[0]} ] <+exists +delete +store> [exception] ok 1712 - my $x; [ values @{$$x[0]} ] <+exists +delete +store> [return] ok 1713 - my $x; [ values @{$$x[0]} ] <+exists +delete +store> [variable] ok 1714 - our $x; local $x; use strict; [ values @{$$x[0]} ] <+exists +delete +store> [exception] ok 1715 - our $x; local $x; use strict; [ values @{$$x[0]} ] <+exists +delete +store> [return] ok 1716 - our $x; local $x; use strict; [ values @{$$x[0]} ] <+exists +delete +store> [variable] ok 1717 - our $x; local $x; no strict; [ values @{$$x[0]} ] <+exists +delete +store> [exception] ok 1718 - our $x; local $x; no strict; [ values @{$$x[0]} ] <+exists +delete +store> [return] ok 1719 - our $x; local $x; no strict; [ values @{$$x[0]} ] <+exists +delete +store> [variable] ok 1720 - my @x; [ values @{$x[0]} ] <+exists +delete +store> [exception] ok 1721 - my @x; [ values @{$x[0]} ] <+exists +delete +store> [return] ok 1722 - my @x; [ values @{$x[0]} ] <+exists +delete +store> [variable] ok 1723 - our @x; local @x; use strict; [ values @{$x[0]} ] <+exists +delete +store> [exception] ok 1724 - our @x; local @x; use strict; [ values @{$x[0]} ] <+exists +delete +store> [return] ok 1725 - our @x; local @x; use strict; [ values @{$x[0]} ] <+exists +delete +store> [variable] ok 1726 - our @x; local @x; no strict; [ values @{$x[0]} ] <+exists +delete +store> [exception] ok 1727 - our @x; local @x; no strict; [ values @{$x[0]} ] <+exists +delete +store> [return] ok 1728 - our @x; local @x; no strict; [ values @{$x[0]} ] <+exists +delete +store> [variable] ok # Using Tie::StdArray 1.03 t/33-array-tied.t ......... 1..1 ok 1 - nested tied arrays ok t/34-array-numerous.t ..... 1..16 ok 1 - numerous fetches from an undef lexical ok 2 - numerous fetches from a 1-level arrayref lexical ok 3 - numerous fetches from an undef global ok 4 - numerous fetches from a 1-level arrayref global ok 5 - numerous slices from an undef lexical ok 6 - numerous slices from a 1-level arrayref lexical ok 7 - numerous slices from an undef global ok 8 - numerous slices from a 1-level arrayref global ok 9 - numerous exists from an undef lexical ok 10 - numerous exists from a 1-level arrayref lexical ok 11 - numerous exists from an undef global ok 12 - numerous exists from a 1-level arrayref global ok 13 - numerous deletes from an undef lexical ok 14 - numerous deletes from a 1-level arrayref lexical ok 15 - numerous deletes from an undef global ok 16 - numerous deletes from a 1-level arrayref global ok t/40-scope.t .............. 1..12 ok 1 - warned only once ok 2 - warning looks correct ok 3 - didn't vivified ok 4 - returned undef ok 5 - first require test doesn't croak prematurely ok 6 - first require vivified correctly ok 7 - second require test doesn't croak prematurely ok 8 - second require test didn't vivify ok 9 - RT \#50570 ok 10 - identifying requires by their eval context pointer is not enough ok 11 - vivified without eval ok 12 - vivified with eval ok t/41-padsv.t .............. 1..4 ok 1 - padsv 1: no error ok 2 - padsv 1: correct returned value ok 3 - padsv 2: no error ok 4 - padsv 2: correct returned value ok t/42-deparse.t ............ 1..2 ok 1 - Original blech() works ok 2 - Deparsed blech() works ok t/43-peep.t ............... 1..29 ok 1 - peephole optimization of conditionals compiled fine ok 2 - peephole optimization of conditionals : first branch did not autovivify ok 3 - peephole optimization of conditionals : first branch returned 1 ok 4 - peephole optimization of conditionals : second branch did not autovivify ok 5 - peephole optimization of conditionals : second branch returned 2 ok 6 - peephole optimization of conditionals : third branch did not autovivify ok 7 - peephole optimization of conditionals : third branch returned 3 ok 8 - peephole optimization of conditionals : fourth branch did not autovivify ok 9 - peephole optimization of conditionals : fourth branch returned 4 ok 10 - peephole optimization of conditionals : fifth branch did not autovivify ok 11 - peephole optimization of conditionals : fifth branch returned 5 ok 12 - peephole optimization of C-style loops compiled fine ok 13 - peephole optimization of C-style loops did not autovivify ok 14 - peephole optimization of C-style loops returned 0+1+2+3 ok 15 - peephole optimization of range loops compiled fine ok 16 - peephole optimization of range loops did not autovivify ok 17 - peephole optimization of range loops returned 0+1+2+3 ok 18 - peephole optimization of empty loops (RT \#64435) compiled fine ok 19 - peephole optimization of empty loops (RT \#64435) did not autovivify ok 20 - peephole optimization of empty loops (RT \#64435) returned 1 ok 21 - peephole optimization of map compiled fine ok 22 - peephole optimization of map did not autovivify ok 23 - peephole optimization of map returned the right value ok 24 - peephole optimization of grep compiled fine ok 25 - peephole optimization of grep did not autovivify ok 26 - peephole optimization of grep returned the right value ok 27 - peephole optimization of substitutions compiled fine ok 28 - peephole optimization of substitutions did not autovivify ok 29 - peephole optimization of substitutions returned the right value ok t/50-threads.t ............ skipped: perl 5.13.4 required to test thread safety t/51-threads-teardown.t ... skipped: perl 5.13.4 required to test thread safety t/91-pod.t ................ 1..1 ok 1 - POD test for blib/lib/autovivification.pm ok t/92-pod-coverage.t ....... 1..1 ok 1 - Pod coverage on autovivification ok t/95-portability-files.t .. 1..1 ok 1 - File names portability ok t/99-kwalitee.t ........... 1..13 ok 1 - extractable ok 2 - has_readme ok 3 - has_manifest ok 4 - has_meta_yml ok 5 - has_buildtool ok 6 - has_changelog ok 7 - no_symlinks ok 8 - has_tests ok 9 - proper_libs ok 10 - no_pod_errors ok 11 - use_strict ok 12 - has_test_pod ok 13 - has_test_pod_coverage ok All tests successful. Files=20, Tests=28016, 18 wallclock secs ( 8.17 usr 0.50 sys + 15.31 cusr 0.84 csys = 24.82 CPU) Result: PASS VPIT/autovivification-0.10.tar.gz make test TEST_VERBOSE=1 -- OK Vincent Pit <perl@profvince.com> Lexically disable autovivification. >>> (cd /export/home/fly1232/var/cpan/build/autovivification-0.10-o2QwNJ && tar cvf - autovivification-0.10.ppd blib) | gzip -c >/export/home/fly1232/var/REPO/V/VP/VPIT/autovivification-0.10.tar.gz autovivification-0.10.ppd blib/ blib/lib/ blib/lib/autovivification.pm blib/arch/ blib/arch/auto/ blib/arch/auto/autovivification/ blib/arch/auto/autovivification/autovivification.so blib/arch/auto/autovivification/autovivification.bs blib/man3/ blib/man3/autovivification.3 >>> mv /export/home/fly1232/var/cpan/build/autovivification-0.10-o2QwNJ/autovivification-0.10.ppd /export/home/fly1232/var/REPO/V/VP/VPIT Running test for module 'autobox::dump' Running make for C/CO/COWENS/autobox-dump-20090426.1746.tar.gz Prepending /export/home/fly1232/var/cpan/build/autovivification-0.10-o2QwNJ/blib/arch /export/home/fly1232/var/cpan/build/autovivification-0.10-o2QwNJ/blib/lib /export/home/fly1232/var/cpan/build/autobox-List-Util-20090629-GGdW7l/blib/arch /export/home/fly1232/var/cpan/build/autobox-List-Util-20090629-GGdW7l/blib/lib to PERL5LIB for 'get' Checksum for /net/nas/data/cpan/authors/id/C/CO/COWENS/autobox-dump-20090426.1746.tar.gz ok autobox-dump-20090426.1746/ autobox-dump-20090426.1746/Changes autobox-dump-20090426.1746/MANIFEST.SKIP autobox-dump-20090426.1746/Build.PL autobox-dump-20090426.1746/MANIFEST autobox-dump-20090426.1746/t/ autobox-dump-20090426.1746/t/02-arrays.t autobox-dump-20090426.1746/t/boilerplate.t autobox-dump-20090426.1746/t/00-load.t autobox-dump-20090426.1746/t/03-hashes.t autobox-dump-20090426.1746/t/01-scalars.t autobox-dump-20090426.1746/Makefile.PL autobox-dump-20090426.1746/lib/ autobox-dump-20090426.1746/lib/autobox/ autobox-dump-20090426.1746/lib/autobox/dump.pm autobox-dump-20090426.1746/README autobox-dump-20090426.1746/META.yml Prepending /export/home/fly1232/var/cpan/build/autovivification-0.10-o2QwNJ/blib/arch /export/home/fly1232/var/cpan/build/autovivification-0.10-o2QwNJ/blib/lib /export/home/fly1232/var/cpan/build/autobox-List-Util-20090629-GGdW7l/blib/arch /export/home/fly1232/var/cpan/build/autobox-List-Util-20090629-GGdW7l/blib/lib to PERL5LIB for 'make' CPAN.pm: Going to build C/CO/COWENS/autobox-dump-20090426.1746.tar.gz >>> /export/home/fly1232/bin/perl Makefile.PL Checking if your kit is complete... Looks good Version::Requirements is deprecated; replace with CPAN::Meta::Requirements at /export/home/fly1232/var/megalib/Version/Requirements.pm line 17. require Version/Requirements.pm called at /export/home/fly1232/var/megalib/CPAN/Meta/Prereqs.pm line 10 CPAN::Meta::Prereqs::BEGIN() called at /export/home/fly1232/var/megalib/Version/Requirements.pm line 0 eval {...} called at /export/home/fly1232/var/megalib/Version/Requirements.pm line 0 require CPAN/Meta/Prereqs.pm called at /export/home/fly1232/var/megalib/CPAN/Meta/Feature.pm line 7 CPAN::Meta::Feature::BEGIN() called at /export/home/fly1232/var/megalib/Version/Requirements.pm line 0 eval {...} called at /export/home/fly1232/var/megalib/Version/Requirements.pm line 0 require CPAN/Meta/Feature.pm called at /export/home/fly1232/var/megalib/CPAN/Meta.pm line 9 CPAN::Meta::BEGIN() called at /export/home/fly1232/var/megalib/Version/Requirements.pm line 0 eval {...} called at /export/home/fly1232/var/megalib/Version/Requirements.pm line 0 require CPAN/Meta.pm called at /export/home/fly1232/var/megalib/ExtUtils/MM_Any.pm line 733 eval {...} called at /export/home/fly1232/var/megalib/ExtUtils/MM_Any.pm line 732 ExtUtils::MM_Any::_has_cpan_meta() called at /export/home/fly1232/var/megalib/ExtUtils/MM_Any.pm line 753 ExtUtils::MM_Any::metafile_target('PACK001=HASH(0x2e3b80)') called at /export/home/fly1232/var/megalib/ExtUtils/MakeMaker.pm line 690 ExtUtils::MakeMaker::new('MM', 'PACK001=HASH(0x2e3b80)') called at /export/home/fly1232/var/megalib/ExtUtils/MakeMaker.pm line 60 ExtUtils::MakeMaker::WriteMakefile('NAME', 'autobox::dump', 'VERSION_FROM', 'lib/autobox/dump.pm', 'PREREQ_PM', 'HASH(0x17cec8)', 'INSTALLDIRS', 'site', 'EXE_FILES', ...) called at Makefile.PL line 3 Writing Makefile for autobox::dump Writing MYMETA.yml and MYMETA.json >>> make cp lib/autobox/dump.pm blib/lib/autobox/dump.pm Manifying blib/man3/autobox::dump.3 COWENS/autobox-dump-20090426.1746.tar.gz make -- OK Prepending /export/home/fly1232/var/cpan/build/autovivification-0.10-o2QwNJ/blib/arch /export/home/fly1232/var/cpan/build/autovivification-0.10-o2QwNJ/blib/lib /export/home/fly1232/var/cpan/build/autobox-List-Util-20090629-GGdW7l/blib/arch /export/home/fly1232/var/cpan/build/autobox-List-Util-20090629-GGdW7l/blib/lib to PERL5LIB for 'test' Running make test >>> make test TEST_VERBOSE=1 PERL_DL_NONLAZY=1 /export/home/fly1232/bin/perl "-MExtUtils::Command::MM" "-e" "test_harness(1, 'blib/lib', 'blib/arch')" t/*.t # Testing autobox::dump 20090426.1746, Perl 5.012004, /export/home/fly1232/bin/perl t/00-load.t ...... 1..1 ok 1 - use autobox::dump; ok t/01-scalars.t ... 1..11 ok 1 ok 2 ok 3 ok 4 ok 5 ok 6 ok 7 ok 8 ok 9 ok 10 ok 11 ok t/02-arrays.t .... 1..8 ok 1 ok 2 ok 3 ok 4 ok 5 ok 6 ok 7 - autobox::dump->can('options') ok 8 ok t/03-hashes.t .... 1..3 ok 1 ok 2 ok 3 ok t/boilerplate.t .. 1..3 ok 1 - README contains no boilerplate text ok 2 - Changes contains no boilerplate text ok 3 - lib/autobox/dump.pm contains no boilerplate text ok All tests successful. Files=5, Tests=26, 1 wallclock secs ( 0.11 usr 0.03 sys + 0.64 cusr 0.14 csys = 0.92 CPU) Result: PASS COWENS/autobox-dump-20090426.1746.tar.gz make test TEST_VERBOSE=1 -- OK Chas. J. Owens IV <chas.owens@gmail.com> human/perl readable strings from the results of an EXPR >>> (cd /export/home/fly1232/var/cpan/build/autobox-dump-20090426.1746-eDvQOY && tar cvf - autobox-dump-20090426.1746.ppd blib) | gzip -c >/export/home/fly1232/var/REPO/C/CO/COWENS/autobox-dump-20090426.1746.tar.gz autobox-dump-20090426.1746.ppd blib/ blib/lib/ blib/lib/autobox/ blib/lib/autobox/dump.pm blib/man3/ blib/man3/autobox::dump.3 >>> mv /export/home/fly1232/var/cpan/build/autobox-dump-20090426.1746-eDvQOY/autobox-dump-20090426.1746.ppd /export/home/fly1232/var/REPO/C/CO/COWENS Running test for module 'autobox::Core' Running make for M/MS/MSCHWERN/autobox-Core-1.21.tar.gz Prepending /export/home/fly1232/var/cpan/build/autobox-dump-20090426.1746-eDvQOY/blib/arch /export/home/fly1232/var/cpan/build/autobox-dump-20090426.1746-eDvQOY/blib/lib /export/home/fly1232/var/cpan/build/autovivification-0.10-o2QwNJ/blib/arch /export/home/fly1232/var/cpan/build/autovivification-0.10-o2QwNJ/blib/lib /export/home/fly1232/var/cpan/build/autobox-List-Util-20090629-GGdW7l/blib/arch /export/home/fly1232/var/cpan/build/autobox-List-Util-20090629-GGdW7l/blib/lib to PERL5LIB for 'get' Checksum for /net/nas/data/cpan/authors/id/M/MS/MSCHWERN/autobox-Core-1.21.tar.gz ok autobox-Core-1.21/ autobox-Core-1.21/Changes autobox-Core-1.21/lib/ autobox-Core-1.21/lib/autobox/ autobox-Core-1.21/lib/autobox/Core.pm autobox-Core-1.21/Makefile.PL autobox-Core-1.21/MANIFEST autobox-Core-1.21/MANIFEST.SKIP autobox-Core-1.21/META.json autobox-Core-1.21/META.yml autobox-Core-1.21/README autobox-Core-1.21/SIGNATURE autobox-Core-1.21/t/ autobox-Core-1.21/t/added.t autobox-Core-1.21/t/array-slice.t autobox-Core-1.21/t/bless.t autobox-Core-1.21/t/center.t autobox-Core-1.21/t/chomp.t autobox-Core-1.21/t/chop.t autobox-Core-1.21/t/chr.t autobox-Core-1.21/t/concat.t autobox-Core-1.21/t/crypt.t autobox-Core-1.21/t/curry.t autobox-Core-1.21/t/each.t autobox-Core-1.21/t/elements.t autobox-Core-1.21/t/elems.t autobox-Core-1.21/t/first_index.t autobox-Core-1.21/t/flatten.t autobox-Core-1.21/t/flip.t autobox-Core-1.21/t/for.t autobox-Core-1.21/t/foreach.t autobox-Core-1.21/t/grep.t autobox-Core-1.21/t/head.t autobox-Core-1.21/t/index.t autobox-Core-1.21/t/join.t autobox-Core-1.21/t/keys.t autobox-Core-1.21/t/last_index.t autobox-Core-1.21/t/lc.t autobox-Core-1.21/t/lcfirst.t autobox-Core-1.21/t/length.t autobox-Core-1.21/t/m.t autobox-Core-1.21/t/map.t autobox-Core-1.21/t/nm.t autobox-Core-1.21/t/number.t autobox-Core-1.21/t/numeric.t autobox-Core-1.21/t/ord.t autobox-Core-1.21/t/pack.t autobox-Core-1.21/t/pop.t autobox-Core-1.21/t/print.t autobox-Core-1.21/t/push.t autobox-Core-1.21/t/quotemeta.t autobox-Core-1.21/t/range.t autobox-Core-1.21/t/ref.t autobox-Core-1.21/t/reverse.t autobox-Core-1.21/t/rindex.t autobox-Core-1.21/t/s.t autobox-Core-1.21/t/say.t autobox-Core-1.21/t/scalar.t autobox-Core-1.21/t/shift.t autobox-Core-1.21/t/size.t autobox-Core-1.21/t/slice.t autobox-Core-1.21/t/sort.t autobox-Core-1.21/t/split.t autobox-Core-1.21/t/sprintf.t autobox-Core-1.21/t/strip.t autobox-Core-1.21/t/substr.t autobox-Core-1.21/t/system.t autobox-Core-1.21/t/tail.t autobox-Core-1.21/t/uc.t autobox-Core-1.21/t/ucfirst.t autobox-Core-1.21/t/undef.t autobox-Core-1.21/t/unpack.t autobox-Core-1.21/t/unshift.t autobox-Core-1.21/t/values.t autobox-Core-1.21/t/vec.t Prepending /export/home/fly1232/var/cpan/build/autobox-dump-20090426.1746-eDvQOY/blib/arch /export/home/fly1232/var/cpan/build/autobox-dump-20090426.1746-eDvQOY/blib/lib /export/home/fly1232/var/cpan/build/autovivification-0.10-o2QwNJ/blib/arch /export/home/fly1232/var/cpan/build/autovivification-0.10-o2QwNJ/blib/lib /export/home/fly1232/var/cpan/build/autobox-List-Util-20090629-GGdW7l/blib/arch /export/home/fly1232/var/cpan/build/autobox-List-Util-20090629-GGdW7l/blib/lib to PERL5LIB for 'make' CPAN.pm: Going to build M/MS/MSCHWERN/autobox-Core-1.21.tar.gz >>> /export/home/fly1232/bin/perl Makefile.PL Checking if your kit is complete... Looks good Version::Requirements is deprecated; replace with CPAN::Meta::Requirements at /export/home/fly1232/var/megalib/Version/Requirements.pm line 17. require Version/Requirements.pm called at /export/home/fly1232/var/megalib/CPAN/Meta/Prereqs.pm line 10 CPAN::Meta::Prereqs::BEGIN() called at /export/home/fly1232/var/megalib/Version/Requirements.pm line 0 eval {...} called at /export/home/fly1232/var/megalib/Version/Requirements.pm line 0 require CPAN/Meta/Prereqs.pm called at /export/home/fly1232/var/megalib/CPAN/Meta/Feature.pm line 7 CPAN::Meta::Feature::BEGIN() called at /export/home/fly1232/var/megalib/Version/Requirements.pm line 0 eval {...} called at /export/home/fly1232/var/megalib/Version/Requirements.pm line 0 require CPAN/Meta/Feature.pm called at /export/home/fly1232/var/megalib/CPAN/Meta.pm line 9 CPAN::Meta::BEGIN() called at /export/home/fly1232/var/megalib/Version/Requirements.pm line 0 eval {...} called at /export/home/fly1232/var/megalib/Version/Requirements.pm line 0 require CPAN/Meta.pm called at /export/home/fly1232/var/megalib/ExtUtils/MM_Any.pm line 733 eval {...} called at /export/home/fly1232/var/megalib/ExtUtils/MM_Any.pm line 732 ExtUtils::MM_Any::_has_cpan_meta() called at /export/home/fly1232/var/megalib/ExtUtils/MM_Any.pm line 753 ExtUtils::MM_Any::metafile_target('PACK001=HASH(0x2e3f58)') called at /export/home/fly1232/var/megalib/ExtUtils/MakeMaker.pm line 690 ExtUtils::MakeMaker::new('MM', 'PACK001=HASH(0x2e3f58)') called at /export/home/fly1232/var/megalib/ExtUtils/MakeMaker.pm line 60 ExtUtils::MakeMaker::WriteMakefile('NAME', 'autobox::Core', 'VERSION_FROM', 'lib/autobox/Core.pm', 'PREREQ_PM', 'HASH(0x17cec8)', 'ABSTRACT_FROM', 'lib/autobox/Core.pm', 'AUTHOR', ...) called at Makefile.PL line 5 Writing Makefile for autobox::Core Writing MYMETA.yml and MYMETA.json >>> make cp lib/autobox/Core.pm blib/lib/autobox/Core.pm Manifying blib/man3/autobox::Core.3 MSCHWERN/autobox-Core-1.21.tar.gz make -- OK Prepending /export/home/fly1232/var/cpan/build/autobox-dump-20090426.1746-eDvQOY/blib/arch /export/home/fly1232/var/cpan/build/autobox-dump-20090426.1746-eDvQOY/blib/lib /export/home/fly1232/var/cpan/build/autovivification-0.10-o2QwNJ/blib/arch /export/home/fly1232/var/cpan/build/autovivification-0.10-o2QwNJ/blib/lib /export/home/fly1232/var/cpan/build/autobox-List-Util-20090629-GGdW7l/blib/arch /export/home/fly1232/var/cpan/build/autobox-List-Util-20090629-GGdW7l/blib/lib to PERL5LIB for 'test' Running make test >>> make test TEST_VERBOSE=1 PERL_DL_NONLAZY=1 /export/home/fly1232/bin/perl "-MExtUtils::Command::MM" "-e" "test_harness(1, 'blib/lib', 'blib/arch')" t/*.t t/added.t ........ 1..73 ok 1 ok 2 ok 3 ok 4 ok 5 ok 6 ok 7 ok 8 ok 9 ok 10 ok 11 ok 12 ok 13 ok 14 ok 15 ok 16 ok 17 ok 18 ok 19 ok 20 ok 21 ok 22 ok 23 ok 24 ok 25 ok 26 ok 27 ok 28 ok 29 ok 30 ok 31 ok 32 ok 33 ok 34 ok 35 ok 36 ok 37 ok 38 ok 39 ok 40 ok 41 ok 42 ok 43 ok 44 ok 45 ok 46 ok 47 ok 48 ok 49 ok 50 ok 51 ok 52 ok 53 ok 54 ok 55 - flattening gets us all the contents ok 56 ok 57 ok 58 ok 59 ok 60 ok 61 ok 62 ok 63 ok 64 ok 65 ok 66 ok 67 ok 68 ok 69 ok 70 ok 71 ok 72 ok 73 ok t/array-slice.t .. 1..5 ok 1 ok 2 ok 3 ok 4 - Returns an array in list context ok 5 - Returns an arrayref in scalar context ok t/bless.t ........ ok 1 ok 2 ok 3 not ok 4 # TODO & SKIP Make it work for Regexp, Scalar and Glob not ok 5 # TODO & SKIP Make it work for Regexp, Scalar and Glob not ok 6 # TODO & SKIP Make it work for Regexp, Scalar and Glob 1..6 ok t/center.t ....... 1..25 ok 1 - ->center() with even length has equal whitespace on both sides ok 2 - ->center() with even length has equal whitespace on both sides ok 3 - ->center() with odd length pads left ok 4 - ->center() with too-short length returns the string unmodified ok 5 - ->center(0) ok 6 - ->center(-1) ok 7 - ->center(6, "-") ok 8 - ->center(7, "-") ok 9 - ->center(0, "-") ok 10 - center(5) returns that size ok 11 - center(6) returns that size ok 12 - center(7) returns that size ok 13 - center(8) returns that size ok 14 - center(9) returns that size ok 15 - center(10) returns that size ok 16 - center(11) returns that size ok 17 - center(12) returns that size ok 18 - center(13) returns that size ok 19 - center(14) returns that size ok 20 - center(15) returns that size ok 21 - center(16) returns that size ok 22 - center(17) returns that size ok 23 - center(18) returns that size ok 24 - center(19) returns that size ok 25 - center(20) returns that size ok t/chomp.t ........ ok 1 1..1 ok t/chop.t ......... ok 1 - Chop modifies the string ok 2 - ... and returns the last character not ok 3 # TODO & SKIP Chop should work on lists too not ok 4 # TODO & SKIP Chop should work on lists too 1..4 ok t/chr.t .......... ok 1 1..1 ok t/concat.t ....... ok 1 1..1 ok t/crypt.t ........ ok 1 1..1 ok t/curry.t ........ ok 1 ok 2 1..2 ok t/each.t ......... ok 1 ok 2 1..2 ok t/elements.t ..... ok 1 ok 2 1..2 ok t/elems.t ........ ok 1 1..1 ok t/first_index.t .. 1..3 ok 1 ok 2 ok 3 ok t/flatten.t ...... ok 1 ok 2 1..2 ok t/flip.t ......... 1..2 ok 1 ok 2 - Returns hash in list context ok t/for.t .......... ok 1 1..1 ok t/foreach.t ...... ok 1 1..1 ok t/grep.t ......... ok 1 - Expected coderef grep results ok 2 - Returns arrayref in scalar context ok 3 - Should accept code refs ok 4 - Should accept Regexps ok 5 - Works with SCALAR ok 6 - Works with SCALAR ok 7 - Works with Regexp ok 8 - ... as with Code refs ok 9 - Returns an array in list context ok 10 ok 11 - Works with HASH ok 12 - Works with ARRAY ok 13 - Works with ARRAY 1..13 ok t/head.t ......... 1..2 ok 1 ok 2 ok t/index.t ........ ok 1 ok 2 1..2 ok t/join.t ......... ok 1 ok 2 1..2 ok t/keys.t ......... ok 1 ok 2 - Returns arrayref in scalar context 1..2 ok t/last_index.t ... 1..3 ok 1 ok 2 ok 3 ok t/lc.t ........... ok 1 1..1 ok t/lcfirst.t ...... ok 1 1..1 ok t/length.t ....... ok 1 ok 2 1..2 ok t/m.t ............ ok 1 1..1 ok t/map.t .......... ok 1 ok 2 - Returns arrayref in scalar context ok 3 ok 4 - Returns arrayref in scalar context 1..4 ok t/nm.t ........... ok 1 1..1 ok t/number.t ....... 1..49 ok 1 ok 2 ok 3 ok 4 ok 5 ok 6 ok 7 ok 8 ok 9 ok 10 ok 11 ok 12 ok 13 ok 14 - zero is not negative ok 15 - zero is not positive ok 16 ok 17 ok 18 ok 19 ok 20 ok 21 ok 22 ok 23 ok 24 ok 25 ok 26 not ok 27 # TODO hex is weird # Failed (TODO) test at t/number.t line 54. # got: '597' # expected: 'FF' not ok 28 # TODO hex is weird # Failed (TODO) test at t/number.t line 55. # got: '-1' # expected: '255' not ok 29 # TODO hex is weird # Failed (TODO) test at t/number.t line 56. # got: '254' # expected: '255' not ok 30 # TODO & SKIP Make number methods work on non-scalar refs not ok 31 # TODO & SKIP Make number methods work on non-scalar refs not ok 32 # TODO & SKIP Make number methods work on non-scalar refs not ok 33 # TODO & SKIP Make number methods work on non-scalar refs not ok 34 # TODO & SKIP Make number methods work on non-scalar refs not ok 35 # TODO & SKIP Make number methods work on non-scalar refs not ok 36 # TODO & SKIP Make number methods work on non-scalar refs not ok 37 # TODO & SKIP Make number methods work on non-scalar refs not ok 38 # TODO & SKIP Make number methods work on non-scalar refs not ok 39 # TODO & SKIP Make number methods work on non-scalar refs not ok 40 # TODO & SKIP Make number methods work on non-scalar refs not ok 41 # TODO & SKIP Make number methods work on non-scalar refs not ok 42 # TODO & SKIP Make number methods work on non-scalar refs not ok 43 # TODO & SKIP Make number methods work on non-scalar refs not ok 44 # TODO & SKIP Make number methods work on non-scalar refs not ok 45 # TODO & SKIP Make number methods work on non-scalar refs not ok 46 # TODO & SKIP Make number methods work on non-scalar refs not ok 47 # TODO & SKIP Make number methods work on non-scalar refs not ok 48 # TODO & SKIP Make number methods work on non-scalar refs not ok 49 # TODO & SKIP Make number methods work on non-scalar refs ok t/numeric.t ...... ok 1 ok 2 ok 3 ok 4 ok 5 ok 6 ok 7 ok 8 ok 9 ok 10 ok 11 1..11 ok t/ord.t .......... ok 1 1..1 ok t/pack.t ......... ok 1 ok 2 ok 3 1..3 ok t/pop.t .......... ok 1 ok 2 1..2 ok t/print.t ........ ok 1 ok 2 ok 3 1..3 ok t/push.t ......... ok 1 ok 2 ok 3 - Returns arrayref in scalar context ok 4 1..4 ok t/quotemeta.t .... ok 1 1..1 ok t/range.t ........ 1..4 ok 1 ok 2 ok 3 - Returns an array in list context ok 4 - Returns an arrayref in scalar context ok t/ref.t .......... ok 1 ok 2 ok 3 not ok 4 # TODO & SKIP Make it work for Regexp, Scalar and Glob not ok 5 # TODO & SKIP Make it work for Regexp, Scalar and Glob not ok 6 # TODO & SKIP Make it work for Regexp, Scalar and Glob 1..6 ok t/reverse.t ...... ok 1 - reverse in list context reverses the scalar ok 2 - reverse in scalar context reverses the scalar ok 3 ok 4 ok 5 - returns an arrayref in scalar context 1..5 ok t/rindex.t ....... ok 1 ok 2 1..2 ok t/s.t ............ ok 1 1..1 ok t/say.t .......... ok 1 ok 2 ok 3 1..3 ok t/scalar.t ....... ok 1 ok 2 ok 3 ok 4 ok 5 ok 6 ok 7 ok 8 ok 9 ok 10 ok 11 ok 12 ok 13 ok 14 ok 15 ok 16 ok 17 1..17 ok t/shift.t ........ ok 1 ok 2 1..2 ok t/size.t ......... ok 1 1..1 ok t/slice.t ........ ok 1 ok 2 ok 3 ok 4 1..4 ok t/sort.t ......... ok 1 ok 2 ok 3 - Returns an arrayref in scalar context 1..3 ok t/split.t ........ ok 1 ok 2 - Returns arrayref in scalar context 1..2 ok t/sprintf.t ...... ok 1 1..1 ok t/strip.t ........ ok 1 1..1 ok t/substr.t ....... ok 1 ok 2 ok 3 ok 4 ok 5 1..5 ok t/system.t ....... ok 1 1..1 ok t/tail.t ......... 1..7 ok 1 ok 2 ok 3 ok 4 ok 5 ok 6 - Returns a list in list context ok 7 - Returns an arrayref in scalar context ok t/uc.t ........... ok 1 1..1 ok t/ucfirst.t ...... ok 1 1..1 ok t/undef.t ........ ok 1 ok 2 ok 3 1..3 ok t/unpack.t ....... ok 1 1..1 ok t/unshift.t ...... ok 1 ok 2 ok 3 - Returns arrayref in scalar context ok 4 1..4 ok t/values.t ....... ok 1 ok 2 - Returns arrayref in scalar context 1..2 ok t/vec.t .......... ok 1 ok 2 ok 3 1..3 ok All tests successful. Files=62, Tests=321, 13 wallclock secs ( 0.71 usr 0.36 sys + 11.56 cusr 1.59 csys = 14.22 CPU) Result: PASS MSCHWERN/autobox-Core-1.21.tar.gz make test TEST_VERBOSE=1 -- OK Michael G Schwern <mschwern@cpan.org> Core functions exposed as methods in primitive types >>> (cd /export/home/fly1232/var/cpan/build/autobox-Core-1.21-s991Qw && tar cvf - autobox-Core-1.21.ppd blib) | gzip -c >/export/home/fly1232/var/REPO/M/MS/MSCHWERN/autobox-Core-1.21.tar.gz autobox-Core-1.21.ppd blib/ blib/lib/ blib/lib/autobox/ blib/lib/autobox/Core.pm blib/man3/ blib/man3/autobox::Core.3 >>> mv /export/home/fly1232/var/cpan/build/autobox-Core-1.21-s991Qw/autobox-Core-1.21.ppd /export/home/fly1232/var/REPO/M/MS/MSCHWERN Running test for module 'CLASS' Running make for M/MS/MSCHWERN/CLASS-1.00.tar.gz Prepending /export/home/fly1232/var/cpan/build/autobox-Core-1.21-s991Qw/blib/arch /export/home/fly1232/var/cpan/build/autobox-Core-1.21-s991Qw/blib/lib /export/home/fly1232/var/cpan/build/autobox-dump-20090426.1746-eDvQOY/blib/arch /export/home/fly1232/var/cpan/build/autobox-dump-20090426.1746-eDvQOY/blib/lib /export/home/fly1232/var/cpan/build/autovivification-0.10-o2QwNJ/blib/arch /export/home/fly1232/var/cpan/build/autovivification-0.10-o2QwNJ/blib/lib /export/home/fly1232/var/cpan/build/autobox-List-Util-20090629-GGdW7l/blib/arch /export/home/fly1232/var/cpan/build/autobox-List-Util-20090629-GGdW7l/blib/lib to PERL5LIB for 'get' Checksum for /net/nas/data/cpan/authors/id/M/MS/MSCHWERN/CLASS-1.00.tar.gz ok CLASS-1.00/ CLASS-1.00/Changes CLASS-1.00/lib/ CLASS-1.00/lib/CLASS.pm CLASS-1.00/Makefile.PL CLASS-1.00/MANIFEST CLASS-1.00/META.yml CLASS-1.00/SIGNATURE CLASS-1.00/t/ CLASS-1.00/t/CLASS.t Prepending /export/home/fly1232/var/cpan/build/autobox-Core-1.21-s991Qw/blib/arch /export/home/fly1232/var/cpan/build/autobox-Core-1.21-s991Qw/blib/lib /export/home/fly1232/var/cpan/build/autobox-dump-20090426.1746-eDvQOY/blib/arch /export/home/fly1232/var/cpan/build/autobox-dump-20090426.1746-eDvQOY/blib/lib /export/home/fly1232/var/cpan/build/autovivification-0.10-o2QwNJ/blib/arch /export/home/fly1232/var/cpan/build/autovivification-0.10-o2QwNJ/blib/lib /export/home/fly1232/var/cpan/build/autobox-List-Util-20090629-GGdW7l/blib/arch /export/home/fly1232/var/cpan/build/autobox-List-Util-20090629-GGdW7l/blib/lib to PERL5LIB for 'make' CPAN.pm: Going to build M/MS/MSCHWERN/CLASS-1.00.tar.gz >>> /export/home/fly1232/bin/perl Makefile.PL Checking if your kit is complete... Looks good Version::Requirements is deprecated; replace with CPAN::Meta::Requirements at /export/home/fly1232/var/megalib/Version/Requirements.pm line 17. require Version/Requirements.pm called at /export/home/fly1232/var/megalib/CPAN/Meta/Prereqs.pm line 10 CPAN::Meta::Prereqs::BEGIN() called at /export/home/fly1232/var/megalib/Version/Requirements.pm line 0 eval {...} called at /export/home/fly1232/var/megalib/Version/Requirements.pm line 0 require CPAN/Meta/Prereqs.pm called at /export/home/fly1232/var/megalib/CPAN/Meta/Feature.pm line 7 CPAN::Meta::Feature::BEGIN() called at /export/home/fly1232/var/megalib/Version/Requirements.pm line 0 eval {...} called at /export/home/fly1232/var/megalib/Version/Requirements.pm line 0 require CPAN/Meta/Feature.pm called at /export/home/fly1232/var/megalib/CPAN/Meta.pm line 9 CPAN::Meta::BEGIN() called at /export/home/fly1232/var/megalib/Version/Requirements.pm line 0 eval {...} called at /export/home/fly1232/var/megalib/Version/Requirements.pm line 0 require CPAN/Meta.pm called at /export/home/fly1232/var/megalib/ExtUtils/MM_Any.pm line 733 eval {...} called at /export/home/fly1232/var/megalib/ExtUtils/MM_Any.pm line 732 ExtUtils::MM_Any::_has_cpan_meta() called at /export/home/fly1232/var/megalib/ExtUtils/MM_Any.pm line 753 ExtUtils::MM_Any::metafile_target('PACK001=HASH(0x2e3928)') called at /export/home/fly1232/var/megalib/ExtUtils/MakeMaker.pm line 690 ExtUtils::MakeMaker::new('MM', 'PACK001=HASH(0x2e3928)') called at /export/home/fly1232/var/megalib/ExtUtils/MakeMaker.pm line 60 ExtUtils::MakeMaker::WriteMakefile('NAME', 'CLASS', 'VERSION_FROM', 'lib/CLASS.pm', 'ABSTRACT_FROM', 'lib/CLASS.pm', 'PREREQ_PM', 'HASH(0x1950d8)', 'LICENSE', ...) called at Makefile.PL line 29 Writing Makefile for CLASS Writing MYMETA.yml and MYMETA.json >>> make cp lib/CLASS.pm blib/lib/CLASS.pm Manifying blib/man3/CLASS.3 MSCHWERN/CLASS-1.00.tar.gz make -- OK Prepending /export/home/fly1232/var/cpan/build/autobox-Core-1.21-s991Qw/blib/arch /export/home/fly1232/var/cpan/build/autobox-Core-1.21-s991Qw/blib/lib /export/home/fly1232/var/cpan/build/autobox-dump-20090426.1746-eDvQOY/blib/arch /export/home/fly1232/var/cpan/build/autobox-dump-20090426.1746-eDvQOY/blib/lib /export/home/fly1232/var/cpan/build/autovivification-0.10-o2QwNJ/blib/arch /export/home/fly1232/var/cpan/build/autovivification-0.10-o2QwNJ/blib/lib /export/home/fly1232/var/cpan/build/autobox-List-Util-20090629-GGdW7l/blib/arch /export/home/fly1232/var/cpan/build/autobox-List-Util-20090629-GGdW7l/blib/lib to PERL5LIB for 'test' Running make test >>> make test TEST_VERBOSE=1 PERL_DL_NONLAZY=1 /export/home/fly1232/bin/perl "-MExtUtils::Command::MM" "-e" "test_harness(1, 'blib/lib', 'blib/arch')" t/*.t t/CLASS.t .. 1..22 ok 1 - use CLASS; ok 2 - CLASS is right ok 3 - $CLASS is right ok 4 - CLASS->meth ok 5 - $CLASS->meth ok 6 - __PACKAGE__ and CLASS die the same ok 7 - __PACKAGE__ and $CLASS die the same ok 8 - caller preserved ok 9 - caller preserved ok 10 - Right CLASS to class method call ok 11 - Right $CLASS to class method call ok 12 - CLASS: Arguments preserved ok 13 - $CLASS: Arguments preserved ok 14 - CLASS works in tricky subroutine ok 15 - $CLASS works in tricky subroutine ok 16 - CLASS as sub argument ok 17 - $CLASS as sub argument ok 18 - CLASS in @_ ok 19 - $CLASS in @_ ok 20 - CLASS: AUTOLOAD preserved ok 21 - $CLASS: AUTOLOAD preserved ok 22 - CLASS properly prototyped ok All tests successful. Files=1, Tests=22, 0 wallclock secs ( 0.08 usr 0.02 sys + 0.12 cusr 0.01 csys = 0.23 CPU) Result: PASS MSCHWERN/CLASS-1.00.tar.gz make test TEST_VERBOSE=1 -- OK Michael G Schwern <mschwern@cpan.org> Alias for __PACKAGE__ >>> (cd /export/home/fly1232/var/cpan/build/CLASS-1.00-ZaOKMS && tar cvf - CLASS-1.00.ppd blib) | gzip -c >/export/home/fly1232/var/REPO/M/MS/MSCHWERN/CLASS-1.00.tar.gz CLASS-1.00.ppd blib/ blib/lib/ blib/lib/CLASS.pm blib/man3/ blib/man3/CLASS.3 >>> mv /export/home/fly1232/var/cpan/build/CLASS-1.00-ZaOKMS/CLASS-1.00.ppd /export/home/fly1232/var/REPO/M/MS/MSCHWERN Running Build for M/MS/MSCHWERN/perl5i-v2.9.1.tar.gz Prepending /export/home/fly1232/var/cpan/build/CLASS-1.00-ZaOKMS/blib/arch /export/home/fly1232/var/cpan/build/CLASS-1.00-ZaOKMS/blib/lib /export/home/fly1232/var/cpan/build/autobox-Core-1.21-s991Qw/blib/arch /export/home/fly1232/var/cpan/build/autobox-Core-1.21-s991Qw/blib/lib /export/home/fly1232/var/cpan/build/autobox-dump-20090426.1746-eDvQOY/blib/arch /export/home/fly1232/var/cpan/build/autobox-dump-20090426.1746-eDvQOY/blib/lib /export/home/fly1232/var/cpan/build/autovivification-0.10-o2QwNJ/blib/arch /export/home/fly1232/var/cpan/build/autovivification-0.10-o2QwNJ/blib/lib /export/home/fly1232/var/cpan/build/autobox-List-Util-20090629-GGdW7l/blib/arch /export/home/fly1232/var/cpan/build/autobox-List-Util-20090629-GGdW7l/blib/lib to PERL5LIB for 'get' Has already been unwrapped into directory /export/home/fly1232/var/cpan/build/perl5i-v2.9.1-ui28ID Prepending /export/home/fly1232/var/cpan/build/CLASS-1.00-ZaOKMS/blib/arch /export/home/fly1232/var/cpan/build/CLASS-1.00-ZaOKMS/blib/lib /export/home/fly1232/var/cpan/build/autobox-Core-1.21-s991Qw/blib/arch /export/home/fly1232/var/cpan/build/autobox-Core-1.21-s991Qw/blib/lib /export/home/fly1232/var/cpan/build/autobox-dump-20090426.1746-eDvQOY/blib/arch /export/home/fly1232/var/cpan/build/autobox-dump-20090426.1746-eDvQOY/blib/lib /export/home/fly1232/var/cpan/build/autovivification-0.10-o2QwNJ/blib/arch /export/home/fly1232/var/cpan/build/autovivification-0.10-o2QwNJ/blib/lib /export/home/fly1232/var/cpan/build/autobox-List-Util-20090629-GGdW7l/blib/arch /export/home/fly1232/var/cpan/build/autobox-List-Util-20090629-GGdW7l/blib/lib to PERL5LIB for 'make' CPAN.pm: Going to build M/MS/MSCHWERN/perl5i-v2.9.1.tar.gz >>> ./Build Building perl5i cc -I/export/home/fly1232/ap1205/lib/CORE -KPIC -c -D_REENTRANT -DUSE_SITECUSTOMIZE -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -O -o bin/perl5i.o bin/perl5i.c cc -L/usr/lib -L/usr/ccs/lib -L/opt/SUNWspro/prod/lib/v8plus -L/opt/SUNWspro/prod/lib -L/lib -o bin/perl5i bin/perl5i.o MSCHWERN/perl5i-v2.9.1.tar.gz ./Build -- OK Prepending /export/home/fly1232/var/cpan/build/CLASS-1.00-ZaOKMS/blib/arch /export/home/fly1232/var/cpan/build/CLASS-1.00-ZaOKMS/blib/lib /export/home/fly1232/var/cpan/build/autobox-Core-1.21-s991Qw/blib/arch /export/home/fly1232/var/cpan/build/autobox-Core-1.21-s991Qw/blib/lib /export/home/fly1232/var/cpan/build/autobox-dump-20090426.1746-eDvQOY/blib/arch /export/home/fly1232/var/cpan/build/autobox-dump-20090426.1746-eDvQOY/blib/lib /export/home/fly1232/var/cpan/build/autovivification-0.10-o2QwNJ/blib/arch /export/home/fly1232/var/cpan/build/autovivification-0.10-o2QwNJ/blib/lib /export/home/fly1232/var/cpan/build/autobox-List-Util-20090629-GGdW7l/blib/arch /export/home/fly1232/var/cpan/build/autobox-List-Util-20090629-GGdW7l/blib/lib to PERL5LIB for 'test' Running Build test >>> ./Build test verbose=1 Checking if compiler tools configured... ok. cc -I/export/home/fly1232/ap1205/lib/CORE -KPIC -c -D_REENTRANT -DUSE_SITECUSTOMIZE -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -O -o bin/perl5i.o bin/perl5i.c cc -L/usr/lib -L/usr/ccs/lib -L/opt/SUNWspro/prod/lib/v8plus -L/opt/SUNWspro/prod/lib -L/lib -o bin/perl5i bin/perl5i.o Deleting blib/script/perl5i Copying bin/perl5i -> blib/script/perl5i t/ARGV.t ..................... ok 1 1..1 ok t/ARGV_twice.t ............... ok 1 1..1 ok t/CLASS.t .................... ok 1 - CLASS keyword ok 2 - $CLASS 1..2 ok t/Child.t .................... ok 1 - main->can('child') ok 2 - child has self ok 3 - child has parent PID ok 4 - Not Complete ok 5 - Full IPC ok 6 - wait ok 7 - Complete ok 8 - Exit clean ok 9 - Died, no IPC ok 10 - No IPC ok 11 - Send signal ok 12 - wait ok 13 - Complete ok 14 - Exit 2 ok 15 - Real exit ok 16 - A ok 17 - B ok 18 - No autoflush ok 19 - Child detached 1..19 ok t/English.t .................. ok 1 ok 2 ok 3 ok 4 ok 5 1..5 ok t/File-stat.t ................ ok 1 - The object isa File::stat ok 2 ok 3 - stat() in array context ok 4 - lstat() in array context 1..4 ok t/List-MoreUtils/all.t ....... ok 1 ok 2 1..2 ok t/List-MoreUtils/any.t ....... ok 1 ok 2 1..2 ok t/List-MoreUtils/false.t ..... ok 1 ok 2 1..2 ok t/List-MoreUtils/mesh.t ...... ok 1 ok 2 ok 3 - Returns an array in list context 1..3 ok t/List-MoreUtils/minmax.t .... ok 1 ok 2 ok 3 - Returns an array in list context 1..3 ok t/List-MoreUtils/none.t ...... ok 1 ok 2 1..2 ok t/List-MoreUtils/true.t ...... ok 1 ok 2 1..2 ok t/List-MoreUtils/uniq.t ...... ok 1 ok 2 ok 3 - Returns an array in list context 1..3 ok t/List-Util/first.t .......... 1..14 ok 1 - one more than 8 ok 2 - none match ok 3 - no args ok 4 - reference args ok 5 - use of eval ok 6 - use of die ok 7 - wantarray ok 8 - return ok 9 - return from loop ok 10 - other package ok 11 - undef active sub ok 12 - redefine self ok 13 - from active sub ok 14 - Works with Regexp ok t/List-Util/max.t ............ 1..4 ok 1 - single arg ok 2 - 2-arg ordered ok 3 - 2-arg reverse ordered ok 4 - 20-arg random order ok t/List-Util/maxstr.t ......... 1..4 ok 1 - single arg ok 2 - 2-arg ordered ok 3 - 2-arg reverse ordered ok 4 - random ordered ok t/List-Util/min.t ............ 1..4 ok 1 - single arg ok 2 - 2-arg ordered ok 3 - 2-arg reverse ordered ok 4 - 20-arg random order ok t/List-Util/minstr.t ......... 1..4 ok 1 - single arg ok 2 - 2-arg ordered ok 3 - 2-arg reverse ordered ok 4 - random ordered ok t/List-Util/reduce.t ......... 1..20 ok 1 - no args ok 2 - 4-arg divide ok 3 - one arg ok 4 - min ok 5 - concat ok 6 - call sub ok 7 - use eval{} ok 8 - die ok 9 - scalar context ok 10 - sub reference ok 11 - call sub ok 12 - eval string ok 13 - restore $a ok 14 - restore $b ok 15 - return ok 16 - return from loop ok 17 - undef active sub ok 18 - redefine self ok 19 ok 20 - from active sub ok t/List-Util/shuffle.t ........ 1..6 ok 1 - no args ok 2 - 1 in 1 out ok 3 - one arg ok 4 - arg count ok 5 - result different to args ok 6 - values ok t/List-Util/sum.t ............ 1..6 ok 1 - no args ok 2 - one arg ok 3 - 4 args ok 4 - one -1 ok 5 - variable arg ok 6 - real numbers ok t/Meta/ISA.t ................. ok 1 ok 2 ok 3 ok 4 ok 5 ok 6 - scalar context 1..6 ok t/Meta/checksum.t ............ ok 1 ok 2 ok 3 ok 4 ok 5 ok 6 ok 7 ok 8 ok 9 ok 10 ok 11 ok 12 ok 13 ok 14 ok 15 ok 16 ok 17 ok 18 ok 19 ok 20 ok 21 ok 22 ok 23 ok 24 ok 25 ok 26 ok 27 ok 28 ok 29 1..29 ok t/Meta/class.t ............... ok 1 ok 2 ok 3 ok 4 ok 5 ok 6 ok 7 1..7 ok t/Meta/id.t .................. ok 1 - Foo has an id ok 2 - its unique ok 3 - second call the same ok 4 - Foo has an id ok 5 - its unique ok 6 - second call the same ok 7 - Regexp has an id ok 8 - its unique ok 9 - second call the same ok 10 - Regexp has an id ok 11 - its unique ok 12 - second call the same ok 13 - CODE has an id ok 14 - its unique ok 15 - second call the same ok 16 - CODE has an id ok 17 - its unique ok 18 - second call the same ok 19 - SCALAR has an id ok 20 - its unique ok 21 - second call the same ok 22 - SCALAR has an id ok 23 - its unique ok 24 - second call the same ok 25 - ARRAY has an id ok 26 - its unique ok 27 - second call the same ok 28 - ARRAY has an id ok 29 - its unique ok 30 - second call the same ok 31 - 42 has an id ok 32 - its unique ok 33 - second call the same ok 34 - 42 has an id ok 35 - its unique ok 36 - second call the same ok 37 - string has an id ok 38 - its unique ok 39 - second call the same ok 40 - string has an id ok 41 - its unique ok 42 - second call the same ok 43 - ID remains the same for a scalar with changed content ok 44 - ID remains the same even if an object's contents change 1..44 ok t/Meta/is-equal.t ............ ok 1 ok 2 ok 3 ok 4 ok 5 ok 6 ok 7 ok 8 ok 9 ok 10 ok 11 ok 12 ok 13 ok 14 ok 15 ok 16 ok 17 ok 18 ok 19 ok 20 ok 21 ok 22 ok 23 ok 24 ok 25 ok 26 ok 27 ok 28 ok 29 ok 30 ok 31 ok 32 ok 33 ok 34 ok 35 ok 36 ok 37 - Number is equal to itself ok 38 ok 39 ok 40 ok 41 ok 42 ok 43 1..43 ok t/Meta/linear_isa.t .......... ok 1 ok 2 ok 3 ok 4 ok 5 - scalar context 1..5 ok t/Meta/methods.t ............. # methods of a class with no parent ok 1 - methods on a simple class ok 2 - methods on a simple object # methods of a class on a child ok 3 - inherited methods on a class ok 4 - inherited method on a class # just_mine => 1 ok 5 - just_mine does not show inherited methods # with_UNIVERSAL => 1 ok 6 - My::Child->child1 ok 7 - My::Child->child2 ok 8 - My::Child->parent1 ok 9 - My::Child->isa ok 10 - My::Child->can ok 11 - My::Child->VERSION ok 12 - My::Child->mc ok 13 - My::Child->mo # UNIVERSAL still works ok 14 - UNIVERSAL->can ok 15 - UNIVERSAL->isa ok 16 - UNIVERSAL->VERSION ok 17 - UNIVERSAL->mc ok 18 - UNIVERSAL->mo # Weird things in the symbol table ok 19 - Fcntl->can(...) 1..19 ok t/Meta/reftype.t ............. ok 1 ok 2 ok 3 ok 4 not ok 5 - bare array # TODO bare hashes and arrays give the wrong reftype # Failed (TODO) test 'bare array' # at t/Meta/reftype.t line 21. # got: 'ARRAY' # expected: undef not ok 6 - bare hash # TODO bare hashes and arrays give the wrong reftype # Failed (TODO) test 'bare hash' # at t/Meta/reftype.t line 24. # got: 'HASH' # expected: undef 1..6 ok # Failed test at t/Meta/super.t line 77. # got: 'super() called outside a method at t/Meta/super.t line 76. # ' # expected: 'super() called outside a method at t/Meta/super.t line 76 # ' # Failed test at t/Meta/super.t line 96. # got: '"NotAParent" is not a parent class of "Child" at t/Meta/super.t line 90. # ' # expected: '"NotAParent" is not a parent class of "Child" at t/Meta/super.t line 90 # ' # Looks like you failed 2 tests of 8. t/Meta/super.t ............... ok 1 ok 2 ok 3 ok 4 ok 5 not ok 6 ok 7 not ok 8 1..8 Dubious, test returned 2 (wstat 512, 0x200) Failed 2/8 subtests t/Meta/symbol_table.t ........ # symbol_table ok 1 - symbol_table ok 2 - glob contains a hash ok 3 - glob contains a code ref ok 4 - glob does not contain an array 1..4 ok t/Want.t ..................... ok 1 ok 2 ok 3 ok 4 not ok 5 # TODO want() with prototypes is busted, thinks its CODE # Failed (TODO) test at t/Want.t line 36. # got: undef # expected: '23' ok 6 ok 7 ok 8 ok 9 1..9 ok t/alias.t .................... ok 1 ok 2 ok 3 ok 4 - caller only prepended if there's no :: ok 5 - caller not prepended if there's more than one ok 6 ok 7 ok 8 ok 9 ok 10 ok 11 ok 12 ok 13 ok 14 ok 15 ok 16 - no warning 1..16 ok t/autobox.t .................. ok 1 ok 2 1..2 ok t/autodie.t .................. ok 1 ok 2 1..2 ok t/autovivification.t ......... ok 1 - hash ref does not autoviv ok 2 - hash ref does not autoviv ok 3 - hash key does not autoviv ok 4 - hash key does not autoviv 1..4 ok t/caller.t ................... ok 1 - CORE::caller() sane ok 2 - caller() in list context ok 3 - caller->package ok 4 - caller->filename ok 5 - caller->line ok 6 - caller->subroutine ok 7 - caller->hasargs ok 8 - caller->wantarray ok 9 - caller->evaltext ok 10 - caller->is_require ok 11 - stringified caller 1..11 ok t/can.t ...................... ok 1 - autoboxing vs can() ok 2 - no really, it should work 1..2 ok t/capture.t .................. # scalar context ok 1 ok 2 - stderr is silenced # tee ok 3 ok 4 # merge ok 5 1..5 ok t/carp.t ..................... ok 1 ok 2 1..2 ok t/center.t ................... ok 1 - ->center() with even length has equal whitespace on both sides ok 2 - ->center() with even length has equal whitespace on both sides ok 3 - ->center() with odd length pads left ok 4 - ->center() with too-short length returns the string unmodified ok 5 - ->center(0) ok 6 - ->center(-1) ok 7 - ->center(undef) ok 8 ok 9 - ->center(6, "-") ok 10 - ->center(7, "-") ok 11 - ->center(0, "-") ok 12 - ->center(undef) ok 13 ok 14 - center(5) returns that size ok 15 - center(6) returns that size ok 16 - center(7) returns that size ok 17 - center(8) returns that size ok 18 - center(9) returns that size ok 19 - center(10) returns that size ok 20 - center(11) returns that size ok 21 - center(12) returns that size ok 22 - center(13) returns that size ok 23 - center(14) returns that size ok 24 - center(15) returns that size ok 25 - center(16) returns that size ok 26 - center(17) returns that size ok 27 - center(18) returns that size ok 28 - center(19) returns that size ok 29 - center(20) returns that size 1..29 ok t/chdir.t .................... ok 1 ok 2 ok 3 ok 4 ok 5 1..5 ok Name "Win32::Locale::Lexicon" used only once: possible typo at /export/home/fly1232/ap1205/lib/I18N/LangTags/Detect.pm line 140. t/command_line_wrapper.t ..... ok 1 - perl5i command line wrapper was built ok 2 - and it runs ok 3 - Hello perl5i! ok 4 - perl5i -h works as expected ok 5 - $^X is perl5i ok 6 - compound -e ok 7 - not fooled by -Module ok 8 - $0 preserved ok 9 - __LINE__ preserved ok 10 - __FILE__ preserved ok 11 - reads code from stdin ok 12 - program in a file ok 13 - no strict vars for perl5i ok 14 - no strict vars for perl -Mperl5i::latest -e '...' 1..14 ok t/commify.t .................. ok 1 - 1->commify() ok 2 - 1234->commify() ok 3 - 123456789->commify() ok 4 - 123456789.1234->commify() ok 5 - -12345->commify() ok 6 - 123456789->commify( 'grouping' => 3, 'separator' => '.' ) ok 7 - 123456789->commify( 'grouping' => 2, 'separator' => ',' ) ok 8 - 123456789->commify( 'grouping' => 0, 'separator' => ',' ) ok 9 - 123456789.987->commify( 'decimal_point' => ',', 'separator' => '.' ) ok 10 - 123456789->commify( 'decimal_point' => ',', 'separator' => '.' ) ok 11 - 123456789.->commify( 'decimal_point' => ',', 'separator' => '.' ) ok 12 - 123456789.0->commify( 'decimal_point' => ',', 'separator' => '.' ) ok 13 - 12345.678->commify() ok 14 - 0->commify() ok 15 - 0.12->commify() 1..15 ok t/datetime.t ................. # time is 839295715 ok 1 - localtime returns a DateTime isa DateTime ok 2 - scalar context ok 3 - method call ok 4 - epoch ok 5 - array context ok 6 - no args ok 7 - array argument ok 8 - DateTime doesn't bitch on concatenation ok 9 - gmtime returns a DateTime isa DateTime ok 10 - scalar context ok 11 - method call ok 12 - epoch ok 13 - array context ok 14 - no args ok 15 - array argument ok 16 - DateTime doesn't bitch on concatenation ok 17 - time ok 18 - is DateTime isa DateTime ok 19 ok 20 ok 21 ok 22 ok 23 ok 24 ok 25 ok 26 ok 27 - DateTime methods: sec min hour day month year day_of_week day_of_year is_dst ok 28 - DateTime methods: second minute hour mday mon year dow doy is_dst ok 29 - DateTime methods: sec min hour day_of_month mon year wday doy is_dst 1..29 ok t/die.t ...................... ok 1 - normal die exit code ok 2 - normal die stdout ok 3 - normal die stderr ok 4 - die without line exit code ok 5 - die without line stdout ok 6 - die without line stderr ok 7 - die with $! = 5 exit code ok 8 - die with $! = 5 stdout ok 9 - die with $! = 5 stderr ok 10 - die with $! = 0 and $? = 5 exit code ok 11 - die with $! = 0 and $? = 5 stdout ok 12 - die with $! = 0 and $? = 5 stderr ok 13 - die with $! = 6 and $? = 5 exit code ok 14 - die with $! = 6 and $? = 5 stdout ok 15 - die with $! = 6 and $? = 5 stderr ok 16 - die in block eval ok 17 - die in block eval with multiple arguments ok 18 - die with a reference is unaltered ok 19 - __DIE__ signal handler ok 20 - die() did not set errno ok 21 - die in a different package exit code ok 22 - die in a different package stdout ok 23 - die in a different package stderr 1..23 ok t/diff.t ..................... ok 1 - Simple number diff ok 2 - Simple number diff ok 3 - No arguments ok 4 - Diff with an empty array ok 5 - Diff an empty array ok 6 - Returns array in list context ok 7 ok 8 ok 9 ok 10 ok 11 - Works ok with strings ok 12 - Mix strings and numbers ok 13 - Mix numbers and strings ok 14 ok 15 ok 16 - Diff more than two arrays ok 17 - Diff more than two arrays ok 18 - Works for nested data structures ok 19 ok 20 ok 21 ok 22 ok 23 - stress test 1 ok 24 - stress test 2 ok 25 ok 26 ok 27 ok 28 ok 29 ok 30 ok 31 ok 32 ok 33 ok 34 ok 35 ok 36 ok 37 ok 38 ok 39 ok 40 1..40 ok t/dump/array.t ............... 1..3 ok 1 ok 2 ok 3 ok t/dump/code.t ................ not ok 1 - dump eval'd # TODO closures aren't dumped properly # Failed (TODO) test 'dump eval'd' # at t/dump/code.t line 12. # Global symbol "$foo" requires explicit package name at (eval 180) line 23. ok 2 - dump eval'd ok 3 - anon sub dump 1..3 ok t/dump/hash.t ................ 1..5 ok 1 ok 2 ok 3 ok 4 ok 5 - dump as yaml ok t/dump/obj.t ................. ok 1 ok 2 - The object isa Foo ok 3 ok 4 ok 5 ok 6 - dump as yaml 1..6 ok t/dump/scalar.t .............. 1..4 ok 1 ok 2 ok 3 ok 4 ok t/each.t ..................... # each with no signature ok 1 # each with one arg ok 2 # each with two args ok 3 # each call is safe ok 4 1..4 ok t/equal.t .................... ok 1 - Number class ok 2 - String class ok 3 - scalar equals itself ok 4 - object equals itself ok 5 - number equals itself ok 6 - ref equals itself ok 7 - undef equals itself ok 8 - string equals itself ok 9 - array equals itself ok 10 - hash equals itself ok 11 - glob equals itself ok 12 - code equals itself ok 13 - scalar not equal object ok 14 - scalar not equal number ok 15 - scalar not equal ref ok 16 - scalar not equal undef ok 17 - scalar not equal string ok 18 - scalar not equal array ok 19 - scalar not equal hash ok 20 - scalar not equal glob ok 21 - scalar not equal code ok 22 - object not equal scalar ok 23 - object not equal number ok 24 - object not equal ref ok 25 - object not equal undef ok 26 - object not equal string ok 27 - object not equal array ok 28 - object not equal hash ok 29 - object not equal glob ok 30 - object not equal code ok 31 - number not equal scalar ok 32 - number not equal object ok 33 - number not equal ref ok 34 - number not equal undef ok 35 - number not equal string ok 36 - number not equal array ok 37 - number not equal hash ok 38 - number not equal glob ok 39 - number not equal code ok 40 - ref not equal scalar ok 41 - ref not equal object ok 42 - ref not equal number ok 43 - ref not equal undef ok 44 - ref not equal string ok 45 - ref not equal array ok 46 - ref not equal hash ok 47 - ref not equal glob ok 48 - ref not equal code ok 49 - undef not equal scalar ok 50 - undef not equal object ok 51 - undef not equal number ok 52 - undef not equal ref ok 53 - undef not equal string ok 54 - undef not equal array ok 55 - undef not equal hash ok 56 - undef not equal glob ok 57 - undef not equal code ok 58 - string not equal scalar ok 59 - string not equal object ok 60 - string not equal number ok 61 - string not equal ref ok 62 - string not equal undef ok 63 - string not equal array ok 64 - string not equal hash ok 65 - string not equal glob ok 66 - string not equal code ok 67 - array not equal scalar ok 68 - array not equal object ok 69 - array not equal number ok 70 - array not equal ref ok 71 - array not equal undef ok 72 - array not equal string ok 73 - array not equal hash ok 74 - array not equal glob ok 75 - array not equal code ok 76 - hash not equal scalar ok 77 - hash not equal object ok 78 - hash not equal number ok 79 - hash not equal ref ok 80 - hash not equal undef ok 81 - hash not equal string ok 82 - hash not equal array ok 83 - hash not equal glob ok 84 - hash not equal code ok 85 - glob not equal scalar ok 86 - glob not equal object ok 87 - glob not equal number ok 88 - glob not equal ref ok 89 - glob not equal undef ok 90 - glob not equal string ok 91 - glob not equal array ok 92 - glob not equal hash ok 93 - glob not equal code ok 94 - code not equal scalar ok 95 - code not equal object ok 96 - code not equal number ok 97 - code not equal ref ok 98 - code not equal undef ok 99 - code not equal string ok 100 - code not equal array ok 101 - code not equal hash ok 102 - code not equal glob ok 103 - Two equivalent nested data structures ok 104 - Two non-equal nested data structures ok 105 - OBJ== equal OBJ== ok 106 - OBJ== equals number ok 107 - OBJ== not equal to scalar ok 108 - OBJ== not equal to object ok 109 - OBJ== not equal to ref ok 110 - OBJ== not equal to undef ok 111 - OBJ== not equal to string ok 112 - OBJ== not equal to array ok 113 - OBJ== not equal to hash ok 114 - OBJ== not equal to glob ok 115 - OBJ== not equal to code ok 116 - OBJ"" equal OBJ"" ok 117 - OBJ"" equal string ok 118 - OBJ"" not equal to scalar ok 119 - OBJ"" not equal to object ok 120 - OBJ"" not equal to number ok 121 - OBJ"" not equal to ref ok 122 - OBJ"" not equal to undef ok 123 - OBJ"" not equal to array ok 124 - OBJ"" not equal to hash ok 125 - OBJ"" not equal to glob ok 126 - OBJ"" not equal to code 1..126 ok t/everything_is_an_object.t .. ok 1 - The class isa UNIVERSAL 1..1 ok t/flip.t ..................... ok 1 ok 2 - Returns hash in list context ok 3 - Dies if values are not valid hash keys 1..3 ok # Failed test at t/foreach.t line 55. # got: 'Function passed to foreach takes no arguments at t/foreach.t line 54. # ' # expected: 'Function passed to foreach takes no arguments at t/foreach.t line 54 # ' # Looks like you failed 1 test of 6. t/foreach.t .................. ok 1 ok 2 ok 3 ok 4 ok 5 not ok 6 1..6 Dubious, test returned 1 (wstat 256, 0x100) Failed 1/6 subtests t/github164.t ................ ok 1 - Did not segfault 1..1 ok t/grep.t ..................... ok 1 - Should accept code refs ok 2 - Should accept Regexps ok 3 - Works with SCALAR ok 4 - Works with SCALAR ok 5 - Works with Regexp ok 6 - Works with HASH ok 7 - Works with ARRAY ok 8 - Works with ARRAY ok 9 - ... as with Code refs ok 10 - Returns an array in list context 1..10 ok t/hash-diff.t ................ ok 1 ok 2 ok 3 ok 4 ok 5 ok 6 1..6 ok t/hash-intersect.t ........... ok 1 ok 2 ok 3 ok 4 ok 5 ok 6 1..6 ok t/hash-merge.t ............... ok 1 ok 2 - Rightmost precedence ok 3 - Three arguments ok 4 - Works for nested hashes also ok 5 - Returns hash in list context 1..5 ok t/intersect.t ................ ok 1 - Simple number intersect ok 2 - Simple number intersect ok 3 - Returns an array in list context ok 4 - No arguments ok 5 - Intersect with an empty array ok 6 - Diff an empty array ok 7 ok 8 ok 9 ok 10 ok 11 - Works ok with strings ok 12 - Mix strings and numbers ok 13 - Mix numbers and strings ok 14 ok 15 ok 16 - Intersect more than two arrays ok 17 - Intersect more than two arrays ok 18 - Works for nested data structures ok 19 ok 20 ok 21 ok 22 ok 23 - stress test 1 ok 24 - stress test 2 ok 25 ok 26 ok 27 ok 28 ok 29 ok 30 ok 31 ok 32 ok 33 ok 34 ok 35 ok 36 ok 37 ok 38 ok 39 1..39 ok t/io-handle.t ................ ok 1 1..1 ok t/is_module_name.t ........... ok 1 - valid: foo ok 2 - valid: bar123 ok 3 - valid: Foo213::456 ok 4 - valid: f ok 5 - valid: a::b ok 6 - valid: öø::bår ok 7 - invalid: ::a::c ok 8 - invalid: 123 ok 9 - invalid: 1abc ok 10 - invalid: foo$bar ok 11 - invalid: $foo::bar ok 12 - invalid: foo/bar 1..12 ok t/lexical.t .................. ok 1 not ok 2 # TODO lexical File::stat # Failed (TODO) test at t/lexical.t line 23. ok 3 1..3 ok t/list-trim.t ................ ok 1 - Left array trim ok 2 - Right array trim ok 3 - Array trim ok 4 - Left array trim with argument ok 5 - Right array trim with argument ok 6 - Array trim with argument ok 7 - Array ref trim ok 8 - Chained trim ok 9 - Empty array trim ok 10 - Array trim, list context ok 11 - Left array trim, list context ok 12 - Right array trim, list context 1..12 ok t/list.t ..................... # list context ok 1 - The universe didn't implode ok 2 - list returns array isa ARRAY ok 3 - list turned the thing into a list! # scalar context ok 4 - in scalar context, returns array size ok 5 - returns the right array size # all together now ok 6 - scalar list $thing is the size # list list ok 7 - using list on a list gives you a list ok 8 - force scalar context, even with list # wantarray ok 9 - list triggers wantarray 1..9 ok t/load_together.t ............ not ok 1 - no warnings # TODO loading perl5i::1 and perl5i::2 together not entirely safe # Failed (TODO) test 'no warnings' # at t/load_together.t line 23. # got: '1' # expected: '0' # [ # 'Subroutine UNIVERSAL::mo redefined at /export/home/fly1232/var/cpan/build/perl5i-v2.9.1-ui28ID/blib/lib/perl5i/2/Meta.pm line 14. # ' # ] 1..1 ok t/map.t ...................... ok 1 - map in list context ok 2 - map in scalar context ok 3 - map with named arguments 1..3 ok t/method_leaking.t ........... ok 1 ok 2 1..2 ok t/modern_perl.t .............. ok 1 - strict is on ok 2 ok 3 ok 4 - given/when enabled ok 5 - C3 on 1..5 ok t/module2path.t .............. # Test some simple symetrical conversions ok 1 ok 2 ok 3 ok 4 ok 5 ok 6 ok 7 ok 8 # Invalid module paths ok 9 ok 10 ok 11 # Invalid module names ok 12 ok 13 ok 14 1..14 ok t/no_indirect.t .............. ok 1 ok 2 1..2 ok t/number.t ................... ok 1 ok 2 ok 3 ok 4 ok 5 ok 6 ok 7 ok 8 ok 9 ok 10 ok 11 ok 12 ok 13 ok 14 ok 15 ok 16 ok 17 ok 18 ok 19 ok 20 ok 21 ok 22 ok 23 ok 24 ok 25 ok 26 ok 27 ok 28 ok 29 ok 30 - zero is not negative ok 31 - zero is not positive ok 32 ok 33 ok 34 ok 35 ok 36 ok 37 ok 38 ok 39 ok 40 ok 41 ok 42 ok 43 ok 44 ok 45 ok 46 ok 47 ok 48 ok 49 ok 50 ok 51 ok 52 ok 53 ok 54 ok 55 ok 56 ok 57 ok 58 ok 59 not ok 60 # TODO hex is weird # Failed (TODO) test at t/number.t line 80. # got: '597' # expected: 'FF' not ok 61 # TODO hex is weird # Failed (TODO) test at t/number.t line 81. # got: '-1' # expected: '255' not ok 62 # TODO hex is weird # Failed (TODO) test at t/number.t line 82. # got: '254' # expected: '255' ok 63 ok 64 ok 65 ok 66 ok 67 ok 68 ok 69 ok 70 ok 71 ok 72 ok 73 ok 74 ok 75 ok 76 ok 77 ok 78 ok 79 ok 80 ok 81 ok 82 1..82 ok t/perl5i.t ................... ok 1 - require perl5i; ok 2 ok 3 ok 4 - perl -Mperl5i -e '...' means -Mperl5i::latest 1..4 ok t/require.t .................. # Successful require ok 1 ok 2 - errno didn't leak out ok 3 - $@ not overwritten ok 4 - require ok 5 - nothing imported ok 6 - default import # Module doesn't exist ok 7 ok 8 ok 9 - errno didn't leak out # Invalid module name ok 10 ok 11 1..11 ok t/require_message.t .......... ok 1 - Sub is at end ok 2 - Something is after our sub. ok 3 - Require things that are installed works ok 4 - Useful message ok 5 - sub at end ok 6 - same file base ok 7 - Special message turned off out of scope 1..7 ok t/say.t ...................... ok 1 - %hash->say ok 2 - %hash->print 1..2 ok t/scalar.t ................... ok 1 ok 2 ok 3 ok 4 ok 5 ok 6 ok 7 ok 8 ok 9 ok 10 ok 11 ok 12 ok 13 ok 14 ok 15 ok 16 ok 17 # reverse ok 18 - string->reverse always reverses the string 1..18 ok t/signature.t ................ ok 1 - The object isa perl5i::2::Signature::None ok 2 ok 3 ok 4 ok 5 ok 6 ok 7 ok 8 ok 9 - The object isa perl5i::2::Signature::None ok 10 ok 11 ok 12 ok 13 ok 14 ok 15 ok 16 - The object isa perl5i::2::Signature::None ok 17 ok 18 ok 19 ok 20 ok 21 ok 22 ok 23 - The object isa perl5i::2::Signature ok 24 ok 25 ok 26 ok 27 - The object isa perl5i::2::Signature::Real ok 28 ok 29 ok 30 ok 31 ok 32 ok 33 ok 34 ok 35 ok 36 ok 37 ok 38 ok 39 ok 40 ok 41 ok 42 ok 43 ok 44 ok 45 ok 46 ok 47 ok 48 ok 49 ok 50 ok 51 - The object isa perl5i::2::Signature ok 52 - $arg ok 53 ok 54 - The object isa perl5i::2::Signature ok 55 - $arg ok 56 ok 57 - The object isa perl5i::2::Signature ok 58 - $arg ok 59 ok 60 ok 61 ok 62 ok 63 ok 64 ok 65 1..65 ok t/signatures.t ............... ok 1 ok 2 - The object isa Foo ok 3 ok 4 ok 5 ok 6 ok 7 ok 8 - same signature ok 9 - same code ref ok 10 - same signature ok 11 - same code ref 1..11 ok t/taint.t .................... # Already tainted global ok 1 ok 2 ok 3 ok 4 ok 5 # 2.0 compat ok 6 ok 7 ok 8 # simple scalar ok 9 ok 10 ok 11 ok 12 ok 13 # scalar ref ok 14 ok 15 ok 16 ok 17 ok 18 ok 19 # hash ok 20 ok 21 ok 22 ok 23 ok 24 ok 25 # blessed hash ref ok 26 ok 27 ok 28 ok 29 ok 30 # blessed scalar ref ok 31 ok 32 ok 33 ok 34 ok 35 # string overloaded object ok 36 ok 37 ok 38 ok 39 ok 40 ok 41 ok 42 ok 43 ok 44 ok 45 # DateTime ok 46 1..46 ok t/time_compat.t .............. ok 1 ok 2 - localtime() honors TZ ok 3 ok 4 ok 5 ok 6 - gmtime() and localtime() agree what day of year ok 7 - gmtime(), scalar context ok 8 - gmtime eq ok 9 ok 10 ok 11 ok 12 ok 13 1..13 ok t/true.t ..................... ok 1 - use ThisIsTrue; ok 2 1..2 ok t/try-tiny.t ................. ok 1 - Dying inside a try {} block is captured via Try::Tiny 1..1 ok t/uniq.t ..................... # perl5ifaq entry ok 1 1..1 ok # Failed test at t/utf8.t line 23. # { # 'GLOB(0x830740)' => [ # 'unix', # 'perlio' # ] # } # Looks like you failed 1 test of 8. t/utf8.t ..................... ok 1 ok 2 ok 3 ok 4 ok 5 not ok 6 ok 7 ok 8 1..8 Dubious, test returned 1 (wstat 256, 0x100) Failed 1/8 subtests t/version_0/00_compile.t ..... skipped: Needs Time::y2038 t/version_1/00_compile.t ..... skipped: Needs Time::y2038 t/vs_listmoreutils.t ......... 1..1 ok 1 - perl5i can load after List::MoreUtils ok t/wrap.t ..................... ok 1 - Unmodified string is one line long ok 2 - Default wrapping gives two lines ok 3 - One word per line ok 4 - Excessive wrap length ok 5 - Zero wrap length ok 6 - Negative wrap length ok 7 - Unmodified string is one line long ok 8 - Default wrapping gives two lines ok 9 - One word per line ok 10 - Excessive wrap length ok 11 - Zero wrap length ok 12 - Negative wrap length ok 13 - Unmodified string is one line long ok 14 - Default wrapping gives two lines ok 15 - One word per line ok 16 - Excessive wrap length ok 17 - Zero wrap length ok 18 - Negative wrap length ok 19 - Unmodified string is one line long ok 20 - Default wrapping gives two lines ok 21 - One word per line ok 22 - Excessive wrap length ok 23 - Zero wrap length ok 24 - Negative wrap length ok 25 - Unmodified string is one line long ok 26 - Default wrapping gives two lines ok 27 - One word per line ok 28 - Excessive wrap length ok 29 - Zero wrap length ok 30 - Negative wrap length ok 31 - Unmodified string is one line long ok 32 - Default wrapping gives two lines ok 33 - One word per line ok 34 - Excessive wrap length ok 35 - Zero wrap length ok 36 - Negative wrap length 1..36 ok t/y2038.t .................... ok 1 ok 2 1..2 ok Test Summary Report ------------------- t/Meta/super.t (Wstat: 512 Tests: 8 Failed: 2) Failed tests: 6, 8 Non-zero exit status: 2 t/foreach.t (Wstat: 256 Tests: 6 Failed: 1) Failed test: 6 Non-zero exit status: 1 t/utf8.t (Wstat: 256 Tests: 8 Failed: 1) Failed test: 6 Non-zero exit status: 1 Files=94, Tests=1094, 128 wallclock secs ( 1.29 usr 0.73 sys + 100.33 cusr 10.38 csys = 112.73 CPU) Result: FAIL Failed 3/94 test programs. 4/1094 subtests failed. MSCHWERN/perl5i-v2.9.1.tar.gz ./Build test verbose=1 -- NOT OK //hint// to see the cpan-testers results for installing this module, try: reports MSCHWERN/perl5i-v2.9.1.tar.gz Finished 2012-04-19T12:13:02