Fri Jan 21 02:23:02 UTC 2022 I: starting to build libautovivification-perl/bullseye/amd64 on jenkins on '2022-01-21 02:22' Fri Jan 21 02:23:02 UTC 2022 I: The jenkins build log is/was available at https://jenkins.debian.net/userContent/reproducible/debian/build_service/amd64_10/52716/console.log Fri Jan 21 02:23:02 UTC 2022 I: Downloading source for bullseye/libautovivification-perl=0.18-1 --2022-01-21 02:23:02-- http://cdn-fastly.deb.debian.org/debian/pool/main/liba/libautovivification-perl/libautovivification-perl_0.18-1.dsc Connecting to 78.137.99.97:3128... connected. Proxy request sent, awaiting response... 200 OK Length: 2225 (2.2K) Saving to: ‘libautovivification-perl_0.18-1.dsc’ 0K .. 100% 225M=0s 2022-01-21 02:23:03 (225 MB/s) - ‘libautovivification-perl_0.18-1.dsc’ saved [2225/2225] Fri Jan 21 02:23:03 UTC 2022 I: libautovivification-perl_0.18-1.dsc -----BEGIN PGP SIGNED MESSAGE----- Hash: SHA256 Format: 3.0 (quilt) Source: libautovivification-perl Binary: libautovivification-perl Architecture: any Version: 0.18-1 Maintainer: Debian Perl Group Uploaders: Ivan Kohler , gregor herrmann , Xavier Guimard Homepage: https://metacpan.org/release/autovivification Standards-Version: 4.1.1 Vcs-Browser: https://anonscm.debian.org/cgit/pkg-perl/packages/libautovivification-perl.git Vcs-Git: https://anonscm.debian.org/git/pkg-perl/packages/libautovivification-perl.git Testsuite: autopkgtest-pkg-perl Build-Depends: debhelper (>= 9.20120312), perl Package-List: libautovivification-perl deb perl optional arch=any Checksums-Sha1: 7a2dc5e20f85c88bc88b591551fdfd693f914e3c 55854 libautovivification-perl_0.18.orig.tar.gz f8b97e251192785659f418a85c2643a7cb6e25bc 3404 libautovivification-perl_0.18-1.debian.tar.xz Checksums-Sha256: 2d99975685242980d0a9904f639144c059d6ece15899efde4acb742d3253f105 55854 libautovivification-perl_0.18.orig.tar.gz f3d1a6f908a4d9693f5803f8b3f3ee35eeda54601f0766a0fe79f8609480157a 3404 libautovivification-perl_0.18-1.debian.tar.xz Files: 8dec994e1e7d368e055f21a5777385a0 55854 libautovivification-perl_0.18.orig.tar.gz 17ab371e0d7cfce943f7d3d3c1ae2f13 3404 libautovivification-perl_0.18-1.debian.tar.xz -----BEGIN PGP SIGNATURE----- iQIzBAEBCAAdFiEErqDETssFbpNjDZ0z276dTZnSoAQFAlqqeKgACgkQ276dTZnS oASGzA//TqL/InglWjMQe5v9GGb2u4pIQiAe8xLrhMN7x9lhY9FEnzXifCeq8wB1 gue+qsKuP+xnGiQoxokUwpmCYt1iEWcqwRMqWuGQuJmN6UaQGcbsy4evuR0xPsz/ 7G89VY1v8LgJ0mL5aygkkFSnqdKJp8hkx0vkLuZDUlijJqtVSoUY2/naIXDlEwPX Jgkom/KdCqJz97/iLRvRtlV0954MJ5WMmZFWmr8TPTdEvtMZWaEQ91QZUlMTwEXd Z2nwAv8QsgAvJm3+z2hfFiGwVRLPaPinUwU4xdF+p4MAzt6f3GI17TGIT8fBqAVq E0MVIBR7DWXi1J7RLEDqOIYit3mxSs0Sesdd52vrYuv+uBmpDVSDWAw1dDgD9cfh 5sCd7h/r9630uhRF1qAagkdbl4Qi++cmugIn2+zZ6vjw3+byRhtnuZQrPpTgJiOr mt8PFSB3656iT5vEzc+95vETQYSOys08brDL50XoEbiIwH7+WEGS8ugAgXJlaQmD OwPLOxpkuVeGBzvlwpADD5bFkG3sHUq6O6GHvdlzNHzOgXNhyBuS2cNWCPvW0gSA iuf0sGLRo4C0Uz9cux+MyVZFIP5Y8TWZYZBmR79eVRh9TiPBDmGj5+lUm/dyuvUC o3jAmCZPqg76hV23wf+2Mh8R6qgufIHrGJj/p6rRn1/TXAOIIRU= =96cf -----END PGP SIGNATURE----- Fri Jan 21 02:23:03 UTC 2022 I: Checking whether the package is not for us Fri Jan 21 02:23:03 UTC 2022 I: Starting 1st build on remote node ionos5-amd64.debian.net. Fri Jan 21 02:23:03 UTC 2022 I: Preparing to do remote build '1' on ionos5-amd64.debian.net. Fri Jan 21 02:23:36 UTC 2022 I: Deleting $TMPDIR on ionos5-amd64.debian.net. I: pbuilder: network access will be disabled during build I: Current time: Wed Feb 22 20:46:04 -12 2023 I: pbuilder-time-stamp: 1677141964 I: Building the build Environment I: extracting base tarball [/var/cache/pbuilder/bullseye-reproducible-base.tgz] I: copying local configuration I: mounting /proc filesystem I: mounting /sys filesystem I: creating /{dev,run}/shm I: mounting /dev/pts filesystem I: redirecting /dev/ptmx to /dev/pts/ptmx I: policy-rc.d already exists I: Copying source file I: copying [libautovivification-perl_0.18-1.dsc] I: copying [./libautovivification-perl_0.18.orig.tar.gz] I: copying [./libautovivification-perl_0.18-1.debian.tar.xz] I: Extracting source gpgv: unknown type of key resource 'trustedkeys.kbx' gpgv: keyblock resource '/tmp/dpkg-verify-sig.cq5bYauD/trustedkeys.kbx': General error gpgv: Signature made Thu Mar 15 01:44:08 2018 -12 gpgv: using RSA key AEA0C44ECB056E93630D9D33DBBE9D4D99D2A004 gpgv: Can't check signature: No public key dpkg-source: warning: failed to verify signature on ./libautovivification-perl_0.18-1.dsc dpkg-source: info: extracting libautovivification-perl in libautovivification-perl-0.18 dpkg-source: info: unpacking libautovivification-perl_0.18.orig.tar.gz dpkg-source: info: unpacking libautovivification-perl_0.18-1.debian.tar.xz I: using fakeroot in build. I: Installing the build-deps I: user script /srv/workspace/pbuilder/216801/tmp/hooks/D02_print_environment starting I: set BUILDDIR='/build' BUILDUSERGECOS='first user,first room,first work-phone,first home-phone,first other' BUILDUSERNAME='pbuilder1' BUILD_ARCH='amd64' DEBIAN_FRONTEND='noninteractive' DEB_BUILD_OPTIONS='buildinfo=+all reproducible=+all,-fixfilepath parallel=16' DISTRIBUTION='' HOME='/root' HOST_ARCH='amd64' IFS=' ' INVOCATION_ID='d835c5d3d7cd47e3b95238993597f8b8' LANG='C' LANGUAGE='en_US:en' LC_ALL='C' MAIL='/var/mail/root' OPTIND='1' PATH='/usr/sbin:/usr/bin:/sbin:/bin:/usr/games' PBCURRENTCOMMANDLINEOPERATION='build' PBUILDER_OPERATION='build' PBUILDER_PKGDATADIR='/usr/share/pbuilder' PBUILDER_PKGLIBDIR='/usr/lib/pbuilder' PBUILDER_SYSCONFDIR='/etc' PPID='216801' PS1='# ' PS2='> ' PS4='+ ' PWD='/' SHELL='/bin/bash' SHLVL='2' SUDO_COMMAND='/usr/bin/timeout -k 18.1h 18h /usr/bin/ionice -c 3 /usr/bin/nice /usr/sbin/pbuilder --build --configfile /srv/reproducible-results/rbuild-debian/tmp.0RmhZIw1lG/pbuilderrc_Ow32 --hookdir /etc/pbuilder/first-build-hooks --debbuildopts -b --basetgz /var/cache/pbuilder/bullseye-reproducible-base.tgz --buildresult /srv/reproducible-results/rbuild-debian/tmp.0RmhZIw1lG/b1 --logfile b1/build.log libautovivification-perl_0.18-1.dsc' SUDO_GID='110' SUDO_UID='105' SUDO_USER='jenkins' TERM='unknown' TZ='/usr/share/zoneinfo/Etc/GMT+12' USER='root' _='/usr/bin/systemd-run' http_proxy='http://85.184.249.68:3128' I: uname -a Linux ionos5-amd64 5.15.0-0.bpo.2-amd64 #1 SMP Debian 5.15.5-2~bpo11+1 (2022-01-02) x86_64 GNU/Linux I: ls -l /bin total 5476 -rwxr-xr-x 1 root root 1234376 Aug 4 2021 bash -rwxr-xr-x 3 root root 38984 Jul 20 2020 bunzip2 -rwxr-xr-x 3 root root 38984 Jul 20 2020 bzcat lrwxrwxrwx 1 root root 6 Jul 20 2020 bzcmp -> bzdiff -rwxr-xr-x 1 root root 2225 Jul 20 2020 bzdiff lrwxrwxrwx 1 root root 6 Jul 20 2020 bzegrep -> bzgrep -rwxr-xr-x 1 root root 4877 Sep 4 2019 bzexe lrwxrwxrwx 1 root root 6 Jul 20 2020 bzfgrep -> bzgrep -rwxr-xr-x 1 root root 3775 Jul 20 2020 bzgrep -rwxr-xr-x 3 root root 38984 Jul 20 2020 bzip2 -rwxr-xr-x 1 root root 18424 Jul 20 2020 bzip2recover lrwxrwxrwx 1 root root 6 Jul 20 2020 bzless -> bzmore -rwxr-xr-x 1 root root 1297 Jul 20 2020 bzmore -rwxr-xr-x 1 root root 43936 Sep 23 2020 cat -rwxr-xr-x 1 root root 72672 Sep 23 2020 chgrp -rwxr-xr-x 1 root root 64448 Sep 23 2020 chmod -rwxr-xr-x 1 root root 72672 Sep 23 2020 chown -rwxr-xr-x 1 root root 151168 Sep 23 2020 cp -rwxr-xr-x 1 root root 125560 Dec 10 2020 dash -rwxr-xr-x 1 root root 113664 Sep 23 2020 date -rwxr-xr-x 1 root root 80968 Sep 23 2020 dd -rwxr-xr-x 1 root root 93936 Sep 23 2020 df -rwxr-xr-x 1 root root 147176 Sep 23 2020 dir -rwxr-xr-x 1 root root 84440 Jul 28 2021 dmesg lrwxrwxrwx 1 root root 8 Nov 6 2019 dnsdomainname -> hostname lrwxrwxrwx 1 root root 8 Nov 6 2019 domainname -> hostname -rwxr-xr-x 1 root root 39712 Sep 23 2020 echo -rwxr-xr-x 1 root root 28 Nov 9 2020 egrep -rwxr-xr-x 1 root root 39680 Sep 23 2020 false -rwxr-xr-x 1 root root 28 Nov 9 2020 fgrep -rwxr-xr-x 1 root root 69032 Jul 28 2021 findmnt -rwsr-xr-x 1 root root 34896 Feb 26 2021 fusermount -rwxr-xr-x 1 root root 203072 Nov 9 2020 grep -rwxr-xr-x 2 root root 2346 Mar 2 2021 gunzip -rwxr-xr-x 1 root root 6376 Mar 2 2021 gzexe -rwxr-xr-x 1 root root 98048 Mar 2 2021 gzip -rwxr-xr-x 1 root root 22600 Nov 6 2019 hostname -rwxr-xr-x 1 root root 72840 Sep 23 2020 ln -rwxr-xr-x 1 root root 56952 Feb 7 2020 login -rwxr-xr-x 1 root root 147176 Sep 23 2020 ls -rwxr-xr-x 1 root root 149736 Jul 28 2021 lsblk -rwxr-xr-x 1 root root 85184 Sep 23 2020 mkdir -rwxr-xr-x 1 root root 76896 Sep 23 2020 mknod -rwxr-xr-x 1 root root 48064 Sep 23 2020 mktemp -rwxr-xr-x 1 root root 59632 Jul 28 2021 more -rwsr-xr-x 1 root root 55528 Jul 28 2021 mount -rwxr-xr-x 1 root root 18664 Jul 28 2021 mountpoint -rwxr-xr-x 1 root root 147080 Sep 23 2020 mv lrwxrwxrwx 1 root root 8 Nov 6 2019 nisdomainname -> hostname lrwxrwxrwx 1 root root 14 Apr 18 2021 pidof -> /sbin/killall5 -rwxr-xr-x 1 root root 43872 Sep 23 2020 pwd lrwxrwxrwx 1 root root 4 Aug 4 2021 rbash -> bash -rwxr-xr-x 1 root root 52032 Sep 23 2020 readlink -rwxr-xr-x 1 root root 72704 Sep 23 2020 rm -rwxr-xr-x 1 root root 52032 Sep 23 2020 rmdir -rwxr-xr-x 1 root root 27472 Sep 27 2020 run-parts -rwxr-xr-x 1 root root 122224 Dec 22 2018 sed lrwxrwxrwx 1 root root 4 Feb 9 03:46 sh -> dash -rwxr-xr-x 1 root root 43808 Sep 23 2020 sleep -rwxr-xr-x 1 root root 84928 Sep 23 2020 stty -rwsr-xr-x 1 root root 71912 Jul 28 2021 su -rwxr-xr-x 1 root root 39744 Sep 23 2020 sync -rwxr-xr-x 1 root root 531928 Feb 16 2021 tar -rwxr-xr-x 1 root root 14456 Sep 27 2020 tempfile -rwxr-xr-x 1 root root 101408 Sep 23 2020 touch -rwxr-xr-x 1 root root 39680 Sep 23 2020 true -rwxr-xr-x 1 root root 14328 Feb 26 2021 ulockmgr_server -rwsr-xr-x 1 root root 35040 Jul 28 2021 umount -rwxr-xr-x 1 root root 39744 Sep 23 2020 uname -rwxr-xr-x 2 root root 2346 Mar 2 2021 uncompress -rwxr-xr-x 1 root root 147176 Sep 23 2020 vdir -rwxr-xr-x 1 root root 63744 Jul 28 2021 wdctl lrwxrwxrwx 1 root root 8 Nov 6 2019 ypdomainname -> hostname -rwxr-xr-x 1 root root 1984 Mar 2 2021 zcat -rwxr-xr-x 1 root root 1678 Mar 2 2021 zcmp -rwxr-xr-x 1 root root 5880 Mar 2 2021 zdiff -rwxr-xr-x 1 root root 29 Mar 2 2021 zegrep -rwxr-xr-x 1 root root 29 Mar 2 2021 zfgrep -rwxr-xr-x 1 root root 2081 Mar 2 2021 zforce -rwxr-xr-x 1 root root 7585 Mar 2 2021 zgrep -rwxr-xr-x 1 root root 2206 Mar 2 2021 zless -rwxr-xr-x 1 root root 1842 Mar 2 2021 zmore -rwxr-xr-x 1 root root 4553 Mar 2 2021 znew I: user script /srv/workspace/pbuilder/216801/tmp/hooks/D02_print_environment finished -> Attempting to satisfy build-dependencies -> Creating pbuilder-satisfydepends-dummy package Package: pbuilder-satisfydepends-dummy Version: 0.invalid.0 Architecture: amd64 Maintainer: Debian Pbuilder Team Description: Dummy package to satisfy dependencies with aptitude - created by pbuilder This package was created automatically by pbuilder to satisfy the build-dependencies of the package being currently built. Depends: debhelper (>= 9.20120312), perl dpkg-deb: building package 'pbuilder-satisfydepends-dummy' in '/tmp/satisfydepends-aptitude/pbuilder-satisfydepends-dummy.deb'. Selecting previously unselected package pbuilder-satisfydepends-dummy. (Reading database ... 19655 files and directories currently installed.) Preparing to unpack .../pbuilder-satisfydepends-dummy.deb ... Unpacking pbuilder-satisfydepends-dummy (0.invalid.0) ... dpkg: pbuilder-satisfydepends-dummy: dependency problems, but configuring anyway as you requested: pbuilder-satisfydepends-dummy depends on debhelper (>= 9.20120312); however: Package debhelper is not installed. Setting up pbuilder-satisfydepends-dummy (0.invalid.0) ... Reading package lists... Building dependency tree... Reading state information... Initializing package states... Writing extended state information... Building tag database... pbuilder-satisfydepends-dummy is already installed at the requested version (0.invalid.0) pbuilder-satisfydepends-dummy is already installed at the requested version (0.invalid.0) The following NEW packages will be installed: autoconf{a} automake{a} autopoint{a} autotools-dev{a} bsdextrautils{a} debhelper{a} dh-autoreconf{a} dh-strip-nondeterminism{a} dwz{a} file{a} gettext{a} gettext-base{a} groff-base{a} intltool-debian{a} libarchive-zip-perl{a} libdebhelper-perl{a} libelf1{a} libfile-stripnondeterminism-perl{a} libicu67{a} libmagic-mgc{a} libmagic1{a} libpipeline1{a} libsigsegv2{a} libsub-override-perl{a} libtool{a} libuchardet0{a} libxml2{a} m4{a} man-db{a} po-debconf{a} sensible-utils{a} The following packages are RECOMMENDED but will NOT be installed: curl libarchive-cpio-perl libltdl-dev libmail-sendmail-perl lynx wget 0 packages upgraded, 31 newly installed, 0 to remove and 0 not upgraded. Need to get 18.3 MB of archives. After unpacking 67.7 MB will be used. Writing extended state information... Get: 1 http://deb.debian.org/debian bullseye/main amd64 bsdextrautils amd64 2.36.1-8 [145 kB] Get: 2 http://deb.debian.org/debian bullseye/main amd64 libuchardet0 amd64 0.0.7-1 [67.8 kB] Get: 3 http://deb.debian.org/debian bullseye/main amd64 groff-base amd64 1.22.4-6 [936 kB] Get: 4 http://deb.debian.org/debian bullseye/main amd64 libpipeline1 amd64 1.5.3-1 [34.3 kB] Get: 5 http://deb.debian.org/debian bullseye/main amd64 man-db amd64 2.9.4-2 [1354 kB] Get: 6 http://deb.debian.org/debian bullseye/main amd64 sensible-utils all 0.0.14 [14.8 kB] Get: 7 http://deb.debian.org/debian bullseye/main amd64 libmagic-mgc amd64 1:5.39-3 [273 kB] Get: 8 http://deb.debian.org/debian bullseye/main amd64 libmagic1 amd64 1:5.39-3 [126 kB] Get: 9 http://deb.debian.org/debian bullseye/main amd64 file amd64 1:5.39-3 [69.1 kB] Get: 10 http://deb.debian.org/debian bullseye/main amd64 gettext-base amd64 0.21-4 [175 kB] Get: 11 http://deb.debian.org/debian bullseye/main amd64 libsigsegv2 amd64 2.13-1 [34.8 kB] Get: 12 http://deb.debian.org/debian bullseye/main amd64 m4 amd64 1.4.18-5 [204 kB] Get: 13 http://deb.debian.org/debian bullseye/main amd64 autoconf all 2.69-14 [313 kB] Get: 14 http://deb.debian.org/debian bullseye/main amd64 autotools-dev all 20180224.1+nmu1 [77.1 kB] Get: 15 http://deb.debian.org/debian bullseye/main amd64 automake all 1:1.16.3-2 [814 kB] Get: 16 http://deb.debian.org/debian bullseye/main amd64 autopoint all 0.21-4 [510 kB] Get: 17 http://deb.debian.org/debian bullseye/main amd64 libdebhelper-perl all 13.3.4 [189 kB] Get: 18 http://deb.debian.org/debian bullseye/main amd64 libtool all 2.4.6-15 [513 kB] Get: 19 http://deb.debian.org/debian bullseye/main amd64 dh-autoreconf all 20 [17.1 kB] Get: 20 http://deb.debian.org/debian bullseye/main amd64 libarchive-zip-perl all 1.68-1 [104 kB] Get: 21 http://deb.debian.org/debian bullseye/main amd64 libsub-override-perl all 0.09-2 [10.2 kB] Get: 22 http://deb.debian.org/debian bullseye/main amd64 libfile-stripnondeterminism-perl all 1.12.0-1 [26.3 kB] Get: 23 http://deb.debian.org/debian bullseye/main amd64 dh-strip-nondeterminism all 1.12.0-1 [15.4 kB] Get: 24 http://deb.debian.org/debian bullseye/main amd64 libelf1 amd64 0.183-1 [165 kB] Get: 25 http://deb.debian.org/debian bullseye/main amd64 dwz amd64 0.13+20210201-1 [175 kB] Get: 26 http://deb.debian.org/debian bullseye/main amd64 libicu67 amd64 67.1-7 [8622 kB] Get: 27 http://deb.debian.org/debian bullseye/main amd64 libxml2 amd64 2.9.10+dfsg-6.7 [693 kB] Get: 28 http://deb.debian.org/debian bullseye/main amd64 gettext amd64 0.21-4 [1311 kB] Get: 29 http://deb.debian.org/debian bullseye/main amd64 intltool-debian all 0.35.0+20060710.5 [26.8 kB] Get: 30 http://deb.debian.org/debian bullseye/main amd64 po-debconf all 1.0.21+nmu1 [248 kB] Get: 31 http://deb.debian.org/debian bullseye/main amd64 debhelper all 13.3.4 [1049 kB] Fetched 18.3 MB in 0s (72.3 MB/s) debconf: delaying package configuration, since apt-utils is not installed Selecting previously unselected package bsdextrautils. (Reading database ... (Reading database ... 5% (Reading database ... 10% (Reading database ... 15% (Reading database ... 20% (Reading database ... 25% (Reading database ... 30% (Reading database ... 35% (Reading database ... 40% (Reading database ... 45% (Reading database ... 50% (Reading database ... 55% (Reading database ... 60% (Reading database ... 65% (Reading database ... 70% (Reading database ... 75% (Reading database ... 80% (Reading database ... 85% (Reading database ... 90% (Reading database ... 95% (Reading database ... 100% (Reading database ... 19655 files and directories currently installed.) Preparing to unpack .../00-bsdextrautils_2.36.1-8_amd64.deb ... Unpacking bsdextrautils (2.36.1-8) ... Selecting previously unselected package libuchardet0:amd64. Preparing to unpack .../01-libuchardet0_0.0.7-1_amd64.deb ... Unpacking libuchardet0:amd64 (0.0.7-1) ... Selecting previously unselected package groff-base. Preparing to unpack .../02-groff-base_1.22.4-6_amd64.deb ... Unpacking groff-base (1.22.4-6) ... Selecting previously unselected package libpipeline1:amd64. Preparing to unpack .../03-libpipeline1_1.5.3-1_amd64.deb ... Unpacking libpipeline1:amd64 (1.5.3-1) ... Selecting previously unselected package man-db. Preparing to unpack .../04-man-db_2.9.4-2_amd64.deb ... Unpacking man-db (2.9.4-2) ... Selecting previously unselected package sensible-utils. Preparing to unpack .../05-sensible-utils_0.0.14_all.deb ... Unpacking sensible-utils (0.0.14) ... Selecting previously unselected package libmagic-mgc. Preparing to unpack .../06-libmagic-mgc_1%3a5.39-3_amd64.deb ... Unpacking libmagic-mgc (1:5.39-3) ... Selecting previously unselected package libmagic1:amd64. Preparing to unpack .../07-libmagic1_1%3a5.39-3_amd64.deb ... Unpacking libmagic1:amd64 (1:5.39-3) ... Selecting previously unselected package file. Preparing to unpack .../08-file_1%3a5.39-3_amd64.deb ... Unpacking file (1:5.39-3) ... Selecting previously unselected package gettext-base. Preparing to unpack .../09-gettext-base_0.21-4_amd64.deb ... Unpacking gettext-base (0.21-4) ... Selecting previously unselected package libsigsegv2:amd64. Preparing to unpack .../10-libsigsegv2_2.13-1_amd64.deb ... Unpacking libsigsegv2:amd64 (2.13-1) ... Selecting previously unselected package m4. Preparing to unpack .../11-m4_1.4.18-5_amd64.deb ... Unpacking m4 (1.4.18-5) ... Selecting previously unselected package autoconf. Preparing to unpack .../12-autoconf_2.69-14_all.deb ... Unpacking autoconf (2.69-14) ... Selecting previously unselected package autotools-dev. Preparing to unpack .../13-autotools-dev_20180224.1+nmu1_all.deb ... Unpacking autotools-dev (20180224.1+nmu1) ... Selecting previously unselected package automake. Preparing to unpack .../14-automake_1%3a1.16.3-2_all.deb ... Unpacking automake (1:1.16.3-2) ... Selecting previously unselected package autopoint. Preparing to unpack .../15-autopoint_0.21-4_all.deb ... Unpacking autopoint (0.21-4) ... Selecting previously unselected package libdebhelper-perl. Preparing to unpack .../16-libdebhelper-perl_13.3.4_all.deb ... Unpacking libdebhelper-perl (13.3.4) ... Selecting previously unselected package libtool. Preparing to unpack .../17-libtool_2.4.6-15_all.deb ... Unpacking libtool (2.4.6-15) ... Selecting previously unselected package dh-autoreconf. Preparing to unpack .../18-dh-autoreconf_20_all.deb ... Unpacking dh-autoreconf (20) ... Selecting previously unselected package libarchive-zip-perl. Preparing to unpack .../19-libarchive-zip-perl_1.68-1_all.deb ... Unpacking libarchive-zip-perl (1.68-1) ... Selecting previously unselected package libsub-override-perl. Preparing to unpack .../20-libsub-override-perl_0.09-2_all.deb ... Unpacking libsub-override-perl (0.09-2) ... Selecting previously unselected package libfile-stripnondeterminism-perl. Preparing to unpack .../21-libfile-stripnondeterminism-perl_1.12.0-1_all.deb ... Unpacking libfile-stripnondeterminism-perl (1.12.0-1) ... Selecting previously unselected package dh-strip-nondeterminism. Preparing to unpack .../22-dh-strip-nondeterminism_1.12.0-1_all.deb ... Unpacking dh-strip-nondeterminism (1.12.0-1) ... Selecting previously unselected package libelf1:amd64. Preparing to unpack .../23-libelf1_0.183-1_amd64.deb ... Unpacking libelf1:amd64 (0.183-1) ... Selecting previously unselected package dwz. Preparing to unpack .../24-dwz_0.13+20210201-1_amd64.deb ... Unpacking dwz (0.13+20210201-1) ... Selecting previously unselected package libicu67:amd64. Preparing to unpack .../25-libicu67_67.1-7_amd64.deb ... Unpacking libicu67:amd64 (67.1-7) ... Selecting previously unselected package libxml2:amd64. Preparing to unpack .../26-libxml2_2.9.10+dfsg-6.7_amd64.deb ... Unpacking libxml2:amd64 (2.9.10+dfsg-6.7) ... Selecting previously unselected package gettext. Preparing to unpack .../27-gettext_0.21-4_amd64.deb ... Unpacking gettext (0.21-4) ... Selecting previously unselected package intltool-debian. Preparing to unpack .../28-intltool-debian_0.35.0+20060710.5_all.deb ... Unpacking intltool-debian (0.35.0+20060710.5) ... Selecting previously unselected package po-debconf. Preparing to unpack .../29-po-debconf_1.0.21+nmu1_all.deb ... Unpacking po-debconf (1.0.21+nmu1) ... Selecting previously unselected package debhelper. Preparing to unpack .../30-debhelper_13.3.4_all.deb ... Unpacking debhelper (13.3.4) ... Setting up libpipeline1:amd64 (1.5.3-1) ... Setting up bsdextrautils (2.36.1-8) ... update-alternatives: using /usr/bin/write.ul to provide /usr/bin/write (write) in auto mode Setting up libicu67:amd64 (67.1-7) ... Setting up libmagic-mgc (1:5.39-3) ... Setting up libarchive-zip-perl (1.68-1) ... Setting up libdebhelper-perl (13.3.4) ... Setting up libmagic1:amd64 (1:5.39-3) ... Setting up gettext-base (0.21-4) ... Setting up file (1:5.39-3) ... Setting up autotools-dev (20180224.1+nmu1) ... Setting up libsigsegv2:amd64 (2.13-1) ... Setting up autopoint (0.21-4) ... Setting up sensible-utils (0.0.14) ... Setting up libuchardet0:amd64 (0.0.7-1) ... Setting up libsub-override-perl (0.09-2) ... Setting up libelf1:amd64 (0.183-1) ... Setting up libxml2:amd64 (2.9.10+dfsg-6.7) ... Setting up libfile-stripnondeterminism-perl (1.12.0-1) ... Setting up gettext (0.21-4) ... Setting up libtool (2.4.6-15) ... Setting up m4 (1.4.18-5) ... Setting up intltool-debian (0.35.0+20060710.5) ... Setting up autoconf (2.69-14) ... Setting up dh-strip-nondeterminism (1.12.0-1) ... Setting up dwz (0.13+20210201-1) ... Setting up groff-base (1.22.4-6) ... Setting up automake (1:1.16.3-2) ... update-alternatives: using /usr/bin/automake-1.16 to provide /usr/bin/automake (automake) in auto mode Setting up po-debconf (1.0.21+nmu1) ... Setting up man-db (2.9.4-2) ... Not building database; man-db/auto-update is not 'true'. Setting up dh-autoreconf (20) ... Setting up debhelper (13.3.4) ... Processing triggers for libc-bin (2.31-13+deb11u2) ... Reading package lists... Building dependency tree... Reading state information... Reading extended state information... Initializing package states... Writing extended state information... Building tag database... -> Finished parsing the build-deps Reading package lists... Building dependency tree... Reading state information... fakeroot is already the newest version (1.25.3-1.1). 0 upgraded, 0 newly installed, 0 to remove and 0 not upgraded. I: Building the package I: Running cd /build/libautovivification-perl-0.18/ && env PATH="/usr/sbin:/usr/bin:/sbin:/bin:/usr/games" HOME="/nonexistent/first-build" dpkg-buildpackage -us -uc -b && env PATH="/usr/sbin:/usr/bin:/sbin:/bin:/usr/games" HOME="/nonexistent/first-build" dpkg-genchanges -S > ../libautovivification-perl_0.18-1_source.changes dpkg-buildpackage: info: source package libautovivification-perl dpkg-buildpackage: info: source version 0.18-1 dpkg-buildpackage: info: source distribution unstable dpkg-buildpackage: info: source changed by Damyan Ivanov dpkg-source --before-build . dpkg-buildpackage: info: host architecture amd64 fakeroot debian/rules clean dh clean dh: warning: Compatibility levels before 10 are deprecated (level 9 in use) dh_clean dh_clean: warning: Compatibility levels before 10 are deprecated (level 9 in use) debian/rules build dh build dh: warning: Compatibility levels before 10 are deprecated (level 9 in use) dh_update_autotools_config dh_auto_configure dh_auto_configure: warning: Compatibility levels before 10 are deprecated (level 9 in use) perl -I. Makefile.PL INSTALLDIRS=vendor "OPTIMIZE=-g -O2 -fdebug-prefix-map=/build/libautovivification-perl-0.18=. -fstack-protector-strong -Wformat -Werror=format-security -Wdate-time -D_FORTIFY_SOURCE=2" "LD=x86_64-linux-gnu-gcc -g -O2 -fdebug-prefix-map=/build/libautovivification-perl-0.18=. -fstack-protector-strong -Wformat -Werror=format-security -Wl,-z,relro -Wl,-z,now" 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 Generating a Unix-style Makefile Writing Makefile for autovivification Writing MYMETA.yml and MYMETA.json dh_auto_build dh_auto_build: warning: Compatibility levels before 10 are deprecated (level 9 in use) make -j1 make[1]: Entering directory '/build/libautovivification-perl-0.18' cp lib/autovivification.pm blib/lib/autovivification.pm Running Mkbootstrap for autovivification () chmod 644 "autovivification.bs" "/usr/bin/perl" -MExtUtils::Command::MM -e 'cp_nonempty' -- autovivification.bs blib/arch/auto/autovivification/autovivification.bs 644 "/usr/bin/perl" "/usr/share/perl/5.32/ExtUtils/xsubpp" -typemap '/usr/share/perl/5.32/ExtUtils/typemap' autovivification.xs > autovivification.xsc mv autovivification.xsc autovivification.c x86_64-linux-gnu-gcc -c -D_REENTRANT -D_GNU_SOURCE -DDEBIAN -fwrapv -fno-strict-aliasing -pipe -I/usr/local/include -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64 -g -O2 -fdebug-prefix-map=/build/libautovivification-perl-0.18=. -fstack-protector-strong -Wformat -Werror=format-security -Wdate-time -D_FORTIFY_SOURCE=2 -DVERSION=\"0.18\" -DXS_VERSION=\"0.18\" -fPIC "-I/usr/lib/x86_64-linux-gnu/perl/5.32/CORE" autovivification.c rm -f blib/arch/auto/autovivification/autovivification.so x86_64-linux-gnu-gcc -g -O2 -fdebug-prefix-map=/build/libautovivification-perl-0.18=. -fstack-protector-strong -Wformat -Werror=format-security -Wl,-z,relro -Wl,-z,now -shared -L/usr/local/lib -fstack-protector-strong autovivification.o -o blib/arch/auto/autovivification/autovivification.so \ \ chmod 755 blib/arch/auto/autovivification/autovivification.so Manifying 1 pod document make[1]: Leaving directory '/build/libautovivification-perl-0.18' dh_auto_test dh_auto_test: warning: Compatibility levels before 10 are deprecated (level 9 in use) make -j1 test TEST_VERBOSE=1 make[1]: Entering directory '/build/libautovivification-perl-0.18' "/usr/bin/perl" -MExtUtils::Command::MM -e 'cp_nonempty' -- autovivification.bs blib/arch/auto/autovivification/autovivification.bs 644 PERL_DL_NONLAZY=1 "/usr/bin/perl" "-MExtUtils::Command::MM" "-MTest::Harness" "-e" "undef *Test::Harness::Switches; test_harness(1, 'blib/lib', 'blib/arch')" t/*.t # Testing autovivification 0.18, Perl 5.032001, /usr/bin/perl t/00-load.t .............. 1..1 ok 1 - use autovivification; ok # Using threads 2.25 # Using threads::shared 1.61 t/09-load-threads.t ...... ok 1 - main body, beginning: module not loaded ok 2 - first serial thread, beginning: module not loaded ok 3 - first serial thread, after loading: module loaded ok 4 - main body, in between serial loadings: module not loaded ok 5 - second serial thread, beginning: module not loaded ok 6 - second serial thread, after loading: module loaded ok 7 - main body, after serial loadings: module not loaded ok 8 - parent thread, beginning: module not loaded ok 9 - child thread, beginning: module not loaded ok 10 - child thread, after loading: module loaded ok 11 - parent thread, after child terminated: module not loaded ok 12 - parent thread, after loading: module loaded ok 13 - main body, after nested loadings: module not loaded ok 14 - second simultaneous thread (finishes first), beginning: module not loaded ok 15 - first simultaneous thread (finishes last), beginning: module not loaded ok 16 - second simultaneous thread (finishes first), loaded in other thread but not here: module not loaded ok 17 - first simultaneous thread (finishes last), after loading: module loaded ok 18 - second simultaneous thread (finishes first), after loading: module loaded ok 19 - first simultaneous thread (finishes last), still loaded while also loaded in the other thread: module loaded ok 20 - second simultaneous thread (finishes first), end: module loaded ok 21 - first simultaneous thread (finishes last), end: module loaded ok 22 - main body, after simultaneous threads: module not loaded ok 23 - first simultaneous thread (finishes first), beginning: module not loaded ok 24 - second simultaneous thread (finishes last), beginning: module not loaded ok 25 - second simultaneous thread (finishes last), loaded in other thread but not here: module not loaded ok 26 - first simultaneous thread (finishes first), after loading: module loaded ok 27 - first simultaneous thread (finishes first), still loaded while also loaded in the other thread: module loaded ok 28 - first simultaneous thread (finishes first), end: module loaded ok 29 - second simultaneous thread (finishes last), after loading: module loaded ok 30 - second simultaneous thread (finishes last), end: module loaded ok 31 - main body, after simultaneous threads: module not loaded ok 32 - simple clone, parent thread, beginning: module not loaded ok 33 - simple clone, parent thread, after loading: module loaded ok 34 - simple clone, child thread, beginning: module loaded ok 35 - simple clone, parent thread, after child terminated: module loaded ok 36 - main body, after simple clone: module not loaded ok 37 - outliving clone, parent thread, beginning: module not loaded ok 38 - outliving clone, parent thread, after loading: module loaded ok 39 - outliving clone, parent thread, end: module loaded ok 40 - outliving clone, child thread, beginning: module loaded ok 41 - outliving clone, child thread, end: module loaded ok 42 - main body, after outliving clone: module not loaded ok 43 - main body, loaded at end: module loaded 1..43 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.05 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.07 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 # Using B::Deparse 1.54 t/42-deparse.t ........... 1..2 ok 1 - Original blech() works ok 2 - Deparsed blech() works ok t/43-peep.t .............. 1..36 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 infinite until loops testcase did not crash ok 19 - peephole optimization of infinite until loops compiled fine ok 20 - peephole optimization of infinite while loops testcase did not crash ok 21 - peephole optimization of infinite while loops compiled fine ok 22 - peephole optimization of infinite for loops (RT \#64435) testcase did not crash ok 23 - peephole optimization of infinite for loops (RT \#64435) compiled fine ok 24 - peephole optimization of infinite postfix until testcase did not crash ok 25 - peephole optimization of infinite postfix until compiled fine ok 26 - peephole optimization of infinite postfix while (RT \#99458) testcase did not crash ok 27 - peephole optimization of infinite postfix while (RT \#99458) compiled fine ok 28 - peephole optimization of map compiled fine ok 29 - peephole optimization of map did not autovivify ok 30 - peephole optimization of map returned the right value ok 31 - peephole optimization of grep compiled fine ok 32 - peephole optimization of grep did not autovivify ok 33 - peephole optimization of grep returned the right value ok 34 - peephole optimization of substitutions compiled fine ok 35 - peephole optimization of substitutions did not autovivify ok 36 - peephole optimization of substitutions returned the right value ok t/44-multideref.t ........ 1..16384 ok 1 - $vlex[0][0][0]: no exception ok 2 - $vlex[0][0][0]: value ok 3 - $vlex[0][0][0] = 123: no exception ok 4 - $vlex[0][0][0] = 123: value ok 5 - exists $vlex[0][0][0]: no exception ok 6 - exists $vlex[0][0][0]: value ok 7 - delete $vlex[0][0][0]: no exception ok 8 - delete $vlex[0][0][0]: value ok 9 - $vgbl[0][0][0]: no exception ok 10 - $vgbl[0][0][0]: value ok 11 - $vgbl[0][0][0] = 123: no exception ok 12 - $vgbl[0][0][0] = 123: value ok 13 - exists $vgbl[0][0][0]: no exception ok 14 - exists $vgbl[0][0][0]: value ok 15 - delete $vgbl[0][0][0]: no exception ok 16 - delete $vgbl[0][0][0]: value ok 17 - $vrlex->[0][0][0]: no exception ok 18 - $vrlex->[0][0][0]: value ok 19 - $vrlex->[0][0][0] = 123: no exception ok 20 - $vrlex->[0][0][0] = 123: value ok 21 - exists $vrlex->[0][0][0]: no exception ok 22 - exists $vrlex->[0][0][0]: value ok 23 - delete $vrlex->[0][0][0]: no exception ok 24 - delete $vrlex->[0][0][0]: value ok 25 - $vrgbl->[0][0][0]: no exception ok 26 - $vrgbl->[0][0][0]: value ok 27 - $vrgbl->[0][0][0] = 123: no exception ok 28 - $vrgbl->[0][0][0] = 123: value ok 29 - exists $vrgbl->[0][0][0]: no exception ok 30 - exists $vrgbl->[0][0][0]: value ok 31 - delete $vrgbl->[0][0][0]: no exception ok 32 - delete $vrgbl->[0][0][0]: value ok 33 - $vlex[$lex][0][0]: no exception ok 34 - $vlex[$lex][0][0]: value ok 35 - $vlex[$lex][0][0] = 123: no exception ok 36 - $vlex[$lex][0][0] = 123: value ok 37 - exists $vlex[$lex][0][0]: no exception ok 38 - exists $vlex[$lex][0][0]: value ok 39 - delete $vlex[$lex][0][0]: no exception ok 40 - delete $vlex[$lex][0][0]: value ok 41 - $vgbl[$lex][0][0]: no exception ok 42 - $vgbl[$lex][0][0]: value ok 43 - $vgbl[$lex][0][0] = 123: no exception ok 44 - $vgbl[$lex][0][0] = 123: value ok 45 - exists $vgbl[$lex][0][0]: no exception ok 46 - exists $vgbl[$lex][0][0]: value ok 47 - delete $vgbl[$lex][0][0]: no exception ok 48 - delete $vgbl[$lex][0][0]: value ok 49 - $vrlex->[$lex][0][0]: no exception ok 50 - $vrlex->[$lex][0][0]: value ok 51 - $vrlex->[$lex][0][0] = 123: no exception ok 52 - $vrlex->[$lex][0][0] = 123: value ok 53 - exists $vrlex->[$lex][0][0]: no exception ok 54 - exists $vrlex->[$lex][0][0]: value ok 55 - delete $vrlex->[$lex][0][0]: no exception ok 56 - delete $vrlex->[$lex][0][0]: value ok 57 - $vrgbl->[$lex][0][0]: no exception ok 58 - $vrgbl->[$lex][0][0]: value ok 59 - $vrgbl->[$lex][0][0] = 123: no exception ok 60 - $vrgbl->[$lex][0][0] = 123: value ok 61 - exists $vrgbl->[$lex][0][0]: no exception ok 62 - exists $vrgbl->[$lex][0][0]: value ok 63 - delete $vrgbl->[$lex][0][0]: no exception ok 64 - delete $vrgbl->[$lex][0][0]: value ok 65 - $vlex[$gbl][0][0]: no exception ok 66 - $vlex[$gbl][0][0]: value ok 67 - $vlex[$gbl][0][0] = 123: no exception ok 68 - $vlex[$gbl][0][0] = 123: value ok 69 - exists $vlex[$gbl][0][0]: no exception ok 70 - exists $vlex[$gbl][0][0]: value ok 71 - delete $vlex[$gbl][0][0]: no exception ok 72 - delete $vlex[$gbl][0][0]: value ok 73 - $vgbl[$gbl][0][0]: no exception ok 74 - $vgbl[$gbl][0][0]: value ok 75 - $vgbl[$gbl][0][0] = 123: no exception ok 76 - $vgbl[$gbl][0][0] = 123: value ok 77 - exists $vgbl[$gbl][0][0]: no exception ok 78 - exists $vgbl[$gbl][0][0]: value ok 79 - delete $vgbl[$gbl][0][0]: no exception ok 80 - delete $vgbl[$gbl][0][0]: value ok 81 - $vrlex->[$gbl][0][0]: no exception ok 82 - $vrlex->[$gbl][0][0]: value ok 83 - $vrlex->[$gbl][0][0] = 123: no exception ok 84 - $vrlex->[$gbl][0][0] = 123: value ok 85 - exists $vrlex->[$gbl][0][0]: no exception ok 86 - exists $vrlex->[$gbl][0][0]: value ok 87 - delete $vrlex->[$gbl][0][0]: no exception ok 88 - delete $vrlex->[$gbl][0][0]: value ok 89 - $vrgbl->[$gbl][0][0]: no exception ok 90 - $vrgbl->[$gbl][0][0]: value ok 91 - $vrgbl->[$gbl][0][0] = 123: no exception ok 92 - $vrgbl->[$gbl][0][0] = 123: value ok 93 - exists $vrgbl->[$gbl][0][0]: no exception ok 94 - exists $vrgbl->[$gbl][0][0]: value ok 95 - delete $vrgbl->[$gbl][0][0]: no exception ok 96 - delete $vrgbl->[$gbl][0][0]: value ok 97 - $vlex[$lex+1][0][0]: no exception ok 98 - $vlex[$lex+1][0][0]: value ok 99 - $vlex[$lex+1][0][0] = 123: no exception ok 100 - $vlex[$lex+1][0][0] = 123: value ok 101 - exists $vlex[$lex+1][0][0]: no exception ok 102 - exists $vlex[$lex+1][0][0]: value ok 103 - delete $vlex[$lex+1][0][0]: no exception ok 104 - delete $vlex[$lex+1][0][0]: value ok 105 - $vgbl[$lex+1][0][0]: no exception ok 106 - $vgbl[$lex+1][0][0]: value ok 107 - $vgbl[$lex+1][0][0] = 123: no exception ok 108 - $vgbl[$lex+1][0][0] = 123: value ok 109 - exists $vgbl[$lex+1][0][0]: no exception ok 110 - exists $vgbl[$lex+1][0][0]: value ok 111 - delete $vgbl[$lex+1][0][0]: no exception ok 112 - delete $vgbl[$lex+1][0][0]: value ok 113 - $vrlex->[$lex+1][0][0]: no exception ok 114 - $vrlex->[$lex+1][0][0]: value ok 115 - $vrlex->[$lex+1][0][0] = 123: no exception ok 116 - $vrlex->[$lex+1][0][0] = 123: value ok 117 - exists $vrlex->[$lex+1][0][0]: no exception ok 118 - exists $vrlex->[$lex+1][0][0]: value ok 119 - delete $vrlex->[$lex+1][0][0]: no exception ok 120 - delete $vrlex->[$lex+1][0][0]: value ok 121 - $vrgbl->[$lex+1][0][0]: no exception ok 122 - $vrgbl->[$lex+1][0][0]: value ok 123 - $vrgbl->[$lex+1][0][0] = 123: no exception ok 124 - $vrgbl->[$lex+1][0][0] = 123: value ok 125 - exists $vrgbl->[$lex+1][0][0]: no exception ok 126 - exists $vrgbl->[$lex+1][0][0]: value ok 127 - delete $vrgbl->[$lex+1][0][0]: no exception ok 128 - delete $vrgbl->[$lex+1][0][0]: value ok 129 - $vlex{foo}[0][0]: no exception ok 130 - $vlex{foo}[0][0]: value ok 131 - $vlex{foo}[0][0] = 123: no exception ok 132 - $vlex{foo}[0][0] = 123: value ok 133 - exists $vlex{foo}[0][0]: no exception ok 134 - exists $vlex{foo}[0][0]: value ok 135 - delete $vlex{foo}[0][0]: no exception ok 136 - delete $vlex{foo}[0][0]: value ok 137 - $vgbl{foo}[0][0]: no exception ok 138 - $vgbl{foo}[0][0]: value ok 139 - $vgbl{foo}[0][0] = 123: no exception ok 140 - $vgbl{foo}[0][0] = 123: value ok 141 - exists $vgbl{foo}[0][0]: no exception ok 142 - exists $vgbl{foo}[0][0]: value ok 143 - delete $vgbl{foo}[0][0]: no exception ok 144 - delete $vgbl{foo}[0][0]: value ok 145 - $vrlex->{foo}[0][0]: no exception ok 146 - $vrlex->{foo}[0][0]: value ok 147 - $vrlex->{foo}[0][0] = 123: no exception ok 148 - $vrlex->{foo}[0][0] = 123: value ok 149 - exists $vrlex->{foo}[0][0]: no exception ok 150 - exists $vrlex->{foo}[0][0]: value ok 151 - delete $vrlex->{foo}[0][0]: no exception ok 152 - delete $vrlex->{foo}[0][0]: value ok 153 - $vrgbl->{foo}[0][0]: no exception ok 154 - $vrgbl->{foo}[0][0]: value ok 155 - $vrgbl->{foo}[0][0] = 123: no exception ok 156 - $vrgbl->{foo}[0][0] = 123: value ok 157 - exists $vrgbl->{foo}[0][0]: no exception ok 158 - exists $vrgbl->{foo}[0][0]: value ok 159 - delete $vrgbl->{foo}[0][0]: no exception ok 160 - delete $vrgbl->{foo}[0][0]: value ok 161 - $vlex{$lex}[0][0]: no exception ok 162 - $vlex{$lex}[0][0]: value ok 163 - $vlex{$lex}[0][0] = 123: no exception ok 164 - $vlex{$lex}[0][0] = 123: value ok 165 - exists $vlex{$lex}[0][0]: no exception ok 166 - exists $vlex{$lex}[0][0]: value ok 167 - delete $vlex{$lex}[0][0]: no exception ok 168 - delete $vlex{$lex}[0][0]: value ok 169 - $vgbl{$lex}[0][0]: no exception ok 170 - $vgbl{$lex}[0][0]: value ok 171 - $vgbl{$lex}[0][0] = 123: no exception ok 172 - $vgbl{$lex}[0][0] = 123: value ok 173 - exists $vgbl{$lex}[0][0]: no exception ok 174 - exists $vgbl{$lex}[0][0]: value ok 175 - delete $vgbl{$lex}[0][0]: no exception ok 176 - delete $vgbl{$lex}[0][0]: value ok 177 - $vrlex->{$lex}[0][0]: no exception ok 178 - $vrlex->{$lex}[0][0]: value ok 179 - $vrlex->{$lex}[0][0] = 123: no exception ok 180 - $vrlex->{$lex}[0][0] = 123: value ok 181 - exists $vrlex->{$lex}[0][0]: no exception ok 182 - exists $vrlex->{$lex}[0][0]: value ok 183 - delete $vrlex->{$lex}[0][0]: no exception ok 184 - delete $vrlex->{$lex}[0][0]: value ok 185 - $vrgbl->{$lex}[0][0]: no exception ok 186 - $vrgbl->{$lex}[0][0]: value ok 187 - $vrgbl->{$lex}[0][0] = 123: no exception ok 188 - $vrgbl->{$lex}[0][0] = 123: value ok 189 - exists $vrgbl->{$lex}[0][0]: no exception ok 190 - exists $vrgbl->{$lex}[0][0]: value ok 191 - delete $vrgbl->{$lex}[0][0]: no exception ok 192 - delete $vrgbl->{$lex}[0][0]: value ok 193 - $vlex{$gbl}[0][0]: no exception ok 194 - $vlex{$gbl}[0][0]: value ok 195 - $vlex{$gbl}[0][0] = 123: no exception ok 196 - $vlex{$gbl}[0][0] = 123: value ok 197 - exists $vlex{$gbl}[0][0]: no exception ok 198 - exists $vlex{$gbl}[0][0]: value ok 199 - delete $vlex{$gbl}[0][0]: no exception ok 200 - delete $vlex{$gbl}[0][0]: value ok 201 - $vgbl{$gbl}[0][0]: no exception ok 202 - $vgbl{$gbl}[0][0]: value ok 203 - $vgbl{$gbl}[0][0] = 123: no exception ok 204 - $vgbl{$gbl}[0][0] = 123: value ok 205 - exists $vgbl{$gbl}[0][0]: no exception ok 206 - exists $vgbl{$gbl}[0][0]: value ok 207 - delete $vgbl{$gbl}[0][0]: no exception ok 208 - delete $vgbl{$gbl}[0][0]: value ok 209 - $vrlex->{$gbl}[0][0]: no exception ok 210 - $vrlex->{$gbl}[0][0]: value ok 211 - $vrlex->{$gbl}[0][0] = 123: no exception ok 212 - $vrlex->{$gbl}[0][0] = 123: value ok 213 - exists $vrlex->{$gbl}[0][0]: no exception ok 214 - exists $vrlex->{$gbl}[0][0]: value ok 215 - delete $vrlex->{$gbl}[0][0]: no exception ok 216 - delete $vrlex->{$gbl}[0][0]: value ok 217 - $vrgbl->{$gbl}[0][0]: no exception ok 218 - $vrgbl->{$gbl}[0][0]: value ok 219 - $vrgbl->{$gbl}[0][0] = 123: no exception ok 220 - $vrgbl->{$gbl}[0][0] = 123: value ok 221 - exists $vrgbl->{$gbl}[0][0]: no exception ok 222 - exists $vrgbl->{$gbl}[0][0]: value ok 223 - delete $vrgbl->{$gbl}[0][0]: no exception ok 224 - delete $vrgbl->{$gbl}[0][0]: value ok 225 - $vlex{"x$lex"}[0][0]: no exception ok 226 - $vlex{"x$lex"}[0][0]: value ok 227 - $vlex{"x$lex"}[0][0] = 123: no exception ok 228 - $vlex{"x$lex"}[0][0] = 123: value ok 229 - exists $vlex{"x$lex"}[0][0]: no exception ok 230 - exists $vlex{"x$lex"}[0][0]: value ok 231 - delete $vlex{"x$lex"}[0][0]: no exception ok 232 - delete $vlex{"x$lex"}[0][0]: value ok 233 - $vgbl{"x$lex"}[0][0]: no exception ok 234 - $vgbl{"x$lex"}[0][0]: value ok 235 - $vgbl{"x$lex"}[0][0] = 123: no exception ok 236 - $vgbl{"x$lex"}[0][0] = 123: value ok 237 - exists $vgbl{"x$lex"}[0][0]: no exception ok 238 - exists $vgbl{"x$lex"}[0][0]: value ok 239 - delete $vgbl{"x$lex"}[0][0]: no exception ok 240 - delete $vgbl{"x$lex"}[0][0]: value ok 241 - $vrlex->{"x$lex"}[0][0]: no exception ok 242 - $vrlex->{"x$lex"}[0][0]: value ok 243 - $vrlex->{"x$lex"}[0][0] = 123: no exception ok 244 - $vrlex->{"x$lex"}[0][0] = 123: value ok 245 - exists $vrlex->{"x$lex"}[0][0]: no exception ok 246 - exists $vrlex->{"x$lex"}[0][0]: value ok 247 - delete $vrlex->{"x$lex"}[0][0]: no exception ok 248 - delete $vrlex->{"x$lex"}[0][0]: value ok 249 - $vrgbl->{"x$lex"}[0][0]: no exception ok 250 - $vrgbl->{"x$lex"}[0][0]: value ok 251 - $vrgbl->{"x$lex"}[0][0] = 123: no exception ok 252 - $vrgbl->{"x$lex"}[0][0] = 123: value ok 253 - exists $vrgbl->{"x$lex"}[0][0]: no exception ok 254 - exists $vrgbl->{"x$lex"}[0][0]: value ok 255 - delete $vrgbl->{"x$lex"}[0][0]: no exception ok 256 - delete $vrgbl->{"x$lex"}[0][0]: value ok 257 - $vlex[0][$lex][0]: no exception ok 258 - $vlex[0][$lex][0]: value ok 259 - $vlex[0][$lex][0] = 123: no exception ok 260 - $vlex[0][$lex][0] = 123: value ok 261 - exists $vlex[0][$lex][0]: no exception ok 262 - exists $vlex[0][$lex][0]: value ok 263 - delete $vlex[0][$lex][0]: no exception ok 264 - delete $vlex[0][$lex][0]: value ok 265 - $vgbl[0][$lex][0]: no exception ok 266 - $vgbl[0][$lex][0]: value ok 267 - $vgbl[0][$lex][0] = 123: no exception ok 268 - $vgbl[0][$lex][0] = 123: value ok 269 - exists $vgbl[0][$lex][0]: no exception ok 270 - exists $vgbl[0][$lex][0]: value ok 271 - delete $vgbl[0][$lex][0]: no exception ok 272 - delete $vgbl[0][$lex][0]: value ok 273 - $vrlex->[0][$lex][0]: no exception ok 274 - $vrlex->[0][$lex][0]: value ok 275 - $vrlex->[0][$lex][0] = 123: no exception ok 276 - $vrlex->[0][$lex][0] = 123: value ok 277 - exists $vrlex->[0][$lex][0]: no exception ok 278 - exists $vrlex->[0][$lex][0]: value ok 279 - delete $vrlex->[0][$lex][0]: no exception ok 280 - delete $vrlex->[0][$lex][0]: value ok 281 - $vrgbl->[0][$lex][0]: no exception ok 282 - $vrgbl->[0][$lex][0]: value ok 283 - $vrgbl->[0][$lex][0] = 123: no exception ok 284 - $vrgbl->[0][$lex][0] = 123: value ok 285 - exists $vrgbl->[0][$lex][0]: no exception ok 286 - exists $vrgbl->[0][$lex][0]: value ok 287 - delete $vrgbl->[0][$lex][0]: no exception ok 288 - delete $vrgbl->[0][$lex][0]: value ok 289 - $vlex[$lex][$lex][0]: no exception ok 290 - $vlex[$lex][$lex][0]: value ok 291 - $vlex[$lex][$lex][0] = 123: no exception ok 292 - $vlex[$lex][$lex][0] = 123: value ok 293 - exists $vlex[$lex][$lex][0]: no exception ok 294 - exists $vlex[$lex][$lex][0]: value ok 295 - delete $vlex[$lex][$lex][0]: no exception ok 296 - delete $vlex[$lex][$lex][0]: value ok 297 - $vgbl[$lex][$lex][0]: no exception ok 298 - $vgbl[$lex][$lex][0]: value ok 299 - $vgbl[$lex][$lex][0] = 123: no exception ok 300 - $vgbl[$lex][$lex][0] = 123: value ok 301 - exists $vgbl[$lex][$lex][0]: no exception ok 302 - exists $vgbl[$lex][$lex][0]: value ok 303 - delete $vgbl[$lex][$lex][0]: no exception ok 304 - delete $vgbl[$lex][$lex][0]: value ok 305 - $vrlex->[$lex][$lex][0]: no exception ok 306 - $vrlex->[$lex][$lex][0]: value ok 307 - $vrlex->[$lex][$lex][0] = 123: no exception ok 308 - $vrlex->[$lex][$lex][0] = 123: value ok 309 - exists $vrlex->[$lex][$lex][0]: no exception ok 310 - exists $vrlex->[$lex][$lex][0]: value ok 311 - delete $vrlex->[$lex][$lex][0]: no exception ok 312 - delete $vrlex->[$lex][$lex][0]: value ok 313 - $vrgbl->[$lex][$lex][0]: no exception ok 314 - $vrgbl->[$lex][$lex][0]: value ok 315 - $vrgbl->[$lex][$lex][0] = 123: no exception ok 316 - $vrgbl->[$lex][$lex][0] = 123: value ok 317 - exists $vrgbl->[$lex][$lex][0]: no exception ok 318 - exists $vrgbl->[$lex][$lex][0]: value ok 319 - delete $vrgbl->[$lex][$lex][0]: no exception ok 320 - delete $vrgbl->[$lex][$lex][0]: value ok 321 - $vlex[$gbl][$lex][0]: no exception ok 322 - $vlex[$gbl][$lex][0]: value ok 323 - $vlex[$gbl][$lex][0] = 123: no exception ok 324 - $vlex[$gbl][$lex][0] = 123: value ok 325 - exists $vlex[$gbl][$lex][0]: no exception ok 326 - exists $vlex[$gbl][$lex][0]: value ok 327 - delete $vlex[$gbl][$lex][0]: no exception ok 328 - delete $vlex[$gbl][$lex][0]: value ok 329 - $vgbl[$gbl][$lex][0]: no exception ok 330 - $vgbl[$gbl][$lex][0]: value ok 331 - $vgbl[$gbl][$lex][0] = 123: no exception ok 332 - $vgbl[$gbl][$lex][0] = 123: value ok 333 - exists $vgbl[$gbl][$lex][0]: no exception ok 334 - exists $vgbl[$gbl][$lex][0]: value ok 335 - delete $vgbl[$gbl][$lex][0]: no exception ok 336 - delete $vgbl[$gbl][$lex][0]: value ok 337 - $vrlex->[$gbl][$lex][0]: no exception ok 338 - $vrlex->[$gbl][$lex][0]: value ok 339 - $vrlex->[$gbl][$lex][0] = 123: no exception ok 340 - $vrlex->[$gbl][$lex][0] = 123: value ok 341 - exists $vrlex->[$gbl][$lex][0]: no exception ok 342 - exists $vrlex->[$gbl][$lex][0]: value ok 343 - delete $vrlex->[$gbl][$lex][0]: no exception ok 344 - delete $vrlex->[$gbl][$lex][0]: value ok 345 - $vrgbl->[$gbl][$lex][0]: no exception ok 346 - $vrgbl->[$gbl][$lex][0]: value ok 347 - $vrgbl->[$gbl][$lex][0] = 123: no exception ok 348 - $vrgbl->[$gbl][$lex][0] = 123: value ok 349 - exists $vrgbl->[$gbl][$lex][0]: no exception ok 350 - exists $vrgbl->[$gbl][$lex][0]: value ok 351 - delete $vrgbl->[$gbl][$lex][0]: no exception ok 352 - delete $vrgbl->[$gbl][$lex][0]: value ok 353 - $vlex[$lex+1][$lex][0]: no exception ok 354 - $vlex[$lex+1][$lex][0]: value ok 355 - $vlex[$lex+1][$lex][0] = 123: no exception ok 356 - $vlex[$lex+1][$lex][0] = 123: value ok 357 - exists $vlex[$lex+1][$lex][0]: no exception ok 358 - exists $vlex[$lex+1][$lex][0]: value ok 359 - delete $vlex[$lex+1][$lex][0]: no exception ok 360 - delete $vlex[$lex+1][$lex][0]: value ok 361 - $vgbl[$lex+1][$lex][0]: no exception ok 362 - $vgbl[$lex+1][$lex][0]: value ok 363 - $vgbl[$lex+1][$lex][0] = 123: no exception ok 364 - $vgbl[$lex+1][$lex][0] = 123: value ok 365 - exists $vgbl[$lex+1][$lex][0]: no exception ok 366 - exists $vgbl[$lex+1][$lex][0]: value ok 367 - delete $vgbl[$lex+1][$lex][0]: no exception ok 368 - delete $vgbl[$lex+1][$lex][0]: value ok 369 - $vrlex->[$lex+1][$lex][0]: no exception ok 370 - $vrlex->[$lex+1][$lex][0]: value ok 371 - $vrlex->[$lex+1][$lex][0] = 123: no exception ok 372 - $vrlex->[$lex+1][$lex][0] = 123: value ok 373 - exists $vrlex->[$lex+1][$lex][0]: no exception ok 374 - exists $vrlex->[$lex+1][$lex][0]: value ok 375 - delete $vrlex->[$lex+1][$lex][0]: no exception ok 376 - delete $vrlex->[$lex+1][$lex][0]: value ok 377 - $vrgbl->[$lex+1][$lex][0]: no exception ok 378 - $vrgbl->[$lex+1][$lex][0]: value ok 379 - $vrgbl->[$lex+1][$lex][0] = 123: no exception ok 380 - $vrgbl->[$lex+1][$lex][0] = 123: value ok 381 - exists $vrgbl->[$lex+1][$lex][0]: no exception ok 382 - exists $vrgbl->[$lex+1][$lex][0]: value ok 383 - delete $vrgbl->[$lex+1][$lex][0]: no exception ok 384 - delete $vrgbl->[$lex+1][$lex][0]: value ok 385 - $vlex{foo}[$lex][0]: no exception ok 386 - $vlex{foo}[$lex][0]: value ok 387 - $vlex{foo}[$lex][0] = 123: no exception ok 388 - $vlex{foo}[$lex][0] = 123: value ok 389 - exists $vlex{foo}[$lex][0]: no exception ok 390 - exists $vlex{foo}[$lex][0]: value ok 391 - delete $vlex{foo}[$lex][0]: no exception ok 392 - delete $vlex{foo}[$lex][0]: value ok 393 - $vgbl{foo}[$lex][0]: no exception ok 394 - $vgbl{foo}[$lex][0]: value ok 395 - $vgbl{foo}[$lex][0] = 123: no exception ok 396 - $vgbl{foo}[$lex][0] = 123: value ok 397 - exists $vgbl{foo}[$lex][0]: no exception ok 398 - exists $vgbl{foo}[$lex][0]: value ok 399 - delete $vgbl{foo}[$lex][0]: no exception ok 400 - delete $vgbl{foo}[$lex][0]: value ok 401 - $vrlex->{foo}[$lex][0]: no exception ok 402 - $vrlex->{foo}[$lex][0]: value ok 403 - $vrlex->{foo}[$lex][0] = 123: no exception ok 404 - $vrlex->{foo}[$lex][0] = 123: value ok 405 - exists $vrlex->{foo}[$lex][0]: no exception ok 406 - exists $vrlex->{foo}[$lex][0]: value ok 407 - delete $vrlex->{foo}[$lex][0]: no exception ok 408 - delete $vrlex->{foo}[$lex][0]: value ok 409 - $vrgbl->{foo}[$lex][0]: no exception ok 410 - $vrgbl->{foo}[$lex][0]: value ok 411 - $vrgbl->{foo}[$lex][0] = 123: no exception ok 412 - $vrgbl->{foo}[$lex][0] = 123: value ok 413 - exists $vrgbl->{foo}[$lex][0]: no exception ok 414 - exists $vrgbl->{foo}[$lex][0]: value ok 415 - delete $vrgbl->{foo}[$lex][0]: no exception ok 416 - delete $vrgbl->{foo}[$lex][0]: value ok 417 - $vlex{$lex}[$lex][0]: no exception ok 418 - $vlex{$lex}[$lex][0]: value ok 419 - $vlex{$lex}[$lex][0] = 123: no exception ok 420 - $vlex{$lex}[$lex][0] = 123: value ok 421 - exists $vlex{$lex}[$lex][0]: no exception ok 422 - exists $vlex{$lex}[$lex][0]: value ok 423 - delete $vlex{$lex}[$lex][0]: no exception ok 424 - delete $vlex{$lex}[$lex][0]: value ok 425 - $vgbl{$lex}[$lex][0]: no exception ok 426 - $vgbl{$lex}[$lex][0]: value ok 427 - $vgbl{$lex}[$lex][0] = 123: no exception ok 428 - $vgbl{$lex}[$lex][0] = 123: value ok 429 - exists $vgbl{$lex}[$lex][0]: no exception ok 430 - exists $vgbl{$lex}[$lex][0]: value ok 431 - delete $vgbl{$lex}[$lex][0]: no exception ok 432 - delete $vgbl{$lex}[$lex][0]: value ok 433 - $vrlex->{$lex}[$lex][0]: no exception ok 434 - $vrlex->{$lex}[$lex][0]: value ok 435 - $vrlex->{$lex}[$lex][0] = 123: no exception ok 436 - $vrlex->{$lex}[$lex][0] = 123: value ok 437 - exists $vrlex->{$lex}[$lex][0]: no exception ok 438 - exists $vrlex->{$lex}[$lex][0]: value ok 439 - delete $vrlex->{$lex}[$lex][0]: no exception ok 440 - delete $vrlex->{$lex}[$lex][0]: value ok 441 - $vrgbl->{$lex}[$lex][0]: no exception ok 442 - $vrgbl->{$lex}[$lex][0]: value ok 443 - $vrgbl->{$lex}[$lex][0] = 123: no exception ok 444 - $vrgbl->{$lex}[$lex][0] = 123: value ok 445 - exists $vrgbl->{$lex}[$lex][0]: no exception ok 446 - exists $vrgbl->{$lex}[$lex][0]: value ok 447 - delete $vrgbl->{$lex}[$lex][0]: no exception ok 448 - delete $vrgbl->{$lex}[$lex][0]: value ok 449 - $vlex{$gbl}[$lex][0]: no exception ok 450 - $vlex{$gbl}[$lex][0]: value ok 451 - $vlex{$gbl}[$lex][0] = 123: no exception ok 452 - $vlex{$gbl}[$lex][0] = 123: value ok 453 - exists $vlex{$gbl}[$lex][0]: no exception ok 454 - exists $vlex{$gbl}[$lex][0]: value ok 455 - delete $vlex{$gbl}[$lex][0]: no exception ok 456 - delete $vlex{$gbl}[$lex][0]: value ok 457 - $vgbl{$gbl}[$lex][0]: no exception ok 458 - $vgbl{$gbl}[$lex][0]: value ok 459 - $vgbl{$gbl}[$lex][0] = 123: no exception ok 460 - $vgbl{$gbl}[$lex][0] = 123: value ok 461 - exists $vgbl{$gbl}[$lex][0]: no exception ok 462 - exists $vgbl{$gbl}[$lex][0]: value ok 463 - delete $vgbl{$gbl}[$lex][0]: no exception ok 464 - delete $vgbl{$gbl}[$lex][0]: value ok 465 - $vrlex->{$gbl}[$lex][0]: no exception ok 466 - $vrlex->{$gbl}[$lex][0]: value ok 467 - $vrlex->{$gbl}[$lex][0] = 123: no exception ok 468 - $vrlex->{$gbl}[$lex][0] = 123: value ok 469 - exists $vrlex->{$gbl}[$lex][0]: no exception ok 470 - exists $vrlex->{$gbl}[$lex][0]: value ok 471 - delete $vrlex->{$gbl}[$lex][0]: no exception ok 472 - delete $vrlex->{$gbl}[$lex][0]: value ok 473 - $vrgbl->{$gbl}[$lex][0]: no exception ok 474 - $vrgbl->{$gbl}[$lex][0]: value ok 475 - $vrgbl->{$gbl}[$lex][0] = 123: no exception ok 476 - $vrgbl->{$gbl}[$lex][0] = 123: value ok 477 - exists $vrgbl->{$gbl}[$lex][0]: no exception ok 478 - exists $vrgbl->{$gbl}[$lex][0]: value ok 479 - delete $vrgbl->{$gbl}[$lex][0]: no exception ok 480 - delete $vrgbl->{$gbl}[$lex][0]: value ok 481 - $vlex{"x$lex"}[$lex][0]: no exception ok 482 - $vlex{"x$lex"}[$lex][0]: value ok 483 - $vlex{"x$lex"}[$lex][0] = 123: no exception ok 484 - $vlex{"x$lex"}[$lex][0] = 123: value ok 485 - exists $vlex{"x$lex"}[$lex][0]: no exception ok 486 - exists $vlex{"x$lex"}[$lex][0]: value ok 487 - delete $vlex{"x$lex"}[$lex][0]: no exception ok 488 - delete $vlex{"x$lex"}[$lex][0]: value ok 489 - $vgbl{"x$lex"}[$lex][0]: no exception ok 490 - $vgbl{"x$lex"}[$lex][0]: value ok 491 - $vgbl{"x$lex"}[$lex][0] = 123: no exception ok 492 - $vgbl{"x$lex"}[$lex][0] = 123: value ok 493 - exists $vgbl{"x$lex"}[$lex][0]: no exception ok 494 - exists $vgbl{"x$lex"}[$lex][0]: value ok 495 - delete $vgbl{"x$lex"}[$lex][0]: no exception ok 496 - delete $vgbl{"x$lex"}[$lex][0]: value ok 497 - $vrlex->{"x$lex"}[$lex][0]: no exception ok 498 - $vrlex->{"x$lex"}[$lex][0]: value ok 499 - $vrlex->{"x$lex"}[$lex][0] = 123: no exception ok 500 - $vrlex->{"x$lex"}[$lex][0] = 123: value ok 501 - exists $vrlex->{"x$lex"}[$lex][0]: no exception ok 502 - exists $vrlex->{"x$lex"}[$lex][0]: value ok 503 - delete $vrlex->{"x$lex"}[$lex][0]: no exception ok 504 - delete $vrlex->{"x$lex"}[$lex][0]: value ok 505 - $vrgbl->{"x$lex"}[$lex][0]: no exception ok 506 - $vrgbl->{"x$lex"}[$lex][0]: value ok 507 - $vrgbl->{"x$lex"}[$lex][0] = 123: no exception ok 508 - $vrgbl->{"x$lex"}[$lex][0] = 123: value ok 509 - exists $vrgbl->{"x$lex"}[$lex][0]: no exception ok 510 - exists $vrgbl->{"x$lex"}[$lex][0]: value ok 511 - delete $vrgbl->{"x$lex"}[$lex][0]: no exception ok 512 - delete $vrgbl->{"x$lex"}[$lex][0]: value ok 513 - $vlex[0][$gbl][0]: no exception ok 514 - $vlex[0][$gbl][0]: value ok 515 - $vlex[0][$gbl][0] = 123: no exception ok 516 - $vlex[0][$gbl][0] = 123: value ok 517 - exists $vlex[0][$gbl][0]: no exception ok 518 - exists $vlex[0][$gbl][0]: value ok 519 - delete $vlex[0][$gbl][0]: no exception ok 520 - delete $vlex[0][$gbl][0]: value ok 521 - $vgbl[0][$gbl][0]: no exception ok 522 - $vgbl[0][$gbl][0]: value ok 523 - $vgbl[0][$gbl][0] = 123: no exception ok 524 - $vgbl[0][$gbl][0] = 123: value ok 525 - exists $vgbl[0][$gbl][0]: no exception ok 526 - exists $vgbl[0][$gbl][0]: value ok 527 - delete $vgbl[0][$gbl][0]: no exception ok 528 - delete $vgbl[0][$gbl][0]: value ok 529 - $vrlex->[0][$gbl][0]: no exception ok 530 - $vrlex->[0][$gbl][0]: value ok 531 - $vrlex->[0][$gbl][0] = 123: no exception ok 532 - $vrlex->[0][$gbl][0] = 123: value ok 533 - exists $vrlex->[0][$gbl][0]: no exception ok 534 - exists $vrlex->[0][$gbl][0]: value ok 535 - delete $vrlex->[0][$gbl][0]: no exception ok 536 - delete $vrlex->[0][$gbl][0]: value ok 537 - $vrgbl->[0][$gbl][0]: no exception ok 538 - $vrgbl->[0][$gbl][0]: value ok 539 - $vrgbl->[0][$gbl][0] = 123: no exception ok 540 - $vrgbl->[0][$gbl][0] = 123: value ok 541 - exists $vrgbl->[0][$gbl][0]: no exception ok 542 - exists $vrgbl->[0][$gbl][0]: value ok 543 - delete $vrgbl->[0][$gbl][0]: no exception ok 544 - delete $vrgbl->[0][$gbl][0]: value ok 545 - $vlex[$lex][$gbl][0]: no exception ok 546 - $vlex[$lex][$gbl][0]: value ok 547 - $vlex[$lex][$gbl][0] = 123: no exception ok 548 - $vlex[$lex][$gbl][0] = 123: value ok 549 - exists $vlex[$lex][$gbl][0]: no exception ok 550 - exists $vlex[$lex][$gbl][0]: value ok 551 - delete $vlex[$lex][$gbl][0]: no exception ok 552 - delete $vlex[$lex][$gbl][0]: value ok 553 - $vgbl[$lex][$gbl][0]: no exception ok 554 - $vgbl[$lex][$gbl][0]: value ok 555 - $vgbl[$lex][$gbl][0] = 123: no exception ok 556 - $vgbl[$lex][$gbl][0] = 123: value ok 557 - exists $vgbl[$lex][$gbl][0]: no exception ok 558 - exists $vgbl[$lex][$gbl][0]: value ok 559 - delete $vgbl[$lex][$gbl][0]: no exception ok 560 - delete $vgbl[$lex][$gbl][0]: value ok 561 - $vrlex->[$lex][$gbl][0]: no exception ok 562 - $vrlex->[$lex][$gbl][0]: value ok 563 - $vrlex->[$lex][$gbl][0] = 123: no exception ok 564 - $vrlex->[$lex][$gbl][0] = 123: value ok 565 - exists $vrlex->[$lex][$gbl][0]: no exception ok 566 - exists $vrlex->[$lex][$gbl][0]: value ok 567 - delete $vrlex->[$lex][$gbl][0]: no exception ok 568 - delete $vrlex->[$lex][$gbl][0]: value ok 569 - $vrgbl->[$lex][$gbl][0]: no exception ok 570 - $vrgbl->[$lex][$gbl][0]: value ok 571 - $vrgbl->[$lex][$gbl][0] = 123: no exception ok 572 - $vrgbl->[$lex][$gbl][0] = 123: value ok 573 - exists $vrgbl->[$lex][$gbl][0]: no exception ok 574 - exists $vrgbl->[$lex][$gbl][0]: value ok 575 - delete $vrgbl->[$lex][$gbl][0]: no exception ok 576 - delete $vrgbl->[$lex][$gbl][0]: value ok 577 - $vlex[$gbl][$gbl][0]: no exception ok 578 - $vlex[$gbl][$gbl][0]: value ok 579 - $vlex[$gbl][$gbl][0] = 123: no exception ok 580 - $vlex[$gbl][$gbl][0] = 123: value ok 581 - exists $vlex[$gbl][$gbl][0]: no exception ok 582 - exists $vlex[$gbl][$gbl][0]: value ok 583 - delete $vlex[$gbl][$gbl][0]: no exception ok 584 - delete $vlex[$gbl][$gbl][0]: value ok 585 - $vgbl[$gbl][$gbl][0]: no exception ok 586 - $vgbl[$gbl][$gbl][0]: value ok 587 - $vgbl[$gbl][$gbl][0] = 123: no exception ok 588 - $vgbl[$gbl][$gbl][0] = 123: value ok 589 - exists $vgbl[$gbl][$gbl][0]: no exception ok 590 - exists $vgbl[$gbl][$gbl][0]: value ok 591 - delete $vgbl[$gbl][$gbl][0]: no exception ok 592 - delete $vgbl[$gbl][$gbl][0]: value ok 593 - $vrlex->[$gbl][$gbl][0]: no exception ok 594 - $vrlex->[$gbl][$gbl][0]: value ok 595 - $vrlex->[$gbl][$gbl][0] = 123: no exception ok 596 - $vrlex->[$gbl][$gbl][0] = 123: value ok 597 - exists $vrlex->[$gbl][$gbl][0]: no exception ok 598 - exists $vrlex->[$gbl][$gbl][0]: value ok 599 - delete $vrlex->[$gbl][$gbl][0]: no exception ok 600 - delete $vrlex->[$gbl][$gbl][0]: value ok 601 - $vrgbl->[$gbl][$gbl][0]: no exception ok 602 - $vrgbl->[$gbl][$gbl][0]: value ok 603 - $vrgbl->[$gbl][$gbl][0] = 123: no exception ok 604 - $vrgbl->[$gbl][$gbl][0] = 123: value ok 605 - exists $vrgbl->[$gbl][$gbl][0]: no exception ok 606 - exists $vrgbl->[$gbl][$gbl][0]: value ok 607 - delete $vrgbl->[$gbl][$gbl][0]: no exception ok 608 - delete $vrgbl->[$gbl][$gbl][0]: value ok 609 - $vlex[$lex+1][$gbl][0]: no exception ok 610 - $vlex[$lex+1][$gbl][0]: value ok 611 - $vlex[$lex+1][$gbl][0] = 123: no exception ok 612 - $vlex[$lex+1][$gbl][0] = 123: value ok 613 - exists $vlex[$lex+1][$gbl][0]: no exception ok 614 - exists $vlex[$lex+1][$gbl][0]: value ok 615 - delete $vlex[$lex+1][$gbl][0]: no exception ok 616 - delete $vlex[$lex+1][$gbl][0]: value ok 617 - $vgbl[$lex+1][$gbl][0]: no exception ok 618 - $vgbl[$lex+1][$gbl][0]: value ok 619 - $vgbl[$lex+1][$gbl][0] = 123: no exception ok 620 - $vgbl[$lex+1][$gbl][0] = 123: value ok 621 - exists $vgbl[$lex+1][$gbl][0]: no exception ok 622 - exists $vgbl[$lex+1][$gbl][0]: value ok 623 - delete $vgbl[$lex+1][$gbl][0]: no exception ok 624 - delete $vgbl[$lex+1][$gbl][0]: value ok 625 - $vrlex->[$lex+1][$gbl][0]: no exception ok 626 - $vrlex->[$lex+1][$gbl][0]: value ok 627 - $vrlex->[$lex+1][$gbl][0] = 123: no exception ok 628 - $vrlex->[$lex+1][$gbl][0] = 123: value ok 629 - exists $vrlex->[$lex+1][$gbl][0]: no exception ok 630 - exists $vrlex->[$lex+1][$gbl][0]: value ok 631 - delete $vrlex->[$lex+1][$gbl][0]: no exception ok 632 - delete $vrlex->[$lex+1][$gbl][0]: value ok 633 - $vrgbl->[$lex+1][$gbl][0]: no exception ok 634 - $vrgbl->[$lex+1][$gbl][0]: value ok 635 - $vrgbl->[$lex+1][$gbl][0] = 123: no exception ok 636 - $vrgbl->[$lex+1][$gbl][0] = 123: value ok 637 - exists $vrgbl->[$lex+1][$gbl][0]: no exception ok 638 - exists $vrgbl->[$lex+1][$gbl][0]: value ok 639 - delete $vrgbl->[$lex+1][$gbl][0]: no exception ok 640 - delete $vrgbl->[$lex+1][$gbl][0]: value ok 641 - $vlex{foo}[$gbl][0]: no exception ok 642 - $vlex{foo}[$gbl][0]: value ok 643 - $vlex{foo}[$gbl][0] = 123: no exception ok 644 - $vlex{foo}[$gbl][0] = 123: value ok 645 - exists $vlex{foo}[$gbl][0]: no exception ok 646 - exists $vlex{foo}[$gbl][0]: value ok 647 - delete $vlex{foo}[$gbl][0]: no exception ok 648 - delete $vlex{foo}[$gbl][0]: value ok 649 - $vgbl{foo}[$gbl][0]: no exception ok 650 - $vgbl{foo}[$gbl][0]: value ok 651 - $vgbl{foo}[$gbl][0] = 123: no exception ok 652 - $vgbl{foo}[$gbl][0] = 123: value ok 653 - exists $vgbl{foo}[$gbl][0]: no exception ok 654 - exists $vgbl{foo}[$gbl][0]: value ok 655 - delete $vgbl{foo}[$gbl][0]: no exception ok 656 - delete $vgbl{foo}[$gbl][0]: value ok 657 - $vrlex->{foo}[$gbl][0]: no exception ok 658 - $vrlex->{foo}[$gbl][0]: value ok 659 - $vrlex->{foo}[$gbl][0] = 123: no exception ok 660 - $vrlex->{foo}[$gbl][0] = 123: value ok 661 - exists $vrlex->{foo}[$gbl][0]: no exception ok 662 - exists $vrlex->{foo}[$gbl][0]: value ok 663 - delete $vrlex->{foo}[$gbl][0]: no exception ok 664 - delete $vrlex->{foo}[$gbl][0]: value ok 665 - $vrgbl->{foo}[$gbl][0]: no exception ok 666 - $vrgbl->{foo}[$gbl][0]: value ok 667 - $vrgbl->{foo}[$gbl][0] = 123: no exception ok 668 - $vrgbl->{foo}[$gbl][0] = 123: value ok 669 - exists $vrgbl->{foo}[$gbl][0]: no exception ok 670 - exists $vrgbl->{foo}[$gbl][0]: value ok 671 - delete $vrgbl->{foo}[$gbl][0]: no exception ok 672 - delete $vrgbl->{foo}[$gbl][0]: value ok 673 - $vlex{$lex}[$gbl][0]: no exception ok 674 - $vlex{$lex}[$gbl][0]: value ok 675 - $vlex{$lex}[$gbl][0] = 123: no exception ok 676 - $vlex{$lex}[$gbl][0] = 123: value ok 677 - exists $vlex{$lex}[$gbl][0]: no exception ok 678 - exists $vlex{$lex}[$gbl][0]: value ok 679 - delete $vlex{$lex}[$gbl][0]: no exception ok 680 - delete $vlex{$lex}[$gbl][0]: value ok 681 - $vgbl{$lex}[$gbl][0]: no exception ok 682 - $vgbl{$lex}[$gbl][0]: value ok 683 - $vgbl{$lex}[$gbl][0] = 123: no exception ok 684 - $vgbl{$lex}[$gbl][0] = 123: value ok 685 - exists $vgbl{$lex}[$gbl][0]: no exception ok 686 - exists $vgbl{$lex}[$gbl][0]: value ok 687 - delete $vgbl{$lex}[$gbl][0]: no exception ok 688 - delete $vgbl{$lex}[$gbl][0]: value ok 689 - $vrlex->{$lex}[$gbl][0]: no exception ok 690 - $vrlex->{$lex}[$gbl][0]: value ok 691 - $vrlex->{$lex}[$gbl][0] = 123: no exception ok 692 - $vrlex->{$lex}[$gbl][0] = 123: value ok 693 - exists $vrlex->{$lex}[$gbl][0]: no exception ok 694 - exists $vrlex->{$lex}[$gbl][0]: value ok 695 - delete $vrlex->{$lex}[$gbl][0]: no exception ok 696 - delete $vrlex->{$lex}[$gbl][0]: value ok 697 - $vrgbl->{$lex}[$gbl][0]: no exception ok 698 - $vrgbl->{$lex}[$gbl][0]: value ok 699 - $vrgbl->{$lex}[$gbl][0] = 123: no exception ok 700 - $vrgbl->{$lex}[$gbl][0] = 123: value ok 701 - exists $vrgbl->{$lex}[$gbl][0]: no exception ok 702 - exists $vrgbl->{$lex}[$gbl][0]: value ok 703 - delete $vrgbl->{$lex}[$gbl][0]: no exception ok 704 - delete $vrgbl->{$lex}[$gbl][0]: value ok 705 - $vlex{$gbl}[$gbl][0]: no exception ok 706 - $vlex{$gbl}[$gbl][0]: value ok 707 - $vlex{$gbl}[$gbl][0] = 123: no exception ok 708 - $vlex{$gbl}[$gbl][0] = 123: value ok 709 - exists $vlex{$gbl}[$gbl][0]: no exception ok 710 - exists $vlex{$gbl}[$gbl][0]: value ok 711 - delete $vlex{$gbl}[$gbl][0]: no exception ok 712 - delete $vlex{$gbl}[$gbl][0]: value ok 713 - $vgbl{$gbl}[$gbl][0]: no exception ok 714 - $vgbl{$gbl}[$gbl][0]: value ok 715 - $vgbl{$gbl}[$gbl][0] = 123: no exception ok 716 - $vgbl{$gbl}[$gbl][0] = 123: value ok 717 - exists $vgbl{$gbl}[$gbl][0]: no exception ok 718 - exists $vgbl{$gbl}[$gbl][0]: value ok 719 - delete $vgbl{$gbl}[$gbl][0]: no exception ok 720 - delete $vgbl{$gbl}[$gbl][0]: value ok 721 - $vrlex->{$gbl}[$gbl][0]: no exception ok 722 - $vrlex->{$gbl}[$gbl][0]: value ok 723 - $vrlex->{$gbl}[$gbl][0] = 123: no exception ok 724 - $vrlex->{$gbl}[$gbl][0] = 123: value ok 725 - exists $vrlex->{$gbl}[$gbl][0]: no exception ok 726 - exists $vrlex->{$gbl}[$gbl][0]: value ok 727 - delete $vrlex->{$gbl}[$gbl][0]: no exception ok 728 - delete $vrlex->{$gbl}[$gbl][0]: value ok 729 - $vrgbl->{$gbl}[$gbl][0]: no exception ok 730 - $vrgbl->{$gbl}[$gbl][0]: value ok 731 - $vrgbl->{$gbl}[$gbl][0] = 123: no exception ok 732 - $vrgbl->{$gbl}[$gbl][0] = 123: value ok 733 - exists $vrgbl->{$gbl}[$gbl][0]: no exception ok 734 - exists $vrgbl->{$gbl}[$gbl][0]: value ok 735 - delete $vrgbl->{$gbl}[$gbl][0]: no exception ok 736 - delete $vrgbl->{$gbl}[$gbl][0]: value ok 737 - $vlex{"x$lex"}[$gbl][0]: no exception ok 738 - $vlex{"x$lex"}[$gbl][0]: value ok 739 - $vlex{"x$lex"}[$gbl][0] = 123: no exception ok 740 - $vlex{"x$lex"}[$gbl][0] = 123: value ok 741 - exists $vlex{"x$lex"}[$gbl][0]: no exception ok 742 - exists $vlex{"x$lex"}[$gbl][0]: value ok 743 - delete $vlex{"x$lex"}[$gbl][0]: no exception ok 744 - delete $vlex{"x$lex"}[$gbl][0]: value ok 745 - $vgbl{"x$lex"}[$gbl][0]: no exception ok 746 - $vgbl{"x$lex"}[$gbl][0]: value ok 747 - $vgbl{"x$lex"}[$gbl][0] = 123: no exception ok 748 - $vgbl{"x$lex"}[$gbl][0] = 123: value ok 749 - exists $vgbl{"x$lex"}[$gbl][0]: no exception ok 750 - exists $vgbl{"x$lex"}[$gbl][0]: value ok 751 - delete $vgbl{"x$lex"}[$gbl][0]: no exception ok 752 - delete $vgbl{"x$lex"}[$gbl][0]: value ok 753 - $vrlex->{"x$lex"}[$gbl][0]: no exception ok 754 - $vrlex->{"x$lex"}[$gbl][0]: value ok 755 - $vrlex->{"x$lex"}[$gbl][0] = 123: no exception ok 756 - $vrlex->{"x$lex"}[$gbl][0] = 123: value ok 757 - exists $vrlex->{"x$lex"}[$gbl][0]: no exception ok 758 - exists $vrlex->{"x$lex"}[$gbl][0]: value ok 759 - delete $vrlex->{"x$lex"}[$gbl][0]: no exception ok 760 - delete $vrlex->{"x$lex"}[$gbl][0]: value ok 761 - $vrgbl->{"x$lex"}[$gbl][0]: no exception ok 762 - $vrgbl->{"x$lex"}[$gbl][0]: value ok 763 - $vrgbl->{"x$lex"}[$gbl][0] = 123: no exception ok 764 - $vrgbl->{"x$lex"}[$gbl][0] = 123: value ok 765 - exists $vrgbl->{"x$lex"}[$gbl][0]: no exception ok 766 - exists $vrgbl->{"x$lex"}[$gbl][0]: value ok 767 - delete $vrgbl->{"x$lex"}[$gbl][0]: no exception ok 768 - delete $vrgbl->{"x$lex"}[$gbl][0]: value ok 769 - $vlex[0][$lex+1][0]: no exception ok 770 - $vlex[0][$lex+1][0]: value ok 771 - $vlex[0][$lex+1][0] = 123: no exception ok 772 - $vlex[0][$lex+1][0] = 123: value ok 773 - exists $vlex[0][$lex+1][0]: no exception ok 774 - exists $vlex[0][$lex+1][0]: value ok 775 - delete $vlex[0][$lex+1][0]: no exception ok 776 - delete $vlex[0][$lex+1][0]: value ok 777 - $vgbl[0][$lex+1][0]: no exception ok 778 - $vgbl[0][$lex+1][0]: value ok 779 - $vgbl[0][$lex+1][0] = 123: no exception ok 780 - $vgbl[0][$lex+1][0] = 123: value ok 781 - exists $vgbl[0][$lex+1][0]: no exception ok 782 - exists $vgbl[0][$lex+1][0]: value ok 783 - delete $vgbl[0][$lex+1][0]: no exception ok 784 - delete $vgbl[0][$lex+1][0]: value ok 785 - $vrlex->[0][$lex+1][0]: no exception ok 786 - $vrlex->[0][$lex+1][0]: value ok 787 - $vrlex->[0][$lex+1][0] = 123: no exception ok 788 - $vrlex->[0][$lex+1][0] = 123: value ok 789 - exists $vrlex->[0][$lex+1][0]: no exception ok 790 - exists $vrlex->[0][$lex+1][0]: value ok 791 - delete $vrlex->[0][$lex+1][0]: no exception ok 792 - delete $vrlex->[0][$lex+1][0]: value ok 793 - $vrgbl->[0][$lex+1][0]: no exception ok 794 - $vrgbl->[0][$lex+1][0]: value ok 795 - $vrgbl->[0][$lex+1][0] = 123: no exception ok 796 - $vrgbl->[0][$lex+1][0] = 123: value ok 797 - exists $vrgbl->[0][$lex+1][0]: no exception ok 798 - exists $vrgbl->[0][$lex+1][0]: value ok 799 - delete $vrgbl->[0][$lex+1][0]: no exception ok 800 - delete $vrgbl->[0][$lex+1][0]: value ok 801 - $vlex[$lex][$lex+1][0]: no exception ok 802 - $vlex[$lex][$lex+1][0]: value ok 803 - $vlex[$lex][$lex+1][0] = 123: no exception ok 804 - $vlex[$lex][$lex+1][0] = 123: value ok 805 - exists $vlex[$lex][$lex+1][0]: no exception ok 806 - exists $vlex[$lex][$lex+1][0]: value ok 807 - delete $vlex[$lex][$lex+1][0]: no exception ok 808 - delete $vlex[$lex][$lex+1][0]: value ok 809 - $vgbl[$lex][$lex+1][0]: no exception ok 810 - $vgbl[$lex][$lex+1][0]: value ok 811 - $vgbl[$lex][$lex+1][0] = 123: no exception ok 812 - $vgbl[$lex][$lex+1][0] = 123: value ok 813 - exists $vgbl[$lex][$lex+1][0]: no exception ok 814 - exists $vgbl[$lex][$lex+1][0]: value ok 815 - delete $vgbl[$lex][$lex+1][0]: no exception ok 816 - delete $vgbl[$lex][$lex+1][0]: value ok 817 - $vrlex->[$lex][$lex+1][0]: no exception ok 818 - $vrlex->[$lex][$lex+1][0]: value ok 819 - $vrlex->[$lex][$lex+1][0] = 123: no exception ok 820 - $vrlex->[$lex][$lex+1][0] = 123: value ok 821 - exists $vrlex->[$lex][$lex+1][0]: no exception ok 822 - exists $vrlex->[$lex][$lex+1][0]: value ok 823 - delete $vrlex->[$lex][$lex+1][0]: no exception ok 824 - delete $vrlex->[$lex][$lex+1][0]: value ok 825 - $vrgbl->[$lex][$lex+1][0]: no exception ok 826 - $vrgbl->[$lex][$lex+1][0]: value ok 827 - $vrgbl->[$lex][$lex+1][0] = 123: no exception ok 828 - $vrgbl->[$lex][$lex+1][0] = 123: value ok 829 - exists $vrgbl->[$lex][$lex+1][0]: no exception ok 830 - exists $vrgbl->[$lex][$lex+1][0]: value ok 831 - delete $vrgbl->[$lex][$lex+1][0]: no exception ok 832 - delete $vrgbl->[$lex][$lex+1][0]: value ok 833 - $vlex[$gbl][$lex+1][0]: no exception ok 834 - $vlex[$gbl][$lex+1][0]: value ok 835 - $vlex[$gbl][$lex+1][0] = 123: no exception ok 836 - $vlex[$gbl][$lex+1][0] = 123: value ok 837 - exists $vlex[$gbl][$lex+1][0]: no exception ok 838 - exists $vlex[$gbl][$lex+1][0]: value ok 839 - delete $vlex[$gbl][$lex+1][0]: no exception ok 840 - delete $vlex[$gbl][$lex+1][0]: value ok 841 - $vgbl[$gbl][$lex+1][0]: no exception ok 842 - $vgbl[$gbl][$lex+1][0]: value ok 843 - $vgbl[$gbl][$lex+1][0] = 123: no exception ok 844 - $vgbl[$gbl][$lex+1][0] = 123: value ok 845 - exists $vgbl[$gbl][$lex+1][0]: no exception ok 846 - exists $vgbl[$gbl][$lex+1][0]: value ok 847 - delete $vgbl[$gbl][$lex+1][0]: no exception ok 848 - delete $vgbl[$gbl][$lex+1][0]: value ok 849 - $vrlex->[$gbl][$lex+1][0]: no exception ok 850 - $vrlex->[$gbl][$lex+1][0]: value ok 851 - $vrlex->[$gbl][$lex+1][0] = 123: no exception ok 852 - $vrlex->[$gbl][$lex+1][0] = 123: value ok 853 - exists $vrlex->[$gbl][$lex+1][0]: no exception ok 854 - exists $vrlex->[$gbl][$lex+1][0]: value ok 855 - delete $vrlex->[$gbl][$lex+1][0]: no exception ok 856 - delete $vrlex->[$gbl][$lex+1][0]: value ok 857 - $vrgbl->[$gbl][$lex+1][0]: no exception ok 858 - $vrgbl->[$gbl][$lex+1][0]: value ok 859 - $vrgbl->[$gbl][$lex+1][0] = 123: no exception ok 860 - $vrgbl->[$gbl][$lex+1][0] = 123: value ok 861 - exists $vrgbl->[$gbl][$lex+1][0]: no exception ok 862 - exists $vrgbl->[$gbl][$lex+1][0]: value ok 863 - delete $vrgbl->[$gbl][$lex+1][0]: no exception ok 864 - delete $vrgbl->[$gbl][$lex+1][0]: value ok 865 - $vlex[$lex+1][$lex+1][0]: no exception ok 866 - $vlex[$lex+1][$lex+1][0]: value ok 867 - $vlex[$lex+1][$lex+1][0] = 123: no exception ok 868 - $vlex[$lex+1][$lex+1][0] = 123: value ok 869 - exists $vlex[$lex+1][$lex+1][0]: no exception ok 870 - exists $vlex[$lex+1][$lex+1][0]: value ok 871 - delete $vlex[$lex+1][$lex+1][0]: no exception ok 872 - delete $vlex[$lex+1][$lex+1][0]: value ok 873 - $vgbl[$lex+1][$lex+1][0]: no exception ok 874 - $vgbl[$lex+1][$lex+1][0]: value ok 875 - $vgbl[$lex+1][$lex+1][0] = 123: no exception ok 876 - $vgbl[$lex+1][$lex+1][0] = 123: value ok 877 - exists $vgbl[$lex+1][$lex+1][0]: no exception ok 878 - exists $vgbl[$lex+1][$lex+1][0]: value ok 879 - delete $vgbl[$lex+1][$lex+1][0]: no exception ok 880 - delete $vgbl[$lex+1][$lex+1][0]: value ok 881 - $vrlex->[$lex+1][$lex+1][0]: no exception ok 882 - $vrlex->[$lex+1][$lex+1][0]: value ok 883 - $vrlex->[$lex+1][$lex+1][0] = 123: no exception ok 884 - $vrlex->[$lex+1][$lex+1][0] = 123: value ok 885 - exists $vrlex->[$lex+1][$lex+1][0]: no exception ok 886 - exists $vrlex->[$lex+1][$lex+1][0]: value ok 887 - delete $vrlex->[$lex+1][$lex+1][0]: no exception ok 888 - delete $vrlex->[$lex+1][$lex+1][0]: value ok 889 - $vrgbl->[$lex+1][$lex+1][0]: no exception ok 890 - $vrgbl->[$lex+1][$lex+1][0]: value ok 891 - $vrgbl->[$lex+1][$lex+1][0] = 123: no exception ok 892 - $vrgbl->[$lex+1][$lex+1][0] = 123: value ok 893 - exists $vrgbl->[$lex+1][$lex+1][0]: no exception ok 894 - exists $vrgbl->[$lex+1][$lex+1][0]: value ok 895 - delete $vrgbl->[$lex+1][$lex+1][0]: no exception ok 896 - delete $vrgbl->[$lex+1][$lex+1][0]: value ok 897 - $vlex{foo}[$lex+1][0]: no exception ok 898 - $vlex{foo}[$lex+1][0]: value ok 899 - $vlex{foo}[$lex+1][0] = 123: no exception ok 900 - $vlex{foo}[$lex+1][0] = 123: value ok 901 - exists $vlex{foo}[$lex+1][0]: no exception ok 902 - exists $vlex{foo}[$lex+1][0]: value ok 903 - delete $vlex{foo}[$lex+1][0]: no exception ok 904 - delete $vlex{foo}[$lex+1][0]: value ok 905 - $vgbl{foo}[$lex+1][0]: no exception ok 906 - $vgbl{foo}[$lex+1][0]: value ok 907 - $vgbl{foo}[$lex+1][0] = 123: no exception ok 908 - $vgbl{foo}[$lex+1][0] = 123: value ok 909 - exists $vgbl{foo}[$lex+1][0]: no exception ok 910 - exists $vgbl{foo}[$lex+1][0]: value ok 911 - delete $vgbl{foo}[$lex+1][0]: no exception ok 912 - delete $vgbl{foo}[$lex+1][0]: value ok 913 - $vrlex->{foo}[$lex+1][0]: no exception ok 914 - $vrlex->{foo}[$lex+1][0]: value ok 915 - $vrlex->{foo}[$lex+1][0] = 123: no exception ok 916 - $vrlex->{foo}[$lex+1][0] = 123: value ok 917 - exists $vrlex->{foo}[$lex+1][0]: no exception ok 918 - exists $vrlex->{foo}[$lex+1][0]: value ok 919 - delete $vrlex->{foo}[$lex+1][0]: no exception ok 920 - delete $vrlex->{foo}[$lex+1][0]: value ok 921 - $vrgbl->{foo}[$lex+1][0]: no exception ok 922 - $vrgbl->{foo}[$lex+1][0]: value ok 923 - $vrgbl->{foo}[$lex+1][0] = 123: no exception ok 924 - $vrgbl->{foo}[$lex+1][0] = 123: value ok 925 - exists $vrgbl->{foo}[$lex+1][0]: no exception ok 926 - exists $vrgbl->{foo}[$lex+1][0]: value ok 927 - delete $vrgbl->{foo}[$lex+1][0]: no exception ok 928 - delete $vrgbl->{foo}[$lex+1][0]: value ok 929 - $vlex{$lex}[$lex+1][0]: no exception ok 930 - $vlex{$lex}[$lex+1][0]: value ok 931 - $vlex{$lex}[$lex+1][0] = 123: no exception ok 932 - $vlex{$lex}[$lex+1][0] = 123: value ok 933 - exists $vlex{$lex}[$lex+1][0]: no exception ok 934 - exists $vlex{$lex}[$lex+1][0]: value ok 935 - delete $vlex{$lex}[$lex+1][0]: no exception ok 936 - delete $vlex{$lex}[$lex+1][0]: value ok 937 - $vgbl{$lex}[$lex+1][0]: no exception ok 938 - $vgbl{$lex}[$lex+1][0]: value ok 939 - $vgbl{$lex}[$lex+1][0] = 123: no exception ok 940 - $vgbl{$lex}[$lex+1][0] = 123: value ok 941 - exists $vgbl{$lex}[$lex+1][0]: no exception ok 942 - exists $vgbl{$lex}[$lex+1][0]: value ok 943 - delete $vgbl{$lex}[$lex+1][0]: no exception ok 944 - delete $vgbl{$lex}[$lex+1][0]: value ok 945 - $vrlex->{$lex}[$lex+1][0]: no exception ok 946 - $vrlex->{$lex}[$lex+1][0]: value ok 947 - $vrlex->{$lex}[$lex+1][0] = 123: no exception ok 948 - $vrlex->{$lex}[$lex+1][0] = 123: value ok 949 - exists $vrlex->{$lex}[$lex+1][0]: no exception ok 950 - exists $vrlex->{$lex}[$lex+1][0]: value ok 951 - delete $vrlex->{$lex}[$lex+1][0]: no exception ok 952 - delete $vrlex->{$lex}[$lex+1][0]: value ok 953 - $vrgbl->{$lex}[$lex+1][0]: no exception ok 954 - $vrgbl->{$lex}[$lex+1][0]: value ok 955 - $vrgbl->{$lex}[$lex+1][0] = 123: no exception ok 956 - $vrgbl->{$lex}[$lex+1][0] = 123: value ok 957 - exists $vrgbl->{$lex}[$lex+1][0]: no exception ok 958 - exists $vrgbl->{$lex}[$lex+1][0]: value ok 959 - delete $vrgbl->{$lex}[$lex+1][0]: no exception ok 960 - delete $vrgbl->{$lex}[$lex+1][0]: value ok 961 - $vlex{$gbl}[$lex+1][0]: no exception ok 962 - $vlex{$gbl}[$lex+1][0]: value ok 963 - $vlex{$gbl}[$lex+1][0] = 123: no exception ok 964 - $vlex{$gbl}[$lex+1][0] = 123: value ok 965 - exists $vlex{$gbl}[$lex+1][0]: no exception ok 966 - exists $vlex{$gbl}[$lex+1][0]: value ok 967 - delete $vlex{$gbl}[$lex+1][0]: no exception ok 968 - delete $vlex{$gbl}[$lex+1][0]: value ok 969 - $vgbl{$gbl}[$lex+1][0]: no exception ok 970 - $vgbl{$gbl}[$lex+1][0]: value ok 971 - $vgbl{$gbl}[$lex+1][0] = 123: no exception ok 972 - $vgbl{$gbl}[$lex+1][0] = 123: value ok 973 - exists $vgbl{$gbl}[$lex+1][0]: no exception ok 974 - exists $vgbl{$gbl}[$lex+1][0]: value ok 975 - delete $vgbl{$gbl}[$lex+1][0]: no exception ok 976 - delete $vgbl{$gbl}[$lex+1][0]: value ok 977 - $vrlex->{$gbl}[$lex+1][0]: no exception ok 978 - $vrlex->{$gbl}[$lex+1][0]: value ok 979 - $vrlex->{$gbl}[$lex+1][0] = 123: no exception ok 980 - $vrlex->{$gbl}[$lex+1][0] = 123: value ok 981 - exists $vrlex->{$gbl}[$lex+1][0]: no exception ok 982 - exists $vrlex->{$gbl}[$lex+1][0]: value ok 983 - delete $vrlex->{$gbl}[$lex+1][0]: no exception ok 984 - delete $vrlex->{$gbl}[$lex+1][0]: value ok 985 - $vrgbl->{$gbl}[$lex+1][0]: no exception ok 986 - $vrgbl->{$gbl}[$lex+1][0]: value ok 987 - $vrgbl->{$gbl}[$lex+1][0] = 123: no exception ok 988 - $vrgbl->{$gbl}[$lex+1][0] = 123: value ok 989 - exists $vrgbl->{$gbl}[$lex+1][0]: no exception ok 990 - exists $vrgbl->{$gbl}[$lex+1][0]: value ok 991 - delete $vrgbl->{$gbl}[$lex+1][0]: no exception ok 992 - delete $vrgbl->{$gbl}[$lex+1][0]: value ok 993 - $vlex{"x$lex"}[$lex+1][0]: no exception ok 994 - $vlex{"x$lex"}[$lex+1][0]: value ok 995 - $vlex{"x$lex"}[$lex+1][0] = 123: no exception ok 996 - $vlex{"x$lex"}[$lex+1][0] = 123: value ok 997 - exists $vlex{"x$lex"}[$lex+1][0]: no exception ok 998 - exists $vlex{"x$lex"}[$lex+1][0]: value ok 999 - delete $vlex{"x$lex"}[$lex+1][0]: no exception ok 1000 - delete $vlex{"x$lex"}[$lex+1][0]: value ok 1001 - $vgbl{"x$lex"}[$lex+1][0]: no exception ok 1002 - $vgbl{"x$lex"}[$lex+1][0]: value ok 1003 - $vgbl{"x$lex"}[$lex+1][0] = 123: no exception ok 1004 - $vgbl{"x$lex"}[$lex+1][0] = 123: value ok 1005 - exists $vgbl{"x$lex"}[$lex+1][0]: no exception ok 1006 - exists $vgbl{"x$lex"}[$lex+1][0]: value ok 1007 - delete $vgbl{"x$lex"}[$lex+1][0]: no exception ok 1008 - delete $vgbl{"x$lex"}[$lex+1][0]: value ok 1009 - $vrlex->{"x$lex"}[$lex+1][0]: no exception ok 1010 - $vrlex->{"x$lex"}[$lex+1][0]: value ok 1011 - $vrlex->{"x$lex"}[$lex+1][0] = 123: no exception ok 1012 - $vrlex->{"x$lex"}[$lex+1][0] = 123: value ok 1013 - exists $vrlex->{"x$lex"}[$lex+1][0]: no exception ok 1014 - exists $vrlex->{"x$lex"}[$lex+1][0]: value ok 1015 - delete $vrlex->{"x$lex"}[$lex+1][0]: no exception ok 1016 - delete $vrlex->{"x$lex"}[$lex+1][0]: value ok 1017 - $vrgbl->{"x$lex"}[$lex+1][0]: no exception ok 1018 - $vrgbl->{"x$lex"}[$lex+1][0]: value ok 1019 - $vrgbl->{"x$lex"}[$lex+1][0] = 123: no exception ok 1020 - $vrgbl->{"x$lex"}[$lex+1][0] = 123: value ok 1021 - exists $vrgbl->{"x$lex"}[$lex+1][0]: no exception ok 1022 - exists $vrgbl->{"x$lex"}[$lex+1][0]: value ok 1023 - delete $vrgbl->{"x$lex"}[$lex+1][0]: no exception ok 1024 - delete $vrgbl->{"x$lex"}[$lex+1][0]: value ok 1025 - $vlex[0]{foo}[0]: no exception ok 1026 - $vlex[0]{foo}[0]: value ok 1027 - $vlex[0]{foo}[0] = 123: no exception ok 1028 - $vlex[0]{foo}[0] = 123: value ok 1029 - exists $vlex[0]{foo}[0]: no exception ok 1030 - exists $vlex[0]{foo}[0]: value ok 1031 - delete $vlex[0]{foo}[0]: no exception ok 1032 - delete $vlex[0]{foo}[0]: value ok 1033 - $vgbl[0]{foo}[0]: no exception ok 1034 - $vgbl[0]{foo}[0]: value ok 1035 - $vgbl[0]{foo}[0] = 123: no exception ok 1036 - $vgbl[0]{foo}[0] = 123: value ok 1037 - exists $vgbl[0]{foo}[0]: no exception ok 1038 - exists $vgbl[0]{foo}[0]: value ok 1039 - delete $vgbl[0]{foo}[0]: no exception ok 1040 - delete $vgbl[0]{foo}[0]: value ok 1041 - $vrlex->[0]{foo}[0]: no exception ok 1042 - $vrlex->[0]{foo}[0]: value ok 1043 - $vrlex->[0]{foo}[0] = 123: no exception ok 1044 - $vrlex->[0]{foo}[0] = 123: value ok 1045 - exists $vrlex->[0]{foo}[0]: no exception ok 1046 - exists $vrlex->[0]{foo}[0]: value ok 1047 - delete $vrlex->[0]{foo}[0]: no exception ok 1048 - delete $vrlex->[0]{foo}[0]: value ok 1049 - $vrgbl->[0]{foo}[0]: no exception ok 1050 - $vrgbl->[0]{foo}[0]: value ok 1051 - $vrgbl->[0]{foo}[0] = 123: no exception ok 1052 - $vrgbl->[0]{foo}[0] = 123: value ok 1053 - exists $vrgbl->[0]{foo}[0]: no exception ok 1054 - exists $vrgbl->[0]{foo}[0]: value ok 1055 - delete $vrgbl->[0]{foo}[0]: no exception ok 1056 - delete $vrgbl->[0]{foo}[0]: value ok 1057 - $vlex[$lex]{foo}[0]: no exception ok 1058 - $vlex[$lex]{foo}[0]: value ok 1059 - $vlex[$lex]{foo}[0] = 123: no exception ok 1060 - $vlex[$lex]{foo}[0] = 123: value ok 1061 - exists $vlex[$lex]{foo}[0]: no exception ok 1062 - exists $vlex[$lex]{foo}[0]: value ok 1063 - delete $vlex[$lex]{foo}[0]: no exception ok 1064 - delete $vlex[$lex]{foo}[0]: value ok 1065 - $vgbl[$lex]{foo}[0]: no exception ok 1066 - $vgbl[$lex]{foo}[0]: value ok 1067 - $vgbl[$lex]{foo}[0] = 123: no exception ok 1068 - $vgbl[$lex]{foo}[0] = 123: value ok 1069 - exists $vgbl[$lex]{foo}[0]: no exception ok 1070 - exists $vgbl[$lex]{foo}[0]: value ok 1071 - delete $vgbl[$lex]{foo}[0]: no exception ok 1072 - delete $vgbl[$lex]{foo}[0]: value ok 1073 - $vrlex->[$lex]{foo}[0]: no exception ok 1074 - $vrlex->[$lex]{foo}[0]: value ok 1075 - $vrlex->[$lex]{foo}[0] = 123: no exception ok 1076 - $vrlex->[$lex]{foo}[0] = 123: value ok 1077 - exists $vrlex->[$lex]{foo}[0]: no exception ok 1078 - exists $vrlex->[$lex]{foo}[0]: value ok 1079 - delete $vrlex->[$lex]{foo}[0]: no exception ok 1080 - delete $vrlex->[$lex]{foo}[0]: value ok 1081 - $vrgbl->[$lex]{foo}[0]: no exception ok 1082 - $vrgbl->[$lex]{foo}[0]: value ok 1083 - $vrgbl->[$lex]{foo}[0] = 123: no exception ok 1084 - $vrgbl->[$lex]{foo}[0] = 123: value ok 1085 - exists $vrgbl->[$lex]{foo}[0]: no exception ok 1086 - exists $vrgbl->[$lex]{foo}[0]: value ok 1087 - delete $vrgbl->[$lex]{foo}[0]: no exception ok 1088 - delete $vrgbl->[$lex]{foo}[0]: value ok 1089 - $vlex[$gbl]{foo}[0]: no exception ok 1090 - $vlex[$gbl]{foo}[0]: value ok 1091 - $vlex[$gbl]{foo}[0] = 123: no exception ok 1092 - $vlex[$gbl]{foo}[0] = 123: value ok 1093 - exists $vlex[$gbl]{foo}[0]: no exception ok 1094 - exists $vlex[$gbl]{foo}[0]: value ok 1095 - delete $vlex[$gbl]{foo}[0]: no exception ok 1096 - delete $vlex[$gbl]{foo}[0]: value ok 1097 - $vgbl[$gbl]{foo}[0]: no exception ok 1098 - $vgbl[$gbl]{foo}[0]: value ok 1099 - $vgbl[$gbl]{foo}[0] = 123: no exception ok 1100 - $vgbl[$gbl]{foo}[0] = 123: value ok 1101 - exists $vgbl[$gbl]{foo}[0]: no exception ok 1102 - exists $vgbl[$gbl]{foo}[0]: value ok 1103 - delete $vgbl[$gbl]{foo}[0]: no exception ok 1104 - delete $vgbl[$gbl]{foo}[0]: value ok 1105 - $vrlex->[$gbl]{foo}[0]: no exception ok 1106 - $vrlex->[$gbl]{foo}[0]: value ok 1107 - $vrlex->[$gbl]{foo}[0] = 123: no exception ok 1108 - $vrlex->[$gbl]{foo}[0] = 123: value ok 1109 - exists $vrlex->[$gbl]{foo}[0]: no exception ok 1110 - exists $vrlex->[$gbl]{foo}[0]: value ok 1111 - delete $vrlex->[$gbl]{foo}[0]: no exception ok 1112 - delete $vrlex->[$gbl]{foo}[0]: value ok 1113 - $vrgbl->[$gbl]{foo}[0]: no exception ok 1114 - $vrgbl->[$gbl]{foo}[0]: value ok 1115 - $vrgbl->[$gbl]{foo}[0] = 123: no exception ok 1116 - $vrgbl->[$gbl]{foo}[0] = 123: value ok 1117 - exists $vrgbl->[$gbl]{foo}[0]: no exception ok 1118 - exists $vrgbl->[$gbl]{foo}[0]: value ok 1119 - delete $vrgbl->[$gbl]{foo}[0]: no exception ok 1120 - delete $vrgbl->[$gbl]{foo}[0]: value ok 1121 - $vlex[$lex+1]{foo}[0]: no exception ok 1122 - $vlex[$lex+1]{foo}[0]: value ok 1123 - $vlex[$lex+1]{foo}[0] = 123: no exception ok 1124 - $vlex[$lex+1]{foo}[0] = 123: value ok 1125 - exists $vlex[$lex+1]{foo}[0]: no exception ok 1126 - exists $vlex[$lex+1]{foo}[0]: value ok 1127 - delete $vlex[$lex+1]{foo}[0]: no exception ok 1128 - delete $vlex[$lex+1]{foo}[0]: value ok 1129 - $vgbl[$lex+1]{foo}[0]: no exception ok 1130 - $vgbl[$lex+1]{foo}[0]: value ok 1131 - $vgbl[$lex+1]{foo}[0] = 123: no exception ok 1132 - $vgbl[$lex+1]{foo}[0] = 123: value ok 1133 - exists $vgbl[$lex+1]{foo}[0]: no exception ok 1134 - exists $vgbl[$lex+1]{foo}[0]: value ok 1135 - delete $vgbl[$lex+1]{foo}[0]: no exception ok 1136 - delete $vgbl[$lex+1]{foo}[0]: value ok 1137 - $vrlex->[$lex+1]{foo}[0]: no exception ok 1138 - $vrlex->[$lex+1]{foo}[0]: value ok 1139 - $vrlex->[$lex+1]{foo}[0] = 123: no exception ok 1140 - $vrlex->[$lex+1]{foo}[0] = 123: value ok 1141 - exists $vrlex->[$lex+1]{foo}[0]: no exception ok 1142 - exists $vrlex->[$lex+1]{foo}[0]: value ok 1143 - delete $vrlex->[$lex+1]{foo}[0]: no exception ok 1144 - delete $vrlex->[$lex+1]{foo}[0]: value ok 1145 - $vrgbl->[$lex+1]{foo}[0]: no exception ok 1146 - $vrgbl->[$lex+1]{foo}[0]: value ok 1147 - $vrgbl->[$lex+1]{foo}[0] = 123: no exception ok 1148 - $vrgbl->[$lex+1]{foo}[0] = 123: value ok 1149 - exists $vrgbl->[$lex+1]{foo}[0]: no exception ok 1150 - exists $vrgbl->[$lex+1]{foo}[0]: value ok 1151 - delete $vrgbl->[$lex+1]{foo}[0]: no exception ok 1152 - delete $vrgbl->[$lex+1]{foo}[0]: value ok 1153 - $vlex{foo}{foo}[0]: no exception ok 1154 - $vlex{foo}{foo}[0]: value ok 1155 - $vlex{foo}{foo}[0] = 123: no exception ok 1156 - $vlex{foo}{foo}[0] = 123: value ok 1157 - exists $vlex{foo}{foo}[0]: no exception ok 1158 - exists $vlex{foo}{foo}[0]: value ok 1159 - delete $vlex{foo}{foo}[0]: no exception ok 1160 - delete $vlex{foo}{foo}[0]: value ok 1161 - $vgbl{foo}{foo}[0]: no exception ok 1162 - $vgbl{foo}{foo}[0]: value ok 1163 - $vgbl{foo}{foo}[0] = 123: no exception ok 1164 - $vgbl{foo}{foo}[0] = 123: value ok 1165 - exists $vgbl{foo}{foo}[0]: no exception ok 1166 - exists $vgbl{foo}{foo}[0]: value ok 1167 - delete $vgbl{foo}{foo}[0]: no exception ok 1168 - delete $vgbl{foo}{foo}[0]: value ok 1169 - $vrlex->{foo}{foo}[0]: no exception ok 1170 - $vrlex->{foo}{foo}[0]: value ok 1171 - $vrlex->{foo}{foo}[0] = 123: no exception ok 1172 - $vrlex->{foo}{foo}[0] = 123: value ok 1173 - exists $vrlex->{foo}{foo}[0]: no exception ok 1174 - exists $vrlex->{foo}{foo}[0]: value ok 1175 - delete $vrlex->{foo}{foo}[0]: no exception ok 1176 - delete $vrlex->{foo}{foo}[0]: value ok 1177 - $vrgbl->{foo}{foo}[0]: no exception ok 1178 - $vrgbl->{foo}{foo}[0]: value ok 1179 - $vrgbl->{foo}{foo}[0] = 123: no exception ok 1180 - $vrgbl->{foo}{foo}[0] = 123: value ok 1181 - exists $vrgbl->{foo}{foo}[0]: no exception ok 1182 - exists $vrgbl->{foo}{foo}[0]: value ok 1183 - delete $vrgbl->{foo}{foo}[0]: no exception ok 1184 - delete $vrgbl->{foo}{foo}[0]: value ok 1185 - $vlex{$lex}{foo}[0]: no exception ok 1186 - $vlex{$lex}{foo}[0]: value ok 1187 - $vlex{$lex}{foo}[0] = 123: no exception ok 1188 - $vlex{$lex}{foo}[0] = 123: value ok 1189 - exists $vlex{$lex}{foo}[0]: no exception ok 1190 - exists $vlex{$lex}{foo}[0]: value ok 1191 - delete $vlex{$lex}{foo}[0]: no exception ok 1192 - delete $vlex{$lex}{foo}[0]: value ok 1193 - $vgbl{$lex}{foo}[0]: no exception ok 1194 - $vgbl{$lex}{foo}[0]: value ok 1195 - $vgbl{$lex}{foo}[0] = 123: no exception ok 1196 - $vgbl{$lex}{foo}[0] = 123: value ok 1197 - exists $vgbl{$lex}{foo}[0]: no exception ok 1198 - exists $vgbl{$lex}{foo}[0]: value ok 1199 - delete $vgbl{$lex}{foo}[0]: no exception ok 1200 - delete $vgbl{$lex}{foo}[0]: value ok 1201 - $vrlex->{$lex}{foo}[0]: no exception ok 1202 - $vrlex->{$lex}{foo}[0]: value ok 1203 - $vrlex->{$lex}{foo}[0] = 123: no exception ok 1204 - $vrlex->{$lex}{foo}[0] = 123: value ok 1205 - exists $vrlex->{$lex}{foo}[0]: no exception ok 1206 - exists $vrlex->{$lex}{foo}[0]: value ok 1207 - delete $vrlex->{$lex}{foo}[0]: no exception ok 1208 - delete $vrlex->{$lex}{foo}[0]: value ok 1209 - $vrgbl->{$lex}{foo}[0]: no exception ok 1210 - $vrgbl->{$lex}{foo}[0]: value ok 1211 - $vrgbl->{$lex}{foo}[0] = 123: no exception ok 1212 - $vrgbl->{$lex}{foo}[0] = 123: value ok 1213 - exists $vrgbl->{$lex}{foo}[0]: no exception ok 1214 - exists $vrgbl->{$lex}{foo}[0]: value ok 1215 - delete $vrgbl->{$lex}{foo}[0]: no exception ok 1216 - delete $vrgbl->{$lex}{foo}[0]: value ok 1217 - $vlex{$gbl}{foo}[0]: no exception ok 1218 - $vlex{$gbl}{foo}[0]: value ok 1219 - $vlex{$gbl}{foo}[0] = 123: no exception ok 1220 - $vlex{$gbl}{foo}[0] = 123: value ok 1221 - exists $vlex{$gbl}{foo}[0]: no exception ok 1222 - exists $vlex{$gbl}{foo}[0]: value ok 1223 - delete $vlex{$gbl}{foo}[0]: no exception ok 1224 - delete $vlex{$gbl}{foo}[0]: value ok 1225 - $vgbl{$gbl}{foo}[0]: no exception ok 1226 - $vgbl{$gbl}{foo}[0]: value ok 1227 - $vgbl{$gbl}{foo}[0] = 123: no exception ok 1228 - $vgbl{$gbl}{foo}[0] = 123: value ok 1229 - exists $vgbl{$gbl}{foo}[0]: no exception ok 1230 - exists $vgbl{$gbl}{foo}[0]: value ok 1231 - delete $vgbl{$gbl}{foo}[0]: no exception ok 1232 - delete $vgbl{$gbl}{foo}[0]: value ok 1233 - $vrlex->{$gbl}{foo}[0]: no exception ok 1234 - $vrlex->{$gbl}{foo}[0]: value ok 1235 - $vrlex->{$gbl}{foo}[0] = 123: no exception ok 1236 - $vrlex->{$gbl}{foo}[0] = 123: value ok 1237 - exists $vrlex->{$gbl}{foo}[0]: no exception ok 1238 - exists $vrlex->{$gbl}{foo}[0]: value ok 1239 - delete $vrlex->{$gbl}{foo}[0]: no exception ok 1240 - delete $vrlex->{$gbl}{foo}[0]: value ok 1241 - $vrgbl->{$gbl}{foo}[0]: no exception ok 1242 - $vrgbl->{$gbl}{foo}[0]: value ok 1243 - $vrgbl->{$gbl}{foo}[0] = 123: no exception ok 1244 - $vrgbl->{$gbl}{foo}[0] = 123: value ok 1245 - exists $vrgbl->{$gbl}{foo}[0]: no exception ok 1246 - exists $vrgbl->{$gbl}{foo}[0]: value ok 1247 - delete $vrgbl->{$gbl}{foo}[0]: no exception ok 1248 - delete $vrgbl->{$gbl}{foo}[0]: value ok 1249 - $vlex{"x$lex"}{foo}[0]: no exception ok 1250 - $vlex{"x$lex"}{foo}[0]: value ok 1251 - $vlex{"x$lex"}{foo}[0] = 123: no exception ok 1252 - $vlex{"x$lex"}{foo}[0] = 123: value ok 1253 - exists $vlex{"x$lex"}{foo}[0]: no exception ok 1254 - exists $vlex{"x$lex"}{foo}[0]: value ok 1255 - delete $vlex{"x$lex"}{foo}[0]: no exception ok 1256 - delete $vlex{"x$lex"}{foo}[0]: value ok 1257 - $vgbl{"x$lex"}{foo}[0]: no exception ok 1258 - $vgbl{"x$lex"}{foo}[0]: value ok 1259 - $vgbl{"x$lex"}{foo}[0] = 123: no exception ok 1260 - $vgbl{"x$lex"}{foo}[0] = 123: value ok 1261 - exists $vgbl{"x$lex"}{foo}[0]: no exception ok 1262 - exists $vgbl{"x$lex"}{foo}[0]: value ok 1263 - delete $vgbl{"x$lex"}{foo}[0]: no exception ok 1264 - delete $vgbl{"x$lex"}{foo}[0]: value ok 1265 - $vrlex->{"x$lex"}{foo}[0]: no exception ok 1266 - $vrlex->{"x$lex"}{foo}[0]: value ok 1267 - $vrlex->{"x$lex"}{foo}[0] = 123: no exception ok 1268 - $vrlex->{"x$lex"}{foo}[0] = 123: value ok 1269 - exists $vrlex->{"x$lex"}{foo}[0]: no exception ok 1270 - exists $vrlex->{"x$lex"}{foo}[0]: value ok 1271 - delete $vrlex->{"x$lex"}{foo}[0]: no exception ok 1272 - delete $vrlex->{"x$lex"}{foo}[0]: value ok 1273 - $vrgbl->{"x$lex"}{foo}[0]: no exception ok 1274 - $vrgbl->{"x$lex"}{foo}[0]: value ok 1275 - $vrgbl->{"x$lex"}{foo}[0] = 123: no exception ok 1276 - $vrgbl->{"x$lex"}{foo}[0] = 123: value ok 1277 - exists $vrgbl->{"x$lex"}{foo}[0]: no exception ok 1278 - exists $vrgbl->{"x$lex"}{foo}[0]: value ok 1279 - delete $vrgbl->{"x$lex"}{foo}[0]: no exception ok 1280 - delete $vrgbl->{"x$lex"}{foo}[0]: value ok 1281 - $vlex[0]{$lex}[0]: no exception ok 1282 - $vlex[0]{$lex}[0]: value ok 1283 - $vlex[0]{$lex}[0] = 123: no exception ok 1284 - $vlex[0]{$lex}[0] = 123: value ok 1285 - exists $vlex[0]{$lex}[0]: no exception ok 1286 - exists $vlex[0]{$lex}[0]: value ok 1287 - delete $vlex[0]{$lex}[0]: no exception ok 1288 - delete $vlex[0]{$lex}[0]: value ok 1289 - $vgbl[0]{$lex}[0]: no exception ok 1290 - $vgbl[0]{$lex}[0]: value ok 1291 - $vgbl[0]{$lex}[0] = 123: no exception ok 1292 - $vgbl[0]{$lex}[0] = 123: value ok 1293 - exists $vgbl[0]{$lex}[0]: no exception ok 1294 - exists $vgbl[0]{$lex}[0]: value ok 1295 - delete $vgbl[0]{$lex}[0]: no exception ok 1296 - delete $vgbl[0]{$lex}[0]: value ok 1297 - $vrlex->[0]{$lex}[0]: no exception ok 1298 - $vrlex->[0]{$lex}[0]: value ok 1299 - $vrlex->[0]{$lex}[0] = 123: no exception ok 1300 - $vrlex->[0]{$lex}[0] = 123: value ok 1301 - exists $vrlex->[0]{$lex}[0]: no exception ok 1302 - exists $vrlex->[0]{$lex}[0]: value ok 1303 - delete $vrlex->[0]{$lex}[0]: no exception ok 1304 - delete $vrlex->[0]{$lex}[0]: value ok 1305 - $vrgbl->[0]{$lex}[0]: no exception ok 1306 - $vrgbl->[0]{$lex}[0]: value ok 1307 - $vrgbl->[0]{$lex}[0] = 123: no exception ok 1308 - $vrgbl->[0]{$lex}[0] = 123: value ok 1309 - exists $vrgbl->[0]{$lex}[0]: no exception ok 1310 - exists $vrgbl->[0]{$lex}[0]: value ok 1311 - delete $vrgbl->[0]{$lex}[0]: no exception ok 1312 - delete $vrgbl->[0]{$lex}[0]: value ok 1313 - $vlex[$lex]{$lex}[0]: no exception ok 1314 - $vlex[$lex]{$lex}[0]: value ok 1315 - $vlex[$lex]{$lex}[0] = 123: no exception ok 1316 - $vlex[$lex]{$lex}[0] = 123: value ok 1317 - exists $vlex[$lex]{$lex}[0]: no exception ok 1318 - exists $vlex[$lex]{$lex}[0]: value ok 1319 - delete $vlex[$lex]{$lex}[0]: no exception ok 1320 - delete $vlex[$lex]{$lex}[0]: value ok 1321 - $vgbl[$lex]{$lex}[0]: no exception ok 1322 - $vgbl[$lex]{$lex}[0]: value ok 1323 - $vgbl[$lex]{$lex}[0] = 123: no exception ok 1324 - $vgbl[$lex]{$lex}[0] = 123: value ok 1325 - exists $vgbl[$lex]{$lex}[0]: no exception ok 1326 - exists $vgbl[$lex]{$lex}[0]: value ok 1327 - delete $vgbl[$lex]{$lex}[0]: no exception ok 1328 - delete $vgbl[$lex]{$lex}[0]: value ok 1329 - $vrlex->[$lex]{$lex}[0]: no exception ok 1330 - $vrlex->[$lex]{$lex}[0]: value ok 1331 - $vrlex->[$lex]{$lex}[0] = 123: no exception ok 1332 - $vrlex->[$lex]{$lex}[0] = 123: value ok 1333 - exists $vrlex->[$lex]{$lex}[0]: no exception ok 1334 - exists $vrlex->[$lex]{$lex}[0]: value ok 1335 - delete $vrlex->[$lex]{$lex}[0]: no exception ok 1336 - delete $vrlex->[$lex]{$lex}[0]: value ok 1337 - $vrgbl->[$lex]{$lex}[0]: no exception ok 1338 - $vrgbl->[$lex]{$lex}[0]: value ok 1339 - $vrgbl->[$lex]{$lex}[0] = 123: no exception ok 1340 - $vrgbl->[$lex]{$lex}[0] = 123: value ok 1341 - exists $vrgbl->[$lex]{$lex}[0]: no exception ok 1342 - exists $vrgbl->[$lex]{$lex}[0]: value ok 1343 - delete $vrgbl->[$lex]{$lex}[0]: no exception ok 1344 - delete $vrgbl->[$lex]{$lex}[0]: value ok 1345 - $vlex[$gbl]{$lex}[0]: no exception ok 1346 - $vlex[$gbl]{$lex}[0]: value ok 1347 - $vlex[$gbl]{$lex}[0] = 123: no exception ok 1348 - $vlex[$gbl]{$lex}[0] = 123: value ok 1349 - exists $vlex[$gbl]{$lex}[0]: no exception ok 1350 - exists $vlex[$gbl]{$lex}[0]: value ok 1351 - delete $vlex[$gbl]{$lex}[0]: no exception ok 1352 - delete $vlex[$gbl]{$lex}[0]: value ok 1353 - $vgbl[$gbl]{$lex}[0]: no exception ok 1354 - $vgbl[$gbl]{$lex}[0]: value ok 1355 - $vgbl[$gbl]{$lex}[0] = 123: no exception ok 1356 - $vgbl[$gbl]{$lex}[0] = 123: value ok 1357 - exists $vgbl[$gbl]{$lex}[0]: no exception ok 1358 - exists $vgbl[$gbl]{$lex}[0]: value ok 1359 - delete $vgbl[$gbl]{$lex}[0]: no exception ok 1360 - delete $vgbl[$gbl]{$lex}[0]: value ok 1361 - $vrlex->[$gbl]{$lex}[0]: no exception ok 1362 - $vrlex->[$gbl]{$lex}[0]: value ok 1363 - $vrlex->[$gbl]{$lex}[0] = 123: no exception ok 1364 - $vrlex->[$gbl]{$lex}[0] = 123: value ok 1365 - exists $vrlex->[$gbl]{$lex}[0]: no exception ok 1366 - exists $vrlex->[$gbl]{$lex}[0]: value ok 1367 - delete $vrlex->[$gbl]{$lex}[0]: no exception ok 1368 - delete $vrlex->[$gbl]{$lex}[0]: value ok 1369 - $vrgbl->[$gbl]{$lex}[0]: no exception ok 1370 - $vrgbl->[$gbl]{$lex}[0]: value ok 1371 - $vrgbl->[$gbl]{$lex}[0] = 123: no exception ok 1372 - $vrgbl->[$gbl]{$lex}[0] = 123: value ok 1373 - exists $vrgbl->[$gbl]{$lex}[0]: no exception ok 1374 - exists $vrgbl->[$gbl]{$lex}[0]: value ok 1375 - delete $vrgbl->[$gbl]{$lex}[0]: no exception ok 1376 - delete $vrgbl->[$gbl]{$lex}[0]: value ok 1377 - $vlex[$lex+1]{$lex}[0]: no exception ok 1378 - $vlex[$lex+1]{$lex}[0]: value ok 1379 - $vlex[$lex+1]{$lex}[0] = 123: no exception ok 1380 - $vlex[$lex+1]{$lex}[0] = 123: value ok 1381 - exists $vlex[$lex+1]{$lex}[0]: no exception ok 1382 - exists $vlex[$lex+1]{$lex}[0]: value ok 1383 - delete $vlex[$lex+1]{$lex}[0]: no exception ok 1384 - delete $vlex[$lex+1]{$lex}[0]: value ok 1385 - $vgbl[$lex+1]{$lex}[0]: no exception ok 1386 - $vgbl[$lex+1]{$lex}[0]: value ok 1387 - $vgbl[$lex+1]{$lex}[0] = 123: no exception ok 1388 - $vgbl[$lex+1]{$lex}[0] = 123: value ok 1389 - exists $vgbl[$lex+1]{$lex}[0]: no exception ok 1390 - exists $vgbl[$lex+1]{$lex}[0]: value ok 1391 - delete $vgbl[$lex+1]{$lex}[0]: no exception ok 1392 - delete $vgbl[$lex+1]{$lex}[0]: value ok 1393 - $vrlex->[$lex+1]{$lex}[0]: no exception ok 1394 - $vrlex->[$lex+1]{$lex}[0]: value ok 1395 - $vrlex->[$lex+1]{$lex}[0] = 123: no exception ok 1396 - $vrlex->[$lex+1]{$lex}[0] = 123: value ok 1397 - exists $vrlex->[$lex+1]{$lex}[0]: no exception ok 1398 - exists $vrlex->[$lex+1]{$lex}[0]: value ok 1399 - delete $vrlex->[$lex+1]{$lex}[0]: no exception ok 1400 - delete $vrlex->[$lex+1]{$lex}[0]: value ok 1401 - $vrgbl->[$lex+1]{$lex}[0]: no exception ok 1402 - $vrgbl->[$lex+1]{$lex}[0]: value ok 1403 - $vrgbl->[$lex+1]{$lex}[0] = 123: no exception ok 1404 - $vrgbl->[$lex+1]{$lex}[0] = 123: value ok 1405 - exists $vrgbl->[$lex+1]{$lex}[0]: no exception ok 1406 - exists $vrgbl->[$lex+1]{$lex}[0]: value ok 1407 - delete $vrgbl->[$lex+1]{$lex}[0]: no exception ok 1408 - delete $vrgbl->[$lex+1]{$lex}[0]: value ok 1409 - $vlex{foo}{$lex}[0]: no exception ok 1410 - $vlex{foo}{$lex}[0]: value ok 1411 - $vlex{foo}{$lex}[0] = 123: no exception ok 1412 - $vlex{foo}{$lex}[0] = 123: value ok 1413 - exists $vlex{foo}{$lex}[0]: no exception ok 1414 - exists $vlex{foo}{$lex}[0]: value ok 1415 - delete $vlex{foo}{$lex}[0]: no exception ok 1416 - delete $vlex{foo}{$lex}[0]: value ok 1417 - $vgbl{foo}{$lex}[0]: no exception ok 1418 - $vgbl{foo}{$lex}[0]: value ok 1419 - $vgbl{foo}{$lex}[0] = 123: no exception ok 1420 - $vgbl{foo}{$lex}[0] = 123: value ok 1421 - exists $vgbl{foo}{$lex}[0]: no exception ok 1422 - exists $vgbl{foo}{$lex}[0]: value ok 1423 - delete $vgbl{foo}{$lex}[0]: no exception ok 1424 - delete $vgbl{foo}{$lex}[0]: value ok 1425 - $vrlex->{foo}{$lex}[0]: no exception ok 1426 - $vrlex->{foo}{$lex}[0]: value ok 1427 - $vrlex->{foo}{$lex}[0] = 123: no exception ok 1428 - $vrlex->{foo}{$lex}[0] = 123: value ok 1429 - exists $vrlex->{foo}{$lex}[0]: no exception ok 1430 - exists $vrlex->{foo}{$lex}[0]: value ok 1431 - delete $vrlex->{foo}{$lex}[0]: no exception ok 1432 - delete $vrlex->{foo}{$lex}[0]: value ok 1433 - $vrgbl->{foo}{$lex}[0]: no exception ok 1434 - $vrgbl->{foo}{$lex}[0]: value ok 1435 - $vrgbl->{foo}{$lex}[0] = 123: no exception ok 1436 - $vrgbl->{foo}{$lex}[0] = 123: value ok 1437 - exists $vrgbl->{foo}{$lex}[0]: no exception ok 1438 - exists $vrgbl->{foo}{$lex}[0]: value ok 1439 - delete $vrgbl->{foo}{$lex}[0]: no exception ok 1440 - delete $vrgbl->{foo}{$lex}[0]: value ok 1441 - $vlex{$lex}{$lex}[0]: no exception ok 1442 - $vlex{$lex}{$lex}[0]: value ok 1443 - $vlex{$lex}{$lex}[0] = 123: no exception ok 1444 - $vlex{$lex}{$lex}[0] = 123: value ok 1445 - exists $vlex{$lex}{$lex}[0]: no exception ok 1446 - exists $vlex{$lex}{$lex}[0]: value ok 1447 - delete $vlex{$lex}{$lex}[0]: no exception ok 1448 - delete $vlex{$lex}{$lex}[0]: value ok 1449 - $vgbl{$lex}{$lex}[0]: no exception ok 1450 - $vgbl{$lex}{$lex}[0]: value ok 1451 - $vgbl{$lex}{$lex}[0] = 123: no exception ok 1452 - $vgbl{$lex}{$lex}[0] = 123: value ok 1453 - exists $vgbl{$lex}{$lex}[0]: no exception ok 1454 - exists $vgbl{$lex}{$lex}[0]: value ok 1455 - delete $vgbl{$lex}{$lex}[0]: no exception ok 1456 - delete $vgbl{$lex}{$lex}[0]: value ok 1457 - $vrlex->{$lex}{$lex}[0]: no exception ok 1458 - $vrlex->{$lex}{$lex}[0]: value ok 1459 - $vrlex->{$lex}{$lex}[0] = 123: no exception ok 1460 - $vrlex->{$lex}{$lex}[0] = 123: value ok 1461 - exists $vrlex->{$lex}{$lex}[0]: no exception ok 1462 - exists $vrlex->{$lex}{$lex}[0]: value ok 1463 - delete $vrlex->{$lex}{$lex}[0]: no exception ok 1464 - delete $vrlex->{$lex}{$lex}[0]: value ok 1465 - $vrgbl->{$lex}{$lex}[0]: no exception ok 1466 - $vrgbl->{$lex}{$lex}[0]: value ok 1467 - $vrgbl->{$lex}{$lex}[0] = 123: no exception ok 1468 - $vrgbl->{$lex}{$lex}[0] = 123: value ok 1469 - exists $vrgbl->{$lex}{$lex}[0]: no exception ok 1470 - exists $vrgbl->{$lex}{$lex}[0]: value ok 1471 - delete $vrgbl->{$lex}{$lex}[0]: no exception ok 1472 - delete $vrgbl->{$lex}{$lex}[0]: value ok 1473 - $vlex{$gbl}{$lex}[0]: no exception ok 1474 - $vlex{$gbl}{$lex}[0]: value ok 1475 - $vlex{$gbl}{$lex}[0] = 123: no exception ok 1476 - $vlex{$gbl}{$lex}[0] = 123: value ok 1477 - exists $vlex{$gbl}{$lex}[0]: no exception ok 1478 - exists $vlex{$gbl}{$lex}[0]: value ok 1479 - delete $vlex{$gbl}{$lex}[0]: no exception ok 1480 - delete $vlex{$gbl}{$lex}[0]: value ok 1481 - $vgbl{$gbl}{$lex}[0]: no exception ok 1482 - $vgbl{$gbl}{$lex}[0]: value ok 1483 - $vgbl{$gbl}{$lex}[0] = 123: no exception ok 1484 - $vgbl{$gbl}{$lex}[0] = 123: value ok 1485 - exists $vgbl{$gbl}{$lex}[0]: no exception ok 1486 - exists $vgbl{$gbl}{$lex}[0]: value ok 1487 - delete $vgbl{$gbl}{$lex}[0]: no exception ok 1488 - delete $vgbl{$gbl}{$lex}[0]: value ok 1489 - $vrlex->{$gbl}{$lex}[0]: no exception ok 1490 - $vrlex->{$gbl}{$lex}[0]: value ok 1491 - $vrlex->{$gbl}{$lex}[0] = 123: no exception ok 1492 - $vrlex->{$gbl}{$lex}[0] = 123: value ok 1493 - exists $vrlex->{$gbl}{$lex}[0]: no exception ok 1494 - exists $vrlex->{$gbl}{$lex}[0]: value ok 1495 - delete $vrlex->{$gbl}{$lex}[0]: no exception ok 1496 - delete $vrlex->{$gbl}{$lex}[0]: value ok 1497 - $vrgbl->{$gbl}{$lex}[0]: no exception ok 1498 - $vrgbl->{$gbl}{$lex}[0]: value ok 1499 - $vrgbl->{$gbl}{$lex}[0] = 123: no exception ok 1500 - $vrgbl->{$gbl}{$lex}[0] = 123: value ok 1501 - exists $vrgbl->{$gbl}{$lex}[0]: no exception ok 1502 - exists $vrgbl->{$gbl}{$lex}[0]: value ok 1503 - delete $vrgbl->{$gbl}{$lex}[0]: no exception ok 1504 - delete $vrgbl->{$gbl}{$lex}[0]: value ok 1505 - $vlex{"x$lex"}{$lex}[0]: no exception ok 1506 - $vlex{"x$lex"}{$lex}[0]: value ok 1507 - $vlex{"x$lex"}{$lex}[0] = 123: no exception ok 1508 - $vlex{"x$lex"}{$lex}[0] = 123: value ok 1509 - exists $vlex{"x$lex"}{$lex}[0]: no exception ok 1510 - exists $vlex{"x$lex"}{$lex}[0]: value ok 1511 - delete $vlex{"x$lex"}{$lex}[0]: no exception ok 1512 - delete $vlex{"x$lex"}{$lex}[0]: value ok 1513 - $vgbl{"x$lex"}{$lex}[0]: no exception ok 1514 - $vgbl{"x$lex"}{$lex}[0]: value ok 1515 - $vgbl{"x$lex"}{$lex}[0] = 123: no exception ok 1516 - $vgbl{"x$lex"}{$lex}[0] = 123: value ok 1517 - exists $vgbl{"x$lex"}{$lex}[0]: no exception ok 1518 - exists $vgbl{"x$lex"}{$lex}[0]: value ok 1519 - delete $vgbl{"x$lex"}{$lex}[0]: no exception ok 1520 - delete $vgbl{"x$lex"}{$lex}[0]: value ok 1521 - $vrlex->{"x$lex"}{$lex}[0]: no exception ok 1522 - $vrlex->{"x$lex"}{$lex}[0]: value ok 1523 - $vrlex->{"x$lex"}{$lex}[0] = 123: no exception ok 1524 - $vrlex->{"x$lex"}{$lex}[0] = 123: value ok 1525 - exists $vrlex->{"x$lex"}{$lex}[0]: no exception ok 1526 - exists $vrlex->{"x$lex"}{$lex}[0]: value ok 1527 - delete $vrlex->{"x$lex"}{$lex}[0]: no exception ok 1528 - delete $vrlex->{"x$lex"}{$lex}[0]: value ok 1529 - $vrgbl->{"x$lex"}{$lex}[0]: no exception ok 1530 - $vrgbl->{"x$lex"}{$lex}[0]: value ok 1531 - $vrgbl->{"x$lex"}{$lex}[0] = 123: no exception ok 1532 - $vrgbl->{"x$lex"}{$lex}[0] = 123: value ok 1533 - exists $vrgbl->{"x$lex"}{$lex}[0]: no exception ok 1534 - exists $vrgbl->{"x$lex"}{$lex}[0]: value ok 1535 - delete $vrgbl->{"x$lex"}{$lex}[0]: no exception ok 1536 - delete $vrgbl->{"x$lex"}{$lex}[0]: value ok 1537 - $vlex[0]{$gbl}[0]: no exception ok 1538 - $vlex[0]{$gbl}[0]: value ok 1539 - $vlex[0]{$gbl}[0] = 123: no exception ok 1540 - $vlex[0]{$gbl}[0] = 123: value ok 1541 - exists $vlex[0]{$gbl}[0]: no exception ok 1542 - exists $vlex[0]{$gbl}[0]: value ok 1543 - delete $vlex[0]{$gbl}[0]: no exception ok 1544 - delete $vlex[0]{$gbl}[0]: value ok 1545 - $vgbl[0]{$gbl}[0]: no exception ok 1546 - $vgbl[0]{$gbl}[0]: value ok 1547 - $vgbl[0]{$gbl}[0] = 123: no exception ok 1548 - $vgbl[0]{$gbl}[0] = 123: value ok 1549 - exists $vgbl[0]{$gbl}[0]: no exception ok 1550 - exists $vgbl[0]{$gbl}[0]: value ok 1551 - delete $vgbl[0]{$gbl}[0]: no exception ok 1552 - delete $vgbl[0]{$gbl}[0]: value ok 1553 - $vrlex->[0]{$gbl}[0]: no exception ok 1554 - $vrlex->[0]{$gbl}[0]: value ok 1555 - $vrlex->[0]{$gbl}[0] = 123: no exception ok 1556 - $vrlex->[0]{$gbl}[0] = 123: value ok 1557 - exists $vrlex->[0]{$gbl}[0]: no exception ok 1558 - exists $vrlex->[0]{$gbl}[0]: value ok 1559 - delete $vrlex->[0]{$gbl}[0]: no exception ok 1560 - delete $vrlex->[0]{$gbl}[0]: value ok 1561 - $vrgbl->[0]{$gbl}[0]: no exception ok 1562 - $vrgbl->[0]{$gbl}[0]: value ok 1563 - $vrgbl->[0]{$gbl}[0] = 123: no exception ok 1564 - $vrgbl->[0]{$gbl}[0] = 123: value ok 1565 - exists $vrgbl->[0]{$gbl}[0]: no exception ok 1566 - exists $vrgbl->[0]{$gbl}[0]: value ok 1567 - delete $vrgbl->[0]{$gbl}[0]: no exception ok 1568 - delete $vrgbl->[0]{$gbl}[0]: value ok 1569 - $vlex[$lex]{$gbl}[0]: no exception ok 1570 - $vlex[$lex]{$gbl}[0]: value ok 1571 - $vlex[$lex]{$gbl}[0] = 123: no exception ok 1572 - $vlex[$lex]{$gbl}[0] = 123: value ok 1573 - exists $vlex[$lex]{$gbl}[0]: no exception ok 1574 - exists $vlex[$lex]{$gbl}[0]: value ok 1575 - delete $vlex[$lex]{$gbl}[0]: no exception ok 1576 - delete $vlex[$lex]{$gbl}[0]: value ok 1577 - $vgbl[$lex]{$gbl}[0]: no exception ok 1578 - $vgbl[$lex]{$gbl}[0]: value ok 1579 - $vgbl[$lex]{$gbl}[0] = 123: no exception ok 1580 - $vgbl[$lex]{$gbl}[0] = 123: value ok 1581 - exists $vgbl[$lex]{$gbl}[0]: no exception ok 1582 - exists $vgbl[$lex]{$gbl}[0]: value ok 1583 - delete $vgbl[$lex]{$gbl}[0]: no exception ok 1584 - delete $vgbl[$lex]{$gbl}[0]: value ok 1585 - $vrlex->[$lex]{$gbl}[0]: no exception ok 1586 - $vrlex->[$lex]{$gbl}[0]: value ok 1587 - $vrlex->[$lex]{$gbl}[0] = 123: no exception ok 1588 - $vrlex->[$lex]{$gbl}[0] = 123: value ok 1589 - exists $vrlex->[$lex]{$gbl}[0]: no exception ok 1590 - exists $vrlex->[$lex]{$gbl}[0]: value ok 1591 - delete $vrlex->[$lex]{$gbl}[0]: no exception ok 1592 - delete $vrlex->[$lex]{$gbl}[0]: value ok 1593 - $vrgbl->[$lex]{$gbl}[0]: no exception ok 1594 - $vrgbl->[$lex]{$gbl}[0]: value ok 1595 - $vrgbl->[$lex]{$gbl}[0] = 123: no exception ok 1596 - $vrgbl->[$lex]{$gbl}[0] = 123: value ok 1597 - exists $vrgbl->[$lex]{$gbl}[0]: no exception ok 1598 - exists $vrgbl->[$lex]{$gbl}[0]: value ok 1599 - delete $vrgbl->[$lex]{$gbl}[0]: no exception ok 1600 - delete $vrgbl->[$lex]{$gbl}[0]: value ok 1601 - $vlex[$gbl]{$gbl}[0]: no exception ok 1602 - $vlex[$gbl]{$gbl}[0]: value ok 1603 - $vlex[$gbl]{$gbl}[0] = 123: no exception ok 1604 - $vlex[$gbl]{$gbl}[0] = 123: value ok 1605 - exists $vlex[$gbl]{$gbl}[0]: no exception ok 1606 - exists $vlex[$gbl]{$gbl}[0]: value ok 1607 - delete $vlex[$gbl]{$gbl}[0]: no exception ok 1608 - delete $vlex[$gbl]{$gbl}[0]: value ok 1609 - $vgbl[$gbl]{$gbl}[0]: no exception ok 1610 - $vgbl[$gbl]{$gbl}[0]: value ok 1611 - $vgbl[$gbl]{$gbl}[0] = 123: no exception ok 1612 - $vgbl[$gbl]{$gbl}[0] = 123: value ok 1613 - exists $vgbl[$gbl]{$gbl}[0]: no exception ok 1614 - exists $vgbl[$gbl]{$gbl}[0]: value ok 1615 - delete $vgbl[$gbl]{$gbl}[0]: no exception ok 1616 - delete $vgbl[$gbl]{$gbl}[0]: value ok 1617 - $vrlex->[$gbl]{$gbl}[0]: no exception ok 1618 - $vrlex->[$gbl]{$gbl}[0]: value ok 1619 - $vrlex->[$gbl]{$gbl}[0] = 123: no exception ok 1620 - $vrlex->[$gbl]{$gbl}[0] = 123: value ok 1621 - exists $vrlex->[$gbl]{$gbl}[0]: no exception ok 1622 - exists $vrlex->[$gbl]{$gbl}[0]: value ok 1623 - delete $vrlex->[$gbl]{$gbl}[0]: no exception ok 1624 - delete $vrlex->[$gbl]{$gbl}[0]: value ok 1625 - $vrgbl->[$gbl]{$gbl}[0]: no exception ok 1626 - $vrgbl->[$gbl]{$gbl}[0]: value ok 1627 - $vrgbl->[$gbl]{$gbl}[0] = 123: no exception ok 1628 - $vrgbl->[$gbl]{$gbl}[0] = 123: value ok 1629 - exists $vrgbl->[$gbl]{$gbl}[0]: no exception ok 1630 - exists $vrgbl->[$gbl]{$gbl}[0]: value ok 1631 - delete $vrgbl->[$gbl]{$gbl}[0]: no exception ok 1632 - delete $vrgbl->[$gbl]{$gbl}[0]: value ok 1633 - $vlex[$lex+1]{$gbl}[0]: no exception ok 1634 - $vlex[$lex+1]{$gbl}[0]: value ok 1635 - $vlex[$lex+1]{$gbl}[0] = 123: no exception ok 1636 - $vlex[$lex+1]{$gbl}[0] = 123: value ok 1637 - exists $vlex[$lex+1]{$gbl}[0]: no exception ok 1638 - exists $vlex[$lex+1]{$gbl}[0]: value ok 1639 - delete $vlex[$lex+1]{$gbl}[0]: no exception ok 1640 - delete $vlex[$lex+1]{$gbl}[0]: value ok 1641 - $vgbl[$lex+1]{$gbl}[0]: no exception ok 1642 - $vgbl[$lex+1]{$gbl}[0]: value ok 1643 - $vgbl[$lex+1]{$gbl}[0] = 123: no exception ok 1644 - $vgbl[$lex+1]{$gbl}[0] = 123: value ok 1645 - exists $vgbl[$lex+1]{$gbl}[0]: no exception ok 1646 - exists $vgbl[$lex+1]{$gbl}[0]: value ok 1647 - delete $vgbl[$lex+1]{$gbl}[0]: no exception ok 1648 - delete $vgbl[$lex+1]{$gbl}[0]: value ok 1649 - $vrlex->[$lex+1]{$gbl}[0]: no exception ok 1650 - $vrlex->[$lex+1]{$gbl}[0]: value ok 1651 - $vrlex->[$lex+1]{$gbl}[0] = 123: no exception ok 1652 - $vrlex->[$lex+1]{$gbl}[0] = 123: value ok 1653 - exists $vrlex->[$lex+1]{$gbl}[0]: no exception ok 1654 - exists $vrlex->[$lex+1]{$gbl}[0]: value ok 1655 - delete $vrlex->[$lex+1]{$gbl}[0]: no exception ok 1656 - delete $vrlex->[$lex+1]{$gbl}[0]: value ok 1657 - $vrgbl->[$lex+1]{$gbl}[0]: no exception ok 1658 - $vrgbl->[$lex+1]{$gbl}[0]: value ok 1659 - $vrgbl->[$lex+1]{$gbl}[0] = 123: no exception ok 1660 - $vrgbl->[$lex+1]{$gbl}[0] = 123: value ok 1661 - exists $vrgbl->[$lex+1]{$gbl}[0]: no exception ok 1662 - exists $vrgbl->[$lex+1]{$gbl}[0]: value ok 1663 - delete $vrgbl->[$lex+1]{$gbl}[0]: no exception ok 1664 - delete $vrgbl->[$lex+1]{$gbl}[0]: value ok 1665 - $vlex{foo}{$gbl}[0]: no exception ok 1666 - $vlex{foo}{$gbl}[0]: value ok 1667 - $vlex{foo}{$gbl}[0] = 123: no exception ok 1668 - $vlex{foo}{$gbl}[0] = 123: value ok 1669 - exists $vlex{foo}{$gbl}[0]: no exception ok 1670 - exists $vlex{foo}{$gbl}[0]: value ok 1671 - delete $vlex{foo}{$gbl}[0]: no exception ok 1672 - delete $vlex{foo}{$gbl}[0]: value ok 1673 - $vgbl{foo}{$gbl}[0]: no exception ok 1674 - $vgbl{foo}{$gbl}[0]: value ok 1675 - $vgbl{foo}{$gbl}[0] = 123: no exception ok 1676 - $vgbl{foo}{$gbl}[0] = 123: value ok 1677 - exists $vgbl{foo}{$gbl}[0]: no exception ok 1678 - exists $vgbl{foo}{$gbl}[0]: value ok 1679 - delete $vgbl{foo}{$gbl}[0]: no exception ok 1680 - delete $vgbl{foo}{$gbl}[0]: value ok 1681 - $vrlex->{foo}{$gbl}[0]: no exception ok 1682 - $vrlex->{foo}{$gbl}[0]: value ok 1683 - $vrlex->{foo}{$gbl}[0] = 123: no exception ok 1684 - $vrlex->{foo}{$gbl}[0] = 123: value ok 1685 - exists $vrlex->{foo}{$gbl}[0]: no exception ok 1686 - exists $vrlex->{foo}{$gbl}[0]: value ok 1687 - delete $vrlex->{foo}{$gbl}[0]: no exception ok 1688 - delete $vrlex->{foo}{$gbl}[0]: value ok 1689 - $vrgbl->{foo}{$gbl}[0]: no exception ok 1690 - $vrgbl->{foo}{$gbl}[0]: value ok 1691 - $vrgbl->{foo}{$gbl}[0] = 123: no exception ok 1692 - $vrgbl->{foo}{$gbl}[0] = 123: value ok 1693 - exists $vrgbl->{foo}{$gbl}[0]: no exception ok 1694 - exists $vrgbl->{foo}{$gbl}[0]: value ok 1695 - delete $vrgbl->{foo}{$gbl}[0]: no exception ok 1696 - delete $vrgbl->{foo}{$gbl}[0]: value ok 1697 - $vlex{$lex}{$gbl}[0]: no exception ok 1698 - $vlex{$lex}{$gbl}[0]: value ok 1699 - $vlex{$lex}{$gbl}[0] = 123: no exception ok 1700 - $vlex{$lex}{$gbl}[0] = 123: value ok 1701 - exists $vlex{$lex}{$gbl}[0]: no exception ok 1702 - exists $vlex{$lex}{$gbl}[0]: value ok 1703 - delete $vlex{$lex}{$gbl}[0]: no exception ok 1704 - delete $vlex{$lex}{$gbl}[0]: value ok 1705 - $vgbl{$lex}{$gbl}[0]: no exception ok 1706 - $vgbl{$lex}{$gbl}[0]: value ok 1707 - $vgbl{$lex}{$gbl}[0] = 123: no exception ok 1708 - $vgbl{$lex}{$gbl}[0] = 123: value ok 1709 - exists $vgbl{$lex}{$gbl}[0]: no exception ok 1710 - exists $vgbl{$lex}{$gbl}[0]: value ok 1711 - delete $vgbl{$lex}{$gbl}[0]: no exception ok 1712 - delete $vgbl{$lex}{$gbl}[0]: value ok 1713 - $vrlex->{$lex}{$gbl}[0]: no exception ok 1714 - $vrlex->{$lex}{$gbl}[0]: value ok 1715 - $vrlex->{$lex}{$gbl}[0] = 123: no exception ok 1716 - $vrlex->{$lex}{$gbl}[0] = 123: value ok 1717 - exists $vrlex->{$lex}{$gbl}[0]: no exception ok 1718 - exists $vrlex->{$lex}{$gbl}[0]: value ok 1719 - delete $vrlex->{$lex}{$gbl}[0]: no exception ok 1720 - delete $vrlex->{$lex}{$gbl}[0]: value ok 1721 - $vrgbl->{$lex}{$gbl}[0]: no exception ok 1722 - $vrgbl->{$lex}{$gbl}[0]: value ok 1723 - $vrgbl->{$lex}{$gbl}[0] = 123: no exception ok 1724 - $vrgbl->{$lex}{$gbl}[0] = 123: value ok 1725 - exists $vrgbl->{$lex}{$gbl}[0]: no exception ok 1726 - exists $vrgbl->{$lex}{$gbl}[0]: value ok 1727 - delete $vrgbl->{$lex}{$gbl}[0]: no exception ok 1728 - delete $vrgbl->{$lex}{$gbl}[0]: value ok 1729 - $vlex{$gbl}{$gbl}[0]: no exception ok 1730 - $vlex{$gbl}{$gbl}[0]: value ok 1731 - $vlex{$gbl}{$gbl}[0] = 123: no exception ok 1732 - $vlex{$gbl}{$gbl}[0] = 123: value ok 1733 - exists $vlex{$gbl}{$gbl}[0]: no exception ok 1734 - exists $vlex{$gbl}{$gbl}[0]: value ok 1735 - delete $vlex{$gbl}{$gbl}[0]: no exception ok 1736 - delete $vlex{$gbl}{$gbl}[0]: value ok 1737 - $vgbl{$gbl}{$gbl}[0]: no exception ok 1738 - $vgbl{$gbl}{$gbl}[0]: value ok 1739 - $vgbl{$gbl}{$gbl}[0] = 123: no exception ok 1740 - $vgbl{$gbl}{$gbl}[0] = 123: value ok 1741 - exists $vgbl{$gbl}{$gbl}[0]: no exception ok 1742 - exists $vgbl{$gbl}{$gbl}[0]: value ok 1743 - delete $vgbl{$gbl}{$gbl}[0]: no exception ok 1744 - delete $vgbl{$gbl}{$gbl}[0]: value ok 1745 - $vrlex->{$gbl}{$gbl}[0]: no exception ok 1746 - $vrlex->{$gbl}{$gbl}[0]: value ok 1747 - $vrlex->{$gbl}{$gbl}[0] = 123: no exception ok 1748 - $vrlex->{$gbl}{$gbl}[0] = 123: value ok 1749 - exists $vrlex->{$gbl}{$gbl}[0]: no exception ok 1750 - exists $vrlex->{$gbl}{$gbl}[0]: value ok 1751 - delete $vrlex->{$gbl}{$gbl}[0]: no exception ok 1752 - delete $vrlex->{$gbl}{$gbl}[0]: value ok 1753 - $vrgbl->{$gbl}{$gbl}[0]: no exception ok 1754 - $vrgbl->{$gbl}{$gbl}[0]: value ok 1755 - $vrgbl->{$gbl}{$gbl}[0] = 123: no exception ok 1756 - $vrgbl->{$gbl}{$gbl}[0] = 123: value ok 1757 - exists $vrgbl->{$gbl}{$gbl}[0]: no exception ok 1758 - exists $vrgbl->{$gbl}{$gbl}[0]: value ok 1759 - delete $vrgbl->{$gbl}{$gbl}[0]: no exception ok 1760 - delete $vrgbl->{$gbl}{$gbl}[0]: value ok 1761 - $vlex{"x$lex"}{$gbl}[0]: no exception ok 1762 - $vlex{"x$lex"}{$gbl}[0]: value ok 1763 - $vlex{"x$lex"}{$gbl}[0] = 123: no exception ok 1764 - $vlex{"x$lex"}{$gbl}[0] = 123: value ok 1765 - exists $vlex{"x$lex"}{$gbl}[0]: no exception ok 1766 - exists $vlex{"x$lex"}{$gbl}[0]: value ok 1767 - delete $vlex{"x$lex"}{$gbl}[0]: no exception ok 1768 - delete $vlex{"x$lex"}{$gbl}[0]: value ok 1769 - $vgbl{"x$lex"}{$gbl}[0]: no exception ok 1770 - $vgbl{"x$lex"}{$gbl}[0]: value ok 1771 - $vgbl{"x$lex"}{$gbl}[0] = 123: no exception ok 1772 - $vgbl{"x$lex"}{$gbl}[0] = 123: value ok 1773 - exists $vgbl{"x$lex"}{$gbl}[0]: no exception ok 1774 - exists $vgbl{"x$lex"}{$gbl}[0]: value ok 1775 - delete $vgbl{"x$lex"}{$gbl}[0]: no exception ok 1776 - delete $vgbl{"x$lex"}{$gbl}[0]: value ok 1777 - $vrlex->{"x$lex"}{$gbl}[0]: no exception ok 1778 - $vrlex->{"x$lex"}{$gbl}[0]: value ok 1779 - $vrlex->{"x$lex"}{$gbl}[0] = 123: no exception ok 1780 - $vrlex->{"x$lex"}{$gbl}[0] = 123: value ok 1781 - exists $vrlex->{"x$lex"}{$gbl}[0]: no exception ok 1782 - exists $vrlex->{"x$lex"}{$gbl}[0]: value ok 1783 - delete $vrlex->{"x$lex"}{$gbl}[0]: no exception ok 1784 - delete $vrlex->{"x$lex"}{$gbl}[0]: value ok 1785 - $vrgbl->{"x$lex"}{$gbl}[0]: no exception ok 1786 - $vrgbl->{"x$lex"}{$gbl}[0]: value ok 1787 - $vrgbl->{"x$lex"}{$gbl}[0] = 123: no exception ok 1788 - $vrgbl->{"x$lex"}{$gbl}[0] = 123: value ok 1789 - exists $vrgbl->{"x$lex"}{$gbl}[0]: no exception ok 1790 - exists $vrgbl->{"x$lex"}{$gbl}[0]: value ok 1791 - delete $vrgbl->{"x$lex"}{$gbl}[0]: no exception ok 1792 - delete $vrgbl->{"x$lex"}{$gbl}[0]: value ok 1793 - $vlex[0]{"x$lex"}[0]: no exception ok 1794 - $vlex[0]{"x$lex"}[0]: value ok 1795 - $vlex[0]{"x$lex"}[0] = 123: no exception ok 1796 - $vlex[0]{"x$lex"}[0] = 123: value ok 1797 - exists $vlex[0]{"x$lex"}[0]: no exception ok 1798 - exists $vlex[0]{"x$lex"}[0]: value ok 1799 - delete $vlex[0]{"x$lex"}[0]: no exception ok 1800 - delete $vlex[0]{"x$lex"}[0]: value ok 1801 - $vgbl[0]{"x$lex"}[0]: no exception ok 1802 - $vgbl[0]{"x$lex"}[0]: value ok 1803 - $vgbl[0]{"x$lex"}[0] = 123: no exception ok 1804 - $vgbl[0]{"x$lex"}[0] = 123: value ok 1805 - exists $vgbl[0]{"x$lex"}[0]: no exception ok 1806 - exists $vgbl[0]{"x$lex"}[0]: value ok 1807 - delete $vgbl[0]{"x$lex"}[0]: no exception ok 1808 - delete $vgbl[0]{"x$lex"}[0]: value ok 1809 - $vrlex->[0]{"x$lex"}[0]: no exception ok 1810 - $vrlex->[0]{"x$lex"}[0]: value ok 1811 - $vrlex->[0]{"x$lex"}[0] = 123: no exception ok 1812 - $vrlex->[0]{"x$lex"}[0] = 123: value ok 1813 - exists $vrlex->[0]{"x$lex"}[0]: no exception ok 1814 - exists $vrlex->[0]{"x$lex"}[0]: value ok 1815 - delete $vrlex->[0]{"x$lex"}[0]: no exception ok 1816 - delete $vrlex->[0]{"x$lex"}[0]: value ok 1817 - $vrgbl->[0]{"x$lex"}[0]: no exception ok 1818 - $vrgbl->[0]{"x$lex"}[0]: value ok 1819 - $vrgbl->[0]{"x$lex"}[0] = 123: no exception ok 1820 - $vrgbl->[0]{"x$lex"}[0] = 123: value ok 1821 - exists $vrgbl->[0]{"x$lex"}[0]: no exception ok 1822 - exists $vrgbl->[0]{"x$lex"}[0]: value ok 1823 - delete $vrgbl->[0]{"x$lex"}[0]: no exception ok 1824 - delete $vrgbl->[0]{"x$lex"}[0]: value ok 1825 - $vlex[$lex]{"x$lex"}[0]: no exception ok 1826 - $vlex[$lex]{"x$lex"}[0]: value ok 1827 - $vlex[$lex]{"x$lex"}[0] = 123: no exception ok 1828 - $vlex[$lex]{"x$lex"}[0] = 123: value ok 1829 - exists $vlex[$lex]{"x$lex"}[0]: no exception ok 1830 - exists $vlex[$lex]{"x$lex"}[0]: value ok 1831 - delete $vlex[$lex]{"x$lex"}[0]: no exception ok 1832 - delete $vlex[$lex]{"x$lex"}[0]: value ok 1833 - $vgbl[$lex]{"x$lex"}[0]: no exception ok 1834 - $vgbl[$lex]{"x$lex"}[0]: value ok 1835 - $vgbl[$lex]{"x$lex"}[0] = 123: no exception ok 1836 - $vgbl[$lex]{"x$lex"}[0] = 123: value ok 1837 - exists $vgbl[$lex]{"x$lex"}[0]: no exception ok 1838 - exists $vgbl[$lex]{"x$lex"}[0]: value ok 1839 - delete $vgbl[$lex]{"x$lex"}[0]: no exception ok 1840 - delete $vgbl[$lex]{"x$lex"}[0]: value ok 1841 - $vrlex->[$lex]{"x$lex"}[0]: no exception ok 1842 - $vrlex->[$lex]{"x$lex"}[0]: value ok 1843 - $vrlex->[$lex]{"x$lex"}[0] = 123: no exception ok 1844 - $vrlex->[$lex]{"x$lex"}[0] = 123: value ok 1845 - exists $vrlex->[$lex]{"x$lex"}[0]: no exception ok 1846 - exists $vrlex->[$lex]{"x$lex"}[0]: value ok 1847 - delete $vrlex->[$lex]{"x$lex"}[0]: no exception ok 1848 - delete $vrlex->[$lex]{"x$lex"}[0]: value ok 1849 - $vrgbl->[$lex]{"x$lex"}[0]: no exception ok 1850 - $vrgbl->[$lex]{"x$lex"}[0]: value ok 1851 - $vrgbl->[$lex]{"x$lex"}[0] = 123: no exception ok 1852 - $vrgbl->[$lex]{"x$lex"}[0] = 123: value ok 1853 - exists $vrgbl->[$lex]{"x$lex"}[0]: no exception ok 1854 - exists $vrgbl->[$lex]{"x$lex"}[0]: value ok 1855 - delete $vrgbl->[$lex]{"x$lex"}[0]: no exception ok 1856 - delete $vrgbl->[$lex]{"x$lex"}[0]: value ok 1857 - $vlex[$gbl]{"x$lex"}[0]: no exception ok 1858 - $vlex[$gbl]{"x$lex"}[0]: value ok 1859 - $vlex[$gbl]{"x$lex"}[0] = 123: no exception ok 1860 - $vlex[$gbl]{"x$lex"}[0] = 123: value ok 1861 - exists $vlex[$gbl]{"x$lex"}[0]: no exception ok 1862 - exists $vlex[$gbl]{"x$lex"}[0]: value ok 1863 - delete $vlex[$gbl]{"x$lex"}[0]: no exception ok 1864 - delete $vlex[$gbl]{"x$lex"}[0]: value ok 1865 - $vgbl[$gbl]{"x$lex"}[0]: no exception ok 1866 - $vgbl[$gbl]{"x$lex"}[0]: value ok 1867 - $vgbl[$gbl]{"x$lex"}[0] = 123: no exception ok 1868 - $vgbl[$gbl]{"x$lex"}[0] = 123: value ok 1869 - exists $vgbl[$gbl]{"x$lex"}[0]: no exception ok 1870 - exists $vgbl[$gbl]{"x$lex"}[0]: value ok 1871 - delete $vgbl[$gbl]{"x$lex"}[0]: no exception ok 1872 - delete $vgbl[$gbl]{"x$lex"}[0]: value ok 1873 - $vrlex->[$gbl]{"x$lex"}[0]: no exception ok 1874 - $vrlex->[$gbl]{"x$lex"}[0]: value ok 1875 - $vrlex->[$gbl]{"x$lex"}[0] = 123: no exception ok 1876 - $vrlex->[$gbl]{"x$lex"}[0] = 123: value ok 1877 - exists $vrlex->[$gbl]{"x$lex"}[0]: no exception ok 1878 - exists $vrlex->[$gbl]{"x$lex"}[0]: value ok 1879 - delete $vrlex->[$gbl]{"x$lex"}[0]: no exception ok 1880 - delete $vrlex->[$gbl]{"x$lex"}[0]: value ok 1881 - $vrgbl->[$gbl]{"x$lex"}[0]: no exception ok 1882 - $vrgbl->[$gbl]{"x$lex"}[0]: value ok 1883 - $vrgbl->[$gbl]{"x$lex"}[0] = 123: no exception ok 1884 - $vrgbl->[$gbl]{"x$lex"}[0] = 123: value ok 1885 - exists $vrgbl->[$gbl]{"x$lex"}[0]: no exception ok 1886 - exists $vrgbl->[$gbl]{"x$lex"}[0]: value ok 1887 - delete $vrgbl->[$gbl]{"x$lex"}[0]: no exception ok 1888 - delete $vrgbl->[$gbl]{"x$lex"}[0]: value ok 1889 - $vlex[$lex+1]{"x$lex"}[0]: no exception ok 1890 - $vlex[$lex+1]{"x$lex"}[0]: value ok 1891 - $vlex[$lex+1]{"x$lex"}[0] = 123: no exception ok 1892 - $vlex[$lex+1]{"x$lex"}[0] = 123: value ok 1893 - exists $vlex[$lex+1]{"x$lex"}[0]: no exception ok 1894 - exists $vlex[$lex+1]{"x$lex"}[0]: value ok 1895 - delete $vlex[$lex+1]{"x$lex"}[0]: no exception ok 1896 - delete $vlex[$lex+1]{"x$lex"}[0]: value ok 1897 - $vgbl[$lex+1]{"x$lex"}[0]: no exception ok 1898 - $vgbl[$lex+1]{"x$lex"}[0]: value ok 1899 - $vgbl[$lex+1]{"x$lex"}[0] = 123: no exception ok 1900 - $vgbl[$lex+1]{"x$lex"}[0] = 123: value ok 1901 - exists $vgbl[$lex+1]{"x$lex"}[0]: no exception ok 1902 - exists $vgbl[$lex+1]{"x$lex"}[0]: value ok 1903 - delete $vgbl[$lex+1]{"x$lex"}[0]: no exception ok 1904 - delete $vgbl[$lex+1]{"x$lex"}[0]: value ok 1905 - $vrlex->[$lex+1]{"x$lex"}[0]: no exception ok 1906 - $vrlex->[$lex+1]{"x$lex"}[0]: value ok 1907 - $vrlex->[$lex+1]{"x$lex"}[0] = 123: no exception ok 1908 - $vrlex->[$lex+1]{"x$lex"}[0] = 123: value ok 1909 - exists $vrlex->[$lex+1]{"x$lex"}[0]: no exception ok 1910 - exists $vrlex->[$lex+1]{"x$lex"}[0]: value ok 1911 - delete $vrlex->[$lex+1]{"x$lex"}[0]: no exception ok 1912 - delete $vrlex->[$lex+1]{"x$lex"}[0]: value ok 1913 - $vrgbl->[$lex+1]{"x$lex"}[0]: no exception ok 1914 - $vrgbl->[$lex+1]{"x$lex"}[0]: value ok 1915 - $vrgbl->[$lex+1]{"x$lex"}[0] = 123: no exception ok 1916 - $vrgbl->[$lex+1]{"x$lex"}[0] = 123: value ok 1917 - exists $vrgbl->[$lex+1]{"x$lex"}[0]: no exception ok 1918 - exists $vrgbl->[$lex+1]{"x$lex"}[0]: value ok 1919 - delete $vrgbl->[$lex+1]{"x$lex"}[0]: no exception ok 1920 - delete $vrgbl->[$lex+1]{"x$lex"}[0]: value ok 1921 - $vlex{foo}{"x$lex"}[0]: no exception ok 1922 - $vlex{foo}{"x$lex"}[0]: value ok 1923 - $vlex{foo}{"x$lex"}[0] = 123: no exception ok 1924 - $vlex{foo}{"x$lex"}[0] = 123: value ok 1925 - exists $vlex{foo}{"x$lex"}[0]: no exception ok 1926 - exists $vlex{foo}{"x$lex"}[0]: value ok 1927 - delete $vlex{foo}{"x$lex"}[0]: no exception ok 1928 - delete $vlex{foo}{"x$lex"}[0]: value ok 1929 - $vgbl{foo}{"x$lex"}[0]: no exception ok 1930 - $vgbl{foo}{"x$lex"}[0]: value ok 1931 - $vgbl{foo}{"x$lex"}[0] = 123: no exception ok 1932 - $vgbl{foo}{"x$lex"}[0] = 123: value ok 1933 - exists $vgbl{foo}{"x$lex"}[0]: no exception ok 1934 - exists $vgbl{foo}{"x$lex"}[0]: value ok 1935 - delete $vgbl{foo}{"x$lex"}[0]: no exception ok 1936 - delete $vgbl{foo}{"x$lex"}[0]: value ok 1937 - $vrlex->{foo}{"x$lex"}[0]: no exception ok 1938 - $vrlex->{foo}{"x$lex"}[0]: value ok 1939 - $vrlex->{foo}{"x$lex"}[0] = 123: no exception ok 1940 - $vrlex->{foo}{"x$lex"}[0] = 123: value ok 1941 - exists $vrlex->{foo}{"x$lex"}[0]: no exception ok 1942 - exists $vrlex->{foo}{"x$lex"}[0]: value ok 1943 - delete $vrlex->{foo}{"x$lex"}[0]: no exception ok 1944 - delete $vrlex->{foo}{"x$lex"}[0]: value ok 1945 - $vrgbl->{foo}{"x$lex"}[0]: no exception ok 1946 - $vrgbl->{foo}{"x$lex"}[0]: value ok 1947 - $vrgbl->{foo}{"x$lex"}[0] = 123: no exception ok 1948 - $vrgbl->{foo}{"x$lex"}[0] = 123: value ok 1949 - exists $vrgbl->{foo}{"x$lex"}[0]: no exception ok 1950 - exists $vrgbl->{foo}{"x$lex"}[0]: value ok 1951 - delete $vrgbl->{foo}{"x$lex"}[0]: no exception ok 1952 - delete $vrgbl->{foo}{"x$lex"}[0]: value ok 1953 - $vlex{$lex}{"x$lex"}[0]: no exception ok 1954 - $vlex{$lex}{"x$lex"}[0]: value ok 1955 - $vlex{$lex}{"x$lex"}[0] = 123: no exception ok 1956 - $vlex{$lex}{"x$lex"}[0] = 123: value ok 1957 - exists $vlex{$lex}{"x$lex"}[0]: no exception ok 1958 - exists $vlex{$lex}{"x$lex"}[0]: value ok 1959 - delete $vlex{$lex}{"x$lex"}[0]: no exception ok 1960 - delete $vlex{$lex}{"x$lex"}[0]: value ok 1961 - $vgbl{$lex}{"x$lex"}[0]: no exception ok 1962 - $vgbl{$lex}{"x$lex"}[0]: value ok 1963 - $vgbl{$lex}{"x$lex"}[0] = 123: no exception ok 1964 - $vgbl{$lex}{"x$lex"}[0] = 123: value ok 1965 - exists $vgbl{$lex}{"x$lex"}[0]: no exception ok 1966 - exists $vgbl{$lex}{"x$lex"}[0]: value ok 1967 - delete $vgbl{$lex}{"x$lex"}[0]: no exception ok 1968 - delete $vgbl{$lex}{"x$lex"}[0]: value ok 1969 - $vrlex->{$lex}{"x$lex"}[0]: no exception ok 1970 - $vrlex->{$lex}{"x$lex"}[0]: value ok 1971 - $vrlex->{$lex}{"x$lex"}[0] = 123: no exception ok 1972 - $vrlex->{$lex}{"x$lex"}[0] = 123: value ok 1973 - exists $vrlex->{$lex}{"x$lex"}[0]: no exception ok 1974 - exists $vrlex->{$lex}{"x$lex"}[0]: value ok 1975 - delete $vrlex->{$lex}{"x$lex"}[0]: no exception ok 1976 - delete $vrlex->{$lex}{"x$lex"}[0]: value ok 1977 - $vrgbl->{$lex}{"x$lex"}[0]: no exception ok 1978 - $vrgbl->{$lex}{"x$lex"}[0]: value ok 1979 - $vrgbl->{$lex}{"x$lex"}[0] = 123: no exception ok 1980 - $vrgbl->{$lex}{"x$lex"}[0] = 123: value ok 1981 - exists $vrgbl->{$lex}{"x$lex"}[0]: no exception ok 1982 - exists $vrgbl->{$lex}{"x$lex"}[0]: value ok 1983 - delete $vrgbl->{$lex}{"x$lex"}[0]: no exception ok 1984 - delete $vrgbl->{$lex}{"x$lex"}[0]: value ok 1985 - $vlex{$gbl}{"x$lex"}[0]: no exception ok 1986 - $vlex{$gbl}{"x$lex"}[0]: value ok 1987 - $vlex{$gbl}{"x$lex"}[0] = 123: no exception ok 1988 - $vlex{$gbl}{"x$lex"}[0] = 123: value ok 1989 - exists $vlex{$gbl}{"x$lex"}[0]: no exception ok 1990 - exists $vlex{$gbl}{"x$lex"}[0]: value ok 1991 - delete $vlex{$gbl}{"x$lex"}[0]: no exception ok 1992 - delete $vlex{$gbl}{"x$lex"}[0]: value ok 1993 - $vgbl{$gbl}{"x$lex"}[0]: no exception ok 1994 - $vgbl{$gbl}{"x$lex"}[0]: value ok 1995 - $vgbl{$gbl}{"x$lex"}[0] = 123: no exception ok 1996 - $vgbl{$gbl}{"x$lex"}[0] = 123: value ok 1997 - exists $vgbl{$gbl}{"x$lex"}[0]: no exception ok 1998 - exists $vgbl{$gbl}{"x$lex"}[0]: value ok 1999 - delete $vgbl{$gbl}{"x$lex"}[0]: no exception ok 2000 - delete $vgbl{$gbl}{"x$lex"}[0]: value ok 2001 - $vrlex->{$gbl}{"x$lex"}[0]: no exception ok 2002 - $vrlex->{$gbl}{"x$lex"}[0]: value ok 2003 - $vrlex->{$gbl}{"x$lex"}[0] = 123: no exception ok 2004 - $vrlex->{$gbl}{"x$lex"}[0] = 123: value ok 2005 - exists $vrlex->{$gbl}{"x$lex"}[0]: no exception ok 2006 - exists $vrlex->{$gbl}{"x$lex"}[0]: value ok 2007 - delete $vrlex->{$gbl}{"x$lex"}[0]: no exception ok 2008 - delete $vrlex->{$gbl}{"x$lex"}[0]: value ok 2009 - $vrgbl->{$gbl}{"x$lex"}[0]: no exception ok 2010 - $vrgbl->{$gbl}{"x$lex"}[0]: value ok 2011 - $vrgbl->{$gbl}{"x$lex"}[0] = 123: no exception ok 2012 - $vrgbl->{$gbl}{"x$lex"}[0] = 123: value ok 2013 - exists $vrgbl->{$gbl}{"x$lex"}[0]: no exception ok 2014 - exists $vrgbl->{$gbl}{"x$lex"}[0]: value ok 2015 - delete $vrgbl->{$gbl}{"x$lex"}[0]: no exception ok 2016 - delete $vrgbl->{$gbl}{"x$lex"}[0]: value ok 2017 - $vlex{"x$lex"}{"x$lex"}[0]: no exception ok 2018 - $vlex{"x$lex"}{"x$lex"}[0]: value ok 2019 - $vlex{"x$lex"}{"x$lex"}[0] = 123: no exception ok 2020 - $vlex{"x$lex"}{"x$lex"}[0] = 123: value ok 2021 - exists $vlex{"x$lex"}{"x$lex"}[0]: no exception ok 2022 - exists $vlex{"x$lex"}{"x$lex"}[0]: value ok 2023 - delete $vlex{"x$lex"}{"x$lex"}[0]: no exception ok 2024 - delete $vlex{"x$lex"}{"x$lex"}[0]: value ok 2025 - $vgbl{"x$lex"}{"x$lex"}[0]: no exception ok 2026 - $vgbl{"x$lex"}{"x$lex"}[0]: value ok 2027 - $vgbl{"x$lex"}{"x$lex"}[0] = 123: no exception ok 2028 - $vgbl{"x$lex"}{"x$lex"}[0] = 123: value ok 2029 - exists $vgbl{"x$lex"}{"x$lex"}[0]: no exception ok 2030 - exists $vgbl{"x$lex"}{"x$lex"}[0]: value ok 2031 - delete $vgbl{"x$lex"}{"x$lex"}[0]: no exception ok 2032 - delete $vgbl{"x$lex"}{"x$lex"}[0]: value ok 2033 - $vrlex->{"x$lex"}{"x$lex"}[0]: no exception ok 2034 - $vrlex->{"x$lex"}{"x$lex"}[0]: value ok 2035 - $vrlex->{"x$lex"}{"x$lex"}[0] = 123: no exception ok 2036 - $vrlex->{"x$lex"}{"x$lex"}[0] = 123: value ok 2037 - exists $vrlex->{"x$lex"}{"x$lex"}[0]: no exception ok 2038 - exists $vrlex->{"x$lex"}{"x$lex"}[0]: value ok 2039 - delete $vrlex->{"x$lex"}{"x$lex"}[0]: no exception ok 2040 - delete $vrlex->{"x$lex"}{"x$lex"}[0]: value ok 2041 - $vrgbl->{"x$lex"}{"x$lex"}[0]: no exception ok 2042 - $vrgbl->{"x$lex"}{"x$lex"}[0]: value ok 2043 - $vrgbl->{"x$lex"}{"x$lex"}[0] = 123: no exception ok 2044 - $vrgbl->{"x$lex"}{"x$lex"}[0] = 123: value ok 2045 - exists $vrgbl->{"x$lex"}{"x$lex"}[0]: no exception ok 2046 - exists $vrgbl->{"x$lex"}{"x$lex"}[0]: value ok 2047 - delete $vrgbl->{"x$lex"}{"x$lex"}[0]: no exception ok 2048 - delete $vrgbl->{"x$lex"}{"x$lex"}[0]: value ok 2049 - $vlex[0][0][$lex]: no exception ok 2050 - $vlex[0][0][$lex]: value ok 2051 - $vlex[0][0][$lex] = 123: no exception ok 2052 - $vlex[0][0][$lex] = 123: value ok 2053 - exists $vlex[0][0][$lex]: no exception ok 2054 - exists $vlex[0][0][$lex]: value ok 2055 - delete $vlex[0][0][$lex]: no exception ok 2056 - delete $vlex[0][0][$lex]: value ok 2057 - $vgbl[0][0][$lex]: no exception ok 2058 - $vgbl[0][0][$lex]: value ok 2059 - $vgbl[0][0][$lex] = 123: no exception ok 2060 - $vgbl[0][0][$lex] = 123: value ok 2061 - exists $vgbl[0][0][$lex]: no exception ok 2062 - exists $vgbl[0][0][$lex]: value ok 2063 - delete $vgbl[0][0][$lex]: no exception ok 2064 - delete $vgbl[0][0][$lex]: value ok 2065 - $vrlex->[0][0][$lex]: no exception ok 2066 - $vrlex->[0][0][$lex]: value ok 2067 - $vrlex->[0][0][$lex] = 123: no exception ok 2068 - $vrlex->[0][0][$lex] = 123: value ok 2069 - exists $vrlex->[0][0][$lex]: no exception ok 2070 - exists $vrlex->[0][0][$lex]: value ok 2071 - delete $vrlex->[0][0][$lex]: no exception ok 2072 - delete $vrlex->[0][0][$lex]: value ok 2073 - $vrgbl->[0][0][$lex]: no exception ok 2074 - $vrgbl->[0][0][$lex]: value ok 2075 - $vrgbl->[0][0][$lex] = 123: no exception ok 2076 - $vrgbl->[0][0][$lex] = 123: value ok 2077 - exists $vrgbl->[0][0][$lex]: no exception ok 2078 - exists $vrgbl->[0][0][$lex]: value ok 2079 - delete $vrgbl->[0][0][$lex]: no exception ok 2080 - delete $vrgbl->[0][0][$lex]: value ok 2081 - $vlex[$lex][0][$lex]: no exception ok 2082 - $vlex[$lex][0][$lex]: value ok 2083 - $vlex[$lex][0][$lex] = 123: no exception ok 2084 - $vlex[$lex][0][$lex] = 123: value ok 2085 - exists $vlex[$lex][0][$lex]: no exception ok 2086 - exists $vlex[$lex][0][$lex]: value ok 2087 - delete $vlex[$lex][0][$lex]: no exception ok 2088 - delete $vlex[$lex][0][$lex]: value ok 2089 - $vgbl[$lex][0][$lex]: no exception ok 2090 - $vgbl[$lex][0][$lex]: value ok 2091 - $vgbl[$lex][0][$lex] = 123: no exception ok 2092 - $vgbl[$lex][0][$lex] = 123: value ok 2093 - exists $vgbl[$lex][0][$lex]: no exception ok 2094 - exists $vgbl[$lex][0][$lex]: value ok 2095 - delete $vgbl[$lex][0][$lex]: no exception ok 2096 - delete $vgbl[$lex][0][$lex]: value ok 2097 - $vrlex->[$lex][0][$lex]: no exception ok 2098 - $vrlex->[$lex][0][$lex]: value ok 2099 - $vrlex->[$lex][0][$lex] = 123: no exception ok 2100 - $vrlex->[$lex][0][$lex] = 123: value ok 2101 - exists $vrlex->[$lex][0][$lex]: no exception ok 2102 - exists $vrlex->[$lex][0][$lex]: value ok 2103 - delete $vrlex->[$lex][0][$lex]: no exception ok 2104 - delete $vrlex->[$lex][0][$lex]: value ok 2105 - $vrgbl->[$lex][0][$lex]: no exception ok 2106 - $vrgbl->[$lex][0][$lex]: value ok 2107 - $vrgbl->[$lex][0][$lex] = 123: no exception ok 2108 - $vrgbl->[$lex][0][$lex] = 123: value ok 2109 - exists $vrgbl->[$lex][0][$lex]: no exception ok 2110 - exists $vrgbl->[$lex][0][$lex]: value ok 2111 - delete $vrgbl->[$lex][0][$lex]: no exception ok 2112 - delete $vrgbl->[$lex][0][$lex]: value ok 2113 - $vlex[$gbl][0][$lex]: no exception ok 2114 - $vlex[$gbl][0][$lex]: value ok 2115 - $vlex[$gbl][0][$lex] = 123: no exception ok 2116 - $vlex[$gbl][0][$lex] = 123: value ok 2117 - exists $vlex[$gbl][0][$lex]: no exception ok 2118 - exists $vlex[$gbl][0][$lex]: value ok 2119 - delete $vlex[$gbl][0][$lex]: no exception ok 2120 - delete $vlex[$gbl][0][$lex]: value ok 2121 - $vgbl[$gbl][0][$lex]: no exception ok 2122 - $vgbl[$gbl][0][$lex]: value ok 2123 - $vgbl[$gbl][0][$lex] = 123: no exception ok 2124 - $vgbl[$gbl][0][$lex] = 123: value ok 2125 - exists $vgbl[$gbl][0][$lex]: no exception ok 2126 - exists $vgbl[$gbl][0][$lex]: value ok 2127 - delete $vgbl[$gbl][0][$lex]: no exception ok 2128 - delete $vgbl[$gbl][0][$lex]: value ok 2129 - $vrlex->[$gbl][0][$lex]: no exception ok 2130 - $vrlex->[$gbl][0][$lex]: value ok 2131 - $vrlex->[$gbl][0][$lex] = 123: no exception ok 2132 - $vrlex->[$gbl][0][$lex] = 123: value ok 2133 - exists $vrlex->[$gbl][0][$lex]: no exception ok 2134 - exists $vrlex->[$gbl][0][$lex]: value ok 2135 - delete $vrlex->[$gbl][0][$lex]: no exception ok 2136 - delete $vrlex->[$gbl][0][$lex]: value ok 2137 - $vrgbl->[$gbl][0][$lex]: no exception ok 2138 - $vrgbl->[$gbl][0][$lex]: value ok 2139 - $vrgbl->[$gbl][0][$lex] = 123: no exception ok 2140 - $vrgbl->[$gbl][0][$lex] = 123: value ok 2141 - exists $vrgbl->[$gbl][0][$lex]: no exception ok 2142 - exists $vrgbl->[$gbl][0][$lex]: value ok 2143 - delete $vrgbl->[$gbl][0][$lex]: no exception ok 2144 - delete $vrgbl->[$gbl][0][$lex]: value ok 2145 - $vlex[$lex+1][0][$lex]: no exception ok 2146 - $vlex[$lex+1][0][$lex]: value ok 2147 - $vlex[$lex+1][0][$lex] = 123: no exception ok 2148 - $vlex[$lex+1][0][$lex] = 123: value ok 2149 - exists $vlex[$lex+1][0][$lex]: no exception ok 2150 - exists $vlex[$lex+1][0][$lex]: value ok 2151 - delete $vlex[$lex+1][0][$lex]: no exception ok 2152 - delete $vlex[$lex+1][0][$lex]: value ok 2153 - $vgbl[$lex+1][0][$lex]: no exception ok 2154 - $vgbl[$lex+1][0][$lex]: value ok 2155 - $vgbl[$lex+1][0][$lex] = 123: no exception ok 2156 - $vgbl[$lex+1][0][$lex] = 123: value ok 2157 - exists $vgbl[$lex+1][0][$lex]: no exception ok 2158 - exists $vgbl[$lex+1][0][$lex]: value ok 2159 - delete $vgbl[$lex+1][0][$lex]: no exception ok 2160 - delete $vgbl[$lex+1][0][$lex]: value ok 2161 - $vrlex->[$lex+1][0][$lex]: no exception ok 2162 - $vrlex->[$lex+1][0][$lex]: value ok 2163 - $vrlex->[$lex+1][0][$lex] = 123: no exception ok 2164 - $vrlex->[$lex+1][0][$lex] = 123: value ok 2165 - exists $vrlex->[$lex+1][0][$lex]: no exception ok 2166 - exists $vrlex->[$lex+1][0][$lex]: value ok 2167 - delete $vrlex->[$lex+1][0][$lex]: no exception ok 2168 - delete $vrlex->[$lex+1][0][$lex]: value ok 2169 - $vrgbl->[$lex+1][0][$lex]: no exception ok 2170 - $vrgbl->[$lex+1][0][$lex]: value ok 2171 - $vrgbl->[$lex+1][0][$lex] = 123: no exception ok 2172 - $vrgbl->[$lex+1][0][$lex] = 123: value ok 2173 - exists $vrgbl->[$lex+1][0][$lex]: no exception ok 2174 - exists $vrgbl->[$lex+1][0][$lex]: value ok 2175 - delete $vrgbl->[$lex+1][0][$lex]: no exception ok 2176 - delete $vrgbl->[$lex+1][0][$lex]: value ok 2177 - $vlex{foo}[0][$lex]: no exception ok 2178 - $vlex{foo}[0][$lex]: value ok 2179 - $vlex{foo}[0][$lex] = 123: no exception ok 2180 - $vlex{foo}[0][$lex] = 123: value ok 2181 - exists $vlex{foo}[0][$lex]: no exception ok 2182 - exists $vlex{foo}[0][$lex]: value ok 2183 - delete $vlex{foo}[0][$lex]: no exception ok 2184 - delete $vlex{foo}[0][$lex]: value ok 2185 - $vgbl{foo}[0][$lex]: no exception ok 2186 - $vgbl{foo}[0][$lex]: value ok 2187 - $vgbl{foo}[0][$lex] = 123: no exception ok 2188 - $vgbl{foo}[0][$lex] = 123: value ok 2189 - exists $vgbl{foo}[0][$lex]: no exception ok 2190 - exists $vgbl{foo}[0][$lex]: value ok 2191 - delete $vgbl{foo}[0][$lex]: no exception ok 2192 - delete $vgbl{foo}[0][$lex]: value ok 2193 - $vrlex->{foo}[0][$lex]: no exception ok 2194 - $vrlex->{foo}[0][$lex]: value ok 2195 - $vrlex->{foo}[0][$lex] = 123: no exception ok 2196 - $vrlex->{foo}[0][$lex] = 123: value ok 2197 - exists $vrlex->{foo}[0][$lex]: no exception ok 2198 - exists $vrlex->{foo}[0][$lex]: value ok 2199 - delete $vrlex->{foo}[0][$lex]: no exception ok 2200 - delete $vrlex->{foo}[0][$lex]: value ok 2201 - $vrgbl->{foo}[0][$lex]: no exception ok 2202 - $vrgbl->{foo}[0][$lex]: value ok 2203 - $vrgbl->{foo}[0][$lex] = 123: no exception ok 2204 - $vrgbl->{foo}[0][$lex] = 123: value ok 2205 - exists $vrgbl->{foo}[0][$lex]: no exception ok 2206 - exists $vrgbl->{foo}[0][$lex]: value ok 2207 - delete $vrgbl->{foo}[0][$lex]: no exception ok 2208 - delete $vrgbl->{foo}[0][$lex]: value ok 2209 - $vlex{$lex}[0][$lex]: no exception ok 2210 - $vlex{$lex}[0][$lex]: value ok 2211 - $vlex{$lex}[0][$lex] = 123: no exception ok 2212 - $vlex{$lex}[0][$lex] = 123: value ok 2213 - exists $vlex{$lex}[0][$lex]: no exception ok 2214 - exists $vlex{$lex}[0][$lex]: value ok 2215 - delete $vlex{$lex}[0][$lex]: no exception ok 2216 - delete $vlex{$lex}[0][$lex]: value ok 2217 - $vgbl{$lex}[0][$lex]: no exception ok 2218 - $vgbl{$lex}[0][$lex]: value ok 2219 - $vgbl{$lex}[0][$lex] = 123: no exception ok 2220 - $vgbl{$lex}[0][$lex] = 123: value ok 2221 - exists $vgbl{$lex}[0][$lex]: no exception ok 2222 - exists $vgbl{$lex}[0][$lex]: value ok 2223 - delete $vgbl{$lex}[0][$lex]: no exception ok 2224 - delete $vgbl{$lex}[0][$lex]: value ok 2225 - $vrlex->{$lex}[0][$lex]: no exception ok 2226 - $vrlex->{$lex}[0][$lex]: value ok 2227 - $vrlex->{$lex}[0][$lex] = 123: no exception ok 2228 - $vrlex->{$lex}[0][$lex] = 123: value ok 2229 - exists $vrlex->{$lex}[0][$lex]: no exception ok 2230 - exists $vrlex->{$lex}[0][$lex]: value ok 2231 - delete $vrlex->{$lex}[0][$lex]: no exception ok 2232 - delete $vrlex->{$lex}[0][$lex]: value ok 2233 - $vrgbl->{$lex}[0][$lex]: no exception ok 2234 - $vrgbl->{$lex}[0][$lex]: value ok 2235 - $vrgbl->{$lex}[0][$lex] = 123: no exception ok 2236 - $vrgbl->{$lex}[0][$lex] = 123: value ok 2237 - exists $vrgbl->{$lex}[0][$lex]: no exception ok 2238 - exists $vrgbl->{$lex}[0][$lex]: value ok 2239 - delete $vrgbl->{$lex}[0][$lex]: no exception ok 2240 - delete $vrgbl->{$lex}[0][$lex]: value ok 2241 - $vlex{$gbl}[0][$lex]: no exception ok 2242 - $vlex{$gbl}[0][$lex]: value ok 2243 - $vlex{$gbl}[0][$lex] = 123: no exception ok 2244 - $vlex{$gbl}[0][$lex] = 123: value ok 2245 - exists $vlex{$gbl}[0][$lex]: no exception ok 2246 - exists $vlex{$gbl}[0][$lex]: value ok 2247 - delete $vlex{$gbl}[0][$lex]: no exception ok 2248 - delete $vlex{$gbl}[0][$lex]: value ok 2249 - $vgbl{$gbl}[0][$lex]: no exception ok 2250 - $vgbl{$gbl}[0][$lex]: value ok 2251 - $vgbl{$gbl}[0][$lex] = 123: no exception ok 2252 - $vgbl{$gbl}[0][$lex] = 123: value ok 2253 - exists $vgbl{$gbl}[0][$lex]: no exception ok 2254 - exists $vgbl{$gbl}[0][$lex]: value ok 2255 - delete $vgbl{$gbl}[0][$lex]: no exception ok 2256 - delete $vgbl{$gbl}[0][$lex]: value ok 2257 - $vrlex->{$gbl}[0][$lex]: no exception ok 2258 - $vrlex->{$gbl}[0][$lex]: value ok 2259 - $vrlex->{$gbl}[0][$lex] = 123: no exception ok 2260 - $vrlex->{$gbl}[0][$lex] = 123: value ok 2261 - exists $vrlex->{$gbl}[0][$lex]: no exception ok 2262 - exists $vrlex->{$gbl}[0][$lex]: value ok 2263 - delete $vrlex->{$gbl}[0][$lex]: no exception ok 2264 - delete $vrlex->{$gbl}[0][$lex]: value ok 2265 - $vrgbl->{$gbl}[0][$lex]: no exception ok 2266 - $vrgbl->{$gbl}[0][$lex]: value ok 2267 - $vrgbl->{$gbl}[0][$lex] = 123: no exception ok 2268 - $vrgbl->{$gbl}[0][$lex] = 123: value ok 2269 - exists $vrgbl->{$gbl}[0][$lex]: no exception ok 2270 - exists $vrgbl->{$gbl}[0][$lex]: value ok 2271 - delete $vrgbl->{$gbl}[0][$lex]: no exception ok 2272 - delete $vrgbl->{$gbl}[0][$lex]: value ok 2273 - $vlex{"x$lex"}[0][$lex]: no exception ok 2274 - $vlex{"x$lex"}[0][$lex]: value ok 2275 - $vlex{"x$lex"}[0][$lex] = 123: no exception ok 2276 - $vlex{"x$lex"}[0][$lex] = 123: value ok 2277 - exists $vlex{"x$lex"}[0][$lex]: no exception ok 2278 - exists $vlex{"x$lex"}[0][$lex]: value ok 2279 - delete $vlex{"x$lex"}[0][$lex]: no exception ok 2280 - delete $vlex{"x$lex"}[0][$lex]: value ok 2281 - $vgbl{"x$lex"}[0][$lex]: no exception ok 2282 - $vgbl{"x$lex"}[0][$lex]: value ok 2283 - $vgbl{"x$lex"}[0][$lex] = 123: no exception ok 2284 - $vgbl{"x$lex"}[0][$lex] = 123: value ok 2285 - exists $vgbl{"x$lex"}[0][$lex]: no exception ok 2286 - exists $vgbl{"x$lex"}[0][$lex]: value ok 2287 - delete $vgbl{"x$lex"}[0][$lex]: no exception ok 2288 - delete $vgbl{"x$lex"}[0][$lex]: value ok 2289 - $vrlex->{"x$lex"}[0][$lex]: no exception ok 2290 - $vrlex->{"x$lex"}[0][$lex]: value ok 2291 - $vrlex->{"x$lex"}[0][$lex] = 123: no exception ok 2292 - $vrlex->{"x$lex"}[0][$lex] = 123: value ok 2293 - exists $vrlex->{"x$lex"}[0][$lex]: no exception ok 2294 - exists $vrlex->{"x$lex"}[0][$lex]: value ok 2295 - delete $vrlex->{"x$lex"}[0][$lex]: no exception ok 2296 - delete $vrlex->{"x$lex"}[0][$lex]: value ok 2297 - $vrgbl->{"x$lex"}[0][$lex]: no exception ok 2298 - $vrgbl->{"x$lex"}[0][$lex]: value ok 2299 - $vrgbl->{"x$lex"}[0][$lex] = 123: no exception ok 2300 - $vrgbl->{"x$lex"}[0][$lex] = 123: value ok 2301 - exists $vrgbl->{"x$lex"}[0][$lex]: no exception ok 2302 - exists $vrgbl->{"x$lex"}[0][$lex]: value ok 2303 - delete $vrgbl->{"x$lex"}[0][$lex]: no exception ok 2304 - delete $vrgbl->{"x$lex"}[0][$lex]: value ok 2305 - $vlex[0][$lex][$lex]: no exception ok 2306 - $vlex[0][$lex][$lex]: value ok 2307 - $vlex[0][$lex][$lex] = 123: no exception ok 2308 - $vlex[0][$lex][$lex] = 123: value ok 2309 - exists $vlex[0][$lex][$lex]: no exception ok 2310 - exists $vlex[0][$lex][$lex]: value ok 2311 - delete $vlex[0][$lex][$lex]: no exception ok 2312 - delete $vlex[0][$lex][$lex]: value ok 2313 - $vgbl[0][$lex][$lex]: no exception ok 2314 - $vgbl[0][$lex][$lex]: value ok 2315 - $vgbl[0][$lex][$lex] = 123: no exception ok 2316 - $vgbl[0][$lex][$lex] = 123: value ok 2317 - exists $vgbl[0][$lex][$lex]: no exception ok 2318 - exists $vgbl[0][$lex][$lex]: value ok 2319 - delete $vgbl[0][$lex][$lex]: no exception ok 2320 - delete $vgbl[0][$lex][$lex]: value ok 2321 - $vrlex->[0][$lex][$lex]: no exception ok 2322 - $vrlex->[0][$lex][$lex]: value ok 2323 - $vrlex->[0][$lex][$lex] = 123: no exception ok 2324 - $vrlex->[0][$lex][$lex] = 123: value ok 2325 - exists $vrlex->[0][$lex][$lex]: no exception ok 2326 - exists $vrlex->[0][$lex][$lex]: value ok 2327 - delete $vrlex->[0][$lex][$lex]: no exception ok 2328 - delete $vrlex->[0][$lex][$lex]: value ok 2329 - $vrgbl->[0][$lex][$lex]: no exception ok 2330 - $vrgbl->[0][$lex][$lex]: value ok 2331 - $vrgbl->[0][$lex][$lex] = 123: no exception ok 2332 - $vrgbl->[0][$lex][$lex] = 123: value ok 2333 - exists $vrgbl->[0][$lex][$lex]: no exception ok 2334 - exists $vrgbl->[0][$lex][$lex]: value ok 2335 - delete $vrgbl->[0][$lex][$lex]: no exception ok 2336 - delete $vrgbl->[0][$lex][$lex]: value ok 2337 - $vlex[$lex][$lex][$lex]: no exception ok 2338 - $vlex[$lex][$lex][$lex]: value ok 2339 - $vlex[$lex][$lex][$lex] = 123: no exception ok 2340 - $vlex[$lex][$lex][$lex] = 123: value ok 2341 - exists $vlex[$lex][$lex][$lex]: no exception ok 2342 - exists $vlex[$lex][$lex][$lex]: value ok 2343 - delete $vlex[$lex][$lex][$lex]: no exception ok 2344 - delete $vlex[$lex][$lex][$lex]: value ok 2345 - $vgbl[$lex][$lex][$lex]: no exception ok 2346 - $vgbl[$lex][$lex][$lex]: value ok 2347 - $vgbl[$lex][$lex][$lex] = 123: no exception ok 2348 - $vgbl[$lex][$lex][$lex] = 123: value ok 2349 - exists $vgbl[$lex][$lex][$lex]: no exception ok 2350 - exists $vgbl[$lex][$lex][$lex]: value ok 2351 - delete $vgbl[$lex][$lex][$lex]: no exception ok 2352 - delete $vgbl[$lex][$lex][$lex]: value ok 2353 - $vrlex->[$lex][$lex][$lex]: no exception ok 2354 - $vrlex->[$lex][$lex][$lex]: value ok 2355 - $vrlex->[$lex][$lex][$lex] = 123: no exception ok 2356 - $vrlex->[$lex][$lex][$lex] = 123: value ok 2357 - exists $vrlex->[$lex][$lex][$lex]: no exception ok 2358 - exists $vrlex->[$lex][$lex][$lex]: value ok 2359 - delete $vrlex->[$lex][$lex][$lex]: no exception ok 2360 - delete $vrlex->[$lex][$lex][$lex]: value ok 2361 - $vrgbl->[$lex][$lex][$lex]: no exception ok 2362 - $vrgbl->[$lex][$lex][$lex]: value ok 2363 - $vrgbl->[$lex][$lex][$lex] = 123: no exception ok 2364 - $vrgbl->[$lex][$lex][$lex] = 123: value ok 2365 - exists $vrgbl->[$lex][$lex][$lex]: no exception ok 2366 - exists $vrgbl->[$lex][$lex][$lex]: value ok 2367 - delete $vrgbl->[$lex][$lex][$lex]: no exception ok 2368 - delete $vrgbl->[$lex][$lex][$lex]: value ok 2369 - $vlex[$gbl][$lex][$lex]: no exception ok 2370 - $vlex[$gbl][$lex][$lex]: value ok 2371 - $vlex[$gbl][$lex][$lex] = 123: no exception ok 2372 - $vlex[$gbl][$lex][$lex] = 123: value ok 2373 - exists $vlex[$gbl][$lex][$lex]: no exception ok 2374 - exists $vlex[$gbl][$lex][$lex]: value ok 2375 - delete $vlex[$gbl][$lex][$lex]: no exception ok 2376 - delete $vlex[$gbl][$lex][$lex]: value ok 2377 - $vgbl[$gbl][$lex][$lex]: no exception ok 2378 - $vgbl[$gbl][$lex][$lex]: value ok 2379 - $vgbl[$gbl][$lex][$lex] = 123: no exception ok 2380 - $vgbl[$gbl][$lex][$lex] = 123: value ok 2381 - exists $vgbl[$gbl][$lex][$lex]: no exception ok 2382 - exists $vgbl[$gbl][$lex][$lex]: value ok 2383 - delete $vgbl[$gbl][$lex][$lex]: no exception ok 2384 - delete $vgbl[$gbl][$lex][$lex]: value ok 2385 - $vrlex->[$gbl][$lex][$lex]: no exception ok 2386 - $vrlex->[$gbl][$lex][$lex]: value ok 2387 - $vrlex->[$gbl][$lex][$lex] = 123: no exception ok 2388 - $vrlex->[$gbl][$lex][$lex] = 123: value ok 2389 - exists $vrlex->[$gbl][$lex][$lex]: no exception ok 2390 - exists $vrlex->[$gbl][$lex][$lex]: value ok 2391 - delete $vrlex->[$gbl][$lex][$lex]: no exception ok 2392 - delete $vrlex->[$gbl][$lex][$lex]: value ok 2393 - $vrgbl->[$gbl][$lex][$lex]: no exception ok 2394 - $vrgbl->[$gbl][$lex][$lex]: value ok 2395 - $vrgbl->[$gbl][$lex][$lex] = 123: no exception ok 2396 - $vrgbl->[$gbl][$lex][$lex] = 123: value ok 2397 - exists $vrgbl->[$gbl][$lex][$lex]: no exception ok 2398 - exists $vrgbl->[$gbl][$lex][$lex]: value ok 2399 - delete $vrgbl->[$gbl][$lex][$lex]: no exception ok 2400 - delete $vrgbl->[$gbl][$lex][$lex]: value ok 2401 - $vlex[$lex+1][$lex][$lex]: no exception ok 2402 - $vlex[$lex+1][$lex][$lex]: value ok 2403 - $vlex[$lex+1][$lex][$lex] = 123: no exception ok 2404 - $vlex[$lex+1][$lex][$lex] = 123: value ok 2405 - exists $vlex[$lex+1][$lex][$lex]: no exception ok 2406 - exists $vlex[$lex+1][$lex][$lex]: value ok 2407 - delete $vlex[$lex+1][$lex][$lex]: no exception ok 2408 - delete $vlex[$lex+1][$lex][$lex]: value ok 2409 - $vgbl[$lex+1][$lex][$lex]: no exception ok 2410 - $vgbl[$lex+1][$lex][$lex]: value ok 2411 - $vgbl[$lex+1][$lex][$lex] = 123: no exception ok 2412 - $vgbl[$lex+1][$lex][$lex] = 123: value ok 2413 - exists $vgbl[$lex+1][$lex][$lex]: no exception ok 2414 - exists $vgbl[$lex+1][$lex][$lex]: value ok 2415 - delete $vgbl[$lex+1][$lex][$lex]: no exception ok 2416 - delete $vgbl[$lex+1][$lex][$lex]: value ok 2417 - $vrlex->[$lex+1][$lex][$lex]: no exception ok 2418 - $vrlex->[$lex+1][$lex][$lex]: value ok 2419 - $vrlex->[$lex+1][$lex][$lex] = 123: no exception ok 2420 - $vrlex->[$lex+1][$lex][$lex] = 123: value ok 2421 - exists $vrlex->[$lex+1][$lex][$lex]: no exception ok 2422 - exists $vrlex->[$lex+1][$lex][$lex]: value ok 2423 - delete $vrlex->[$lex+1][$lex][$lex]: no exception ok 2424 - delete $vrlex->[$lex+1][$lex][$lex]: value ok 2425 - $vrgbl->[$lex+1][$lex][$lex]: no exception ok 2426 - $vrgbl->[$lex+1][$lex][$lex]: value ok 2427 - $vrgbl->[$lex+1][$lex][$lex] = 123: no exception ok 2428 - $vrgbl->[$lex+1][$lex][$lex] = 123: value ok 2429 - exists $vrgbl->[$lex+1][$lex][$lex]: no exception ok 2430 - exists $vrgbl->[$lex+1][$lex][$lex]: value ok 2431 - delete $vrgbl->[$lex+1][$lex][$lex]: no exception ok 2432 - delete $vrgbl->[$lex+1][$lex][$lex]: value ok 2433 - $vlex{foo}[$lex][$lex]: no exception ok 2434 - $vlex{foo}[$lex][$lex]: value ok 2435 - $vlex{foo}[$lex][$lex] = 123: no exception ok 2436 - $vlex{foo}[$lex][$lex] = 123: value ok 2437 - exists $vlex{foo}[$lex][$lex]: no exception ok 2438 - exists $vlex{foo}[$lex][$lex]: value ok 2439 - delete $vlex{foo}[$lex][$lex]: no exception ok 2440 - delete $vlex{foo}[$lex][$lex]: value ok 2441 - $vgbl{foo}[$lex][$lex]: no exception ok 2442 - $vgbl{foo}[$lex][$lex]: value ok 2443 - $vgbl{foo}[$lex][$lex] = 123: no exception ok 2444 - $vgbl{foo}[$lex][$lex] = 123: value ok 2445 - exists $vgbl{foo}[$lex][$lex]: no exception ok 2446 - exists $vgbl{foo}[$lex][$lex]: value ok 2447 - delete $vgbl{foo}[$lex][$lex]: no exception ok 2448 - delete $vgbl{foo}[$lex][$lex]: value ok 2449 - $vrlex->{foo}[$lex][$lex]: no exception ok 2450 - $vrlex->{foo}[$lex][$lex]: value ok 2451 - $vrlex->{foo}[$lex][$lex] = 123: no exception ok 2452 - $vrlex->{foo}[$lex][$lex] = 123: value ok 2453 - exists $vrlex->{foo}[$lex][$lex]: no exception ok 2454 - exists $vrlex->{foo}[$lex][$lex]: value ok 2455 - delete $vrlex->{foo}[$lex][$lex]: no exception ok 2456 - delete $vrlex->{foo}[$lex][$lex]: value ok 2457 - $vrgbl->{foo}[$lex][$lex]: no exception ok 2458 - $vrgbl->{foo}[$lex][$lex]: value ok 2459 - $vrgbl->{foo}[$lex][$lex] = 123: no exception ok 2460 - $vrgbl->{foo}[$lex][$lex] = 123: value ok 2461 - exists $vrgbl->{foo}[$lex][$lex]: no exception ok 2462 - exists $vrgbl->{foo}[$lex][$lex]: value ok 2463 - delete $vrgbl->{foo}[$lex][$lex]: no exception ok 2464 - delete $vrgbl->{foo}[$lex][$lex]: value ok 2465 - $vlex{$lex}[$lex][$lex]: no exception ok 2466 - $vlex{$lex}[$lex][$lex]: value ok 2467 - $vlex{$lex}[$lex][$lex] = 123: no exception ok 2468 - $vlex{$lex}[$lex][$lex] = 123: value ok 2469 - exists $vlex{$lex}[$lex][$lex]: no exception ok 2470 - exists $vlex{$lex}[$lex][$lex]: value ok 2471 - delete $vlex{$lex}[$lex][$lex]: no exception ok 2472 - delete $vlex{$lex}[$lex][$lex]: value ok 2473 - $vgbl{$lex}[$lex][$lex]: no exception ok 2474 - $vgbl{$lex}[$lex][$lex]: value ok 2475 - $vgbl{$lex}[$lex][$lex] = 123: no exception ok 2476 - $vgbl{$lex}[$lex][$lex] = 123: value ok 2477 - exists $vgbl{$lex}[$lex][$lex]: no exception ok 2478 - exists $vgbl{$lex}[$lex][$lex]: value ok 2479 - delete $vgbl{$lex}[$lex][$lex]: no exception ok 2480 - delete $vgbl{$lex}[$lex][$lex]: value ok 2481 - $vrlex->{$lex}[$lex][$lex]: no exception ok 2482 - $vrlex->{$lex}[$lex][$lex]: value ok 2483 - $vrlex->{$lex}[$lex][$lex] = 123: no exception ok 2484 - $vrlex->{$lex}[$lex][$lex] = 123: value ok 2485 - exists $vrlex->{$lex}[$lex][$lex]: no exception ok 2486 - exists $vrlex->{$lex}[$lex][$lex]: value ok 2487 - delete $vrlex->{$lex}[$lex][$lex]: no exception ok 2488 - delete $vrlex->{$lex}[$lex][$lex]: value ok 2489 - $vrgbl->{$lex}[$lex][$lex]: no exception ok 2490 - $vrgbl->{$lex}[$lex][$lex]: value ok 2491 - $vrgbl->{$lex}[$lex][$lex] = 123: no exception ok 2492 - $vrgbl->{$lex}[$lex][$lex] = 123: value ok 2493 - exists $vrgbl->{$lex}[$lex][$lex]: no exception ok 2494 - exists $vrgbl->{$lex}[$lex][$lex]: value ok 2495 - delete $vrgbl->{$lex}[$lex][$lex]: no exception ok 2496 - delete $vrgbl->{$lex}[$lex][$lex]: value ok 2497 - $vlex{$gbl}[$lex][$lex]: no exception ok 2498 - $vlex{$gbl}[$lex][$lex]: value ok 2499 - $vlex{$gbl}[$lex][$lex] = 123: no exception ok 2500 - $vlex{$gbl}[$lex][$lex] = 123: value ok 2501 - exists $vlex{$gbl}[$lex][$lex]: no exception ok 2502 - exists $vlex{$gbl}[$lex][$lex]: value ok 2503 - delete $vlex{$gbl}[$lex][$lex]: no exception ok 2504 - delete $vlex{$gbl}[$lex][$lex]: value ok 2505 - $vgbl{$gbl}[$lex][$lex]: no exception ok 2506 - $vgbl{$gbl}[$lex][$lex]: value ok 2507 - $vgbl{$gbl}[$lex][$lex] = 123: no exception ok 2508 - $vgbl{$gbl}[$lex][$lex] = 123: value ok 2509 - exists $vgbl{$gbl}[$lex][$lex]: no exception ok 2510 - exists $vgbl{$gbl}[$lex][$lex]: value ok 2511 - delete $vgbl{$gbl}[$lex][$lex]: no exception ok 2512 - delete $vgbl{$gbl}[$lex][$lex]: value ok 2513 - $vrlex->{$gbl}[$lex][$lex]: no exception ok 2514 - $vrlex->{$gbl}[$lex][$lex]: value ok 2515 - $vrlex->{$gbl}[$lex][$lex] = 123: no exception ok 2516 - $vrlex->{$gbl}[$lex][$lex] = 123: value ok 2517 - exists $vrlex->{$gbl}[$lex][$lex]: no exception ok 2518 - exists $vrlex->{$gbl}[$lex][$lex]: value ok 2519 - delete $vrlex->{$gbl}[$lex][$lex]: no exception ok 2520 - delete $vrlex->{$gbl}[$lex][$lex]: value ok 2521 - $vrgbl->{$gbl}[$lex][$lex]: no exception ok 2522 - $vrgbl->{$gbl}[$lex][$lex]: value ok 2523 - $vrgbl->{$gbl}[$lex][$lex] = 123: no exception ok 2524 - $vrgbl->{$gbl}[$lex][$lex] = 123: value ok 2525 - exists $vrgbl->{$gbl}[$lex][$lex]: no exception ok 2526 - exists $vrgbl->{$gbl}[$lex][$lex]: value ok 2527 - delete $vrgbl->{$gbl}[$lex][$lex]: no exception ok 2528 - delete $vrgbl->{$gbl}[$lex][$lex]: value ok 2529 - $vlex{"x$lex"}[$lex][$lex]: no exception ok 2530 - $vlex{"x$lex"}[$lex][$lex]: value ok 2531 - $vlex{"x$lex"}[$lex][$lex] = 123: no exception ok 2532 - $vlex{"x$lex"}[$lex][$lex] = 123: value ok 2533 - exists $vlex{"x$lex"}[$lex][$lex]: no exception ok 2534 - exists $vlex{"x$lex"}[$lex][$lex]: value ok 2535 - delete $vlex{"x$lex"}[$lex][$lex]: no exception ok 2536 - delete $vlex{"x$lex"}[$lex][$lex]: value ok 2537 - $vgbl{"x$lex"}[$lex][$lex]: no exception ok 2538 - $vgbl{"x$lex"}[$lex][$lex]: value ok 2539 - $vgbl{"x$lex"}[$lex][$lex] = 123: no exception ok 2540 - $vgbl{"x$lex"}[$lex][$lex] = 123: value ok 2541 - exists $vgbl{"x$lex"}[$lex][$lex]: no exception ok 2542 - exists $vgbl{"x$lex"}[$lex][$lex]: value ok 2543 - delete $vgbl{"x$lex"}[$lex][$lex]: no exception ok 2544 - delete $vgbl{"x$lex"}[$lex][$lex]: value ok 2545 - $vrlex->{"x$lex"}[$lex][$lex]: no exception ok 2546 - $vrlex->{"x$lex"}[$lex][$lex]: value ok 2547 - $vrlex->{"x$lex"}[$lex][$lex] = 123: no exception ok 2548 - $vrlex->{"x$lex"}[$lex][$lex] = 123: value ok 2549 - exists $vrlex->{"x$lex"}[$lex][$lex]: no exception ok 2550 - exists $vrlex->{"x$lex"}[$lex][$lex]: value ok 2551 - delete $vrlex->{"x$lex"}[$lex][$lex]: no exception ok 2552 - delete $vrlex->{"x$lex"}[$lex][$lex]: value ok 2553 - $vrgbl->{"x$lex"}[$lex][$lex]: no exception ok 2554 - $vrgbl->{"x$lex"}[$lex][$lex]: value ok 2555 - $vrgbl->{"x$lex"}[$lex][$lex] = 123: no exception ok 2556 - $vrgbl->{"x$lex"}[$lex][$lex] = 123: value ok 2557 - exists $vrgbl->{"x$lex"}[$lex][$lex]: no exception ok 2558 - exists $vrgbl->{"x$lex"}[$lex][$lex]: value ok 2559 - delete $vrgbl->{"x$lex"}[$lex][$lex]: no exception ok 2560 - delete $vrgbl->{"x$lex"}[$lex][$lex]: value ok 2561 - $vlex[0][$gbl][$lex]: no exception ok 2562 - $vlex[0][$gbl][$lex]: value ok 2563 - $vlex[0][$gbl][$lex] = 123: no exception ok 2564 - $vlex[0][$gbl][$lex] = 123: value ok 2565 - exists $vlex[0][$gbl][$lex]: no exception ok 2566 - exists $vlex[0][$gbl][$lex]: value ok 2567 - delete $vlex[0][$gbl][$lex]: no exception ok 2568 - delete $vlex[0][$gbl][$lex]: value ok 2569 - $vgbl[0][$gbl][$lex]: no exception ok 2570 - $vgbl[0][$gbl][$lex]: value ok 2571 - $vgbl[0][$gbl][$lex] = 123: no exception ok 2572 - $vgbl[0][$gbl][$lex] = 123: value ok 2573 - exists $vgbl[0][$gbl][$lex]: no exception ok 2574 - exists $vgbl[0][$gbl][$lex]: value ok 2575 - delete $vgbl[0][$gbl][$lex]: no exception ok 2576 - delete $vgbl[0][$gbl][$lex]: value ok 2577 - $vrlex->[0][$gbl][$lex]: no exception ok 2578 - $vrlex->[0][$gbl][$lex]: value ok 2579 - $vrlex->[0][$gbl][$lex] = 123: no exception ok 2580 - $vrlex->[0][$gbl][$lex] = 123: value ok 2581 - exists $vrlex->[0][$gbl][$lex]: no exception ok 2582 - exists $vrlex->[0][$gbl][$lex]: value ok 2583 - delete $vrlex->[0][$gbl][$lex]: no exception ok 2584 - delete $vrlex->[0][$gbl][$lex]: value ok 2585 - $vrgbl->[0][$gbl][$lex]: no exception ok 2586 - $vrgbl->[0][$gbl][$lex]: value ok 2587 - $vrgbl->[0][$gbl][$lex] = 123: no exception ok 2588 - $vrgbl->[0][$gbl][$lex] = 123: value ok 2589 - exists $vrgbl->[0][$gbl][$lex]: no exception ok 2590 - exists $vrgbl->[0][$gbl][$lex]: value ok 2591 - delete $vrgbl->[0][$gbl][$lex]: no exception ok 2592 - delete $vrgbl->[0][$gbl][$lex]: value ok 2593 - $vlex[$lex][$gbl][$lex]: no exception ok 2594 - $vlex[$lex][$gbl][$lex]: value ok 2595 - $vlex[$lex][$gbl][$lex] = 123: no exception ok 2596 - $vlex[$lex][$gbl][$lex] = 123: value ok 2597 - exists $vlex[$lex][$gbl][$lex]: no exception ok 2598 - exists $vlex[$lex][$gbl][$lex]: value ok 2599 - delete $vlex[$lex][$gbl][$lex]: no exception ok 2600 - delete $vlex[$lex][$gbl][$lex]: value ok 2601 - $vgbl[$lex][$gbl][$lex]: no exception ok 2602 - $vgbl[$lex][$gbl][$lex]: value ok 2603 - $vgbl[$lex][$gbl][$lex] = 123: no exception ok 2604 - $vgbl[$lex][$gbl][$lex] = 123: value ok 2605 - exists $vgbl[$lex][$gbl][$lex]: no exception ok 2606 - exists $vgbl[$lex][$gbl][$lex]: value ok 2607 - delete $vgbl[$lex][$gbl][$lex]: no exception ok 2608 - delete $vgbl[$lex][$gbl][$lex]: value ok 2609 - $vrlex->[$lex][$gbl][$lex]: no exception ok 2610 - $vrlex->[$lex][$gbl][$lex]: value ok 2611 - $vrlex->[$lex][$gbl][$lex] = 123: no exception ok 2612 - $vrlex->[$lex][$gbl][$lex] = 123: value ok 2613 - exists $vrlex->[$lex][$gbl][$lex]: no exception ok 2614 - exists $vrlex->[$lex][$gbl][$lex]: value ok 2615 - delete $vrlex->[$lex][$gbl][$lex]: no exception ok 2616 - delete $vrlex->[$lex][$gbl][$lex]: value ok 2617 - $vrgbl->[$lex][$gbl][$lex]: no exception ok 2618 - $vrgbl->[$lex][$gbl][$lex]: value ok 2619 - $vrgbl->[$lex][$gbl][$lex] = 123: no exception ok 2620 - $vrgbl->[$lex][$gbl][$lex] = 123: value ok 2621 - exists $vrgbl->[$lex][$gbl][$lex]: no exception ok 2622 - exists $vrgbl->[$lex][$gbl][$lex]: value ok 2623 - delete $vrgbl->[$lex][$gbl][$lex]: no exception ok 2624 - delete $vrgbl->[$lex][$gbl][$lex]: value ok 2625 - $vlex[$gbl][$gbl][$lex]: no exception ok 2626 - $vlex[$gbl][$gbl][$lex]: value ok 2627 - $vlex[$gbl][$gbl][$lex] = 123: no exception ok 2628 - $vlex[$gbl][$gbl][$lex] = 123: value ok 2629 - exists $vlex[$gbl][$gbl][$lex]: no exception ok 2630 - exists $vlex[$gbl][$gbl][$lex]: value ok 2631 - delete $vlex[$gbl][$gbl][$lex]: no exception ok 2632 - delete $vlex[$gbl][$gbl][$lex]: value ok 2633 - $vgbl[$gbl][$gbl][$lex]: no exception ok 2634 - $vgbl[$gbl][$gbl][$lex]: value ok 2635 - $vgbl[$gbl][$gbl][$lex] = 123: no exception ok 2636 - $vgbl[$gbl][$gbl][$lex] = 123: value ok 2637 - exists $vgbl[$gbl][$gbl][$lex]: no exception ok 2638 - exists $vgbl[$gbl][$gbl][$lex]: value ok 2639 - delete $vgbl[$gbl][$gbl][$lex]: no exception ok 2640 - delete $vgbl[$gbl][$gbl][$lex]: value ok 2641 - $vrlex->[$gbl][$gbl][$lex]: no exception ok 2642 - $vrlex->[$gbl][$gbl][$lex]: value ok 2643 - $vrlex->[$gbl][$gbl][$lex] = 123: no exception ok 2644 - $vrlex->[$gbl][$gbl][$lex] = 123: value ok 2645 - exists $vrlex->[$gbl][$gbl][$lex]: no exception ok 2646 - exists $vrlex->[$gbl][$gbl][$lex]: value ok 2647 - delete $vrlex->[$gbl][$gbl][$lex]: no exception ok 2648 - delete $vrlex->[$gbl][$gbl][$lex]: value ok 2649 - $vrgbl->[$gbl][$gbl][$lex]: no exception ok 2650 - $vrgbl->[$gbl][$gbl][$lex]: value ok 2651 - $vrgbl->[$gbl][$gbl][$lex] = 123: no exception ok 2652 - $vrgbl->[$gbl][$gbl][$lex] = 123: value ok 2653 - exists $vrgbl->[$gbl][$gbl][$lex]: no exception ok 2654 - exists $vrgbl->[$gbl][$gbl][$lex]: value ok 2655 - delete $vrgbl->[$gbl][$gbl][$lex]: no exception ok 2656 - delete $vrgbl->[$gbl][$gbl][$lex]: value ok 2657 - $vlex[$lex+1][$gbl][$lex]: no exception ok 2658 - $vlex[$lex+1][$gbl][$lex]: value ok 2659 - $vlex[$lex+1][$gbl][$lex] = 123: no exception ok 2660 - $vlex[$lex+1][$gbl][$lex] = 123: value ok 2661 - exists $vlex[$lex+1][$gbl][$lex]: no exception ok 2662 - exists $vlex[$lex+1][$gbl][$lex]: value ok 2663 - delete $vlex[$lex+1][$gbl][$lex]: no exception ok 2664 - delete $vlex[$lex+1][$gbl][$lex]: value ok 2665 - $vgbl[$lex+1][$gbl][$lex]: no exception ok 2666 - $vgbl[$lex+1][$gbl][$lex]: value ok 2667 - $vgbl[$lex+1][$gbl][$lex] = 123: no exception ok 2668 - $vgbl[$lex+1][$gbl][$lex] = 123: value ok 2669 - exists $vgbl[$lex+1][$gbl][$lex]: no exception ok 2670 - exists $vgbl[$lex+1][$gbl][$lex]: value ok 2671 - delete $vgbl[$lex+1][$gbl][$lex]: no exception ok 2672 - delete $vgbl[$lex+1][$gbl][$lex]: value ok 2673 - $vrlex->[$lex+1][$gbl][$lex]: no exception ok 2674 - $vrlex->[$lex+1][$gbl][$lex]: value ok 2675 - $vrlex->[$lex+1][$gbl][$lex] = 123: no exception ok 2676 - $vrlex->[$lex+1][$gbl][$lex] = 123: value ok 2677 - exists $vrlex->[$lex+1][$gbl][$lex]: no exception ok 2678 - exists $vrlex->[$lex+1][$gbl][$lex]: value ok 2679 - delete $vrlex->[$lex+1][$gbl][$lex]: no exception ok 2680 - delete $vrlex->[$lex+1][$gbl][$lex]: value ok 2681 - $vrgbl->[$lex+1][$gbl][$lex]: no exception ok 2682 - $vrgbl->[$lex+1][$gbl][$lex]: value ok 2683 - $vrgbl->[$lex+1][$gbl][$lex] = 123: no exception ok 2684 - $vrgbl->[$lex+1][$gbl][$lex] = 123: value ok 2685 - exists $vrgbl->[$lex+1][$gbl][$lex]: no exception ok 2686 - exists $vrgbl->[$lex+1][$gbl][$lex]: value ok 2687 - delete $vrgbl->[$lex+1][$gbl][$lex]: no exception ok 2688 - delete $vrgbl->[$lex+1][$gbl][$lex]: value ok 2689 - $vlex{foo}[$gbl][$lex]: no exception ok 2690 - $vlex{foo}[$gbl][$lex]: value ok 2691 - $vlex{foo}[$gbl][$lex] = 123: no exception ok 2692 - $vlex{foo}[$gbl][$lex] = 123: value ok 2693 - exists $vlex{foo}[$gbl][$lex]: no exception ok 2694 - exists $vlex{foo}[$gbl][$lex]: value ok 2695 - delete $vlex{foo}[$gbl][$lex]: no exception ok 2696 - delete $vlex{foo}[$gbl][$lex]: value ok 2697 - $vgbl{foo}[$gbl][$lex]: no exception ok 2698 - $vgbl{foo}[$gbl][$lex]: value ok 2699 - $vgbl{foo}[$gbl][$lex] = 123: no exception ok 2700 - $vgbl{foo}[$gbl][$lex] = 123: value ok 2701 - exists $vgbl{foo}[$gbl][$lex]: no exception ok 2702 - exists $vgbl{foo}[$gbl][$lex]: value ok 2703 - delete $vgbl{foo}[$gbl][$lex]: no exception ok 2704 - delete $vgbl{foo}[$gbl][$lex]: value ok 2705 - $vrlex->{foo}[$gbl][$lex]: no exception ok 2706 - $vrlex->{foo}[$gbl][$lex]: value ok 2707 - $vrlex->{foo}[$gbl][$lex] = 123: no exception ok 2708 - $vrlex->{foo}[$gbl][$lex] = 123: value ok 2709 - exists $vrlex->{foo}[$gbl][$lex]: no exception ok 2710 - exists $vrlex->{foo}[$gbl][$lex]: value ok 2711 - delete $vrlex->{foo}[$gbl][$lex]: no exception ok 2712 - delete $vrlex->{foo}[$gbl][$lex]: value ok 2713 - $vrgbl->{foo}[$gbl][$lex]: no exception ok 2714 - $vrgbl->{foo}[$gbl][$lex]: value ok 2715 - $vrgbl->{foo}[$gbl][$lex] = 123: no exception ok 2716 - $vrgbl->{foo}[$gbl][$lex] = 123: value ok 2717 - exists $vrgbl->{foo}[$gbl][$lex]: no exception ok 2718 - exists $vrgbl->{foo}[$gbl][$lex]: value ok 2719 - delete $vrgbl->{foo}[$gbl][$lex]: no exception ok 2720 - delete $vrgbl->{foo}[$gbl][$lex]: value ok 2721 - $vlex{$lex}[$gbl][$lex]: no exception ok 2722 - $vlex{$lex}[$gbl][$lex]: value ok 2723 - $vlex{$lex}[$gbl][$lex] = 123: no exception ok 2724 - $vlex{$lex}[$gbl][$lex] = 123: value ok 2725 - exists $vlex{$lex}[$gbl][$lex]: no exception ok 2726 - exists $vlex{$lex}[$gbl][$lex]: value ok 2727 - delete $vlex{$lex}[$gbl][$lex]: no exception ok 2728 - delete $vlex{$lex}[$gbl][$lex]: value ok 2729 - $vgbl{$lex}[$gbl][$lex]: no exception ok 2730 - $vgbl{$lex}[$gbl][$lex]: value ok 2731 - $vgbl{$lex}[$gbl][$lex] = 123: no exception ok 2732 - $vgbl{$lex}[$gbl][$lex] = 123: value ok 2733 - exists $vgbl{$lex}[$gbl][$lex]: no exception ok 2734 - exists $vgbl{$lex}[$gbl][$lex]: value ok 2735 - delete $vgbl{$lex}[$gbl][$lex]: no exception ok 2736 - delete $vgbl{$lex}[$gbl][$lex]: value ok 2737 - $vrlex->{$lex}[$gbl][$lex]: no exception ok 2738 - $vrlex->{$lex}[$gbl][$lex]: value ok 2739 - $vrlex->{$lex}[$gbl][$lex] = 123: no exception ok 2740 - $vrlex->{$lex}[$gbl][$lex] = 123: value ok 2741 - exists $vrlex->{$lex}[$gbl][$lex]: no exception ok 2742 - exists $vrlex->{$lex}[$gbl][$lex]: value ok 2743 - delete $vrlex->{$lex}[$gbl][$lex]: no exception ok 2744 - delete $vrlex->{$lex}[$gbl][$lex]: value ok 2745 - $vrgbl->{$lex}[$gbl][$lex]: no exception ok 2746 - $vrgbl->{$lex}[$gbl][$lex]: value ok 2747 - $vrgbl->{$lex}[$gbl][$lex] = 123: no exception ok 2748 - $vrgbl->{$lex}[$gbl][$lex] = 123: value ok 2749 - exists $vrgbl->{$lex}[$gbl][$lex]: no exception ok 2750 - exists $vrgbl->{$lex}[$gbl][$lex]: value ok 2751 - delete $vrgbl->{$lex}[$gbl][$lex]: no exception ok 2752 - delete $vrgbl->{$lex}[$gbl][$lex]: value ok 2753 - $vlex{$gbl}[$gbl][$lex]: no exception ok 2754 - $vlex{$gbl}[$gbl][$lex]: value ok 2755 - $vlex{$gbl}[$gbl][$lex] = 123: no exception ok 2756 - $vlex{$gbl}[$gbl][$lex] = 123: value ok 2757 - exists $vlex{$gbl}[$gbl][$lex]: no exception ok 2758 - exists $vlex{$gbl}[$gbl][$lex]: value ok 2759 - delete $vlex{$gbl}[$gbl][$lex]: no exception ok 2760 - delete $vlex{$gbl}[$gbl][$lex]: value ok 2761 - $vgbl{$gbl}[$gbl][$lex]: no exception ok 2762 - $vgbl{$gbl}[$gbl][$lex]: value ok 2763 - $vgbl{$gbl}[$gbl][$lex] = 123: no exception ok 2764 - $vgbl{$gbl}[$gbl][$lex] = 123: value ok 2765 - exists $vgbl{$gbl}[$gbl][$lex]: no exception ok 2766 - exists $vgbl{$gbl}[$gbl][$lex]: value ok 2767 - delete $vgbl{$gbl}[$gbl][$lex]: no exception ok 2768 - delete $vgbl{$gbl}[$gbl][$lex]: value ok 2769 - $vrlex->{$gbl}[$gbl][$lex]: no exception ok 2770 - $vrlex->{$gbl}[$gbl][$lex]: value ok 2771 - $vrlex->{$gbl}[$gbl][$lex] = 123: no exception ok 2772 - $vrlex->{$gbl}[$gbl][$lex] = 123: value ok 2773 - exists $vrlex->{$gbl}[$gbl][$lex]: no exception ok 2774 - exists $vrlex->{$gbl}[$gbl][$lex]: value ok 2775 - delete $vrlex->{$gbl}[$gbl][$lex]: no exception ok 2776 - delete $vrlex->{$gbl}[$gbl][$lex]: value ok 2777 - $vrgbl->{$gbl}[$gbl][$lex]: no exception ok 2778 - $vrgbl->{$gbl}[$gbl][$lex]: value ok 2779 - $vrgbl->{$gbl}[$gbl][$lex] = 123: no exception ok 2780 - $vrgbl->{$gbl}[$gbl][$lex] = 123: value ok 2781 - exists $vrgbl->{$gbl}[$gbl][$lex]: no exception ok 2782 - exists $vrgbl->{$gbl}[$gbl][$lex]: value ok 2783 - delete $vrgbl->{$gbl}[$gbl][$lex]: no exception ok 2784 - delete $vrgbl->{$gbl}[$gbl][$lex]: value ok 2785 - $vlex{"x$lex"}[$gbl][$lex]: no exception ok 2786 - $vlex{"x$lex"}[$gbl][$lex]: value ok 2787 - $vlex{"x$lex"}[$gbl][$lex] = 123: no exception ok 2788 - $vlex{"x$lex"}[$gbl][$lex] = 123: value ok 2789 - exists $vlex{"x$lex"}[$gbl][$lex]: no exception ok 2790 - exists $vlex{"x$lex"}[$gbl][$lex]: value ok 2791 - delete $vlex{"x$lex"}[$gbl][$lex]: no exception ok 2792 - delete $vlex{"x$lex"}[$gbl][$lex]: value ok 2793 - $vgbl{"x$lex"}[$gbl][$lex]: no exception ok 2794 - $vgbl{"x$lex"}[$gbl][$lex]: value ok 2795 - $vgbl{"x$lex"}[$gbl][$lex] = 123: no exception ok 2796 - $vgbl{"x$lex"}[$gbl][$lex] = 123: value ok 2797 - exists $vgbl{"x$lex"}[$gbl][$lex]: no exception ok 2798 - exists $vgbl{"x$lex"}[$gbl][$lex]: value ok 2799 - delete $vgbl{"x$lex"}[$gbl][$lex]: no exception ok 2800 - delete $vgbl{"x$lex"}[$gbl][$lex]: value ok 2801 - $vrlex->{"x$lex"}[$gbl][$lex]: no exception ok 2802 - $vrlex->{"x$lex"}[$gbl][$lex]: value ok 2803 - $vrlex->{"x$lex"}[$gbl][$lex] = 123: no exception ok 2804 - $vrlex->{"x$lex"}[$gbl][$lex] = 123: value ok 2805 - exists $vrlex->{"x$lex"}[$gbl][$lex]: no exception ok 2806 - exists $vrlex->{"x$lex"}[$gbl][$lex]: value ok 2807 - delete $vrlex->{"x$lex"}[$gbl][$lex]: no exception ok 2808 - delete $vrlex->{"x$lex"}[$gbl][$lex]: value ok 2809 - $vrgbl->{"x$lex"}[$gbl][$lex]: no exception ok 2810 - $vrgbl->{"x$lex"}[$gbl][$lex]: value ok 2811 - $vrgbl->{"x$lex"}[$gbl][$lex] = 123: no exception ok 2812 - $vrgbl->{"x$lex"}[$gbl][$lex] = 123: value ok 2813 - exists $vrgbl->{"x$lex"}[$gbl][$lex]: no exception ok 2814 - exists $vrgbl->{"x$lex"}[$gbl][$lex]: value ok 2815 - delete $vrgbl->{"x$lex"}[$gbl][$lex]: no exception ok 2816 - delete $vrgbl->{"x$lex"}[$gbl][$lex]: value ok 2817 - $vlex[0][$lex+1][$lex]: no exception ok 2818 - $vlex[0][$lex+1][$lex]: value ok 2819 - $vlex[0][$lex+1][$lex] = 123: no exception ok 2820 - $vlex[0][$lex+1][$lex] = 123: value ok 2821 - exists $vlex[0][$lex+1][$lex]: no exception ok 2822 - exists $vlex[0][$lex+1][$lex]: value ok 2823 - delete $vlex[0][$lex+1][$lex]: no exception ok 2824 - delete $vlex[0][$lex+1][$lex]: value ok 2825 - $vgbl[0][$lex+1][$lex]: no exception ok 2826 - $vgbl[0][$lex+1][$lex]: value ok 2827 - $vgbl[0][$lex+1][$lex] = 123: no exception ok 2828 - $vgbl[0][$lex+1][$lex] = 123: value ok 2829 - exists $vgbl[0][$lex+1][$lex]: no exception ok 2830 - exists $vgbl[0][$lex+1][$lex]: value ok 2831 - delete $vgbl[0][$lex+1][$lex]: no exception ok 2832 - delete $vgbl[0][$lex+1][$lex]: value ok 2833 - $vrlex->[0][$lex+1][$lex]: no exception ok 2834 - $vrlex->[0][$lex+1][$lex]: value ok 2835 - $vrlex->[0][$lex+1][$lex] = 123: no exception ok 2836 - $vrlex->[0][$lex+1][$lex] = 123: value ok 2837 - exists $vrlex->[0][$lex+1][$lex]: no exception ok 2838 - exists $vrlex->[0][$lex+1][$lex]: value ok 2839 - delete $vrlex->[0][$lex+1][$lex]: no exception ok 2840 - delete $vrlex->[0][$lex+1][$lex]: value ok 2841 - $vrgbl->[0][$lex+1][$lex]: no exception ok 2842 - $vrgbl->[0][$lex+1][$lex]: value ok 2843 - $vrgbl->[0][$lex+1][$lex] = 123: no exception ok 2844 - $vrgbl->[0][$lex+1][$lex] = 123: value ok 2845 - exists $vrgbl->[0][$lex+1][$lex]: no exception ok 2846 - exists $vrgbl->[0][$lex+1][$lex]: value ok 2847 - delete $vrgbl->[0][$lex+1][$lex]: no exception ok 2848 - delete $vrgbl->[0][$lex+1][$lex]: value ok 2849 - $vlex[$lex][$lex+1][$lex]: no exception ok 2850 - $vlex[$lex][$lex+1][$lex]: value ok 2851 - $vlex[$lex][$lex+1][$lex] = 123: no exception ok 2852 - $vlex[$lex][$lex+1][$lex] = 123: value ok 2853 - exists $vlex[$lex][$lex+1][$lex]: no exception ok 2854 - exists $vlex[$lex][$lex+1][$lex]: value ok 2855 - delete $vlex[$lex][$lex+1][$lex]: no exception ok 2856 - delete $vlex[$lex][$lex+1][$lex]: value ok 2857 - $vgbl[$lex][$lex+1][$lex]: no exception ok 2858 - $vgbl[$lex][$lex+1][$lex]: value ok 2859 - $vgbl[$lex][$lex+1][$lex] = 123: no exception ok 2860 - $vgbl[$lex][$lex+1][$lex] = 123: value ok 2861 - exists $vgbl[$lex][$lex+1][$lex]: no exception ok 2862 - exists $vgbl[$lex][$lex+1][$lex]: value ok 2863 - delete $vgbl[$lex][$lex+1][$lex]: no exception ok 2864 - delete $vgbl[$lex][$lex+1][$lex]: value ok 2865 - $vrlex->[$lex][$lex+1][$lex]: no exception ok 2866 - $vrlex->[$lex][$lex+1][$lex]: value ok 2867 - $vrlex->[$lex][$lex+1][$lex] = 123: no exception ok 2868 - $vrlex->[$lex][$lex+1][$lex] = 123: value ok 2869 - exists $vrlex->[$lex][$lex+1][$lex]: no exception ok 2870 - exists $vrlex->[$lex][$lex+1][$lex]: value ok 2871 - delete $vrlex->[$lex][$lex+1][$lex]: no exception ok 2872 - delete $vrlex->[$lex][$lex+1][$lex]: value ok 2873 - $vrgbl->[$lex][$lex+1][$lex]: no exception ok 2874 - $vrgbl->[$lex][$lex+1][$lex]: value ok 2875 - $vrgbl->[$lex][$lex+1][$lex] = 123: no exception ok 2876 - $vrgbl->[$lex][$lex+1][$lex] = 123: value ok 2877 - exists $vrgbl->[$lex][$lex+1][$lex]: no exception ok 2878 - exists $vrgbl->[$lex][$lex+1][$lex]: value ok 2879 - delete $vrgbl->[$lex][$lex+1][$lex]: no exception ok 2880 - delete $vrgbl->[$lex][$lex+1][$lex]: value ok 2881 - $vlex[$gbl][$lex+1][$lex]: no exception ok 2882 - $vlex[$gbl][$lex+1][$lex]: value ok 2883 - $vlex[$gbl][$lex+1][$lex] = 123: no exception ok 2884 - $vlex[$gbl][$lex+1][$lex] = 123: value ok 2885 - exists $vlex[$gbl][$lex+1][$lex]: no exception ok 2886 - exists $vlex[$gbl][$lex+1][$lex]: value ok 2887 - delete $vlex[$gbl][$lex+1][$lex]: no exception ok 2888 - delete $vlex[$gbl][$lex+1][$lex]: value ok 2889 - $vgbl[$gbl][$lex+1][$lex]: no exception ok 2890 - $vgbl[$gbl][$lex+1][$lex]: value ok 2891 - $vgbl[$gbl][$lex+1][$lex] = 123: no exception ok 2892 - $vgbl[$gbl][$lex+1][$lex] = 123: value ok 2893 - exists $vgbl[$gbl][$lex+1][$lex]: no exception ok 2894 - exists $vgbl[$gbl][$lex+1][$lex]: value ok 2895 - delete $vgbl[$gbl][$lex+1][$lex]: no exception ok 2896 - delete $vgbl[$gbl][$lex+1][$lex]: value ok 2897 - $vrlex->[$gbl][$lex+1][$lex]: no exception ok 2898 - $vrlex->[$gbl][$lex+1][$lex]: value ok 2899 - $vrlex->[$gbl][$lex+1][$lex] = 123: no exception ok 2900 - $vrlex->[$gbl][$lex+1][$lex] = 123: value ok 2901 - exists $vrlex->[$gbl][$lex+1][$lex]: no exception ok 2902 - exists $vrlex->[$gbl][$lex+1][$lex]: value ok 2903 - delete $vrlex->[$gbl][$lex+1][$lex]: no exception ok 2904 - delete $vrlex->[$gbl][$lex+1][$lex]: value ok 2905 - $vrgbl->[$gbl][$lex+1][$lex]: no exception ok 2906 - $vrgbl->[$gbl][$lex+1][$lex]: value ok 2907 - $vrgbl->[$gbl][$lex+1][$lex] = 123: no exception ok 2908 - $vrgbl->[$gbl][$lex+1][$lex] = 123: value ok 2909 - exists $vrgbl->[$gbl][$lex+1][$lex]: no exception ok 2910 - exists $vrgbl->[$gbl][$lex+1][$lex]: value ok 2911 - delete $vrgbl->[$gbl][$lex+1][$lex]: no exception ok 2912 - delete $vrgbl->[$gbl][$lex+1][$lex]: value ok 2913 - $vlex[$lex+1][$lex+1][$lex]: no exception ok 2914 - $vlex[$lex+1][$lex+1][$lex]: value ok 2915 - $vlex[$lex+1][$lex+1][$lex] = 123: no exception ok 2916 - $vlex[$lex+1][$lex+1][$lex] = 123: value ok 2917 - exists $vlex[$lex+1][$lex+1][$lex]: no exception ok 2918 - exists $vlex[$lex+1][$lex+1][$lex]: value ok 2919 - delete $vlex[$lex+1][$lex+1][$lex]: no exception ok 2920 - delete $vlex[$lex+1][$lex+1][$lex]: value ok 2921 - $vgbl[$lex+1][$lex+1][$lex]: no exception ok 2922 - $vgbl[$lex+1][$lex+1][$lex]: value ok 2923 - $vgbl[$lex+1][$lex+1][$lex] = 123: no exception ok 2924 - $vgbl[$lex+1][$lex+1][$lex] = 123: value ok 2925 - exists $vgbl[$lex+1][$lex+1][$lex]: no exception ok 2926 - exists $vgbl[$lex+1][$lex+1][$lex]: value ok 2927 - delete $vgbl[$lex+1][$lex+1][$lex]: no exception ok 2928 - delete $vgbl[$lex+1][$lex+1][$lex]: value ok 2929 - $vrlex->[$lex+1][$lex+1][$lex]: no exception ok 2930 - $vrlex->[$lex+1][$lex+1][$lex]: value ok 2931 - $vrlex->[$lex+1][$lex+1][$lex] = 123: no exception ok 2932 - $vrlex->[$lex+1][$lex+1][$lex] = 123: value ok 2933 - exists $vrlex->[$lex+1][$lex+1][$lex]: no exception ok 2934 - exists $vrlex->[$lex+1][$lex+1][$lex]: value ok 2935 - delete $vrlex->[$lex+1][$lex+1][$lex]: no exception ok 2936 - delete $vrlex->[$lex+1][$lex+1][$lex]: value ok 2937 - $vrgbl->[$lex+1][$lex+1][$lex]: no exception ok 2938 - $vrgbl->[$lex+1][$lex+1][$lex]: value ok 2939 - $vrgbl->[$lex+1][$lex+1][$lex] = 123: no exception ok 2940 - $vrgbl->[$lex+1][$lex+1][$lex] = 123: value ok 2941 - exists $vrgbl->[$lex+1][$lex+1][$lex]: no exception ok 2942 - exists $vrgbl->[$lex+1][$lex+1][$lex]: value ok 2943 - delete $vrgbl->[$lex+1][$lex+1][$lex]: no exception ok 2944 - delete $vrgbl->[$lex+1][$lex+1][$lex]: value ok 2945 - $vlex{foo}[$lex+1][$lex]: no exception ok 2946 - $vlex{foo}[$lex+1][$lex]: value ok 2947 - $vlex{foo}[$lex+1][$lex] = 123: no exception ok 2948 - $vlex{foo}[$lex+1][$lex] = 123: value ok 2949 - exists $vlex{foo}[$lex+1][$lex]: no exception ok 2950 - exists $vlex{foo}[$lex+1][$lex]: value ok 2951 - delete $vlex{foo}[$lex+1][$lex]: no exception ok 2952 - delete $vlex{foo}[$lex+1][$lex]: value ok 2953 - $vgbl{foo}[$lex+1][$lex]: no exception ok 2954 - $vgbl{foo}[$lex+1][$lex]: value ok 2955 - $vgbl{foo}[$lex+1][$lex] = 123: no exception ok 2956 - $vgbl{foo}[$lex+1][$lex] = 123: value ok 2957 - exists $vgbl{foo}[$lex+1][$lex]: no exception ok 2958 - exists $vgbl{foo}[$lex+1][$lex]: value ok 2959 - delete $vgbl{foo}[$lex+1][$lex]: no exception ok 2960 - delete $vgbl{foo}[$lex+1][$lex]: value ok 2961 - $vrlex->{foo}[$lex+1][$lex]: no exception ok 2962 - $vrlex->{foo}[$lex+1][$lex]: value ok 2963 - $vrlex->{foo}[$lex+1][$lex] = 123: no exception ok 2964 - $vrlex->{foo}[$lex+1][$lex] = 123: value ok 2965 - exists $vrlex->{foo}[$lex+1][$lex]: no exception ok 2966 - exists $vrlex->{foo}[$lex+1][$lex]: value ok 2967 - delete $vrlex->{foo}[$lex+1][$lex]: no exception ok 2968 - delete $vrlex->{foo}[$lex+1][$lex]: value ok 2969 - $vrgbl->{foo}[$lex+1][$lex]: no exception ok 2970 - $vrgbl->{foo}[$lex+1][$lex]: value ok 2971 - $vrgbl->{foo}[$lex+1][$lex] = 123: no exception ok 2972 - $vrgbl->{foo}[$lex+1][$lex] = 123: value ok 2973 - exists $vrgbl->{foo}[$lex+1][$lex]: no exception ok 2974 - exists $vrgbl->{foo}[$lex+1][$lex]: value ok 2975 - delete $vrgbl->{foo}[$lex+1][$lex]: no exception ok 2976 - delete $vrgbl->{foo}[$lex+1][$lex]: value ok 2977 - $vlex{$lex}[$lex+1][$lex]: no exception ok 2978 - $vlex{$lex}[$lex+1][$lex]: value ok 2979 - $vlex{$lex}[$lex+1][$lex] = 123: no exception ok 2980 - $vlex{$lex}[$lex+1][$lex] = 123: value ok 2981 - exists $vlex{$lex}[$lex+1][$lex]: no exception ok 2982 - exists $vlex{$lex}[$lex+1][$lex]: value ok 2983 - delete $vlex{$lex}[$lex+1][$lex]: no exception ok 2984 - delete $vlex{$lex}[$lex+1][$lex]: value ok 2985 - $vgbl{$lex}[$lex+1][$lex]: no exception ok 2986 - $vgbl{$lex}[$lex+1][$lex]: value ok 2987 - $vgbl{$lex}[$lex+1][$lex] = 123: no exception ok 2988 - $vgbl{$lex}[$lex+1][$lex] = 123: value ok 2989 - exists $vgbl{$lex}[$lex+1][$lex]: no exception ok 2990 - exists $vgbl{$lex}[$lex+1][$lex]: value ok 2991 - delete $vgbl{$lex}[$lex+1][$lex]: no exception ok 2992 - delete $vgbl{$lex}[$lex+1][$lex]: value ok 2993 - $vrlex->{$lex}[$lex+1][$lex]: no exception ok 2994 - $vrlex->{$lex}[$lex+1][$lex]: value ok 2995 - $vrlex->{$lex}[$lex+1][$lex] = 123: no exception ok 2996 - $vrlex->{$lex}[$lex+1][$lex] = 123: value ok 2997 - exists $vrlex->{$lex}[$lex+1][$lex]: no exception ok 2998 - exists $vrlex->{$lex}[$lex+1][$lex]: value ok 2999 - delete $vrlex->{$lex}[$lex+1][$lex]: no exception ok 3000 - delete $vrlex->{$lex}[$lex+1][$lex]: value ok 3001 - $vrgbl->{$lex}[$lex+1][$lex]: no exception ok 3002 - $vrgbl->{$lex}[$lex+1][$lex]: value ok 3003 - $vrgbl->{$lex}[$lex+1][$lex] = 123: no exception ok 3004 - $vrgbl->{$lex}[$lex+1][$lex] = 123: value ok 3005 - exists $vrgbl->{$lex}[$lex+1][$lex]: no exception ok 3006 - exists $vrgbl->{$lex}[$lex+1][$lex]: value ok 3007 - delete $vrgbl->{$lex}[$lex+1][$lex]: no exception ok 3008 - delete $vrgbl->{$lex}[$lex+1][$lex]: value ok 3009 - $vlex{$gbl}[$lex+1][$lex]: no exception ok 3010 - $vlex{$gbl}[$lex+1][$lex]: value ok 3011 - $vlex{$gbl}[$lex+1][$lex] = 123: no exception ok 3012 - $vlex{$gbl}[$lex+1][$lex] = 123: value ok 3013 - exists $vlex{$gbl}[$lex+1][$lex]: no exception ok 3014 - exists $vlex{$gbl}[$lex+1][$lex]: value ok 3015 - delete $vlex{$gbl}[$lex+1][$lex]: no exception ok 3016 - delete $vlex{$gbl}[$lex+1][$lex]: value ok 3017 - $vgbl{$gbl}[$lex+1][$lex]: no exception ok 3018 - $vgbl{$gbl}[$lex+1][$lex]: value ok 3019 - $vgbl{$gbl}[$lex+1][$lex] = 123: no exception ok 3020 - $vgbl{$gbl}[$lex+1][$lex] = 123: value ok 3021 - exists $vgbl{$gbl}[$lex+1][$lex]: no exception ok 3022 - exists $vgbl{$gbl}[$lex+1][$lex]: value ok 3023 - delete $vgbl{$gbl}[$lex+1][$lex]: no exception ok 3024 - delete $vgbl{$gbl}[$lex+1][$lex]: value ok 3025 - $vrlex->{$gbl}[$lex+1][$lex]: no exception ok 3026 - $vrlex->{$gbl}[$lex+1][$lex]: value ok 3027 - $vrlex->{$gbl}[$lex+1][$lex] = 123: no exception ok 3028 - $vrlex->{$gbl}[$lex+1][$lex] = 123: value ok 3029 - exists $vrlex->{$gbl}[$lex+1][$lex]: no exception ok 3030 - exists $vrlex->{$gbl}[$lex+1][$lex]: value ok 3031 - delete $vrlex->{$gbl}[$lex+1][$lex]: no exception ok 3032 - delete $vrlex->{$gbl}[$lex+1][$lex]: value ok 3033 - $vrgbl->{$gbl}[$lex+1][$lex]: no exception ok 3034 - $vrgbl->{$gbl}[$lex+1][$lex]: value ok 3035 - $vrgbl->{$gbl}[$lex+1][$lex] = 123: no exception ok 3036 - $vrgbl->{$gbl}[$lex+1][$lex] = 123: value ok 3037 - exists $vrgbl->{$gbl}[$lex+1][$lex]: no exception ok 3038 - exists $vrgbl->{$gbl}[$lex+1][$lex]: value ok 3039 - delete $vrgbl->{$gbl}[$lex+1][$lex]: no exception ok 3040 - delete $vrgbl->{$gbl}[$lex+1][$lex]: value ok 3041 - $vlex{"x$lex"}[$lex+1][$lex]: no exception ok 3042 - $vlex{"x$lex"}[$lex+1][$lex]: value ok 3043 - $vlex{"x$lex"}[$lex+1][$lex] = 123: no exception ok 3044 - $vlex{"x$lex"}[$lex+1][$lex] = 123: value ok 3045 - exists $vlex{"x$lex"}[$lex+1][$lex]: no exception ok 3046 - exists $vlex{"x$lex"}[$lex+1][$lex]: value ok 3047 - delete $vlex{"x$lex"}[$lex+1][$lex]: no exception ok 3048 - delete $vlex{"x$lex"}[$lex+1][$lex]: value ok 3049 - $vgbl{"x$lex"}[$lex+1][$lex]: no exception ok 3050 - $vgbl{"x$lex"}[$lex+1][$lex]: value ok 3051 - $vgbl{"x$lex"}[$lex+1][$lex] = 123: no exception ok 3052 - $vgbl{"x$lex"}[$lex+1][$lex] = 123: value ok 3053 - exists $vgbl{"x$lex"}[$lex+1][$lex]: no exception ok 3054 - exists $vgbl{"x$lex"}[$lex+1][$lex]: value ok 3055 - delete $vgbl{"x$lex"}[$lex+1][$lex]: no exception ok 3056 - delete $vgbl{"x$lex"}[$lex+1][$lex]: value ok 3057 - $vrlex->{"x$lex"}[$lex+1][$lex]: no exception ok 3058 - $vrlex->{"x$lex"}[$lex+1][$lex]: value ok 3059 - $vrlex->{"x$lex"}[$lex+1][$lex] = 123: no exception ok 3060 - $vrlex->{"x$lex"}[$lex+1][$lex] = 123: value ok 3061 - exists $vrlex->{"x$lex"}[$lex+1][$lex]: no exception ok 3062 - exists $vrlex->{"x$lex"}[$lex+1][$lex]: value ok 3063 - delete $vrlex->{"x$lex"}[$lex+1][$lex]: no exception ok 3064 - delete $vrlex->{"x$lex"}[$lex+1][$lex]: value ok 3065 - $vrgbl->{"x$lex"}[$lex+1][$lex]: no exception ok 3066 - $vrgbl->{"x$lex"}[$lex+1][$lex]: value ok 3067 - $vrgbl->{"x$lex"}[$lex+1][$lex] = 123: no exception ok 3068 - $vrgbl->{"x$lex"}[$lex+1][$lex] = 123: value ok 3069 - exists $vrgbl->{"x$lex"}[$lex+1][$lex]: no exception ok 3070 - exists $vrgbl->{"x$lex"}[$lex+1][$lex]: value ok 3071 - delete $vrgbl->{"x$lex"}[$lex+1][$lex]: no exception ok 3072 - delete $vrgbl->{"x$lex"}[$lex+1][$lex]: value ok 3073 - $vlex[0]{foo}[$lex]: no exception ok 3074 - $vlex[0]{foo}[$lex]: value ok 3075 - $vlex[0]{foo}[$lex] = 123: no exception ok 3076 - $vlex[0]{foo}[$lex] = 123: value ok 3077 - exists $vlex[0]{foo}[$lex]: no exception ok 3078 - exists $vlex[0]{foo}[$lex]: value ok 3079 - delete $vlex[0]{foo}[$lex]: no exception ok 3080 - delete $vlex[0]{foo}[$lex]: value ok 3081 - $vgbl[0]{foo}[$lex]: no exception ok 3082 - $vgbl[0]{foo}[$lex]: value ok 3083 - $vgbl[0]{foo}[$lex] = 123: no exception ok 3084 - $vgbl[0]{foo}[$lex] = 123: value ok 3085 - exists $vgbl[0]{foo}[$lex]: no exception ok 3086 - exists $vgbl[0]{foo}[$lex]: value ok 3087 - delete $vgbl[0]{foo}[$lex]: no exception ok 3088 - delete $vgbl[0]{foo}[$lex]: value ok 3089 - $vrlex->[0]{foo}[$lex]: no exception ok 3090 - $vrlex->[0]{foo}[$lex]: value ok 3091 - $vrlex->[0]{foo}[$lex] = 123: no exception ok 3092 - $vrlex->[0]{foo}[$lex] = 123: value ok 3093 - exists $vrlex->[0]{foo}[$lex]: no exception ok 3094 - exists $vrlex->[0]{foo}[$lex]: value ok 3095 - delete $vrlex->[0]{foo}[$lex]: no exception ok 3096 - delete $vrlex->[0]{foo}[$lex]: value ok 3097 - $vrgbl->[0]{foo}[$lex]: no exception ok 3098 - $vrgbl->[0]{foo}[$lex]: value ok 3099 - $vrgbl->[0]{foo}[$lex] = 123: no exception ok 3100 - $vrgbl->[0]{foo}[$lex] = 123: value ok 3101 - exists $vrgbl->[0]{foo}[$lex]: no exception ok 3102 - exists $vrgbl->[0]{foo}[$lex]: value ok 3103 - delete $vrgbl->[0]{foo}[$lex]: no exception ok 3104 - delete $vrgbl->[0]{foo}[$lex]: value ok 3105 - $vlex[$lex]{foo}[$lex]: no exception ok 3106 - $vlex[$lex]{foo}[$lex]: value ok 3107 - $vlex[$lex]{foo}[$lex] = 123: no exception ok 3108 - $vlex[$lex]{foo}[$lex] = 123: value ok 3109 - exists $vlex[$lex]{foo}[$lex]: no exception ok 3110 - exists $vlex[$lex]{foo}[$lex]: value ok 3111 - delete $vlex[$lex]{foo}[$lex]: no exception ok 3112 - delete $vlex[$lex]{foo}[$lex]: value ok 3113 - $vgbl[$lex]{foo}[$lex]: no exception ok 3114 - $vgbl[$lex]{foo}[$lex]: value ok 3115 - $vgbl[$lex]{foo}[$lex] = 123: no exception ok 3116 - $vgbl[$lex]{foo}[$lex] = 123: value ok 3117 - exists $vgbl[$lex]{foo}[$lex]: no exception ok 3118 - exists $vgbl[$lex]{foo}[$lex]: value ok 3119 - delete $vgbl[$lex]{foo}[$lex]: no exception ok 3120 - delete $vgbl[$lex]{foo}[$lex]: value ok 3121 - $vrlex->[$lex]{foo}[$lex]: no exception ok 3122 - $vrlex->[$lex]{foo}[$lex]: value ok 3123 - $vrlex->[$lex]{foo}[$lex] = 123: no exception ok 3124 - $vrlex->[$lex]{foo}[$lex] = 123: value ok 3125 - exists $vrlex->[$lex]{foo}[$lex]: no exception ok 3126 - exists $vrlex->[$lex]{foo}[$lex]: value ok 3127 - delete $vrlex->[$lex]{foo}[$lex]: no exception ok 3128 - delete $vrlex->[$lex]{foo}[$lex]: value ok 3129 - $vrgbl->[$lex]{foo}[$lex]: no exception ok 3130 - $vrgbl->[$lex]{foo}[$lex]: value ok 3131 - $vrgbl->[$lex]{foo}[$lex] = 123: no exception ok 3132 - $vrgbl->[$lex]{foo}[$lex] = 123: value ok 3133 - exists $vrgbl->[$lex]{foo}[$lex]: no exception ok 3134 - exists $vrgbl->[$lex]{foo}[$lex]: value ok 3135 - delete $vrgbl->[$lex]{foo}[$lex]: no exception ok 3136 - delete $vrgbl->[$lex]{foo}[$lex]: value ok 3137 - $vlex[$gbl]{foo}[$lex]: no exception ok 3138 - $vlex[$gbl]{foo}[$lex]: value ok 3139 - $vlex[$gbl]{foo}[$lex] = 123: no exception ok 3140 - $vlex[$gbl]{foo}[$lex] = 123: value ok 3141 - exists $vlex[$gbl]{foo}[$lex]: no exception ok 3142 - exists $vlex[$gbl]{foo}[$lex]: value ok 3143 - delete $vlex[$gbl]{foo}[$lex]: no exception ok 3144 - delete $vlex[$gbl]{foo}[$lex]: value ok 3145 - $vgbl[$gbl]{foo}[$lex]: no exception ok 3146 - $vgbl[$gbl]{foo}[$lex]: value ok 3147 - $vgbl[$gbl]{foo}[$lex] = 123: no exception ok 3148 - $vgbl[$gbl]{foo}[$lex] = 123: value ok 3149 - exists $vgbl[$gbl]{foo}[$lex]: no exception ok 3150 - exists $vgbl[$gbl]{foo}[$lex]: value ok 3151 - delete $vgbl[$gbl]{foo}[$lex]: no exception ok 3152 - delete $vgbl[$gbl]{foo}[$lex]: value ok 3153 - $vrlex->[$gbl]{foo}[$lex]: no exception ok 3154 - $vrlex->[$gbl]{foo}[$lex]: value ok 3155 - $vrlex->[$gbl]{foo}[$lex] = 123: no exception ok 3156 - $vrlex->[$gbl]{foo}[$lex] = 123: value ok 3157 - exists $vrlex->[$gbl]{foo}[$lex]: no exception ok 3158 - exists $vrlex->[$gbl]{foo}[$lex]: value ok 3159 - delete $vrlex->[$gbl]{foo}[$lex]: no exception ok 3160 - delete $vrlex->[$gbl]{foo}[$lex]: value ok 3161 - $vrgbl->[$gbl]{foo}[$lex]: no exception ok 3162 - $vrgbl->[$gbl]{foo}[$lex]: value ok 3163 - $vrgbl->[$gbl]{foo}[$lex] = 123: no exception ok 3164 - $vrgbl->[$gbl]{foo}[$lex] = 123: value ok 3165 - exists $vrgbl->[$gbl]{foo}[$lex]: no exception ok 3166 - exists $vrgbl->[$gbl]{foo}[$lex]: value ok 3167 - delete $vrgbl->[$gbl]{foo}[$lex]: no exception ok 3168 - delete $vrgbl->[$gbl]{foo}[$lex]: value ok 3169 - $vlex[$lex+1]{foo}[$lex]: no exception ok 3170 - $vlex[$lex+1]{foo}[$lex]: value ok 3171 - $vlex[$lex+1]{foo}[$lex] = 123: no exception ok 3172 - $vlex[$lex+1]{foo}[$lex] = 123: value ok 3173 - exists $vlex[$lex+1]{foo}[$lex]: no exception ok 3174 - exists $vlex[$lex+1]{foo}[$lex]: value ok 3175 - delete $vlex[$lex+1]{foo}[$lex]: no exception ok 3176 - delete $vlex[$lex+1]{foo}[$lex]: value ok 3177 - $vgbl[$lex+1]{foo}[$lex]: no exception ok 3178 - $vgbl[$lex+1]{foo}[$lex]: value ok 3179 - $vgbl[$lex+1]{foo}[$lex] = 123: no exception ok 3180 - $vgbl[$lex+1]{foo}[$lex] = 123: value ok 3181 - exists $vgbl[$lex+1]{foo}[$lex]: no exception ok 3182 - exists $vgbl[$lex+1]{foo}[$lex]: value ok 3183 - delete $vgbl[$lex+1]{foo}[$lex]: no exception ok 3184 - delete $vgbl[$lex+1]{foo}[$lex]: value ok 3185 - $vrlex->[$lex+1]{foo}[$lex]: no exception ok 3186 - $vrlex->[$lex+1]{foo}[$lex]: value ok 3187 - $vrlex->[$lex+1]{foo}[$lex] = 123: no exception ok 3188 - $vrlex->[$lex+1]{foo}[$lex] = 123: value ok 3189 - exists $vrlex->[$lex+1]{foo}[$lex]: no exception ok 3190 - exists $vrlex->[$lex+1]{foo}[$lex]: value ok 3191 - delete $vrlex->[$lex+1]{foo}[$lex]: no exception ok 3192 - delete $vrlex->[$lex+1]{foo}[$lex]: value ok 3193 - $vrgbl->[$lex+1]{foo}[$lex]: no exception ok 3194 - $vrgbl->[$lex+1]{foo}[$lex]: value ok 3195 - $vrgbl->[$lex+1]{foo}[$lex] = 123: no exception ok 3196 - $vrgbl->[$lex+1]{foo}[$lex] = 123: value ok 3197 - exists $vrgbl->[$lex+1]{foo}[$lex]: no exception ok 3198 - exists $vrgbl->[$lex+1]{foo}[$lex]: value ok 3199 - delete $vrgbl->[$lex+1]{foo}[$lex]: no exception ok 3200 - delete $vrgbl->[$lex+1]{foo}[$lex]: value ok 3201 - $vlex{foo}{foo}[$lex]: no exception ok 3202 - $vlex{foo}{foo}[$lex]: value ok 3203 - $vlex{foo}{foo}[$lex] = 123: no exception ok 3204 - $vlex{foo}{foo}[$lex] = 123: value ok 3205 - exists $vlex{foo}{foo}[$lex]: no exception ok 3206 - exists $vlex{foo}{foo}[$lex]: value ok 3207 - delete $vlex{foo}{foo}[$lex]: no exception ok 3208 - delete $vlex{foo}{foo}[$lex]: value ok 3209 - $vgbl{foo}{foo}[$lex]: no exception ok 3210 - $vgbl{foo}{foo}[$lex]: value ok 3211 - $vgbl{foo}{foo}[$lex] = 123: no exception ok 3212 - $vgbl{foo}{foo}[$lex] = 123: value ok 3213 - exists $vgbl{foo}{foo}[$lex]: no exception ok 3214 - exists $vgbl{foo}{foo}[$lex]: value ok 3215 - delete $vgbl{foo}{foo}[$lex]: no exception ok 3216 - delete $vgbl{foo}{foo}[$lex]: value ok 3217 - $vrlex->{foo}{foo}[$lex]: no exception ok 3218 - $vrlex->{foo}{foo}[$lex]: value ok 3219 - $vrlex->{foo}{foo}[$lex] = 123: no exception ok 3220 - $vrlex->{foo}{foo}[$lex] = 123: value ok 3221 - exists $vrlex->{foo}{foo}[$lex]: no exception ok 3222 - exists $vrlex->{foo}{foo}[$lex]: value ok 3223 - delete $vrlex->{foo}{foo}[$lex]: no exception ok 3224 - delete $vrlex->{foo}{foo}[$lex]: value ok 3225 - $vrgbl->{foo}{foo}[$lex]: no exception ok 3226 - $vrgbl->{foo}{foo}[$lex]: value ok 3227 - $vrgbl->{foo}{foo}[$lex] = 123: no exception ok 3228 - $vrgbl->{foo}{foo}[$lex] = 123: value ok 3229 - exists $vrgbl->{foo}{foo}[$lex]: no exception ok 3230 - exists $vrgbl->{foo}{foo}[$lex]: value ok 3231 - delete $vrgbl->{foo}{foo}[$lex]: no exception ok 3232 - delete $vrgbl->{foo}{foo}[$lex]: value ok 3233 - $vlex{$lex}{foo}[$lex]: no exception ok 3234 - $vlex{$lex}{foo}[$lex]: value ok 3235 - $vlex{$lex}{foo}[$lex] = 123: no exception ok 3236 - $vlex{$lex}{foo}[$lex] = 123: value ok 3237 - exists $vlex{$lex}{foo}[$lex]: no exception ok 3238 - exists $vlex{$lex}{foo}[$lex]: value ok 3239 - delete $vlex{$lex}{foo}[$lex]: no exception ok 3240 - delete $vlex{$lex}{foo}[$lex]: value ok 3241 - $vgbl{$lex}{foo}[$lex]: no exception ok 3242 - $vgbl{$lex}{foo}[$lex]: value ok 3243 - $vgbl{$lex}{foo}[$lex] = 123: no exception ok 3244 - $vgbl{$lex}{foo}[$lex] = 123: value ok 3245 - exists $vgbl{$lex}{foo}[$lex]: no exception ok 3246 - exists $vgbl{$lex}{foo}[$lex]: value ok 3247 - delete $vgbl{$lex}{foo}[$lex]: no exception ok 3248 - delete $vgbl{$lex}{foo}[$lex]: value ok 3249 - $vrlex->{$lex}{foo}[$lex]: no exception ok 3250 - $vrlex->{$lex}{foo}[$lex]: value ok 3251 - $vrlex->{$lex}{foo}[$lex] = 123: no exception ok 3252 - $vrlex->{$lex}{foo}[$lex] = 123: value ok 3253 - exists $vrlex->{$lex}{foo}[$lex]: no exception ok 3254 - exists $vrlex->{$lex}{foo}[$lex]: value ok 3255 - delete $vrlex->{$lex}{foo}[$lex]: no exception ok 3256 - delete $vrlex->{$lex}{foo}[$lex]: value ok 3257 - $vrgbl->{$lex}{foo}[$lex]: no exception ok 3258 - $vrgbl->{$lex}{foo}[$lex]: value ok 3259 - $vrgbl->{$lex}{foo}[$lex] = 123: no exception ok 3260 - $vrgbl->{$lex}{foo}[$lex] = 123: value ok 3261 - exists $vrgbl->{$lex}{foo}[$lex]: no exception ok 3262 - exists $vrgbl->{$lex}{foo}[$lex]: value ok 3263 - delete $vrgbl->{$lex}{foo}[$lex]: no exception ok 3264 - delete $vrgbl->{$lex}{foo}[$lex]: value ok 3265 - $vlex{$gbl}{foo}[$lex]: no exception ok 3266 - $vlex{$gbl}{foo}[$lex]: value ok 3267 - $vlex{$gbl}{foo}[$lex] = 123: no exception ok 3268 - $vlex{$gbl}{foo}[$lex] = 123: value ok 3269 - exists $vlex{$gbl}{foo}[$lex]: no exception ok 3270 - exists $vlex{$gbl}{foo}[$lex]: value ok 3271 - delete $vlex{$gbl}{foo}[$lex]: no exception ok 3272 - delete $vlex{$gbl}{foo}[$lex]: value ok 3273 - $vgbl{$gbl}{foo}[$lex]: no exception ok 3274 - $vgbl{$gbl}{foo}[$lex]: value ok 3275 - $vgbl{$gbl}{foo}[$lex] = 123: no exception ok 3276 - $vgbl{$gbl}{foo}[$lex] = 123: value ok 3277 - exists $vgbl{$gbl}{foo}[$lex]: no exception ok 3278 - exists $vgbl{$gbl}{foo}[$lex]: value ok 3279 - delete $vgbl{$gbl}{foo}[$lex]: no exception ok 3280 - delete $vgbl{$gbl}{foo}[$lex]: value ok 3281 - $vrlex->{$gbl}{foo}[$lex]: no exception ok 3282 - $vrlex->{$gbl}{foo}[$lex]: value ok 3283 - $vrlex->{$gbl}{foo}[$lex] = 123: no exception ok 3284 - $vrlex->{$gbl}{foo}[$lex] = 123: value ok 3285 - exists $vrlex->{$gbl}{foo}[$lex]: no exception ok 3286 - exists $vrlex->{$gbl}{foo}[$lex]: value ok 3287 - delete $vrlex->{$gbl}{foo}[$lex]: no exception ok 3288 - delete $vrlex->{$gbl}{foo}[$lex]: value ok 3289 - $vrgbl->{$gbl}{foo}[$lex]: no exception ok 3290 - $vrgbl->{$gbl}{foo}[$lex]: value ok 3291 - $vrgbl->{$gbl}{foo}[$lex] = 123: no exception ok 3292 - $vrgbl->{$gbl}{foo}[$lex] = 123: value ok 3293 - exists $vrgbl->{$gbl}{foo}[$lex]: no exception ok 3294 - exists $vrgbl->{$gbl}{foo}[$lex]: value ok 3295 - delete $vrgbl->{$gbl}{foo}[$lex]: no exception ok 3296 - delete $vrgbl->{$gbl}{foo}[$lex]: value ok 3297 - $vlex{"x$lex"}{foo}[$lex]: no exception ok 3298 - $vlex{"x$lex"}{foo}[$lex]: value ok 3299 - $vlex{"x$lex"}{foo}[$lex] = 123: no exception ok 3300 - $vlex{"x$lex"}{foo}[$lex] = 123: value ok 3301 - exists $vlex{"x$lex"}{foo}[$lex]: no exception ok 3302 - exists $vlex{"x$lex"}{foo}[$lex]: value ok 3303 - delete $vlex{"x$lex"}{foo}[$lex]: no exception ok 3304 - delete $vlex{"x$lex"}{foo}[$lex]: value ok 3305 - $vgbl{"x$lex"}{foo}[$lex]: no exception ok 3306 - $vgbl{"x$lex"}{foo}[$lex]: value ok 3307 - $vgbl{"x$lex"}{foo}[$lex] = 123: no exception ok 3308 - $vgbl{"x$lex"}{foo}[$lex] = 123: value ok 3309 - exists $vgbl{"x$lex"}{foo}[$lex]: no exception ok 3310 - exists $vgbl{"x$lex"}{foo}[$lex]: value ok 3311 - delete $vgbl{"x$lex"}{foo}[$lex]: no exception ok 3312 - delete $vgbl{"x$lex"}{foo}[$lex]: value ok 3313 - $vrlex->{"x$lex"}{foo}[$lex]: no exception ok 3314 - $vrlex->{"x$lex"}{foo}[$lex]: value ok 3315 - $vrlex->{"x$lex"}{foo}[$lex] = 123: no exception ok 3316 - $vrlex->{"x$lex"}{foo}[$lex] = 123: value ok 3317 - exists $vrlex->{"x$lex"}{foo}[$lex]: no exception ok 3318 - exists $vrlex->{"x$lex"}{foo}[$lex]: value ok 3319 - delete $vrlex->{"x$lex"}{foo}[$lex]: no exception ok 3320 - delete $vrlex->{"x$lex"}{foo}[$lex]: value ok 3321 - $vrgbl->{"x$lex"}{foo}[$lex]: no exception ok 3322 - $vrgbl->{"x$lex"}{foo}[$lex]: value ok 3323 - $vrgbl->{"x$lex"}{foo}[$lex] = 123: no exception ok 3324 - $vrgbl->{"x$lex"}{foo}[$lex] = 123: value ok 3325 - exists $vrgbl->{"x$lex"}{foo}[$lex]: no exception ok 3326 - exists $vrgbl->{"x$lex"}{foo}[$lex]: value ok 3327 - delete $vrgbl->{"x$lex"}{foo}[$lex]: no exception ok 3328 - delete $vrgbl->{"x$lex"}{foo}[$lex]: value ok 3329 - $vlex[0]{$lex}[$lex]: no exception ok 3330 - $vlex[0]{$lex}[$lex]: value ok 3331 - $vlex[0]{$lex}[$lex] = 123: no exception ok 3332 - $vlex[0]{$lex}[$lex] = 123: value ok 3333 - exists $vlex[0]{$lex}[$lex]: no exception ok 3334 - exists $vlex[0]{$lex}[$lex]: value ok 3335 - delete $vlex[0]{$lex}[$lex]: no exception ok 3336 - delete $vlex[0]{$lex}[$lex]: value ok 3337 - $vgbl[0]{$lex}[$lex]: no exception ok 3338 - $vgbl[0]{$lex}[$lex]: value ok 3339 - $vgbl[0]{$lex}[$lex] = 123: no exception ok 3340 - $vgbl[0]{$lex}[$lex] = 123: value ok 3341 - exists $vgbl[0]{$lex}[$lex]: no exception ok 3342 - exists $vgbl[0]{$lex}[$lex]: value ok 3343 - delete $vgbl[0]{$lex}[$lex]: no exception ok 3344 - delete $vgbl[0]{$lex}[$lex]: value ok 3345 - $vrlex->[0]{$lex}[$lex]: no exception ok 3346 - $vrlex->[0]{$lex}[$lex]: value ok 3347 - $vrlex->[0]{$lex}[$lex] = 123: no exception ok 3348 - $vrlex->[0]{$lex}[$lex] = 123: value ok 3349 - exists $vrlex->[0]{$lex}[$lex]: no exception ok 3350 - exists $vrlex->[0]{$lex}[$lex]: value ok 3351 - delete $vrlex->[0]{$lex}[$lex]: no exception ok 3352 - delete $vrlex->[0]{$lex}[$lex]: value ok 3353 - $vrgbl->[0]{$lex}[$lex]: no exception ok 3354 - $vrgbl->[0]{$lex}[$lex]: value ok 3355 - $vrgbl->[0]{$lex}[$lex] = 123: no exception ok 3356 - $vrgbl->[0]{$lex}[$lex] = 123: value ok 3357 - exists $vrgbl->[0]{$lex}[$lex]: no exception ok 3358 - exists $vrgbl->[0]{$lex}[$lex]: value ok 3359 - delete $vrgbl->[0]{$lex}[$lex]: no exception ok 3360 - delete $vrgbl->[0]{$lex}[$lex]: value ok 3361 - $vlex[$lex]{$lex}[$lex]: no exception ok 3362 - $vlex[$lex]{$lex}[$lex]: value ok 3363 - $vlex[$lex]{$lex}[$lex] = 123: no exception ok 3364 - $vlex[$lex]{$lex}[$lex] = 123: value ok 3365 - exists $vlex[$lex]{$lex}[$lex]: no exception ok 3366 - exists $vlex[$lex]{$lex}[$lex]: value ok 3367 - delete $vlex[$lex]{$lex}[$lex]: no exception ok 3368 - delete $vlex[$lex]{$lex}[$lex]: value ok 3369 - $vgbl[$lex]{$lex}[$lex]: no exception ok 3370 - $vgbl[$lex]{$lex}[$lex]: value ok 3371 - $vgbl[$lex]{$lex}[$lex] = 123: no exception ok 3372 - $vgbl[$lex]{$lex}[$lex] = 123: value ok 3373 - exists $vgbl[$lex]{$lex}[$lex]: no exception ok 3374 - exists $vgbl[$lex]{$lex}[$lex]: value ok 3375 - delete $vgbl[$lex]{$lex}[$lex]: no exception ok 3376 - delete $vgbl[$lex]{$lex}[$lex]: value ok 3377 - $vrlex->[$lex]{$lex}[$lex]: no exception ok 3378 - $vrlex->[$lex]{$lex}[$lex]: value ok 3379 - $vrlex->[$lex]{$lex}[$lex] = 123: no exception ok 3380 - $vrlex->[$lex]{$lex}[$lex] = 123: value ok 3381 - exists $vrlex->[$lex]{$lex}[$lex]: no exception ok 3382 - exists $vrlex->[$lex]{$lex}[$lex]: value ok 3383 - delete $vrlex->[$lex]{$lex}[$lex]: no exception ok 3384 - delete $vrlex->[$lex]{$lex}[$lex]: value ok 3385 - $vrgbl->[$lex]{$lex}[$lex]: no exception ok 3386 - $vrgbl->[$lex]{$lex}[$lex]: value ok 3387 - $vrgbl->[$lex]{$lex}[$lex] = 123: no exception ok 3388 - $vrgbl->[$lex]{$lex}[$lex] = 123: value ok 3389 - exists $vrgbl->[$lex]{$lex}[$lex]: no exception ok 3390 - exists $vrgbl->[$lex]{$lex}[$lex]: value ok 3391 - delete $vrgbl->[$lex]{$lex}[$lex]: no exception ok 3392 - delete $vrgbl->[$lex]{$lex}[$lex]: value ok 3393 - $vlex[$gbl]{$lex}[$lex]: no exception ok 3394 - $vlex[$gbl]{$lex}[$lex]: value ok 3395 - $vlex[$gbl]{$lex}[$lex] = 123: no exception ok 3396 - $vlex[$gbl]{$lex}[$lex] = 123: value ok 3397 - exists $vlex[$gbl]{$lex}[$lex]: no exception ok 3398 - exists $vlex[$gbl]{$lex}[$lex]: value ok 3399 - delete $vlex[$gbl]{$lex}[$lex]: no exception ok 3400 - delete $vlex[$gbl]{$lex}[$lex]: value ok 3401 - $vgbl[$gbl]{$lex}[$lex]: no exception ok 3402 - $vgbl[$gbl]{$lex}[$lex]: value ok 3403 - $vgbl[$gbl]{$lex}[$lex] = 123: no exception ok 3404 - $vgbl[$gbl]{$lex}[$lex] = 123: value ok 3405 - exists $vgbl[$gbl]{$lex}[$lex]: no exception ok 3406 - exists $vgbl[$gbl]{$lex}[$lex]: value ok 3407 - delete $vgbl[$gbl]{$lex}[$lex]: no exception ok 3408 - delete $vgbl[$gbl]{$lex}[$lex]: value ok 3409 - $vrlex->[$gbl]{$lex}[$lex]: no exception ok 3410 - $vrlex->[$gbl]{$lex}[$lex]: value ok 3411 - $vrlex->[$gbl]{$lex}[$lex] = 123: no exception ok 3412 - $vrlex->[$gbl]{$lex}[$lex] = 123: value ok 3413 - exists $vrlex->[$gbl]{$lex}[$lex]: no exception ok 3414 - exists $vrlex->[$gbl]{$lex}[$lex]: value ok 3415 - delete $vrlex->[$gbl]{$lex}[$lex]: no exception ok 3416 - delete $vrlex->[$gbl]{$lex}[$lex]: value ok 3417 - $vrgbl->[$gbl]{$lex}[$lex]: no exception ok 3418 - $vrgbl->[$gbl]{$lex}[$lex]: value ok 3419 - $vrgbl->[$gbl]{$lex}[$lex] = 123: no exception ok 3420 - $vrgbl->[$gbl]{$lex}[$lex] = 123: value ok 3421 - exists $vrgbl->[$gbl]{$lex}[$lex]: no exception ok 3422 - exists $vrgbl->[$gbl]{$lex}[$lex]: value ok 3423 - delete $vrgbl->[$gbl]{$lex}[$lex]: no exception ok 3424 - delete $vrgbl->[$gbl]{$lex}[$lex]: value ok 3425 - $vlex[$lex+1]{$lex}[$lex]: no exception ok 3426 - $vlex[$lex+1]{$lex}[$lex]: value ok 3427 - $vlex[$lex+1]{$lex}[$lex] = 123: no exception ok 3428 - $vlex[$lex+1]{$lex}[$lex] = 123: value ok 3429 - exists $vlex[$lex+1]{$lex}[$lex]: no exception ok 3430 - exists $vlex[$lex+1]{$lex}[$lex]: value ok 3431 - delete $vlex[$lex+1]{$lex}[$lex]: no exception ok 3432 - delete $vlex[$lex+1]{$lex}[$lex]: value ok 3433 - $vgbl[$lex+1]{$lex}[$lex]: no exception ok 3434 - $vgbl[$lex+1]{$lex}[$lex]: value ok 3435 - $vgbl[$lex+1]{$lex}[$lex] = 123: no exception ok 3436 - $vgbl[$lex+1]{$lex}[$lex] = 123: value ok 3437 - exists $vgbl[$lex+1]{$lex}[$lex]: no exception ok 3438 - exists $vgbl[$lex+1]{$lex}[$lex]: value ok 3439 - delete $vgbl[$lex+1]{$lex}[$lex]: no exception ok 3440 - delete $vgbl[$lex+1]{$lex}[$lex]: value ok 3441 - $vrlex->[$lex+1]{$lex}[$lex]: no exception ok 3442 - $vrlex->[$lex+1]{$lex}[$lex]: value ok 3443 - $vrlex->[$lex+1]{$lex}[$lex] = 123: no exception ok 3444 - $vrlex->[$lex+1]{$lex}[$lex] = 123: value ok 3445 - exists $vrlex->[$lex+1]{$lex}[$lex]: no exception ok 3446 - exists $vrlex->[$lex+1]{$lex}[$lex]: value ok 3447 - delete $vrlex->[$lex+1]{$lex}[$lex]: no exception ok 3448 - delete $vrlex->[$lex+1]{$lex}[$lex]: value ok 3449 - $vrgbl->[$lex+1]{$lex}[$lex]: no exception ok 3450 - $vrgbl->[$lex+1]{$lex}[$lex]: value ok 3451 - $vrgbl->[$lex+1]{$lex}[$lex] = 123: no exception ok 3452 - $vrgbl->[$lex+1]{$lex}[$lex] = 123: value ok 3453 - exists $vrgbl->[$lex+1]{$lex}[$lex]: no exception ok 3454 - exists $vrgbl->[$lex+1]{$lex}[$lex]: value ok 3455 - delete $vrgbl->[$lex+1]{$lex}[$lex]: no exception ok 3456 - delete $vrgbl->[$lex+1]{$lex}[$lex]: value ok 3457 - $vlex{foo}{$lex}[$lex]: no exception ok 3458 - $vlex{foo}{$lex}[$lex]: value ok 3459 - $vlex{foo}{$lex}[$lex] = 123: no exception ok 3460 - $vlex{foo}{$lex}[$lex] = 123: value ok 3461 - exists $vlex{foo}{$lex}[$lex]: no exception ok 3462 - exists $vlex{foo}{$lex}[$lex]: value ok 3463 - delete $vlex{foo}{$lex}[$lex]: no exception ok 3464 - delete $vlex{foo}{$lex}[$lex]: value ok 3465 - $vgbl{foo}{$lex}[$lex]: no exception ok 3466 - $vgbl{foo}{$lex}[$lex]: value ok 3467 - $vgbl{foo}{$lex}[$lex] = 123: no exception ok 3468 - $vgbl{foo}{$lex}[$lex] = 123: value ok 3469 - exists $vgbl{foo}{$lex}[$lex]: no exception ok 3470 - exists $vgbl{foo}{$lex}[$lex]: value ok 3471 - delete $vgbl{foo}{$lex}[$lex]: no exception ok 3472 - delete $vgbl{foo}{$lex}[$lex]: value ok 3473 - $vrlex->{foo}{$lex}[$lex]: no exception ok 3474 - $vrlex->{foo}{$lex}[$lex]: value ok 3475 - $vrlex->{foo}{$lex}[$lex] = 123: no exception ok 3476 - $vrlex->{foo}{$lex}[$lex] = 123: value ok 3477 - exists $vrlex->{foo}{$lex}[$lex]: no exception ok 3478 - exists $vrlex->{foo}{$lex}[$lex]: value ok 3479 - delete $vrlex->{foo}{$lex}[$lex]: no exception ok 3480 - delete $vrlex->{foo}{$lex}[$lex]: value ok 3481 - $vrgbl->{foo}{$lex}[$lex]: no exception ok 3482 - $vrgbl->{foo}{$lex}[$lex]: value ok 3483 - $vrgbl->{foo}{$lex}[$lex] = 123: no exception ok 3484 - $vrgbl->{foo}{$lex}[$lex] = 123: value ok 3485 - exists $vrgbl->{foo}{$lex}[$lex]: no exception ok 3486 - exists $vrgbl->{foo}{$lex}[$lex]: value ok 3487 - delete $vrgbl->{foo}{$lex}[$lex]: no exception ok 3488 - delete $vrgbl->{foo}{$lex}[$lex]: value ok 3489 - $vlex{$lex}{$lex}[$lex]: no exception ok 3490 - $vlex{$lex}{$lex}[$lex]: value ok 3491 - $vlex{$lex}{$lex}[$lex] = 123: no exception ok 3492 - $vlex{$lex}{$lex}[$lex] = 123: value ok 3493 - exists $vlex{$lex}{$lex}[$lex]: no exception ok 3494 - exists $vlex{$lex}{$lex}[$lex]: value ok 3495 - delete $vlex{$lex}{$lex}[$lex]: no exception ok 3496 - delete $vlex{$lex}{$lex}[$lex]: value ok 3497 - $vgbl{$lex}{$lex}[$lex]: no exception ok 3498 - $vgbl{$lex}{$lex}[$lex]: value ok 3499 - $vgbl{$lex}{$lex}[$lex] = 123: no exception ok 3500 - $vgbl{$lex}{$lex}[$lex] = 123: value ok 3501 - exists $vgbl{$lex}{$lex}[$lex]: no exception ok 3502 - exists $vgbl{$lex}{$lex}[$lex]: value ok 3503 - delete $vgbl{$lex}{$lex}[$lex]: no exception ok 3504 - delete $vgbl{$lex}{$lex}[$lex]: value ok 3505 - $vrlex->{$lex}{$lex}[$lex]: no exception ok 3506 - $vrlex->{$lex}{$lex}[$lex]: value ok 3507 - $vrlex->{$lex}{$lex}[$lex] = 123: no exception ok 3508 - $vrlex->{$lex}{$lex}[$lex] = 123: value ok 3509 - exists $vrlex->{$lex}{$lex}[$lex]: no exception ok 3510 - exists $vrlex->{$lex}{$lex}[$lex]: value ok 3511 - delete $vrlex->{$lex}{$lex}[$lex]: no exception ok 3512 - delete $vrlex->{$lex}{$lex}[$lex]: value ok 3513 - $vrgbl->{$lex}{$lex}[$lex]: no exception ok 3514 - $vrgbl->{$lex}{$lex}[$lex]: value ok 3515 - $vrgbl->{$lex}{$lex}[$lex] = 123: no exception ok 3516 - $vrgbl->{$lex}{$lex}[$lex] = 123: value ok 3517 - exists $vrgbl->{$lex}{$lex}[$lex]: no exception ok 3518 - exists $vrgbl->{$lex}{$lex}[$lex]: value ok 3519 - delete $vrgbl->{$lex}{$lex}[$lex]: no exception ok 3520 - delete $vrgbl->{$lex}{$lex}[$lex]: value ok 3521 - $vlex{$gbl}{$lex}[$lex]: no exception ok 3522 - $vlex{$gbl}{$lex}[$lex]: value ok 3523 - $vlex{$gbl}{$lex}[$lex] = 123: no exception ok 3524 - $vlex{$gbl}{$lex}[$lex] = 123: value ok 3525 - exists $vlex{$gbl}{$lex}[$lex]: no exception ok 3526 - exists $vlex{$gbl}{$lex}[$lex]: value ok 3527 - delete $vlex{$gbl}{$lex}[$lex]: no exception ok 3528 - delete $vlex{$gbl}{$lex}[$lex]: value ok 3529 - $vgbl{$gbl}{$lex}[$lex]: no exception ok 3530 - $vgbl{$gbl}{$lex}[$lex]: value ok 3531 - $vgbl{$gbl}{$lex}[$lex] = 123: no exception ok 3532 - $vgbl{$gbl}{$lex}[$lex] = 123: value ok 3533 - exists $vgbl{$gbl}{$lex}[$lex]: no exception ok 3534 - exists $vgbl{$gbl}{$lex}[$lex]: value ok 3535 - delete $vgbl{$gbl}{$lex}[$lex]: no exception ok 3536 - delete $vgbl{$gbl}{$lex}[$lex]: value ok 3537 - $vrlex->{$gbl}{$lex}[$lex]: no exception ok 3538 - $vrlex->{$gbl}{$lex}[$lex]: value ok 3539 - $vrlex->{$gbl}{$lex}[$lex] = 123: no exception ok 3540 - $vrlex->{$gbl}{$lex}[$lex] = 123: value ok 3541 - exists $vrlex->{$gbl}{$lex}[$lex]: no exception ok 3542 - exists $vrlex->{$gbl}{$lex}[$lex]: value ok 3543 - delete $vrlex->{$gbl}{$lex}[$lex]: no exception ok 3544 - delete $vrlex->{$gbl}{$lex}[$lex]: value ok 3545 - $vrgbl->{$gbl}{$lex}[$lex]: no exception ok 3546 - $vrgbl->{$gbl}{$lex}[$lex]: value ok 3547 - $vrgbl->{$gbl}{$lex}[$lex] = 123: no exception ok 3548 - $vrgbl->{$gbl}{$lex}[$lex] = 123: value ok 3549 - exists $vrgbl->{$gbl}{$lex}[$lex]: no exception ok 3550 - exists $vrgbl->{$gbl}{$lex}[$lex]: value ok 3551 - delete $vrgbl->{$gbl}{$lex}[$lex]: no exception ok 3552 - delete $vrgbl->{$gbl}{$lex}[$lex]: value ok 3553 - $vlex{"x$lex"}{$lex}[$lex]: no exception ok 3554 - $vlex{"x$lex"}{$lex}[$lex]: value ok 3555 - $vlex{"x$lex"}{$lex}[$lex] = 123: no exception ok 3556 - $vlex{"x$lex"}{$lex}[$lex] = 123: value ok 3557 - exists $vlex{"x$lex"}{$lex}[$lex]: no exception ok 3558 - exists $vlex{"x$lex"}{$lex}[$lex]: value ok 3559 - delete $vlex{"x$lex"}{$lex}[$lex]: no exception ok 3560 - delete $vlex{"x$lex"}{$lex}[$lex]: value ok 3561 - $vgbl{"x$lex"}{$lex}[$lex]: no exception ok 3562 - $vgbl{"x$lex"}{$lex}[$lex]: value ok 3563 - $vgbl{"x$lex"}{$lex}[$lex] = 123: no exception ok 3564 - $vgbl{"x$lex"}{$lex}[$lex] = 123: value ok 3565 - exists $vgbl{"x$lex"}{$lex}[$lex]: no exception ok 3566 - exists $vgbl{"x$lex"}{$lex}[$lex]: value ok 3567 - delete $vgbl{"x$lex"}{$lex}[$lex]: no exception ok 3568 - delete $vgbl{"x$lex"}{$lex}[$lex]: value ok 3569 - $vrlex->{"x$lex"}{$lex}[$lex]: no exception ok 3570 - $vrlex->{"x$lex"}{$lex}[$lex]: value ok 3571 - $vrlex->{"x$lex"}{$lex}[$lex] = 123: no exception ok 3572 - $vrlex->{"x$lex"}{$lex}[$lex] = 123: value ok 3573 - exists $vrlex->{"x$lex"}{$lex}[$lex]: no exception ok 3574 - exists $vrlex->{"x$lex"}{$lex}[$lex]: value ok 3575 - delete $vrlex->{"x$lex"}{$lex}[$lex]: no exception ok 3576 - delete $vrlex->{"x$lex"}{$lex}[$lex]: value ok 3577 - $vrgbl->{"x$lex"}{$lex}[$lex]: no exception ok 3578 - $vrgbl->{"x$lex"}{$lex}[$lex]: value ok 3579 - $vrgbl->{"x$lex"}{$lex}[$lex] = 123: no exception ok 3580 - $vrgbl->{"x$lex"}{$lex}[$lex] = 123: value ok 3581 - exists $vrgbl->{"x$lex"}{$lex}[$lex]: no exception ok 3582 - exists $vrgbl->{"x$lex"}{$lex}[$lex]: value ok 3583 - delete $vrgbl->{"x$lex"}{$lex}[$lex]: no exception ok 3584 - delete $vrgbl->{"x$lex"}{$lex}[$lex]: value ok 3585 - $vlex[0]{$gbl}[$lex]: no exception ok 3586 - $vlex[0]{$gbl}[$lex]: value ok 3587 - $vlex[0]{$gbl}[$lex] = 123: no exception ok 3588 - $vlex[0]{$gbl}[$lex] = 123: value ok 3589 - exists $vlex[0]{$gbl}[$lex]: no exception ok 3590 - exists $vlex[0]{$gbl}[$lex]: value ok 3591 - delete $vlex[0]{$gbl}[$lex]: no exception ok 3592 - delete $vlex[0]{$gbl}[$lex]: value ok 3593 - $vgbl[0]{$gbl}[$lex]: no exception ok 3594 - $vgbl[0]{$gbl}[$lex]: value ok 3595 - $vgbl[0]{$gbl}[$lex] = 123: no exception ok 3596 - $vgbl[0]{$gbl}[$lex] = 123: value ok 3597 - exists $vgbl[0]{$gbl}[$lex]: no exception ok 3598 - exists $vgbl[0]{$gbl}[$lex]: value ok 3599 - delete $vgbl[0]{$gbl}[$lex]: no exception ok 3600 - delete $vgbl[0]{$gbl}[$lex]: value ok 3601 - $vrlex->[0]{$gbl}[$lex]: no exception ok 3602 - $vrlex->[0]{$gbl}[$lex]: value ok 3603 - $vrlex->[0]{$gbl}[$lex] = 123: no exception ok 3604 - $vrlex->[0]{$gbl}[$lex] = 123: value ok 3605 - exists $vrlex->[0]{$gbl}[$lex]: no exception ok 3606 - exists $vrlex->[0]{$gbl}[$lex]: value ok 3607 - delete $vrlex->[0]{$gbl}[$lex]: no exception ok 3608 - delete $vrlex->[0]{$gbl}[$lex]: value ok 3609 - $vrgbl->[0]{$gbl}[$lex]: no exception ok 3610 - $vrgbl->[0]{$gbl}[$lex]: value ok 3611 - $vrgbl->[0]{$gbl}[$lex] = 123: no exception ok 3612 - $vrgbl->[0]{$gbl}[$lex] = 123: value ok 3613 - exists $vrgbl->[0]{$gbl}[$lex]: no exception ok 3614 - exists $vrgbl->[0]{$gbl}[$lex]: value ok 3615 - delete $vrgbl->[0]{$gbl}[$lex]: no exception ok 3616 - delete $vrgbl->[0]{$gbl}[$lex]: value ok 3617 - $vlex[$lex]{$gbl}[$lex]: no exception ok 3618 - $vlex[$lex]{$gbl}[$lex]: value ok 3619 - $vlex[$lex]{$gbl}[$lex] = 123: no exception ok 3620 - $vlex[$lex]{$gbl}[$lex] = 123: value ok 3621 - exists $vlex[$lex]{$gbl}[$lex]: no exception ok 3622 - exists $vlex[$lex]{$gbl}[$lex]: value ok 3623 - delete $vlex[$lex]{$gbl}[$lex]: no exception ok 3624 - delete $vlex[$lex]{$gbl}[$lex]: value ok 3625 - $vgbl[$lex]{$gbl}[$lex]: no exception ok 3626 - $vgbl[$lex]{$gbl}[$lex]: value ok 3627 - $vgbl[$lex]{$gbl}[$lex] = 123: no exception ok 3628 - $vgbl[$lex]{$gbl}[$lex] = 123: value ok 3629 - exists $vgbl[$lex]{$gbl}[$lex]: no exception ok 3630 - exists $vgbl[$lex]{$gbl}[$lex]: value ok 3631 - delete $vgbl[$lex]{$gbl}[$lex]: no exception ok 3632 - delete $vgbl[$lex]{$gbl}[$lex]: value ok 3633 - $vrlex->[$lex]{$gbl}[$lex]: no exception ok 3634 - $vrlex->[$lex]{$gbl}[$lex]: value ok 3635 - $vrlex->[$lex]{$gbl}[$lex] = 123: no exception ok 3636 - $vrlex->[$lex]{$gbl}[$lex] = 123: value ok 3637 - exists $vrlex->[$lex]{$gbl}[$lex]: no exception ok 3638 - exists $vrlex->[$lex]{$gbl}[$lex]: value ok 3639 - delete $vrlex->[$lex]{$gbl}[$lex]: no exception ok 3640 - delete $vrlex->[$lex]{$gbl}[$lex]: value ok 3641 - $vrgbl->[$lex]{$gbl}[$lex]: no exception ok 3642 - $vrgbl->[$lex]{$gbl}[$lex]: value ok 3643 - $vrgbl->[$lex]{$gbl}[$lex] = 123: no exception ok 3644 - $vrgbl->[$lex]{$gbl}[$lex] = 123: value ok 3645 - exists $vrgbl->[$lex]{$gbl}[$lex]: no exception ok 3646 - exists $vrgbl->[$lex]{$gbl}[$lex]: value ok 3647 - delete $vrgbl->[$lex]{$gbl}[$lex]: no exception ok 3648 - delete $vrgbl->[$lex]{$gbl}[$lex]: value ok 3649 - $vlex[$gbl]{$gbl}[$lex]: no exception ok 3650 - $vlex[$gbl]{$gbl}[$lex]: value ok 3651 - $vlex[$gbl]{$gbl}[$lex] = 123: no exception ok 3652 - $vlex[$gbl]{$gbl}[$lex] = 123: value ok 3653 - exists $vlex[$gbl]{$gbl}[$lex]: no exception ok 3654 - exists $vlex[$gbl]{$gbl}[$lex]: value ok 3655 - delete $vlex[$gbl]{$gbl}[$lex]: no exception ok 3656 - delete $vlex[$gbl]{$gbl}[$lex]: value ok 3657 - $vgbl[$gbl]{$gbl}[$lex]: no exception ok 3658 - $vgbl[$gbl]{$gbl}[$lex]: value ok 3659 - $vgbl[$gbl]{$gbl}[$lex] = 123: no exception ok 3660 - $vgbl[$gbl]{$gbl}[$lex] = 123: value ok 3661 - exists $vgbl[$gbl]{$gbl}[$lex]: no exception ok 3662 - exists $vgbl[$gbl]{$gbl}[$lex]: value ok 3663 - delete $vgbl[$gbl]{$gbl}[$lex]: no exception ok 3664 - delete $vgbl[$gbl]{$gbl}[$lex]: value ok 3665 - $vrlex->[$gbl]{$gbl}[$lex]: no exception ok 3666 - $vrlex->[$gbl]{$gbl}[$lex]: value ok 3667 - $vrlex->[$gbl]{$gbl}[$lex] = 123: no exception ok 3668 - $vrlex->[$gbl]{$gbl}[$lex] = 123: value ok 3669 - exists $vrlex->[$gbl]{$gbl}[$lex]: no exception ok 3670 - exists $vrlex->[$gbl]{$gbl}[$lex]: value ok 3671 - delete $vrlex->[$gbl]{$gbl}[$lex]: no exception ok 3672 - delete $vrlex->[$gbl]{$gbl}[$lex]: value ok 3673 - $vrgbl->[$gbl]{$gbl}[$lex]: no exception ok 3674 - $vrgbl->[$gbl]{$gbl}[$lex]: value ok 3675 - $vrgbl->[$gbl]{$gbl}[$lex] = 123: no exception ok 3676 - $vrgbl->[$gbl]{$gbl}[$lex] = 123: value ok 3677 - exists $vrgbl->[$gbl]{$gbl}[$lex]: no exception ok 3678 - exists $vrgbl->[$gbl]{$gbl}[$lex]: value ok 3679 - delete $vrgbl->[$gbl]{$gbl}[$lex]: no exception ok 3680 - delete $vrgbl->[$gbl]{$gbl}[$lex]: value ok 3681 - $vlex[$lex+1]{$gbl}[$lex]: no exception ok 3682 - $vlex[$lex+1]{$gbl}[$lex]: value ok 3683 - $vlex[$lex+1]{$gbl}[$lex] = 123: no exception ok 3684 - $vlex[$lex+1]{$gbl}[$lex] = 123: value ok 3685 - exists $vlex[$lex+1]{$gbl}[$lex]: no exception ok 3686 - exists $vlex[$lex+1]{$gbl}[$lex]: value ok 3687 - delete $vlex[$lex+1]{$gbl}[$lex]: no exception ok 3688 - delete $vlex[$lex+1]{$gbl}[$lex]: value ok 3689 - $vgbl[$lex+1]{$gbl}[$lex]: no exception ok 3690 - $vgbl[$lex+1]{$gbl}[$lex]: value ok 3691 - $vgbl[$lex+1]{$gbl}[$lex] = 123: no exception ok 3692 - $vgbl[$lex+1]{$gbl}[$lex] = 123: value ok 3693 - exists $vgbl[$lex+1]{$gbl}[$lex]: no exception ok 3694 - exists $vgbl[$lex+1]{$gbl}[$lex]: value ok 3695 - delete $vgbl[$lex+1]{$gbl}[$lex]: no exception ok 3696 - delete $vgbl[$lex+1]{$gbl}[$lex]: value ok 3697 - $vrlex->[$lex+1]{$gbl}[$lex]: no exception ok 3698 - $vrlex->[$lex+1]{$gbl}[$lex]: value ok 3699 - $vrlex->[$lex+1]{$gbl}[$lex] = 123: no exception ok 3700 - $vrlex->[$lex+1]{$gbl}[$lex] = 123: value ok 3701 - exists $vrlex->[$lex+1]{$gbl}[$lex]: no exception ok 3702 - exists $vrlex->[$lex+1]{$gbl}[$lex]: value ok 3703 - delete $vrlex->[$lex+1]{$gbl}[$lex]: no exception ok 3704 - delete $vrlex->[$lex+1]{$gbl}[$lex]: value ok 3705 - $vrgbl->[$lex+1]{$gbl}[$lex]: no exception ok 3706 - $vrgbl->[$lex+1]{$gbl}[$lex]: value ok 3707 - $vrgbl->[$lex+1]{$gbl}[$lex] = 123: no exception ok 3708 - $vrgbl->[$lex+1]{$gbl}[$lex] = 123: value ok 3709 - exists $vrgbl->[$lex+1]{$gbl}[$lex]: no exception ok 3710 - exists $vrgbl->[$lex+1]{$gbl}[$lex]: value ok 3711 - delete $vrgbl->[$lex+1]{$gbl}[$lex]: no exception ok 3712 - delete $vrgbl->[$lex+1]{$gbl}[$lex]: value ok 3713 - $vlex{foo}{$gbl}[$lex]: no exception ok 3714 - $vlex{foo}{$gbl}[$lex]: value ok 3715 - $vlex{foo}{$gbl}[$lex] = 123: no exception ok 3716 - $vlex{foo}{$gbl}[$lex] = 123: value ok 3717 - exists $vlex{foo}{$gbl}[$lex]: no exception ok 3718 - exists $vlex{foo}{$gbl}[$lex]: value ok 3719 - delete $vlex{foo}{$gbl}[$lex]: no exception ok 3720 - delete $vlex{foo}{$gbl}[$lex]: value ok 3721 - $vgbl{foo}{$gbl}[$lex]: no exception ok 3722 - $vgbl{foo}{$gbl}[$lex]: value ok 3723 - $vgbl{foo}{$gbl}[$lex] = 123: no exception ok 3724 - $vgbl{foo}{$gbl}[$lex] = 123: value ok 3725 - exists $vgbl{foo}{$gbl}[$lex]: no exception ok 3726 - exists $vgbl{foo}{$gbl}[$lex]: value ok 3727 - delete $vgbl{foo}{$gbl}[$lex]: no exception ok 3728 - delete $vgbl{foo}{$gbl}[$lex]: value ok 3729 - $vrlex->{foo}{$gbl}[$lex]: no exception ok 3730 - $vrlex->{foo}{$gbl}[$lex]: value ok 3731 - $vrlex->{foo}{$gbl}[$lex] = 123: no exception ok 3732 - $vrlex->{foo}{$gbl}[$lex] = 123: value ok 3733 - exists $vrlex->{foo}{$gbl}[$lex]: no exception ok 3734 - exists $vrlex->{foo}{$gbl}[$lex]: value ok 3735 - delete $vrlex->{foo}{$gbl}[$lex]: no exception ok 3736 - delete $vrlex->{foo}{$gbl}[$lex]: value ok 3737 - $vrgbl->{foo}{$gbl}[$lex]: no exception ok 3738 - $vrgbl->{foo}{$gbl}[$lex]: value ok 3739 - $vrgbl->{foo}{$gbl}[$lex] = 123: no exception ok 3740 - $vrgbl->{foo}{$gbl}[$lex] = 123: value ok 3741 - exists $vrgbl->{foo}{$gbl}[$lex]: no exception ok 3742 - exists $vrgbl->{foo}{$gbl}[$lex]: value ok 3743 - delete $vrgbl->{foo}{$gbl}[$lex]: no exception ok 3744 - delete $vrgbl->{foo}{$gbl}[$lex]: value ok 3745 - $vlex{$lex}{$gbl}[$lex]: no exception ok 3746 - $vlex{$lex}{$gbl}[$lex]: value ok 3747 - $vlex{$lex}{$gbl}[$lex] = 123: no exception ok 3748 - $vlex{$lex}{$gbl}[$lex] = 123: value ok 3749 - exists $vlex{$lex}{$gbl}[$lex]: no exception ok 3750 - exists $vlex{$lex}{$gbl}[$lex]: value ok 3751 - delete $vlex{$lex}{$gbl}[$lex]: no exception ok 3752 - delete $vlex{$lex}{$gbl}[$lex]: value ok 3753 - $vgbl{$lex}{$gbl}[$lex]: no exception ok 3754 - $vgbl{$lex}{$gbl}[$lex]: value ok 3755 - $vgbl{$lex}{$gbl}[$lex] = 123: no exception ok 3756 - $vgbl{$lex}{$gbl}[$lex] = 123: value ok 3757 - exists $vgbl{$lex}{$gbl}[$lex]: no exception ok 3758 - exists $vgbl{$lex}{$gbl}[$lex]: value ok 3759 - delete $vgbl{$lex}{$gbl}[$lex]: no exception ok 3760 - delete $vgbl{$lex}{$gbl}[$lex]: value ok 3761 - $vrlex->{$lex}{$gbl}[$lex]: no exception ok 3762 - $vrlex->{$lex}{$gbl}[$lex]: value ok 3763 - $vrlex->{$lex}{$gbl}[$lex] = 123: no exception ok 3764 - $vrlex->{$lex}{$gbl}[$lex] = 123: value ok 3765 - exists $vrlex->{$lex}{$gbl}[$lex]: no exception ok 3766 - exists $vrlex->{$lex}{$gbl}[$lex]: value ok 3767 - delete $vrlex->{$lex}{$gbl}[$lex]: no exception ok 3768 - delete $vrlex->{$lex}{$gbl}[$lex]: value ok 3769 - $vrgbl->{$lex}{$gbl}[$lex]: no exception ok 3770 - $vrgbl->{$lex}{$gbl}[$lex]: value ok 3771 - $vrgbl->{$lex}{$gbl}[$lex] = 123: no exception ok 3772 - $vrgbl->{$lex}{$gbl}[$lex] = 123: value ok 3773 - exists $vrgbl->{$lex}{$gbl}[$lex]: no exception ok 3774 - exists $vrgbl->{$lex}{$gbl}[$lex]: value ok 3775 - delete $vrgbl->{$lex}{$gbl}[$lex]: no exception ok 3776 - delete $vrgbl->{$lex}{$gbl}[$lex]: value ok 3777 - $vlex{$gbl}{$gbl}[$lex]: no exception ok 3778 - $vlex{$gbl}{$gbl}[$lex]: value ok 3779 - $vlex{$gbl}{$gbl}[$lex] = 123: no exception ok 3780 - $vlex{$gbl}{$gbl}[$lex] = 123: value ok 3781 - exists $vlex{$gbl}{$gbl}[$lex]: no exception ok 3782 - exists $vlex{$gbl}{$gbl}[$lex]: value ok 3783 - delete $vlex{$gbl}{$gbl}[$lex]: no exception ok 3784 - delete $vlex{$gbl}{$gbl}[$lex]: value ok 3785 - $vgbl{$gbl}{$gbl}[$lex]: no exception ok 3786 - $vgbl{$gbl}{$gbl}[$lex]: value ok 3787 - $vgbl{$gbl}{$gbl}[$lex] = 123: no exception ok 3788 - $vgbl{$gbl}{$gbl}[$lex] = 123: value ok 3789 - exists $vgbl{$gbl}{$gbl}[$lex]: no exception ok 3790 - exists $vgbl{$gbl}{$gbl}[$lex]: value ok 3791 - delete $vgbl{$gbl}{$gbl}[$lex]: no exception ok 3792 - delete $vgbl{$gbl}{$gbl}[$lex]: value ok 3793 - $vrlex->{$gbl}{$gbl}[$lex]: no exception ok 3794 - $vrlex->{$gbl}{$gbl}[$lex]: value ok 3795 - $vrlex->{$gbl}{$gbl}[$lex] = 123: no exception ok 3796 - $vrlex->{$gbl}{$gbl}[$lex] = 123: value ok 3797 - exists $vrlex->{$gbl}{$gbl}[$lex]: no exception ok 3798 - exists $vrlex->{$gbl}{$gbl}[$lex]: value ok 3799 - delete $vrlex->{$gbl}{$gbl}[$lex]: no exception ok 3800 - delete $vrlex->{$gbl}{$gbl}[$lex]: value ok 3801 - $vrgbl->{$gbl}{$gbl}[$lex]: no exception ok 3802 - $vrgbl->{$gbl}{$gbl}[$lex]: value ok 3803 - $vrgbl->{$gbl}{$gbl}[$lex] = 123: no exception ok 3804 - $vrgbl->{$gbl}{$gbl}[$lex] = 123: value ok 3805 - exists $vrgbl->{$gbl}{$gbl}[$lex]: no exception ok 3806 - exists $vrgbl->{$gbl}{$gbl}[$lex]: value ok 3807 - delete $vrgbl->{$gbl}{$gbl}[$lex]: no exception ok 3808 - delete $vrgbl->{$gbl}{$gbl}[$lex]: value ok 3809 - $vlex{"x$lex"}{$gbl}[$lex]: no exception ok 3810 - $vlex{"x$lex"}{$gbl}[$lex]: value ok 3811 - $vlex{"x$lex"}{$gbl}[$lex] = 123: no exception ok 3812 - $vlex{"x$lex"}{$gbl}[$lex] = 123: value ok 3813 - exists $vlex{"x$lex"}{$gbl}[$lex]: no exception ok 3814 - exists $vlex{"x$lex"}{$gbl}[$lex]: value ok 3815 - delete $vlex{"x$lex"}{$gbl}[$lex]: no exception ok 3816 - delete $vlex{"x$lex"}{$gbl}[$lex]: value ok 3817 - $vgbl{"x$lex"}{$gbl}[$lex]: no exception ok 3818 - $vgbl{"x$lex"}{$gbl}[$lex]: value ok 3819 - $vgbl{"x$lex"}{$gbl}[$lex] = 123: no exception ok 3820 - $vgbl{"x$lex"}{$gbl}[$lex] = 123: value ok 3821 - exists $vgbl{"x$lex"}{$gbl}[$lex]: no exception ok 3822 - exists $vgbl{"x$lex"}{$gbl}[$lex]: value ok 3823 - delete $vgbl{"x$lex"}{$gbl}[$lex]: no exception ok 3824 - delete $vgbl{"x$lex"}{$gbl}[$lex]: value ok 3825 - $vrlex->{"x$lex"}{$gbl}[$lex]: no exception ok 3826 - $vrlex->{"x$lex"}{$gbl}[$lex]: value ok 3827 - $vrlex->{"x$lex"}{$gbl}[$lex] = 123: no exception ok 3828 - $vrlex->{"x$lex"}{$gbl}[$lex] = 123: value ok 3829 - exists $vrlex->{"x$lex"}{$gbl}[$lex]: no exception ok 3830 - exists $vrlex->{"x$lex"}{$gbl}[$lex]: value ok 3831 - delete $vrlex->{"x$lex"}{$gbl}[$lex]: no exception ok 3832 - delete $vrlex->{"x$lex"}{$gbl}[$lex]: value ok 3833 - $vrgbl->{"x$lex"}{$gbl}[$lex]: no exception ok 3834 - $vrgbl->{"x$lex"}{$gbl}[$lex]: value ok 3835 - $vrgbl->{"x$lex"}{$gbl}[$lex] = 123: no exception ok 3836 - $vrgbl->{"x$lex"}{$gbl}[$lex] = 123: value ok 3837 - exists $vrgbl->{"x$lex"}{$gbl}[$lex]: no exception ok 3838 - exists $vrgbl->{"x$lex"}{$gbl}[$lex]: value ok 3839 - delete $vrgbl->{"x$lex"}{$gbl}[$lex]: no exception ok 3840 - delete $vrgbl->{"x$lex"}{$gbl}[$lex]: value ok 3841 - $vlex[0]{"x$lex"}[$lex]: no exception ok 3842 - $vlex[0]{"x$lex"}[$lex]: value ok 3843 - $vlex[0]{"x$lex"}[$lex] = 123: no exception ok 3844 - $vlex[0]{"x$lex"}[$lex] = 123: value ok 3845 - exists $vlex[0]{"x$lex"}[$lex]: no exception ok 3846 - exists $vlex[0]{"x$lex"}[$lex]: value ok 3847 - delete $vlex[0]{"x$lex"}[$lex]: no exception ok 3848 - delete $vlex[0]{"x$lex"}[$lex]: value ok 3849 - $vgbl[0]{"x$lex"}[$lex]: no exception ok 3850 - $vgbl[0]{"x$lex"}[$lex]: value ok 3851 - $vgbl[0]{"x$lex"}[$lex] = 123: no exception ok 3852 - $vgbl[0]{"x$lex"}[$lex] = 123: value ok 3853 - exists $vgbl[0]{"x$lex"}[$lex]: no exception ok 3854 - exists $vgbl[0]{"x$lex"}[$lex]: value ok 3855 - delete $vgbl[0]{"x$lex"}[$lex]: no exception ok 3856 - delete $vgbl[0]{"x$lex"}[$lex]: value ok 3857 - $vrlex->[0]{"x$lex"}[$lex]: no exception ok 3858 - $vrlex->[0]{"x$lex"}[$lex]: value ok 3859 - $vrlex->[0]{"x$lex"}[$lex] = 123: no exception ok 3860 - $vrlex->[0]{"x$lex"}[$lex] = 123: value ok 3861 - exists $vrlex->[0]{"x$lex"}[$lex]: no exception ok 3862 - exists $vrlex->[0]{"x$lex"}[$lex]: value ok 3863 - delete $vrlex->[0]{"x$lex"}[$lex]: no exception ok 3864 - delete $vrlex->[0]{"x$lex"}[$lex]: value ok 3865 - $vrgbl->[0]{"x$lex"}[$lex]: no exception ok 3866 - $vrgbl->[0]{"x$lex"}[$lex]: value ok 3867 - $vrgbl->[0]{"x$lex"}[$lex] = 123: no exception ok 3868 - $vrgbl->[0]{"x$lex"}[$lex] = 123: value ok 3869 - exists $vrgbl->[0]{"x$lex"}[$lex]: no exception ok 3870 - exists $vrgbl->[0]{"x$lex"}[$lex]: value ok 3871 - delete $vrgbl->[0]{"x$lex"}[$lex]: no exception ok 3872 - delete $vrgbl->[0]{"x$lex"}[$lex]: value ok 3873 - $vlex[$lex]{"x$lex"}[$lex]: no exception ok 3874 - $vlex[$lex]{"x$lex"}[$lex]: value ok 3875 - $vlex[$lex]{"x$lex"}[$lex] = 123: no exception ok 3876 - $vlex[$lex]{"x$lex"}[$lex] = 123: value ok 3877 - exists $vlex[$lex]{"x$lex"}[$lex]: no exception ok 3878 - exists $vlex[$lex]{"x$lex"}[$lex]: value ok 3879 - delete $vlex[$lex]{"x$lex"}[$lex]: no exception ok 3880 - delete $vlex[$lex]{"x$lex"}[$lex]: value ok 3881 - $vgbl[$lex]{"x$lex"}[$lex]: no exception ok 3882 - $vgbl[$lex]{"x$lex"}[$lex]: value ok 3883 - $vgbl[$lex]{"x$lex"}[$lex] = 123: no exception ok 3884 - $vgbl[$lex]{"x$lex"}[$lex] = 123: value ok 3885 - exists $vgbl[$lex]{"x$lex"}[$lex]: no exception ok 3886 - exists $vgbl[$lex]{"x$lex"}[$lex]: value ok 3887 - delete $vgbl[$lex]{"x$lex"}[$lex]: no exception ok 3888 - delete $vgbl[$lex]{"x$lex"}[$lex]: value ok 3889 - $vrlex->[$lex]{"x$lex"}[$lex]: no exception ok 3890 - $vrlex->[$lex]{"x$lex"}[$lex]: value ok 3891 - $vrlex->[$lex]{"x$lex"}[$lex] = 123: no exception ok 3892 - $vrlex->[$lex]{"x$lex"}[$lex] = 123: value ok 3893 - exists $vrlex->[$lex]{"x$lex"}[$lex]: no exception ok 3894 - exists $vrlex->[$lex]{"x$lex"}[$lex]: value ok 3895 - delete $vrlex->[$lex]{"x$lex"}[$lex]: no exception ok 3896 - delete $vrlex->[$lex]{"x$lex"}[$lex]: value ok 3897 - $vrgbl->[$lex]{"x$lex"}[$lex]: no exception ok 3898 - $vrgbl->[$lex]{"x$lex"}[$lex]: value ok 3899 - $vrgbl->[$lex]{"x$lex"}[$lex] = 123: no exception ok 3900 - $vrgbl->[$lex]{"x$lex"}[$lex] = 123: value ok 3901 - exists $vrgbl->[$lex]{"x$lex"}[$lex]: no exception ok 3902 - exists $vrgbl->[$lex]{"x$lex"}[$lex]: value ok 3903 - delete $vrgbl->[$lex]{"x$lex"}[$lex]: no exception ok 3904 - delete $vrgbl->[$lex]{"x$lex"}[$lex]: value ok 3905 - $vlex[$gbl]{"x$lex"}[$lex]: no exception ok 3906 - $vlex[$gbl]{"x$lex"}[$lex]: value ok 3907 - $vlex[$gbl]{"x$lex"}[$lex] = 123: no exception ok 3908 - $vlex[$gbl]{"x$lex"}[$lex] = 123: value ok 3909 - exists $vlex[$gbl]{"x$lex"}[$lex]: no exception ok 3910 - exists $vlex[$gbl]{"x$lex"}[$lex]: value ok 3911 - delete $vlex[$gbl]{"x$lex"}[$lex]: no exception ok 3912 - delete $vlex[$gbl]{"x$lex"}[$lex]: value ok 3913 - $vgbl[$gbl]{"x$lex"}[$lex]: no exception ok 3914 - $vgbl[$gbl]{"x$lex"}[$lex]: value ok 3915 - $vgbl[$gbl]{"x$lex"}[$lex] = 123: no exception ok 3916 - $vgbl[$gbl]{"x$lex"}[$lex] = 123: value ok 3917 - exists $vgbl[$gbl]{"x$lex"}[$lex]: no exception ok 3918 - exists $vgbl[$gbl]{"x$lex"}[$lex]: value ok 3919 - delete $vgbl[$gbl]{"x$lex"}[$lex]: no exception ok 3920 - delete $vgbl[$gbl]{"x$lex"}[$lex]: value ok 3921 - $vrlex->[$gbl]{"x$lex"}[$lex]: no exception ok 3922 - $vrlex->[$gbl]{"x$lex"}[$lex]: value ok 3923 - $vrlex->[$gbl]{"x$lex"}[$lex] = 123: no exception ok 3924 - $vrlex->[$gbl]{"x$lex"}[$lex] = 123: value ok 3925 - exists $vrlex->[$gbl]{"x$lex"}[$lex]: no exception ok 3926 - exists $vrlex->[$gbl]{"x$lex"}[$lex]: value ok 3927 - delete $vrlex->[$gbl]{"x$lex"}[$lex]: no exception ok 3928 - delete $vrlex->[$gbl]{"x$lex"}[$lex]: value ok 3929 - $vrgbl->[$gbl]{"x$lex"}[$lex]: no exception ok 3930 - $vrgbl->[$gbl]{"x$lex"}[$lex]: value ok 3931 - $vrgbl->[$gbl]{"x$lex"}[$lex] = 123: no exception ok 3932 - $vrgbl->[$gbl]{"x$lex"}[$lex] = 123: value ok 3933 - exists $vrgbl->[$gbl]{"x$lex"}[$lex]: no exception ok 3934 - exists $vrgbl->[$gbl]{"x$lex"}[$lex]: value ok 3935 - delete $vrgbl->[$gbl]{"x$lex"}[$lex]: no exception ok 3936 - delete $vrgbl->[$gbl]{"x$lex"}[$lex]: value ok 3937 - $vlex[$lex+1]{"x$lex"}[$lex]: no exception ok 3938 - $vlex[$lex+1]{"x$lex"}[$lex]: value ok 3939 - $vlex[$lex+1]{"x$lex"}[$lex] = 123: no exception ok 3940 - $vlex[$lex+1]{"x$lex"}[$lex] = 123: value ok 3941 - exists $vlex[$lex+1]{"x$lex"}[$lex]: no exception ok 3942 - exists $vlex[$lex+1]{"x$lex"}[$lex]: value ok 3943 - delete $vlex[$lex+1]{"x$lex"}[$lex]: no exception ok 3944 - delete $vlex[$lex+1]{"x$lex"}[$lex]: value ok 3945 - $vgbl[$lex+1]{"x$lex"}[$lex]: no exception ok 3946 - $vgbl[$lex+1]{"x$lex"}[$lex]: value ok 3947 - $vgbl[$lex+1]{"x$lex"}[$lex] = 123: no exception ok 3948 - $vgbl[$lex+1]{"x$lex"}[$lex] = 123: value ok 3949 - exists $vgbl[$lex+1]{"x$lex"}[$lex]: no exception ok 3950 - exists $vgbl[$lex+1]{"x$lex"}[$lex]: value ok 3951 - delete $vgbl[$lex+1]{"x$lex"}[$lex]: no exception ok 3952 - delete $vgbl[$lex+1]{"x$lex"}[$lex]: value ok 3953 - $vrlex->[$lex+1]{"x$lex"}[$lex]: no exception ok 3954 - $vrlex->[$lex+1]{"x$lex"}[$lex]: value ok 3955 - $vrlex->[$lex+1]{"x$lex"}[$lex] = 123: no exception ok 3956 - $vrlex->[$lex+1]{"x$lex"}[$lex] = 123: value ok 3957 - exists $vrlex->[$lex+1]{"x$lex"}[$lex]: no exception ok 3958 - exists $vrlex->[$lex+1]{"x$lex"}[$lex]: value ok 3959 - delete $vrlex->[$lex+1]{"x$lex"}[$lex]: no exception ok 3960 - delete $vrlex->[$lex+1]{"x$lex"}[$lex]: value ok 3961 - $vrgbl->[$lex+1]{"x$lex"}[$lex]: no exception ok 3962 - $vrgbl->[$lex+1]{"x$lex"}[$lex]: value ok 3963 - $vrgbl->[$lex+1]{"x$lex"}[$lex] = 123: no exception ok 3964 - $vrgbl->[$lex+1]{"x$lex"}[$lex] = 123: value ok 3965 - exists $vrgbl->[$lex+1]{"x$lex"}[$lex]: no exception ok 3966 - exists $vrgbl->[$lex+1]{"x$lex"}[$lex]: value ok 3967 - delete $vrgbl->[$lex+1]{"x$lex"}[$lex]: no exception ok 3968 - delete $vrgbl->[$lex+1]{"x$lex"}[$lex]: value ok 3969 - $vlex{foo}{"x$lex"}[$lex]: no exception ok 3970 - $vlex{foo}{"x$lex"}[$lex]: value ok 3971 - $vlex{foo}{"x$lex"}[$lex] = 123: no exception ok 3972 - $vlex{foo}{"x$lex"}[$lex] = 123: value ok 3973 - exists $vlex{foo}{"x$lex"}[$lex]: no exception ok 3974 - exists $vlex{foo}{"x$lex"}[$lex]: value ok 3975 - delete $vlex{foo}{"x$lex"}[$lex]: no exception ok 3976 - delete $vlex{foo}{"x$lex"}[$lex]: value ok 3977 - $vgbl{foo}{"x$lex"}[$lex]: no exception ok 3978 - $vgbl{foo}{"x$lex"}[$lex]: value ok 3979 - $vgbl{foo}{"x$lex"}[$lex] = 123: no exception ok 3980 - $vgbl{foo}{"x$lex"}[$lex] = 123: value ok 3981 - exists $vgbl{foo}{"x$lex"}[$lex]: no exception ok 3982 - exists $vgbl{foo}{"x$lex"}[$lex]: value ok 3983 - delete $vgbl{foo}{"x$lex"}[$lex]: no exception ok 3984 - delete $vgbl{foo}{"x$lex"}[$lex]: value ok 3985 - $vrlex->{foo}{"x$lex"}[$lex]: no exception ok 3986 - $vrlex->{foo}{"x$lex"}[$lex]: value ok 3987 - $vrlex->{foo}{"x$lex"}[$lex] = 123: no exception ok 3988 - $vrlex->{foo}{"x$lex"}[$lex] = 123: value ok 3989 - exists $vrlex->{foo}{"x$lex"}[$lex]: no exception ok 3990 - exists $vrlex->{foo}{"x$lex"}[$lex]: value ok 3991 - delete $vrlex->{foo}{"x$lex"}[$lex]: no exception ok 3992 - delete $vrlex->{foo}{"x$lex"}[$lex]: value ok 3993 - $vrgbl->{foo}{"x$lex"}[$lex]: no exception ok 3994 - $vrgbl->{foo}{"x$lex"}[$lex]: value ok 3995 - $vrgbl->{foo}{"x$lex"}[$lex] = 123: no exception ok 3996 - $vrgbl->{foo}{"x$lex"}[$lex] = 123: value ok 3997 - exists $vrgbl->{foo}{"x$lex"}[$lex]: no exception ok 3998 - exists $vrgbl->{foo}{"x$lex"}[$lex]: value ok 3999 - delete $vrgbl->{foo}{"x$lex"}[$lex]: no exception ok 4000 - delete $vrgbl->{foo}{"x$lex"}[$lex]: value ok 4001 - $vlex{$lex}{"x$lex"}[$lex]: no exception ok 4002 - $vlex{$lex}{"x$lex"}[$lex]: value ok 4003 - $vlex{$lex}{"x$lex"}[$lex] = 123: no exception ok 4004 - $vlex{$lex}{"x$lex"}[$lex] = 123: value ok 4005 - exists $vlex{$lex}{"x$lex"}[$lex]: no exception ok 4006 - exists $vlex{$lex}{"x$lex"}[$lex]: value ok 4007 - delete $vlex{$lex}{"x$lex"}[$lex]: no exception ok 4008 - delete $vlex{$lex}{"x$lex"}[$lex]: value ok 4009 - $vgbl{$lex}{"x$lex"}[$lex]: no exception ok 4010 - $vgbl{$lex}{"x$lex"}[$lex]: value ok 4011 - $vgbl{$lex}{"x$lex"}[$lex] = 123: no exception ok 4012 - $vgbl{$lex}{"x$lex"}[$lex] = 123: value ok 4013 - exists $vgbl{$lex}{"x$lex"}[$lex]: no exception ok 4014 - exists $vgbl{$lex}{"x$lex"}[$lex]: value ok 4015 - delete $vgbl{$lex}{"x$lex"}[$lex]: no exception ok 4016 - delete $vgbl{$lex}{"x$lex"}[$lex]: value ok 4017 - $vrlex->{$lex}{"x$lex"}[$lex]: no exception ok 4018 - $vrlex->{$lex}{"x$lex"}[$lex]: value ok 4019 - $vrlex->{$lex}{"x$lex"}[$lex] = 123: no exception ok 4020 - $vrlex->{$lex}{"x$lex"}[$lex] = 123: value ok 4021 - exists $vrlex->{$lex}{"x$lex"}[$lex]: no exception ok 4022 - exists $vrlex->{$lex}{"x$lex"}[$lex]: value ok 4023 - delete $vrlex->{$lex}{"x$lex"}[$lex]: no exception ok 4024 - delete $vrlex->{$lex}{"x$lex"}[$lex]: value ok 4025 - $vrgbl->{$lex}{"x$lex"}[$lex]: no exception ok 4026 - $vrgbl->{$lex}{"x$lex"}[$lex]: value ok 4027 - $vrgbl->{$lex}{"x$lex"}[$lex] = 123: no exception ok 4028 - $vrgbl->{$lex}{"x$lex"}[$lex] = 123: value ok 4029 - exists $vrgbl->{$lex}{"x$lex"}[$lex]: no exception ok 4030 - exists $vrgbl->{$lex}{"x$lex"}[$lex]: value ok 4031 - delete $vrgbl->{$lex}{"x$lex"}[$lex]: no exception ok 4032 - delete $vrgbl->{$lex}{"x$lex"}[$lex]: value ok 4033 - $vlex{$gbl}{"x$lex"}[$lex]: no exception ok 4034 - $vlex{$gbl}{"x$lex"}[$lex]: value ok 4035 - $vlex{$gbl}{"x$lex"}[$lex] = 123: no exception ok 4036 - $vlex{$gbl}{"x$lex"}[$lex] = 123: value ok 4037 - exists $vlex{$gbl}{"x$lex"}[$lex]: no exception ok 4038 - exists $vlex{$gbl}{"x$lex"}[$lex]: value ok 4039 - delete $vlex{$gbl}{"x$lex"}[$lex]: no exception ok 4040 - delete $vlex{$gbl}{"x$lex"}[$lex]: value ok 4041 - $vgbl{$gbl}{"x$lex"}[$lex]: no exception ok 4042 - $vgbl{$gbl}{"x$lex"}[$lex]: value ok 4043 - $vgbl{$gbl}{"x$lex"}[$lex] = 123: no exception ok 4044 - $vgbl{$gbl}{"x$lex"}[$lex] = 123: value ok 4045 - exists $vgbl{$gbl}{"x$lex"}[$lex]: no exception ok 4046 - exists $vgbl{$gbl}{"x$lex"}[$lex]: value ok 4047 - delete $vgbl{$gbl}{"x$lex"}[$lex]: no exception ok 4048 - delete $vgbl{$gbl}{"x$lex"}[$lex]: value ok 4049 - $vrlex->{$gbl}{"x$lex"}[$lex]: no exception ok 4050 - $vrlex->{$gbl}{"x$lex"}[$lex]: value ok 4051 - $vrlex->{$gbl}{"x$lex"}[$lex] = 123: no exception ok 4052 - $vrlex->{$gbl}{"x$lex"}[$lex] = 123: value ok 4053 - exists $vrlex->{$gbl}{"x$lex"}[$lex]: no exception ok 4054 - exists $vrlex->{$gbl}{"x$lex"}[$lex]: value ok 4055 - delete $vrlex->{$gbl}{"x$lex"}[$lex]: no exception ok 4056 - delete $vrlex->{$gbl}{"x$lex"}[$lex]: value ok 4057 - $vrgbl->{$gbl}{"x$lex"}[$lex]: no exception ok 4058 - $vrgbl->{$gbl}{"x$lex"}[$lex]: value ok 4059 - $vrgbl->{$gbl}{"x$lex"}[$lex] = 123: no exception ok 4060 - $vrgbl->{$gbl}{"x$lex"}[$lex] = 123: value ok 4061 - exists $vrgbl->{$gbl}{"x$lex"}[$lex]: no exception ok 4062 - exists $vrgbl->{$gbl}{"x$lex"}[$lex]: value ok 4063 - delete $vrgbl->{$gbl}{"x$lex"}[$lex]: no exception ok 4064 - delete $vrgbl->{$gbl}{"x$lex"}[$lex]: value ok 4065 - $vlex{"x$lex"}{"x$lex"}[$lex]: no exception ok 4066 - $vlex{"x$lex"}{"x$lex"}[$lex]: value ok 4067 - $vlex{"x$lex"}{"x$lex"}[$lex] = 123: no exception ok 4068 - $vlex{"x$lex"}{"x$lex"}[$lex] = 123: value ok 4069 - exists $vlex{"x$lex"}{"x$lex"}[$lex]: no exception ok 4070 - exists $vlex{"x$lex"}{"x$lex"}[$lex]: value ok 4071 - delete $vlex{"x$lex"}{"x$lex"}[$lex]: no exception ok 4072 - delete $vlex{"x$lex"}{"x$lex"}[$lex]: value ok 4073 - $vgbl{"x$lex"}{"x$lex"}[$lex]: no exception ok 4074 - $vgbl{"x$lex"}{"x$lex"}[$lex]: value ok 4075 - $vgbl{"x$lex"}{"x$lex"}[$lex] = 123: no exception ok 4076 - $vgbl{"x$lex"}{"x$lex"}[$lex] = 123: value ok 4077 - exists $vgbl{"x$lex"}{"x$lex"}[$lex]: no exception ok 4078 - exists $vgbl{"x$lex"}{"x$lex"}[$lex]: value ok 4079 - delete $vgbl{"x$lex"}{"x$lex"}[$lex]: no exception ok 4080 - delete $vgbl{"x$lex"}{"x$lex"}[$lex]: value ok 4081 - $vrlex->{"x$lex"}{"x$lex"}[$lex]: no exception ok 4082 - $vrlex->{"x$lex"}{"x$lex"}[$lex]: value ok 4083 - $vrlex->{"x$lex"}{"x$lex"}[$lex] = 123: no exception ok 4084 - $vrlex->{"x$lex"}{"x$lex"}[$lex] = 123: value ok 4085 - exists $vrlex->{"x$lex"}{"x$lex"}[$lex]: no exception ok 4086 - exists $vrlex->{"x$lex"}{"x$lex"}[$lex]: value ok 4087 - delete $vrlex->{"x$lex"}{"x$lex"}[$lex]: no exception ok 4088 - delete $vrlex->{"x$lex"}{"x$lex"}[$lex]: value ok 4089 - $vrgbl->{"x$lex"}{"x$lex"}[$lex]: no exception ok 4090 - $vrgbl->{"x$lex"}{"x$lex"}[$lex]: value ok 4091 - $vrgbl->{"x$lex"}{"x$lex"}[$lex] = 123: no exception ok 4092 - $vrgbl->{"x$lex"}{"x$lex"}[$lex] = 123: value ok 4093 - exists $vrgbl->{"x$lex"}{"x$lex"}[$lex]: no exception ok 4094 - exists $vrgbl->{"x$lex"}{"x$lex"}[$lex]: value ok 4095 - delete $vrgbl->{"x$lex"}{"x$lex"}[$lex]: no exception ok 4096 - delete $vrgbl->{"x$lex"}{"x$lex"}[$lex]: value ok 4097 - $vlex[0][0][$gbl]: no exception ok 4098 - $vlex[0][0][$gbl]: value ok 4099 - $vlex[0][0][$gbl] = 123: no exception ok 4100 - $vlex[0][0][$gbl] = 123: value ok 4101 - exists $vlex[0][0][$gbl]: no exception ok 4102 - exists $vlex[0][0][$gbl]: value ok 4103 - delete $vlex[0][0][$gbl]: no exception ok 4104 - delete $vlex[0][0][$gbl]: value ok 4105 - $vgbl[0][0][$gbl]: no exception ok 4106 - $vgbl[0][0][$gbl]: value ok 4107 - $vgbl[0][0][$gbl] = 123: no exception ok 4108 - $vgbl[0][0][$gbl] = 123: value ok 4109 - exists $vgbl[0][0][$gbl]: no exception ok 4110 - exists $vgbl[0][0][$gbl]: value ok 4111 - delete $vgbl[0][0][$gbl]: no exception ok 4112 - delete $vgbl[0][0][$gbl]: value ok 4113 - $vrlex->[0][0][$gbl]: no exception ok 4114 - $vrlex->[0][0][$gbl]: value ok 4115 - $vrlex->[0][0][$gbl] = 123: no exception ok 4116 - $vrlex->[0][0][$gbl] = 123: value ok 4117 - exists $vrlex->[0][0][$gbl]: no exception ok 4118 - exists $vrlex->[0][0][$gbl]: value ok 4119 - delete $vrlex->[0][0][$gbl]: no exception ok 4120 - delete $vrlex->[0][0][$gbl]: value ok 4121 - $vrgbl->[0][0][$gbl]: no exception ok 4122 - $vrgbl->[0][0][$gbl]: value ok 4123 - $vrgbl->[0][0][$gbl] = 123: no exception ok 4124 - $vrgbl->[0][0][$gbl] = 123: value ok 4125 - exists $vrgbl->[0][0][$gbl]: no exception ok 4126 - exists $vrgbl->[0][0][$gbl]: value ok 4127 - delete $vrgbl->[0][0][$gbl]: no exception ok 4128 - delete $vrgbl->[0][0][$gbl]: value ok 4129 - $vlex[$lex][0][$gbl]: no exception ok 4130 - $vlex[$lex][0][$gbl]: value ok 4131 - $vlex[$lex][0][$gbl] = 123: no exception ok 4132 - $vlex[$lex][0][$gbl] = 123: value ok 4133 - exists $vlex[$lex][0][$gbl]: no exception ok 4134 - exists $vlex[$lex][0][$gbl]: value ok 4135 - delete $vlex[$lex][0][$gbl]: no exception ok 4136 - delete $vlex[$lex][0][$gbl]: value ok 4137 - $vgbl[$lex][0][$gbl]: no exception ok 4138 - $vgbl[$lex][0][$gbl]: value ok 4139 - $vgbl[$lex][0][$gbl] = 123: no exception ok 4140 - $vgbl[$lex][0][$gbl] = 123: value ok 4141 - exists $vgbl[$lex][0][$gbl]: no exception ok 4142 - exists $vgbl[$lex][0][$gbl]: value ok 4143 - delete $vgbl[$lex][0][$gbl]: no exception ok 4144 - delete $vgbl[$lex][0][$gbl]: value ok 4145 - $vrlex->[$lex][0][$gbl]: no exception ok 4146 - $vrlex->[$lex][0][$gbl]: value ok 4147 - $vrlex->[$lex][0][$gbl] = 123: no exception ok 4148 - $vrlex->[$lex][0][$gbl] = 123: value ok 4149 - exists $vrlex->[$lex][0][$gbl]: no exception ok 4150 - exists $vrlex->[$lex][0][$gbl]: value ok 4151 - delete $vrlex->[$lex][0][$gbl]: no exception ok 4152 - delete $vrlex->[$lex][0][$gbl]: value ok 4153 - $vrgbl->[$lex][0][$gbl]: no exception ok 4154 - $vrgbl->[$lex][0][$gbl]: value ok 4155 - $vrgbl->[$lex][0][$gbl] = 123: no exception ok 4156 - $vrgbl->[$lex][0][$gbl] = 123: value ok 4157 - exists $vrgbl->[$lex][0][$gbl]: no exception ok 4158 - exists $vrgbl->[$lex][0][$gbl]: value ok 4159 - delete $vrgbl->[$lex][0][$gbl]: no exception ok 4160 - delete $vrgbl->[$lex][0][$gbl]: value ok 4161 - $vlex[$gbl][0][$gbl]: no exception ok 4162 - $vlex[$gbl][0][$gbl]: value ok 4163 - $vlex[$gbl][0][$gbl] = 123: no exception ok 4164 - $vlex[$gbl][0][$gbl] = 123: value ok 4165 - exists $vlex[$gbl][0][$gbl]: no exception ok 4166 - exists $vlex[$gbl][0][$gbl]: value ok 4167 - delete $vlex[$gbl][0][$gbl]: no exception ok 4168 - delete $vlex[$gbl][0][$gbl]: value ok 4169 - $vgbl[$gbl][0][$gbl]: no exception ok 4170 - $vgbl[$gbl][0][$gbl]: value ok 4171 - $vgbl[$gbl][0][$gbl] = 123: no exception ok 4172 - $vgbl[$gbl][0][$gbl] = 123: value ok 4173 - exists $vgbl[$gbl][0][$gbl]: no exception ok 4174 - exists $vgbl[$gbl][0][$gbl]: value ok 4175 - delete $vgbl[$gbl][0][$gbl]: no exception ok 4176 - delete $vgbl[$gbl][0][$gbl]: value ok 4177 - $vrlex->[$gbl][0][$gbl]: no exception ok 4178 - $vrlex->[$gbl][0][$gbl]: value ok 4179 - $vrlex->[$gbl][0][$gbl] = 123: no exception ok 4180 - $vrlex->[$gbl][0][$gbl] = 123: value ok 4181 - exists $vrlex->[$gbl][0][$gbl]: no exception ok 4182 - exists $vrlex->[$gbl][0][$gbl]: value ok 4183 - delete $vrlex->[$gbl][0][$gbl]: no exception ok 4184 - delete $vrlex->[$gbl][0][$gbl]: value ok 4185 - $vrgbl->[$gbl][0][$gbl]: no exception ok 4186 - $vrgbl->[$gbl][0][$gbl]: value ok 4187 - $vrgbl->[$gbl][0][$gbl] = 123: no exception ok 4188 - $vrgbl->[$gbl][0][$gbl] = 123: value ok 4189 - exists $vrgbl->[$gbl][0][$gbl]: no exception ok 4190 - exists $vrgbl->[$gbl][0][$gbl]: value ok 4191 - delete $vrgbl->[$gbl][0][$gbl]: no exception ok 4192 - delete $vrgbl->[$gbl][0][$gbl]: value ok 4193 - $vlex[$lex+1][0][$gbl]: no exception ok 4194 - $vlex[$lex+1][0][$gbl]: value ok 4195 - $vlex[$lex+1][0][$gbl] = 123: no exception ok 4196 - $vlex[$lex+1][0][$gbl] = 123: value ok 4197 - exists $vlex[$lex+1][0][$gbl]: no exception ok 4198 - exists $vlex[$lex+1][0][$gbl]: value ok 4199 - delete $vlex[$lex+1][0][$gbl]: no exception ok 4200 - delete $vlex[$lex+1][0][$gbl]: value ok 4201 - $vgbl[$lex+1][0][$gbl]: no exception ok 4202 - $vgbl[$lex+1][0][$gbl]: value ok 4203 - $vgbl[$lex+1][0][$gbl] = 123: no exception ok 4204 - $vgbl[$lex+1][0][$gbl] = 123: value ok 4205 - exists $vgbl[$lex+1][0][$gbl]: no exception ok 4206 - exists $vgbl[$lex+1][0][$gbl]: value ok 4207 - delete $vgbl[$lex+1][0][$gbl]: no exception ok 4208 - delete $vgbl[$lex+1][0][$gbl]: value ok 4209 - $vrlex->[$lex+1][0][$gbl]: no exception ok 4210 - $vrlex->[$lex+1][0][$gbl]: value ok 4211 - $vrlex->[$lex+1][0][$gbl] = 123: no exception ok 4212 - $vrlex->[$lex+1][0][$gbl] = 123: value ok 4213 - exists $vrlex->[$lex+1][0][$gbl]: no exception ok 4214 - exists $vrlex->[$lex+1][0][$gbl]: value ok 4215 - delete $vrlex->[$lex+1][0][$gbl]: no exception ok 4216 - delete $vrlex->[$lex+1][0][$gbl]: value ok 4217 - $vrgbl->[$lex+1][0][$gbl]: no exception ok 4218 - $vrgbl->[$lex+1][0][$gbl]: value ok 4219 - $vrgbl->[$lex+1][0][$gbl] = 123: no exception ok 4220 - $vrgbl->[$lex+1][0][$gbl] = 123: value ok 4221 - exists $vrgbl->[$lex+1][0][$gbl]: no exception ok 4222 - exists $vrgbl->[$lex+1][0][$gbl]: value ok 4223 - delete $vrgbl->[$lex+1][0][$gbl]: no exception ok 4224 - delete $vrgbl->[$lex+1][0][$gbl]: value ok 4225 - $vlex{foo}[0][$gbl]: no exception ok 4226 - $vlex{foo}[0][$gbl]: value ok 4227 - $vlex{foo}[0][$gbl] = 123: no exception ok 4228 - $vlex{foo}[0][$gbl] = 123: value ok 4229 - exists $vlex{foo}[0][$gbl]: no exception ok 4230 - exists $vlex{foo}[0][$gbl]: value ok 4231 - delete $vlex{foo}[0][$gbl]: no exception ok 4232 - delete $vlex{foo}[0][$gbl]: value ok 4233 - $vgbl{foo}[0][$gbl]: no exception ok 4234 - $vgbl{foo}[0][$gbl]: value ok 4235 - $vgbl{foo}[0][$gbl] = 123: no exception ok 4236 - $vgbl{foo}[0][$gbl] = 123: value ok 4237 - exists $vgbl{foo}[0][$gbl]: no exception ok 4238 - exists $vgbl{foo}[0][$gbl]: value ok 4239 - delete $vgbl{foo}[0][$gbl]: no exception ok 4240 - delete $vgbl{foo}[0][$gbl]: value ok 4241 - $vrlex->{foo}[0][$gbl]: no exception ok 4242 - $vrlex->{foo}[0][$gbl]: value ok 4243 - $vrlex->{foo}[0][$gbl] = 123: no exception ok 4244 - $vrlex->{foo}[0][$gbl] = 123: value ok 4245 - exists $vrlex->{foo}[0][$gbl]: no exception ok 4246 - exists $vrlex->{foo}[0][$gbl]: value ok 4247 - delete $vrlex->{foo}[0][$gbl]: no exception ok 4248 - delete $vrlex->{foo}[0][$gbl]: value ok 4249 - $vrgbl->{foo}[0][$gbl]: no exception ok 4250 - $vrgbl->{foo}[0][$gbl]: value ok 4251 - $vrgbl->{foo}[0][$gbl] = 123: no exception ok 4252 - $vrgbl->{foo}[0][$gbl] = 123: value ok 4253 - exists $vrgbl->{foo}[0][$gbl]: no exception ok 4254 - exists $vrgbl->{foo}[0][$gbl]: value ok 4255 - delete $vrgbl->{foo}[0][$gbl]: no exception ok 4256 - delete $vrgbl->{foo}[0][$gbl]: value ok 4257 - $vlex{$lex}[0][$gbl]: no exception ok 4258 - $vlex{$lex}[0][$gbl]: value ok 4259 - $vlex{$lex}[0][$gbl] = 123: no exception ok 4260 - $vlex{$lex}[0][$gbl] = 123: value ok 4261 - exists $vlex{$lex}[0][$gbl]: no exception ok 4262 - exists $vlex{$lex}[0][$gbl]: value ok 4263 - delete $vlex{$lex}[0][$gbl]: no exception ok 4264 - delete $vlex{$lex}[0][$gbl]: value ok 4265 - $vgbl{$lex}[0][$gbl]: no exception ok 4266 - $vgbl{$lex}[0][$gbl]: value ok 4267 - $vgbl{$lex}[0][$gbl] = 123: no exception ok 4268 - $vgbl{$lex}[0][$gbl] = 123: value ok 4269 - exists $vgbl{$lex}[0][$gbl]: no exception ok 4270 - exists $vgbl{$lex}[0][$gbl]: value ok 4271 - delete $vgbl{$lex}[0][$gbl]: no exception ok 4272 - delete $vgbl{$lex}[0][$gbl]: value ok 4273 - $vrlex->{$lex}[0][$gbl]: no exception ok 4274 - $vrlex->{$lex}[0][$gbl]: value ok 4275 - $vrlex->{$lex}[0][$gbl] = 123: no exception ok 4276 - $vrlex->{$lex}[0][$gbl] = 123: value ok 4277 - exists $vrlex->{$lex}[0][$gbl]: no exception ok 4278 - exists $vrlex->{$lex}[0][$gbl]: value ok 4279 - delete $vrlex->{$lex}[0][$gbl]: no exception ok 4280 - delete $vrlex->{$lex}[0][$gbl]: value ok 4281 - $vrgbl->{$lex}[0][$gbl]: no exception ok 4282 - $vrgbl->{$lex}[0][$gbl]: value ok 4283 - $vrgbl->{$lex}[0][$gbl] = 123: no exception ok 4284 - $vrgbl->{$lex}[0][$gbl] = 123: value ok 4285 - exists $vrgbl->{$lex}[0][$gbl]: no exception ok 4286 - exists $vrgbl->{$lex}[0][$gbl]: value ok 4287 - delete $vrgbl->{$lex}[0][$gbl]: no exception ok 4288 - delete $vrgbl->{$lex}[0][$gbl]: value ok 4289 - $vlex{$gbl}[0][$gbl]: no exception ok 4290 - $vlex{$gbl}[0][$gbl]: value ok 4291 - $vlex{$gbl}[0][$gbl] = 123: no exception ok 4292 - $vlex{$gbl}[0][$gbl] = 123: value ok 4293 - exists $vlex{$gbl}[0][$gbl]: no exception ok 4294 - exists $vlex{$gbl}[0][$gbl]: value ok 4295 - delete $vlex{$gbl}[0][$gbl]: no exception ok 4296 - delete $vlex{$gbl}[0][$gbl]: value ok 4297 - $vgbl{$gbl}[0][$gbl]: no exception ok 4298 - $vgbl{$gbl}[0][$gbl]: value ok 4299 - $vgbl{$gbl}[0][$gbl] = 123: no exception ok 4300 - $vgbl{$gbl}[0][$gbl] = 123: value ok 4301 - exists $vgbl{$gbl}[0][$gbl]: no exception ok 4302 - exists $vgbl{$gbl}[0][$gbl]: value ok 4303 - delete $vgbl{$gbl}[0][$gbl]: no exception ok 4304 - delete $vgbl{$gbl}[0][$gbl]: value ok 4305 - $vrlex->{$gbl}[0][$gbl]: no exception ok 4306 - $vrlex->{$gbl}[0][$gbl]: value ok 4307 - $vrlex->{$gbl}[0][$gbl] = 123: no exception ok 4308 - $vrlex->{$gbl}[0][$gbl] = 123: value ok 4309 - exists $vrlex->{$gbl}[0][$gbl]: no exception ok 4310 - exists $vrlex->{$gbl}[0][$gbl]: value ok 4311 - delete $vrlex->{$gbl}[0][$gbl]: no exception ok 4312 - delete $vrlex->{$gbl}[0][$gbl]: value ok 4313 - $vrgbl->{$gbl}[0][$gbl]: no exception ok 4314 - $vrgbl->{$gbl}[0][$gbl]: value ok 4315 - $vrgbl->{$gbl}[0][$gbl] = 123: no exception ok 4316 - $vrgbl->{$gbl}[0][$gbl] = 123: value ok 4317 - exists $vrgbl->{$gbl}[0][$gbl]: no exception ok 4318 - exists $vrgbl->{$gbl}[0][$gbl]: value ok 4319 - delete $vrgbl->{$gbl}[0][$gbl]: no exception ok 4320 - delete $vrgbl->{$gbl}[0][$gbl]: value ok 4321 - $vlex{"x$lex"}[0][$gbl]: no exception ok 4322 - $vlex{"x$lex"}[0][$gbl]: value ok 4323 - $vlex{"x$lex"}[0][$gbl] = 123: no exception ok 4324 - $vlex{"x$lex"}[0][$gbl] = 123: value ok 4325 - exists $vlex{"x$lex"}[0][$gbl]: no exception ok 4326 - exists $vlex{"x$lex"}[0][$gbl]: value ok 4327 - delete $vlex{"x$lex"}[0][$gbl]: no exception ok 4328 - delete $vlex{"x$lex"}[0][$gbl]: value ok 4329 - $vgbl{"x$lex"}[0][$gbl]: no exception ok 4330 - $vgbl{"x$lex"}[0][$gbl]: value ok 4331 - $vgbl{"x$lex"}[0][$gbl] = 123: no exception ok 4332 - $vgbl{"x$lex"}[0][$gbl] = 123: value ok 4333 - exists $vgbl{"x$lex"}[0][$gbl]: no exception ok 4334 - exists $vgbl{"x$lex"}[0][$gbl]: value ok 4335 - delete $vgbl{"x$lex"}[0][$gbl]: no exception ok 4336 - delete $vgbl{"x$lex"}[0][$gbl]: value ok 4337 - $vrlex->{"x$lex"}[0][$gbl]: no exception ok 4338 - $vrlex->{"x$lex"}[0][$gbl]: value ok 4339 - $vrlex->{"x$lex"}[0][$gbl] = 123: no exception ok 4340 - $vrlex->{"x$lex"}[0][$gbl] = 123: value ok 4341 - exists $vrlex->{"x$lex"}[0][$gbl]: no exception ok 4342 - exists $vrlex->{"x$lex"}[0][$gbl]: value ok 4343 - delete $vrlex->{"x$lex"}[0][$gbl]: no exception ok 4344 - delete $vrlex->{"x$lex"}[0][$gbl]: value ok 4345 - $vrgbl->{"x$lex"}[0][$gbl]: no exception ok 4346 - $vrgbl->{"x$lex"}[0][$gbl]: value ok 4347 - $vrgbl->{"x$lex"}[0][$gbl] = 123: no exception ok 4348 - $vrgbl->{"x$lex"}[0][$gbl] = 123: value ok 4349 - exists $vrgbl->{"x$lex"}[0][$gbl]: no exception ok 4350 - exists $vrgbl->{"x$lex"}[0][$gbl]: value ok 4351 - delete $vrgbl->{"x$lex"}[0][$gbl]: no exception ok 4352 - delete $vrgbl->{"x$lex"}[0][$gbl]: value ok 4353 - $vlex[0][$lex][$gbl]: no exception ok 4354 - $vlex[0][$lex][$gbl]: value ok 4355 - $vlex[0][$lex][$gbl] = 123: no exception ok 4356 - $vlex[0][$lex][$gbl] = 123: value ok 4357 - exists $vlex[0][$lex][$gbl]: no exception ok 4358 - exists $vlex[0][$lex][$gbl]: value ok 4359 - delete $vlex[0][$lex][$gbl]: no exception ok 4360 - delete $vlex[0][$lex][$gbl]: value ok 4361 - $vgbl[0][$lex][$gbl]: no exception ok 4362 - $vgbl[0][$lex][$gbl]: value ok 4363 - $vgbl[0][$lex][$gbl] = 123: no exception ok 4364 - $vgbl[0][$lex][$gbl] = 123: value ok 4365 - exists $vgbl[0][$lex][$gbl]: no exception ok 4366 - exists $vgbl[0][$lex][$gbl]: value ok 4367 - delete $vgbl[0][$lex][$gbl]: no exception ok 4368 - delete $vgbl[0][$lex][$gbl]: value ok 4369 - $vrlex->[0][$lex][$gbl]: no exception ok 4370 - $vrlex->[0][$lex][$gbl]: value ok 4371 - $vrlex->[0][$lex][$gbl] = 123: no exception ok 4372 - $vrlex->[0][$lex][$gbl] = 123: value ok 4373 - exists $vrlex->[0][$lex][$gbl]: no exception ok 4374 - exists $vrlex->[0][$lex][$gbl]: value ok 4375 - delete $vrlex->[0][$lex][$gbl]: no exception ok 4376 - delete $vrlex->[0][$lex][$gbl]: value ok 4377 - $vrgbl->[0][$lex][$gbl]: no exception ok 4378 - $vrgbl->[0][$lex][$gbl]: value ok 4379 - $vrgbl->[0][$lex][$gbl] = 123: no exception ok 4380 - $vrgbl->[0][$lex][$gbl] = 123: value ok 4381 - exists $vrgbl->[0][$lex][$gbl]: no exception ok 4382 - exists $vrgbl->[0][$lex][$gbl]: value ok 4383 - delete $vrgbl->[0][$lex][$gbl]: no exception ok 4384 - delete $vrgbl->[0][$lex][$gbl]: value ok 4385 - $vlex[$lex][$lex][$gbl]: no exception ok 4386 - $vlex[$lex][$lex][$gbl]: value ok 4387 - $vlex[$lex][$lex][$gbl] = 123: no exception ok 4388 - $vlex[$lex][$lex][$gbl] = 123: value ok 4389 - exists $vlex[$lex][$lex][$gbl]: no exception ok 4390 - exists $vlex[$lex][$lex][$gbl]: value ok 4391 - delete $vlex[$lex][$lex][$gbl]: no exception ok 4392 - delete $vlex[$lex][$lex][$gbl]: value ok 4393 - $vgbl[$lex][$lex][$gbl]: no exception ok 4394 - $vgbl[$lex][$lex][$gbl]: value ok 4395 - $vgbl[$lex][$lex][$gbl] = 123: no exception ok 4396 - $vgbl[$lex][$lex][$gbl] = 123: value ok 4397 - exists $vgbl[$lex][$lex][$gbl]: no exception ok 4398 - exists $vgbl[$lex][$lex][$gbl]: value ok 4399 - delete $vgbl[$lex][$lex][$gbl]: no exception ok 4400 - delete $vgbl[$lex][$lex][$gbl]: value ok 4401 - $vrlex->[$lex][$lex][$gbl]: no exception ok 4402 - $vrlex->[$lex][$lex][$gbl]: value ok 4403 - $vrlex->[$lex][$lex][$gbl] = 123: no exception ok 4404 - $vrlex->[$lex][$lex][$gbl] = 123: value ok 4405 - exists $vrlex->[$lex][$lex][$gbl]: no exception ok 4406 - exists $vrlex->[$lex][$lex][$gbl]: value ok 4407 - delete $vrlex->[$lex][$lex][$gbl]: no exception ok 4408 - delete $vrlex->[$lex][$lex][$gbl]: value ok 4409 - $vrgbl->[$lex][$lex][$gbl]: no exception ok 4410 - $vrgbl->[$lex][$lex][$gbl]: value ok 4411 - $vrgbl->[$lex][$lex][$gbl] = 123: no exception ok 4412 - $vrgbl->[$lex][$lex][$gbl] = 123: value ok 4413 - exists $vrgbl->[$lex][$lex][$gbl]: no exception ok 4414 - exists $vrgbl->[$lex][$lex][$gbl]: value ok 4415 - delete $vrgbl->[$lex][$lex][$gbl]: no exception ok 4416 - delete $vrgbl->[$lex][$lex][$gbl]: value ok 4417 - $vlex[$gbl][$lex][$gbl]: no exception ok 4418 - $vlex[$gbl][$lex][$gbl]: value ok 4419 - $vlex[$gbl][$lex][$gbl] = 123: no exception ok 4420 - $vlex[$gbl][$lex][$gbl] = 123: value ok 4421 - exists $vlex[$gbl][$lex][$gbl]: no exception ok 4422 - exists $vlex[$gbl][$lex][$gbl]: value ok 4423 - delete $vlex[$gbl][$lex][$gbl]: no exception ok 4424 - delete $vlex[$gbl][$lex][$gbl]: value ok 4425 - $vgbl[$gbl][$lex][$gbl]: no exception ok 4426 - $vgbl[$gbl][$lex][$gbl]: value ok 4427 - $vgbl[$gbl][$lex][$gbl] = 123: no exception ok 4428 - $vgbl[$gbl][$lex][$gbl] = 123: value ok 4429 - exists $vgbl[$gbl][$lex][$gbl]: no exception ok 4430 - exists $vgbl[$gbl][$lex][$gbl]: value ok 4431 - delete $vgbl[$gbl][$lex][$gbl]: no exception ok 4432 - delete $vgbl[$gbl][$lex][$gbl]: value ok 4433 - $vrlex->[$gbl][$lex][$gbl]: no exception ok 4434 - $vrlex->[$gbl][$lex][$gbl]: value ok 4435 - $vrlex->[$gbl][$lex][$gbl] = 123: no exception ok 4436 - $vrlex->[$gbl][$lex][$gbl] = 123: value ok 4437 - exists $vrlex->[$gbl][$lex][$gbl]: no exception ok 4438 - exists $vrlex->[$gbl][$lex][$gbl]: value ok 4439 - delete $vrlex->[$gbl][$lex][$gbl]: no exception ok 4440 - delete $vrlex->[$gbl][$lex][$gbl]: value ok 4441 - $vrgbl->[$gbl][$lex][$gbl]: no exception ok 4442 - $vrgbl->[$gbl][$lex][$gbl]: value ok 4443 - $vrgbl->[$gbl][$lex][$gbl] = 123: no exception ok 4444 - $vrgbl->[$gbl][$lex][$gbl] = 123: value ok 4445 - exists $vrgbl->[$gbl][$lex][$gbl]: no exception ok 4446 - exists $vrgbl->[$gbl][$lex][$gbl]: value ok 4447 - delete $vrgbl->[$gbl][$lex][$gbl]: no exception ok 4448 - delete $vrgbl->[$gbl][$lex][$gbl]: value ok 4449 - $vlex[$lex+1][$lex][$gbl]: no exception ok 4450 - $vlex[$lex+1][$lex][$gbl]: value ok 4451 - $vlex[$lex+1][$lex][$gbl] = 123: no exception ok 4452 - $vlex[$lex+1][$lex][$gbl] = 123: value ok 4453 - exists $vlex[$lex+1][$lex][$gbl]: no exception ok 4454 - exists $vlex[$lex+1][$lex][$gbl]: value ok 4455 - delete $vlex[$lex+1][$lex][$gbl]: no exception ok 4456 - delete $vlex[$lex+1][$lex][$gbl]: value ok 4457 - $vgbl[$lex+1][$lex][$gbl]: no exception ok 4458 - $vgbl[$lex+1][$lex][$gbl]: value ok 4459 - $vgbl[$lex+1][$lex][$gbl] = 123: no exception ok 4460 - $vgbl[$lex+1][$lex][$gbl] = 123: value ok 4461 - exists $vgbl[$lex+1][$lex][$gbl]: no exception ok 4462 - exists $vgbl[$lex+1][$lex][$gbl]: value ok 4463 - delete $vgbl[$lex+1][$lex][$gbl]: no exception ok 4464 - delete $vgbl[$lex+1][$lex][$gbl]: value ok 4465 - $vrlex->[$lex+1][$lex][$gbl]: no exception ok 4466 - $vrlex->[$lex+1][$lex][$gbl]: value ok 4467 - $vrlex->[$lex+1][$lex][$gbl] = 123: no exception ok 4468 - $vrlex->[$lex+1][$lex][$gbl] = 123: value ok 4469 - exists $vrlex->[$lex+1][$lex][$gbl]: no exception ok 4470 - exists $vrlex->[$lex+1][$lex][$gbl]: value ok 4471 - delete $vrlex->[$lex+1][$lex][$gbl]: no exception ok 4472 - delete $vrlex->[$lex+1][$lex][$gbl]: value ok 4473 - $vrgbl->[$lex+1][$lex][$gbl]: no exception ok 4474 - $vrgbl->[$lex+1][$lex][$gbl]: value ok 4475 - $vrgbl->[$lex+1][$lex][$gbl] = 123: no exception ok 4476 - $vrgbl->[$lex+1][$lex][$gbl] = 123: value ok 4477 - exists $vrgbl->[$lex+1][$lex][$gbl]: no exception ok 4478 - exists $vrgbl->[$lex+1][$lex][$gbl]: value ok 4479 - delete $vrgbl->[$lex+1][$lex][$gbl]: no exception ok 4480 - delete $vrgbl->[$lex+1][$lex][$gbl]: value ok 4481 - $vlex{foo}[$lex][$gbl]: no exception ok 4482 - $vlex{foo}[$lex][$gbl]: value ok 4483 - $vlex{foo}[$lex][$gbl] = 123: no exception ok 4484 - $vlex{foo}[$lex][$gbl] = 123: value ok 4485 - exists $vlex{foo}[$lex][$gbl]: no exception ok 4486 - exists $vlex{foo}[$lex][$gbl]: value ok 4487 - delete $vlex{foo}[$lex][$gbl]: no exception ok 4488 - delete $vlex{foo}[$lex][$gbl]: value ok 4489 - $vgbl{foo}[$lex][$gbl]: no exception ok 4490 - $vgbl{foo}[$lex][$gbl]: value ok 4491 - $vgbl{foo}[$lex][$gbl] = 123: no exception ok 4492 - $vgbl{foo}[$lex][$gbl] = 123: value ok 4493 - exists $vgbl{foo}[$lex][$gbl]: no exception ok 4494 - exists $vgbl{foo}[$lex][$gbl]: value ok 4495 - delete $vgbl{foo}[$lex][$gbl]: no exception ok 4496 - delete $vgbl{foo}[$lex][$gbl]: value ok 4497 - $vrlex->{foo}[$lex][$gbl]: no exception ok 4498 - $vrlex->{foo}[$lex][$gbl]: value ok 4499 - $vrlex->{foo}[$lex][$gbl] = 123: no exception ok 4500 - $vrlex->{foo}[$lex][$gbl] = 123: value ok 4501 - exists $vrlex->{foo}[$lex][$gbl]: no exception ok 4502 - exists $vrlex->{foo}[$lex][$gbl]: value ok 4503 - delete $vrlex->{foo}[$lex][$gbl]: no exception ok 4504 - delete $vrlex->{foo}[$lex][$gbl]: value ok 4505 - $vrgbl->{foo}[$lex][$gbl]: no exception ok 4506 - $vrgbl->{foo}[$lex][$gbl]: value ok 4507 - $vrgbl->{foo}[$lex][$gbl] = 123: no exception ok 4508 - $vrgbl->{foo}[$lex][$gbl] = 123: value ok 4509 - exists $vrgbl->{foo}[$lex][$gbl]: no exception ok 4510 - exists $vrgbl->{foo}[$lex][$gbl]: value ok 4511 - delete $vrgbl->{foo}[$lex][$gbl]: no exception ok 4512 - delete $vrgbl->{foo}[$lex][$gbl]: value ok 4513 - $vlex{$lex}[$lex][$gbl]: no exception ok 4514 - $vlex{$lex}[$lex][$gbl]: value ok 4515 - $vlex{$lex}[$lex][$gbl] = 123: no exception ok 4516 - $vlex{$lex}[$lex][$gbl] = 123: value ok 4517 - exists $vlex{$lex}[$lex][$gbl]: no exception ok 4518 - exists $vlex{$lex}[$lex][$gbl]: value ok 4519 - delete $vlex{$lex}[$lex][$gbl]: no exception ok 4520 - delete $vlex{$lex}[$lex][$gbl]: value ok 4521 - $vgbl{$lex}[$lex][$gbl]: no exception ok 4522 - $vgbl{$lex}[$lex][$gbl]: value ok 4523 - $vgbl{$lex}[$lex][$gbl] = 123: no exception ok 4524 - $vgbl{$lex}[$lex][$gbl] = 123: value ok 4525 - exists $vgbl{$lex}[$lex][$gbl]: no exception ok 4526 - exists $vgbl{$lex}[$lex][$gbl]: value ok 4527 - delete $vgbl{$lex}[$lex][$gbl]: no exception ok 4528 - delete $vgbl{$lex}[$lex][$gbl]: value ok 4529 - $vrlex->{$lex}[$lex][$gbl]: no exception ok 4530 - $vrlex->{$lex}[$lex][$gbl]: value ok 4531 - $vrlex->{$lex}[$lex][$gbl] = 123: no exception ok 4532 - $vrlex->{$lex}[$lex][$gbl] = 123: value ok 4533 - exists $vrlex->{$lex}[$lex][$gbl]: no exception ok 4534 - exists $vrlex->{$lex}[$lex][$gbl]: value ok 4535 - delete $vrlex->{$lex}[$lex][$gbl]: no exception ok 4536 - delete $vrlex->{$lex}[$lex][$gbl]: value ok 4537 - $vrgbl->{$lex}[$lex][$gbl]: no exception ok 4538 - $vrgbl->{$lex}[$lex][$gbl]: value ok 4539 - $vrgbl->{$lex}[$lex][$gbl] = 123: no exception ok 4540 - $vrgbl->{$lex}[$lex][$gbl] = 123: value ok 4541 - exists $vrgbl->{$lex}[$lex][$gbl]: no exception ok 4542 - exists $vrgbl->{$lex}[$lex][$gbl]: value ok 4543 - delete $vrgbl->{$lex}[$lex][$gbl]: no exception ok 4544 - delete $vrgbl->{$lex}[$lex][$gbl]: value ok 4545 - $vlex{$gbl}[$lex][$gbl]: no exception ok 4546 - $vlex{$gbl}[$lex][$gbl]: value ok 4547 - $vlex{$gbl}[$lex][$gbl] = 123: no exception ok 4548 - $vlex{$gbl}[$lex][$gbl] = 123: value ok 4549 - exists $vlex{$gbl}[$lex][$gbl]: no exception ok 4550 - exists $vlex{$gbl}[$lex][$gbl]: value ok 4551 - delete $vlex{$gbl}[$lex][$gbl]: no exception ok 4552 - delete $vlex{$gbl}[$lex][$gbl]: value ok 4553 - $vgbl{$gbl}[$lex][$gbl]: no exception ok 4554 - $vgbl{$gbl}[$lex][$gbl]: value ok 4555 - $vgbl{$gbl}[$lex][$gbl] = 123: no exception ok 4556 - $vgbl{$gbl}[$lex][$gbl] = 123: value ok 4557 - exists $vgbl{$gbl}[$lex][$gbl]: no exception ok 4558 - exists $vgbl{$gbl}[$lex][$gbl]: value ok 4559 - delete $vgbl{$gbl}[$lex][$gbl]: no exception ok 4560 - delete $vgbl{$gbl}[$lex][$gbl]: value ok 4561 - $vrlex->{$gbl}[$lex][$gbl]: no exception ok 4562 - $vrlex->{$gbl}[$lex][$gbl]: value ok 4563 - $vrlex->{$gbl}[$lex][$gbl] = 123: no exception ok 4564 - $vrlex->{$gbl}[$lex][$gbl] = 123: value ok 4565 - exists $vrlex->{$gbl}[$lex][$gbl]: no exception ok 4566 - exists $vrlex->{$gbl}[$lex][$gbl]: value ok 4567 - delete $vrlex->{$gbl}[$lex][$gbl]: no exception ok 4568 - delete $vrlex->{$gbl}[$lex][$gbl]: value ok 4569 - $vrgbl->{$gbl}[$lex][$gbl]: no exception ok 4570 - $vrgbl->{$gbl}[$lex][$gbl]: value ok 4571 - $vrgbl->{$gbl}[$lex][$gbl] = 123: no exception ok 4572 - $vrgbl->{$gbl}[$lex][$gbl] = 123: value ok 4573 - exists $vrgbl->{$gbl}[$lex][$gbl]: no exception ok 4574 - exists $vrgbl->{$gbl}[$lex][$gbl]: value ok 4575 - delete $vrgbl->{$gbl}[$lex][$gbl]: no exception ok 4576 - delete $vrgbl->{$gbl}[$lex][$gbl]: value ok 4577 - $vlex{"x$lex"}[$lex][$gbl]: no exception ok 4578 - $vlex{"x$lex"}[$lex][$gbl]: value ok 4579 - $vlex{"x$lex"}[$lex][$gbl] = 123: no exception ok 4580 - $vlex{"x$lex"}[$lex][$gbl] = 123: value ok 4581 - exists $vlex{"x$lex"}[$lex][$gbl]: no exception ok 4582 - exists $vlex{"x$lex"}[$lex][$gbl]: value ok 4583 - delete $vlex{"x$lex"}[$lex][$gbl]: no exception ok 4584 - delete $vlex{"x$lex"}[$lex][$gbl]: value ok 4585 - $vgbl{"x$lex"}[$lex][$gbl]: no exception ok 4586 - $vgbl{"x$lex"}[$lex][$gbl]: value ok 4587 - $vgbl{"x$lex"}[$lex][$gbl] = 123: no exception ok 4588 - $vgbl{"x$lex"}[$lex][$gbl] = 123: value ok 4589 - exists $vgbl{"x$lex"}[$lex][$gbl]: no exception ok 4590 - exists $vgbl{"x$lex"}[$lex][$gbl]: value ok 4591 - delete $vgbl{"x$lex"}[$lex][$gbl]: no exception ok 4592 - delete $vgbl{"x$lex"}[$lex][$gbl]: value ok 4593 - $vrlex->{"x$lex"}[$lex][$gbl]: no exception ok 4594 - $vrlex->{"x$lex"}[$lex][$gbl]: value ok 4595 - $vrlex->{"x$lex"}[$lex][$gbl] = 123: no exception ok 4596 - $vrlex->{"x$lex"}[$lex][$gbl] = 123: value ok 4597 - exists $vrlex->{"x$lex"}[$lex][$gbl]: no exception ok 4598 - exists $vrlex->{"x$lex"}[$lex][$gbl]: value ok 4599 - delete $vrlex->{"x$lex"}[$lex][$gbl]: no exception ok 4600 - delete $vrlex->{"x$lex"}[$lex][$gbl]: value ok 4601 - $vrgbl->{"x$lex"}[$lex][$gbl]: no exception ok 4602 - $vrgbl->{"x$lex"}[$lex][$gbl]: value ok 4603 - $vrgbl->{"x$lex"}[$lex][$gbl] = 123: no exception ok 4604 - $vrgbl->{"x$lex"}[$lex][$gbl] = 123: value ok 4605 - exists $vrgbl->{"x$lex"}[$lex][$gbl]: no exception ok 4606 - exists $vrgbl->{"x$lex"}[$lex][$gbl]: value ok 4607 - delete $vrgbl->{"x$lex"}[$lex][$gbl]: no exception ok 4608 - delete $vrgbl->{"x$lex"}[$lex][$gbl]: value ok 4609 - $vlex[0][$gbl][$gbl]: no exception ok 4610 - $vlex[0][$gbl][$gbl]: value ok 4611 - $vlex[0][$gbl][$gbl] = 123: no exception ok 4612 - $vlex[0][$gbl][$gbl] = 123: value ok 4613 - exists $vlex[0][$gbl][$gbl]: no exception ok 4614 - exists $vlex[0][$gbl][$gbl]: value ok 4615 - delete $vlex[0][$gbl][$gbl]: no exception ok 4616 - delete $vlex[0][$gbl][$gbl]: value ok 4617 - $vgbl[0][$gbl][$gbl]: no exception ok 4618 - $vgbl[0][$gbl][$gbl]: value ok 4619 - $vgbl[0][$gbl][$gbl] = 123: no exception ok 4620 - $vgbl[0][$gbl][$gbl] = 123: value ok 4621 - exists $vgbl[0][$gbl][$gbl]: no exception ok 4622 - exists $vgbl[0][$gbl][$gbl]: value ok 4623 - delete $vgbl[0][$gbl][$gbl]: no exception ok 4624 - delete $vgbl[0][$gbl][$gbl]: value ok 4625 - $vrlex->[0][$gbl][$gbl]: no exception ok 4626 - $vrlex->[0][$gbl][$gbl]: value ok 4627 - $vrlex->[0][$gbl][$gbl] = 123: no exception ok 4628 - $vrlex->[0][$gbl][$gbl] = 123: value ok 4629 - exists $vrlex->[0][$gbl][$gbl]: no exception ok 4630 - exists $vrlex->[0][$gbl][$gbl]: value ok 4631 - delete $vrlex->[0][$gbl][$gbl]: no exception ok 4632 - delete $vrlex->[0][$gbl][$gbl]: value ok 4633 - $vrgbl->[0][$gbl][$gbl]: no exception ok 4634 - $vrgbl->[0][$gbl][$gbl]: value ok 4635 - $vrgbl->[0][$gbl][$gbl] = 123: no exception ok 4636 - $vrgbl->[0][$gbl][$gbl] = 123: value ok 4637 - exists $vrgbl->[0][$gbl][$gbl]: no exception ok 4638 - exists $vrgbl->[0][$gbl][$gbl]: value ok 4639 - delete $vrgbl->[0][$gbl][$gbl]: no exception ok 4640 - delete $vrgbl->[0][$gbl][$gbl]: value ok 4641 - $vlex[$lex][$gbl][$gbl]: no exception ok 4642 - $vlex[$lex][$gbl][$gbl]: value ok 4643 - $vlex[$lex][$gbl][$gbl] = 123: no exception ok 4644 - $vlex[$lex][$gbl][$gbl] = 123: value ok 4645 - exists $vlex[$lex][$gbl][$gbl]: no exception ok 4646 - exists $vlex[$lex][$gbl][$gbl]: value ok 4647 - delete $vlex[$lex][$gbl][$gbl]: no exception ok 4648 - delete $vlex[$lex][$gbl][$gbl]: value ok 4649 - $vgbl[$lex][$gbl][$gbl]: no exception ok 4650 - $vgbl[$lex][$gbl][$gbl]: value ok 4651 - $vgbl[$lex][$gbl][$gbl] = 123: no exception ok 4652 - $vgbl[$lex][$gbl][$gbl] = 123: value ok 4653 - exists $vgbl[$lex][$gbl][$gbl]: no exception ok 4654 - exists $vgbl[$lex][$gbl][$gbl]: value ok 4655 - delete $vgbl[$lex][$gbl][$gbl]: no exception ok 4656 - delete $vgbl[$lex][$gbl][$gbl]: value ok 4657 - $vrlex->[$lex][$gbl][$gbl]: no exception ok 4658 - $vrlex->[$lex][$gbl][$gbl]: value ok 4659 - $vrlex->[$lex][$gbl][$gbl] = 123: no exception ok 4660 - $vrlex->[$lex][$gbl][$gbl] = 123: value ok 4661 - exists $vrlex->[$lex][$gbl][$gbl]: no exception ok 4662 - exists $vrlex->[$lex][$gbl][$gbl]: value ok 4663 - delete $vrlex->[$lex][$gbl][$gbl]: no exception ok 4664 - delete $vrlex->[$lex][$gbl][$gbl]: value ok 4665 - $vrgbl->[$lex][$gbl][$gbl]: no exception ok 4666 - $vrgbl->[$lex][$gbl][$gbl]: value ok 4667 - $vrgbl->[$lex][$gbl][$gbl] = 123: no exception ok 4668 - $vrgbl->[$lex][$gbl][$gbl] = 123: value ok 4669 - exists $vrgbl->[$lex][$gbl][$gbl]: no exception ok 4670 - exists $vrgbl->[$lex][$gbl][$gbl]: value ok 4671 - delete $vrgbl->[$lex][$gbl][$gbl]: no exception ok 4672 - delete $vrgbl->[$lex][$gbl][$gbl]: value ok 4673 - $vlex[$gbl][$gbl][$gbl]: no exception ok 4674 - $vlex[$gbl][$gbl][$gbl]: value ok 4675 - $vlex[$gbl][$gbl][$gbl] = 123: no exception ok 4676 - $vlex[$gbl][$gbl][$gbl] = 123: value ok 4677 - exists $vlex[$gbl][$gbl][$gbl]: no exception ok 4678 - exists $vlex[$gbl][$gbl][$gbl]: value ok 4679 - delete $vlex[$gbl][$gbl][$gbl]: no exception ok 4680 - delete $vlex[$gbl][$gbl][$gbl]: value ok 4681 - $vgbl[$gbl][$gbl][$gbl]: no exception ok 4682 - $vgbl[$gbl][$gbl][$gbl]: value ok 4683 - $vgbl[$gbl][$gbl][$gbl] = 123: no exception ok 4684 - $vgbl[$gbl][$gbl][$gbl] = 123: value ok 4685 - exists $vgbl[$gbl][$gbl][$gbl]: no exception ok 4686 - exists $vgbl[$gbl][$gbl][$gbl]: value ok 4687 - delete $vgbl[$gbl][$gbl][$gbl]: no exception ok 4688 - delete $vgbl[$gbl][$gbl][$gbl]: value ok 4689 - $vrlex->[$gbl][$gbl][$gbl]: no exception ok 4690 - $vrlex->[$gbl][$gbl][$gbl]: value ok 4691 - $vrlex->[$gbl][$gbl][$gbl] = 123: no exception ok 4692 - $vrlex->[$gbl][$gbl][$gbl] = 123: value ok 4693 - exists $vrlex->[$gbl][$gbl][$gbl]: no exception ok 4694 - exists $vrlex->[$gbl][$gbl][$gbl]: value ok 4695 - delete $vrlex->[$gbl][$gbl][$gbl]: no exception ok 4696 - delete $vrlex->[$gbl][$gbl][$gbl]: value ok 4697 - $vrgbl->[$gbl][$gbl][$gbl]: no exception ok 4698 - $vrgbl->[$gbl][$gbl][$gbl]: value ok 4699 - $vrgbl->[$gbl][$gbl][$gbl] = 123: no exception ok 4700 - $vrgbl->[$gbl][$gbl][$gbl] = 123: value ok 4701 - exists $vrgbl->[$gbl][$gbl][$gbl]: no exception ok 4702 - exists $vrgbl->[$gbl][$gbl][$gbl]: value ok 4703 - delete $vrgbl->[$gbl][$gbl][$gbl]: no exception ok 4704 - delete $vrgbl->[$gbl][$gbl][$gbl]: value ok 4705 - $vlex[$lex+1][$gbl][$gbl]: no exception ok 4706 - $vlex[$lex+1][$gbl][$gbl]: value ok 4707 - $vlex[$lex+1][$gbl][$gbl] = 123: no exception ok 4708 - $vlex[$lex+1][$gbl][$gbl] = 123: value ok 4709 - exists $vlex[$lex+1][$gbl][$gbl]: no exception ok 4710 - exists $vlex[$lex+1][$gbl][$gbl]: value ok 4711 - delete $vlex[$lex+1][$gbl][$gbl]: no exception ok 4712 - delete $vlex[$lex+1][$gbl][$gbl]: value ok 4713 - $vgbl[$lex+1][$gbl][$gbl]: no exception ok 4714 - $vgbl[$lex+1][$gbl][$gbl]: value ok 4715 - $vgbl[$lex+1][$gbl][$gbl] = 123: no exception ok 4716 - $vgbl[$lex+1][$gbl][$gbl] = 123: value ok 4717 - exists $vgbl[$lex+1][$gbl][$gbl]: no exception ok 4718 - exists $vgbl[$lex+1][$gbl][$gbl]: value ok 4719 - delete $vgbl[$lex+1][$gbl][$gbl]: no exception ok 4720 - delete $vgbl[$lex+1][$gbl][$gbl]: value ok 4721 - $vrlex->[$lex+1][$gbl][$gbl]: no exception ok 4722 - $vrlex->[$lex+1][$gbl][$gbl]: value ok 4723 - $vrlex->[$lex+1][$gbl][$gbl] = 123: no exception ok 4724 - $vrlex->[$lex+1][$gbl][$gbl] = 123: value ok 4725 - exists $vrlex->[$lex+1][$gbl][$gbl]: no exception ok 4726 - exists $vrlex->[$lex+1][$gbl][$gbl]: value ok 4727 - delete $vrlex->[$lex+1][$gbl][$gbl]: no exception ok 4728 - delete $vrlex->[$lex+1][$gbl][$gbl]: value ok 4729 - $vrgbl->[$lex+1][$gbl][$gbl]: no exception ok 4730 - $vrgbl->[$lex+1][$gbl][$gbl]: value ok 4731 - $vrgbl->[$lex+1][$gbl][$gbl] = 123: no exception ok 4732 - $vrgbl->[$lex+1][$gbl][$gbl] = 123: value ok 4733 - exists $vrgbl->[$lex+1][$gbl][$gbl]: no exception ok 4734 - exists $vrgbl->[$lex+1][$gbl][$gbl]: value ok 4735 - delete $vrgbl->[$lex+1][$gbl][$gbl]: no exception ok 4736 - delete $vrgbl->[$lex+1][$gbl][$gbl]: value ok 4737 - $vlex{foo}[$gbl][$gbl]: no exception ok 4738 - $vlex{foo}[$gbl][$gbl]: value ok 4739 - $vlex{foo}[$gbl][$gbl] = 123: no exception ok 4740 - $vlex{foo}[$gbl][$gbl] = 123: value ok 4741 - exists $vlex{foo}[$gbl][$gbl]: no exception ok 4742 - exists $vlex{foo}[$gbl][$gbl]: value ok 4743 - delete $vlex{foo}[$gbl][$gbl]: no exception ok 4744 - delete $vlex{foo}[$gbl][$gbl]: value ok 4745 - $vgbl{foo}[$gbl][$gbl]: no exception ok 4746 - $vgbl{foo}[$gbl][$gbl]: value ok 4747 - $vgbl{foo}[$gbl][$gbl] = 123: no exception ok 4748 - $vgbl{foo}[$gbl][$gbl] = 123: value ok 4749 - exists $vgbl{foo}[$gbl][$gbl]: no exception ok 4750 - exists $vgbl{foo}[$gbl][$gbl]: value ok 4751 - delete $vgbl{foo}[$gbl][$gbl]: no exception ok 4752 - delete $vgbl{foo}[$gbl][$gbl]: value ok 4753 - $vrlex->{foo}[$gbl][$gbl]: no exception ok 4754 - $vrlex->{foo}[$gbl][$gbl]: value ok 4755 - $vrlex->{foo}[$gbl][$gbl] = 123: no exception ok 4756 - $vrlex->{foo}[$gbl][$gbl] = 123: value ok 4757 - exists $vrlex->{foo}[$gbl][$gbl]: no exception ok 4758 - exists $vrlex->{foo}[$gbl][$gbl]: value ok 4759 - delete $vrlex->{foo}[$gbl][$gbl]: no exception ok 4760 - delete $vrlex->{foo}[$gbl][$gbl]: value ok 4761 - $vrgbl->{foo}[$gbl][$gbl]: no exception ok 4762 - $vrgbl->{foo}[$gbl][$gbl]: value ok 4763 - $vrgbl->{foo}[$gbl][$gbl] = 123: no exception ok 4764 - $vrgbl->{foo}[$gbl][$gbl] = 123: value ok 4765 - exists $vrgbl->{foo}[$gbl][$gbl]: no exception ok 4766 - exists $vrgbl->{foo}[$gbl][$gbl]: value ok 4767 - delete $vrgbl->{foo}[$gbl][$gbl]: no exception ok 4768 - delete $vrgbl->{foo}[$gbl][$gbl]: value ok 4769 - $vlex{$lex}[$gbl][$gbl]: no exception ok 4770 - $vlex{$lex}[$gbl][$gbl]: value ok 4771 - $vlex{$lex}[$gbl][$gbl] = 123: no exception ok 4772 - $vlex{$lex}[$gbl][$gbl] = 123: value ok 4773 - exists $vlex{$lex}[$gbl][$gbl]: no exception ok 4774 - exists $vlex{$lex}[$gbl][$gbl]: value ok 4775 - delete $vlex{$lex}[$gbl][$gbl]: no exception ok 4776 - delete $vlex{$lex}[$gbl][$gbl]: value ok 4777 - $vgbl{$lex}[$gbl][$gbl]: no exception ok 4778 - $vgbl{$lex}[$gbl][$gbl]: value ok 4779 - $vgbl{$lex}[$gbl][$gbl] = 123: no exception ok 4780 - $vgbl{$lex}[$gbl][$gbl] = 123: value ok 4781 - exists $vgbl{$lex}[$gbl][$gbl]: no exception ok 4782 - exists $vgbl{$lex}[$gbl][$gbl]: value ok 4783 - delete $vgbl{$lex}[$gbl][$gbl]: no exception ok 4784 - delete $vgbl{$lex}[$gbl][$gbl]: value ok 4785 - $vrlex->{$lex}[$gbl][$gbl]: no exception ok 4786 - $vrlex->{$lex}[$gbl][$gbl]: value ok 4787 - $vrlex->{$lex}[$gbl][$gbl] = 123: no exception ok 4788 - $vrlex->{$lex}[$gbl][$gbl] = 123: value ok 4789 - exists $vrlex->{$lex}[$gbl][$gbl]: no exception ok 4790 - exists $vrlex->{$lex}[$gbl][$gbl]: value ok 4791 - delete $vrlex->{$lex}[$gbl][$gbl]: no exception ok 4792 - delete $vrlex->{$lex}[$gbl][$gbl]: value ok 4793 - $vrgbl->{$lex}[$gbl][$gbl]: no exception ok 4794 - $vrgbl->{$lex}[$gbl][$gbl]: value ok 4795 - $vrgbl->{$lex}[$gbl][$gbl] = 123: no exception ok 4796 - $vrgbl->{$lex}[$gbl][$gbl] = 123: value ok 4797 - exists $vrgbl->{$lex}[$gbl][$gbl]: no exception ok 4798 - exists $vrgbl->{$lex}[$gbl][$gbl]: value ok 4799 - delete $vrgbl->{$lex}[$gbl][$gbl]: no exception ok 4800 - delete $vrgbl->{$lex}[$gbl][$gbl]: value ok 4801 - $vlex{$gbl}[$gbl][$gbl]: no exception ok 4802 - $vlex{$gbl}[$gbl][$gbl]: value ok 4803 - $vlex{$gbl}[$gbl][$gbl] = 123: no exception ok 4804 - $vlex{$gbl}[$gbl][$gbl] = 123: value ok 4805 - exists $vlex{$gbl}[$gbl][$gbl]: no exception ok 4806 - exists $vlex{$gbl}[$gbl][$gbl]: value ok 4807 - delete $vlex{$gbl}[$gbl][$gbl]: no exception ok 4808 - delete $vlex{$gbl}[$gbl][$gbl]: value ok 4809 - $vgbl{$gbl}[$gbl][$gbl]: no exception ok 4810 - $vgbl{$gbl}[$gbl][$gbl]: value ok 4811 - $vgbl{$gbl}[$gbl][$gbl] = 123: no exception ok 4812 - $vgbl{$gbl}[$gbl][$gbl] = 123: value ok 4813 - exists $vgbl{$gbl}[$gbl][$gbl]: no exception ok 4814 - exists $vgbl{$gbl}[$gbl][$gbl]: value ok 4815 - delete $vgbl{$gbl}[$gbl][$gbl]: no exception ok 4816 - delete $vgbl{$gbl}[$gbl][$gbl]: value ok 4817 - $vrlex->{$gbl}[$gbl][$gbl]: no exception ok 4818 - $vrlex->{$gbl}[$gbl][$gbl]: value ok 4819 - $vrlex->{$gbl}[$gbl][$gbl] = 123: no exception ok 4820 - $vrlex->{$gbl}[$gbl][$gbl] = 123: value ok 4821 - exists $vrlex->{$gbl}[$gbl][$gbl]: no exception ok 4822 - exists $vrlex->{$gbl}[$gbl][$gbl]: value ok 4823 - delete $vrlex->{$gbl}[$gbl][$gbl]: no exception ok 4824 - delete $vrlex->{$gbl}[$gbl][$gbl]: value ok 4825 - $vrgbl->{$gbl}[$gbl][$gbl]: no exception ok 4826 - $vrgbl->{$gbl}[$gbl][$gbl]: value ok 4827 - $vrgbl->{$gbl}[$gbl][$gbl] = 123: no exception ok 4828 - $vrgbl->{$gbl}[$gbl][$gbl] = 123: value ok 4829 - exists $vrgbl->{$gbl}[$gbl][$gbl]: no exception ok 4830 - exists $vrgbl->{$gbl}[$gbl][$gbl]: value ok 4831 - delete $vrgbl->{$gbl}[$gbl][$gbl]: no exception ok 4832 - delete $vrgbl->{$gbl}[$gbl][$gbl]: value ok 4833 - $vlex{"x$lex"}[$gbl][$gbl]: no exception ok 4834 - $vlex{"x$lex"}[$gbl][$gbl]: value ok 4835 - $vlex{"x$lex"}[$gbl][$gbl] = 123: no exception ok 4836 - $vlex{"x$lex"}[$gbl][$gbl] = 123: value ok 4837 - exists $vlex{"x$lex"}[$gbl][$gbl]: no exception ok 4838 - exists $vlex{"x$lex"}[$gbl][$gbl]: value ok 4839 - delete $vlex{"x$lex"}[$gbl][$gbl]: no exception ok 4840 - delete $vlex{"x$lex"}[$gbl][$gbl]: value ok 4841 - $vgbl{"x$lex"}[$gbl][$gbl]: no exception ok 4842 - $vgbl{"x$lex"}[$gbl][$gbl]: value ok 4843 - $vgbl{"x$lex"}[$gbl][$gbl] = 123: no exception ok 4844 - $vgbl{"x$lex"}[$gbl][$gbl] = 123: value ok 4845 - exists $vgbl{"x$lex"}[$gbl][$gbl]: no exception ok 4846 - exists $vgbl{"x$lex"}[$gbl][$gbl]: value ok 4847 - delete $vgbl{"x$lex"}[$gbl][$gbl]: no exception ok 4848 - delete $vgbl{"x$lex"}[$gbl][$gbl]: value ok 4849 - $vrlex->{"x$lex"}[$gbl][$gbl]: no exception ok 4850 - $vrlex->{"x$lex"}[$gbl][$gbl]: value ok 4851 - $vrlex->{"x$lex"}[$gbl][$gbl] = 123: no exception ok 4852 - $vrlex->{"x$lex"}[$gbl][$gbl] = 123: value ok 4853 - exists $vrlex->{"x$lex"}[$gbl][$gbl]: no exception ok 4854 - exists $vrlex->{"x$lex"}[$gbl][$gbl]: value ok 4855 - delete $vrlex->{"x$lex"}[$gbl][$gbl]: no exception ok 4856 - delete $vrlex->{"x$lex"}[$gbl][$gbl]: value ok 4857 - $vrgbl->{"x$lex"}[$gbl][$gbl]: no exception ok 4858 - $vrgbl->{"x$lex"}[$gbl][$gbl]: value ok 4859 - $vrgbl->{"x$lex"}[$gbl][$gbl] = 123: no exception ok 4860 - $vrgbl->{"x$lex"}[$gbl][$gbl] = 123: value ok 4861 - exists $vrgbl->{"x$lex"}[$gbl][$gbl]: no exception ok 4862 - exists $vrgbl->{"x$lex"}[$gbl][$gbl]: value ok 4863 - delete $vrgbl->{"x$lex"}[$gbl][$gbl]: no exception ok 4864 - delete $vrgbl->{"x$lex"}[$gbl][$gbl]: value ok 4865 - $vlex[0][$lex+1][$gbl]: no exception ok 4866 - $vlex[0][$lex+1][$gbl]: value ok 4867 - $vlex[0][$lex+1][$gbl] = 123: no exception ok 4868 - $vlex[0][$lex+1][$gbl] = 123: value ok 4869 - exists $vlex[0][$lex+1][$gbl]: no exception ok 4870 - exists $vlex[0][$lex+1][$gbl]: value ok 4871 - delete $vlex[0][$lex+1][$gbl]: no exception ok 4872 - delete $vlex[0][$lex+1][$gbl]: value ok 4873 - $vgbl[0][$lex+1][$gbl]: no exception ok 4874 - $vgbl[0][$lex+1][$gbl]: value ok 4875 - $vgbl[0][$lex+1][$gbl] = 123: no exception ok 4876 - $vgbl[0][$lex+1][$gbl] = 123: value ok 4877 - exists $vgbl[0][$lex+1][$gbl]: no exception ok 4878 - exists $vgbl[0][$lex+1][$gbl]: value ok 4879 - delete $vgbl[0][$lex+1][$gbl]: no exception ok 4880 - delete $vgbl[0][$lex+1][$gbl]: value ok 4881 - $vrlex->[0][$lex+1][$gbl]: no exception ok 4882 - $vrlex->[0][$lex+1][$gbl]: value ok 4883 - $vrlex->[0][$lex+1][$gbl] = 123: no exception ok 4884 - $vrlex->[0][$lex+1][$gbl] = 123: value ok 4885 - exists $vrlex->[0][$lex+1][$gbl]: no exception ok 4886 - exists $vrlex->[0][$lex+1][$gbl]: value ok 4887 - delete $vrlex->[0][$lex+1][$gbl]: no exception ok 4888 - delete $vrlex->[0][$lex+1][$gbl]: value ok 4889 - $vrgbl->[0][$lex+1][$gbl]: no exception ok 4890 - $vrgbl->[0][$lex+1][$gbl]: value ok 4891 - $vrgbl->[0][$lex+1][$gbl] = 123: no exception ok 4892 - $vrgbl->[0][$lex+1][$gbl] = 123: value ok 4893 - exists $vrgbl->[0][$lex+1][$gbl]: no exception ok 4894 - exists $vrgbl->[0][$lex+1][$gbl]: value ok 4895 - delete $vrgbl->[0][$lex+1][$gbl]: no exception ok 4896 - delete $vrgbl->[0][$lex+1][$gbl]: value ok 4897 - $vlex[$lex][$lex+1][$gbl]: no exception ok 4898 - $vlex[$lex][$lex+1][$gbl]: value ok 4899 - $vlex[$lex][$lex+1][$gbl] = 123: no exception ok 4900 - $vlex[$lex][$lex+1][$gbl] = 123: value ok 4901 - exists $vlex[$lex][$lex+1][$gbl]: no exception ok 4902 - exists $vlex[$lex][$lex+1][$gbl]: value ok 4903 - delete $vlex[$lex][$lex+1][$gbl]: no exception ok 4904 - delete $vlex[$lex][$lex+1][$gbl]: value ok 4905 - $vgbl[$lex][$lex+1][$gbl]: no exception ok 4906 - $vgbl[$lex][$lex+1][$gbl]: value ok 4907 - $vgbl[$lex][$lex+1][$gbl] = 123: no exception ok 4908 - $vgbl[$lex][$lex+1][$gbl] = 123: value ok 4909 - exists $vgbl[$lex][$lex+1][$gbl]: no exception ok 4910 - exists $vgbl[$lex][$lex+1][$gbl]: value ok 4911 - delete $vgbl[$lex][$lex+1][$gbl]: no exception ok 4912 - delete $vgbl[$lex][$lex+1][$gbl]: value ok 4913 - $vrlex->[$lex][$lex+1][$gbl]: no exception ok 4914 - $vrlex->[$lex][$lex+1][$gbl]: value ok 4915 - $vrlex->[$lex][$lex+1][$gbl] = 123: no exception ok 4916 - $vrlex->[$lex][$lex+1][$gbl] = 123: value ok 4917 - exists $vrlex->[$lex][$lex+1][$gbl]: no exception ok 4918 - exists $vrlex->[$lex][$lex+1][$gbl]: value ok 4919 - delete $vrlex->[$lex][$lex+1][$gbl]: no exception ok 4920 - delete $vrlex->[$lex][$lex+1][$gbl]: value ok 4921 - $vrgbl->[$lex][$lex+1][$gbl]: no exception ok 4922 - $vrgbl->[$lex][$lex+1][$gbl]: value ok 4923 - $vrgbl->[$lex][$lex+1][$gbl] = 123: no exception ok 4924 - $vrgbl->[$lex][$lex+1][$gbl] = 123: value ok 4925 - exists $vrgbl->[$lex][$lex+1][$gbl]: no exception ok 4926 - exists $vrgbl->[$lex][$lex+1][$gbl]: value ok 4927 - delete $vrgbl->[$lex][$lex+1][$gbl]: no exception ok 4928 - delete $vrgbl->[$lex][$lex+1][$gbl]: value ok 4929 - $vlex[$gbl][$lex+1][$gbl]: no exception ok 4930 - $vlex[$gbl][$lex+1][$gbl]: value ok 4931 - $vlex[$gbl][$lex+1][$gbl] = 123: no exception ok 4932 - $vlex[$gbl][$lex+1][$gbl] = 123: value ok 4933 - exists $vlex[$gbl][$lex+1][$gbl]: no exception ok 4934 - exists $vlex[$gbl][$lex+1][$gbl]: value ok 4935 - delete $vlex[$gbl][$lex+1][$gbl]: no exception ok 4936 - delete $vlex[$gbl][$lex+1][$gbl]: value ok 4937 - $vgbl[$gbl][$lex+1][$gbl]: no exception ok 4938 - $vgbl[$gbl][$lex+1][$gbl]: value ok 4939 - $vgbl[$gbl][$lex+1][$gbl] = 123: no exception ok 4940 - $vgbl[$gbl][$lex+1][$gbl] = 123: value ok 4941 - exists $vgbl[$gbl][$lex+1][$gbl]: no exception ok 4942 - exists $vgbl[$gbl][$lex+1][$gbl]: value ok 4943 - delete $vgbl[$gbl][$lex+1][$gbl]: no exception ok 4944 - delete $vgbl[$gbl][$lex+1][$gbl]: value ok 4945 - $vrlex->[$gbl][$lex+1][$gbl]: no exception ok 4946 - $vrlex->[$gbl][$lex+1][$gbl]: value ok 4947 - $vrlex->[$gbl][$lex+1][$gbl] = 123: no exception ok 4948 - $vrlex->[$gbl][$lex+1][$gbl] = 123: value ok 4949 - exists $vrlex->[$gbl][$lex+1][$gbl]: no exception ok 4950 - exists $vrlex->[$gbl][$lex+1][$gbl]: value ok 4951 - delete $vrlex->[$gbl][$lex+1][$gbl]: no exception ok 4952 - delete $vrlex->[$gbl][$lex+1][$gbl]: value ok 4953 - $vrgbl->[$gbl][$lex+1][$gbl]: no exception ok 4954 - $vrgbl->[$gbl][$lex+1][$gbl]: value ok 4955 - $vrgbl->[$gbl][$lex+1][$gbl] = 123: no exception ok 4956 - $vrgbl->[$gbl][$lex+1][$gbl] = 123: value ok 4957 - exists $vrgbl->[$gbl][$lex+1][$gbl]: no exception ok 4958 - exists $vrgbl->[$gbl][$lex+1][$gbl]: value ok 4959 - delete $vrgbl->[$gbl][$lex+1][$gbl]: no exception ok 4960 - delete $vrgbl->[$gbl][$lex+1][$gbl]: value ok 4961 - $vlex[$lex+1][$lex+1][$gbl]: no exception ok 4962 - $vlex[$lex+1][$lex+1][$gbl]: value ok 4963 - $vlex[$lex+1][$lex+1][$gbl] = 123: no exception ok 4964 - $vlex[$lex+1][$lex+1][$gbl] = 123: value ok 4965 - exists $vlex[$lex+1][$lex+1][$gbl]: no exception ok 4966 - exists $vlex[$lex+1][$lex+1][$gbl]: value ok 4967 - delete $vlex[$lex+1][$lex+1][$gbl]: no exception ok 4968 - delete $vlex[$lex+1][$lex+1][$gbl]: value ok 4969 - $vgbl[$lex+1][$lex+1][$gbl]: no exception ok 4970 - $vgbl[$lex+1][$lex+1][$gbl]: value ok 4971 - $vgbl[$lex+1][$lex+1][$gbl] = 123: no exception ok 4972 - $vgbl[$lex+1][$lex+1][$gbl] = 123: value ok 4973 - exists $vgbl[$lex+1][$lex+1][$gbl]: no exception ok 4974 - exists $vgbl[$lex+1][$lex+1][$gbl]: value ok 4975 - delete $vgbl[$lex+1][$lex+1][$gbl]: no exception ok 4976 - delete $vgbl[$lex+1][$lex+1][$gbl]: value ok 4977 - $vrlex->[$lex+1][$lex+1][$gbl]: no exception ok 4978 - $vrlex->[$lex+1][$lex+1][$gbl]: value ok 4979 - $vrlex->[$lex+1][$lex+1][$gbl] = 123: no exception ok 4980 - $vrlex->[$lex+1][$lex+1][$gbl] = 123: value ok 4981 - exists $vrlex->[$lex+1][$lex+1][$gbl]: no exception ok 4982 - exists $vrlex->[$lex+1][$lex+1][$gbl]: value ok 4983 - delete $vrlex->[$lex+1][$lex+1][$gbl]: no exception ok 4984 - delete $vrlex->[$lex+1][$lex+1][$gbl]: value ok 4985 - $vrgbl->[$lex+1][$lex+1][$gbl]: no exception ok 4986 - $vrgbl->[$lex+1][$lex+1][$gbl]: value ok 4987 - $vrgbl->[$lex+1][$lex+1][$gbl] = 123: no exception ok 4988 - $vrgbl->[$lex+1][$lex+1][$gbl] = 123: value ok 4989 - exists $vrgbl->[$lex+1][$lex+1][$gbl]: no exception ok 4990 - exists $vrgbl->[$lex+1][$lex+1][$gbl]: value ok 4991 - delete $vrgbl->[$lex+1][$lex+1][$gbl]: no exception ok 4992 - delete $vrgbl->[$lex+1][$lex+1][$gbl]: value ok 4993 - $vlex{foo}[$lex+1][$gbl]: no exception ok 4994 - $vlex{foo}[$lex+1][$gbl]: value ok 4995 - $vlex{foo}[$lex+1][$gbl] = 123: no exception ok 4996 - $vlex{foo}[$lex+1][$gbl] = 123: value ok 4997 - exists $vlex{foo}[$lex+1][$gbl]: no exception ok 4998 - exists $vlex{foo}[$lex+1][$gbl]: value ok 4999 - delete $vlex{foo}[$lex+1][$gbl]: no exception ok 5000 - delete $vlex{foo}[$lex+1][$gbl]: value ok 5001 - $vgbl{foo}[$lex+1][$gbl]: no exception ok 5002 - $vgbl{foo}[$lex+1][$gbl]: value ok 5003 - $vgbl{foo}[$lex+1][$gbl] = 123: no exception ok 5004 - $vgbl{foo}[$lex+1][$gbl] = 123: value ok 5005 - exists $vgbl{foo}[$lex+1][$gbl]: no exception ok 5006 - exists $vgbl{foo}[$lex+1][$gbl]: value ok 5007 - delete $vgbl{foo}[$lex+1][$gbl]: no exception ok 5008 - delete $vgbl{foo}[$lex+1][$gbl]: value ok 5009 - $vrlex->{foo}[$lex+1][$gbl]: no exception ok 5010 - $vrlex->{foo}[$lex+1][$gbl]: value ok 5011 - $vrlex->{foo}[$lex+1][$gbl] = 123: no exception ok 5012 - $vrlex->{foo}[$lex+1][$gbl] = 123: value ok 5013 - exists $vrlex->{foo}[$lex+1][$gbl]: no exception ok 5014 - exists $vrlex->{foo}[$lex+1][$gbl]: value ok 5015 - delete $vrlex->{foo}[$lex+1][$gbl]: no exception ok 5016 - delete $vrlex->{foo}[$lex+1][$gbl]: value ok 5017 - $vrgbl->{foo}[$lex+1][$gbl]: no exception ok 5018 - $vrgbl->{foo}[$lex+1][$gbl]: value ok 5019 - $vrgbl->{foo}[$lex+1][$gbl] = 123: no exception ok 5020 - $vrgbl->{foo}[$lex+1][$gbl] = 123: value ok 5021 - exists $vrgbl->{foo}[$lex+1][$gbl]: no exception ok 5022 - exists $vrgbl->{foo}[$lex+1][$gbl]: value ok 5023 - delete $vrgbl->{foo}[$lex+1][$gbl]: no exception ok 5024 - delete $vrgbl->{foo}[$lex+1][$gbl]: value ok 5025 - $vlex{$lex}[$lex+1][$gbl]: no exception ok 5026 - $vlex{$lex}[$lex+1][$gbl]: value ok 5027 - $vlex{$lex}[$lex+1][$gbl] = 123: no exception ok 5028 - $vlex{$lex}[$lex+1][$gbl] = 123: value ok 5029 - exists $vlex{$lex}[$lex+1][$gbl]: no exception ok 5030 - exists $vlex{$lex}[$lex+1][$gbl]: value ok 5031 - delete $vlex{$lex}[$lex+1][$gbl]: no exception ok 5032 - delete $vlex{$lex}[$lex+1][$gbl]: value ok 5033 - $vgbl{$lex}[$lex+1][$gbl]: no exception ok 5034 - $vgbl{$lex}[$lex+1][$gbl]: value ok 5035 - $vgbl{$lex}[$lex+1][$gbl] = 123: no exception ok 5036 - $vgbl{$lex}[$lex+1][$gbl] = 123: value ok 5037 - exists $vgbl{$lex}[$lex+1][$gbl]: no exception ok 5038 - exists $vgbl{$lex}[$lex+1][$gbl]: value ok 5039 - delete $vgbl{$lex}[$lex+1][$gbl]: no exception ok 5040 - delete $vgbl{$lex}[$lex+1][$gbl]: value ok 5041 - $vrlex->{$lex}[$lex+1][$gbl]: no exception ok 5042 - $vrlex->{$lex}[$lex+1][$gbl]: value ok 5043 - $vrlex->{$lex}[$lex+1][$gbl] = 123: no exception ok 5044 - $vrlex->{$lex}[$lex+1][$gbl] = 123: value ok 5045 - exists $vrlex->{$lex}[$lex+1][$gbl]: no exception ok 5046 - exists $vrlex->{$lex}[$lex+1][$gbl]: value ok 5047 - delete $vrlex->{$lex}[$lex+1][$gbl]: no exception ok 5048 - delete $vrlex->{$lex}[$lex+1][$gbl]: value ok 5049 - $vrgbl->{$lex}[$lex+1][$gbl]: no exception ok 5050 - $vrgbl->{$lex}[$lex+1][$gbl]: value ok 5051 - $vrgbl->{$lex}[$lex+1][$gbl] = 123: no exception ok 5052 - $vrgbl->{$lex}[$lex+1][$gbl] = 123: value ok 5053 - exists $vrgbl->{$lex}[$lex+1][$gbl]: no exception ok 5054 - exists $vrgbl->{$lex}[$lex+1][$gbl]: value ok 5055 - delete $vrgbl->{$lex}[$lex+1][$gbl]: no exception ok 5056 - delete $vrgbl->{$lex}[$lex+1][$gbl]: value ok 5057 - $vlex{$gbl}[$lex+1][$gbl]: no exception ok 5058 - $vlex{$gbl}[$lex+1][$gbl]: value ok 5059 - $vlex{$gbl}[$lex+1][$gbl] = 123: no exception ok 5060 - $vlex{$gbl}[$lex+1][$gbl] = 123: value ok 5061 - exists $vlex{$gbl}[$lex+1][$gbl]: no exception ok 5062 - exists $vlex{$gbl}[$lex+1][$gbl]: value ok 5063 - delete $vlex{$gbl}[$lex+1][$gbl]: no exception ok 5064 - delete $vlex{$gbl}[$lex+1][$gbl]: value ok 5065 - $vgbl{$gbl}[$lex+1][$gbl]: no exception ok 5066 - $vgbl{$gbl}[$lex+1][$gbl]: value ok 5067 - $vgbl{$gbl}[$lex+1][$gbl] = 123: no exception ok 5068 - $vgbl{$gbl}[$lex+1][$gbl] = 123: value ok 5069 - exists $vgbl{$gbl}[$lex+1][$gbl]: no exception ok 5070 - exists $vgbl{$gbl}[$lex+1][$gbl]: value ok 5071 - delete $vgbl{$gbl}[$lex+1][$gbl]: no exception ok 5072 - delete $vgbl{$gbl}[$lex+1][$gbl]: value ok 5073 - $vrlex->{$gbl}[$lex+1][$gbl]: no exception ok 5074 - $vrlex->{$gbl}[$lex+1][$gbl]: value ok 5075 - $vrlex->{$gbl}[$lex+1][$gbl] = 123: no exception ok 5076 - $vrlex->{$gbl}[$lex+1][$gbl] = 123: value ok 5077 - exists $vrlex->{$gbl}[$lex+1][$gbl]: no exception ok 5078 - exists $vrlex->{$gbl}[$lex+1][$gbl]: value ok 5079 - delete $vrlex->{$gbl}[$lex+1][$gbl]: no exception ok 5080 - delete $vrlex->{$gbl}[$lex+1][$gbl]: value ok 5081 - $vrgbl->{$gbl}[$lex+1][$gbl]: no exception ok 5082 - $vrgbl->{$gbl}[$lex+1][$gbl]: value ok 5083 - $vrgbl->{$gbl}[$lex+1][$gbl] = 123: no exception ok 5084 - $vrgbl->{$gbl}[$lex+1][$gbl] = 123: value ok 5085 - exists $vrgbl->{$gbl}[$lex+1][$gbl]: no exception ok 5086 - exists $vrgbl->{$gbl}[$lex+1][$gbl]: value ok 5087 - delete $vrgbl->{$gbl}[$lex+1][$gbl]: no exception ok 5088 - delete $vrgbl->{$gbl}[$lex+1][$gbl]: value ok 5089 - $vlex{"x$lex"}[$lex+1][$gbl]: no exception ok 5090 - $vlex{"x$lex"}[$lex+1][$gbl]: value ok 5091 - $vlex{"x$lex"}[$lex+1][$gbl] = 123: no exception ok 5092 - $vlex{"x$lex"}[$lex+1][$gbl] = 123: value ok 5093 - exists $vlex{"x$lex"}[$lex+1][$gbl]: no exception ok 5094 - exists $vlex{"x$lex"}[$lex+1][$gbl]: value ok 5095 - delete $vlex{"x$lex"}[$lex+1][$gbl]: no exception ok 5096 - delete $vlex{"x$lex"}[$lex+1][$gbl]: value ok 5097 - $vgbl{"x$lex"}[$lex+1][$gbl]: no exception ok 5098 - $vgbl{"x$lex"}[$lex+1][$gbl]: value ok 5099 - $vgbl{"x$lex"}[$lex+1][$gbl] = 123: no exception ok 5100 - $vgbl{"x$lex"}[$lex+1][$gbl] = 123: value ok 5101 - exists $vgbl{"x$lex"}[$lex+1][$gbl]: no exception ok 5102 - exists $vgbl{"x$lex"}[$lex+1][$gbl]: value ok 5103 - delete $vgbl{"x$lex"}[$lex+1][$gbl]: no exception ok 5104 - delete $vgbl{"x$lex"}[$lex+1][$gbl]: value ok 5105 - $vrlex->{"x$lex"}[$lex+1][$gbl]: no exception ok 5106 - $vrlex->{"x$lex"}[$lex+1][$gbl]: value ok 5107 - $vrlex->{"x$lex"}[$lex+1][$gbl] = 123: no exception ok 5108 - $vrlex->{"x$lex"}[$lex+1][$gbl] = 123: value ok 5109 - exists $vrlex->{"x$lex"}[$lex+1][$gbl]: no exception ok 5110 - exists $vrlex->{"x$lex"}[$lex+1][$gbl]: value ok 5111 - delete $vrlex->{"x$lex"}[$lex+1][$gbl]: no exception ok 5112 - delete $vrlex->{"x$lex"}[$lex+1][$gbl]: value ok 5113 - $vrgbl->{"x$lex"}[$lex+1][$gbl]: no exception ok 5114 - $vrgbl->{"x$lex"}[$lex+1][$gbl]: value ok 5115 - $vrgbl->{"x$lex"}[$lex+1][$gbl] = 123: no exception ok 5116 - $vrgbl->{"x$lex"}[$lex+1][$gbl] = 123: value ok 5117 - exists $vrgbl->{"x$lex"}[$lex+1][$gbl]: no exception ok 5118 - exists $vrgbl->{"x$lex"}[$lex+1][$gbl]: value ok 5119 - delete $vrgbl->{"x$lex"}[$lex+1][$gbl]: no exception ok 5120 - delete $vrgbl->{"x$lex"}[$lex+1][$gbl]: value ok 5121 - $vlex[0]{foo}[$gbl]: no exception ok 5122 - $vlex[0]{foo}[$gbl]: value ok 5123 - $vlex[0]{foo}[$gbl] = 123: no exception ok 5124 - $vlex[0]{foo}[$gbl] = 123: value ok 5125 - exists $vlex[0]{foo}[$gbl]: no exception ok 5126 - exists $vlex[0]{foo}[$gbl]: value ok 5127 - delete $vlex[0]{foo}[$gbl]: no exception ok 5128 - delete $vlex[0]{foo}[$gbl]: value ok 5129 - $vgbl[0]{foo}[$gbl]: no exception ok 5130 - $vgbl[0]{foo}[$gbl]: value ok 5131 - $vgbl[0]{foo}[$gbl] = 123: no exception ok 5132 - $vgbl[0]{foo}[$gbl] = 123: value ok 5133 - exists $vgbl[0]{foo}[$gbl]: no exception ok 5134 - exists $vgbl[0]{foo}[$gbl]: value ok 5135 - delete $vgbl[0]{foo}[$gbl]: no exception ok 5136 - delete $vgbl[0]{foo}[$gbl]: value ok 5137 - $vrlex->[0]{foo}[$gbl]: no exception ok 5138 - $vrlex->[0]{foo}[$gbl]: value ok 5139 - $vrlex->[0]{foo}[$gbl] = 123: no exception ok 5140 - $vrlex->[0]{foo}[$gbl] = 123: value ok 5141 - exists $vrlex->[0]{foo}[$gbl]: no exception ok 5142 - exists $vrlex->[0]{foo}[$gbl]: value ok 5143 - delete $vrlex->[0]{foo}[$gbl]: no exception ok 5144 - delete $vrlex->[0]{foo}[$gbl]: value ok 5145 - $vrgbl->[0]{foo}[$gbl]: no exception ok 5146 - $vrgbl->[0]{foo}[$gbl]: value ok 5147 - $vrgbl->[0]{foo}[$gbl] = 123: no exception ok 5148 - $vrgbl->[0]{foo}[$gbl] = 123: value ok 5149 - exists $vrgbl->[0]{foo}[$gbl]: no exception ok 5150 - exists $vrgbl->[0]{foo}[$gbl]: value ok 5151 - delete $vrgbl->[0]{foo}[$gbl]: no exception ok 5152 - delete $vrgbl->[0]{foo}[$gbl]: value ok 5153 - $vlex[$lex]{foo}[$gbl]: no exception ok 5154 - $vlex[$lex]{foo}[$gbl]: value ok 5155 - $vlex[$lex]{foo}[$gbl] = 123: no exception ok 5156 - $vlex[$lex]{foo}[$gbl] = 123: value ok 5157 - exists $vlex[$lex]{foo}[$gbl]: no exception ok 5158 - exists $vlex[$lex]{foo}[$gbl]: value ok 5159 - delete $vlex[$lex]{foo}[$gbl]: no exception ok 5160 - delete $vlex[$lex]{foo}[$gbl]: value ok 5161 - $vgbl[$lex]{foo}[$gbl]: no exception ok 5162 - $vgbl[$lex]{foo}[$gbl]: value ok 5163 - $vgbl[$lex]{foo}[$gbl] = 123: no exception ok 5164 - $vgbl[$lex]{foo}[$gbl] = 123: value ok 5165 - exists $vgbl[$lex]{foo}[$gbl]: no exception ok 5166 - exists $vgbl[$lex]{foo}[$gbl]: value ok 5167 - delete $vgbl[$lex]{foo}[$gbl]: no exception ok 5168 - delete $vgbl[$lex]{foo}[$gbl]: value ok 5169 - $vrlex->[$lex]{foo}[$gbl]: no exception ok 5170 - $vrlex->[$lex]{foo}[$gbl]: value ok 5171 - $vrlex->[$lex]{foo}[$gbl] = 123: no exception ok 5172 - $vrlex->[$lex]{foo}[$gbl] = 123: value ok 5173 - exists $vrlex->[$lex]{foo}[$gbl]: no exception ok 5174 - exists $vrlex->[$lex]{foo}[$gbl]: value ok 5175 - delete $vrlex->[$lex]{foo}[$gbl]: no exception ok 5176 - delete $vrlex->[$lex]{foo}[$gbl]: value ok 5177 - $vrgbl->[$lex]{foo}[$gbl]: no exception ok 5178 - $vrgbl->[$lex]{foo}[$gbl]: value ok 5179 - $vrgbl->[$lex]{foo}[$gbl] = 123: no exception ok 5180 - $vrgbl->[$lex]{foo}[$gbl] = 123: value ok 5181 - exists $vrgbl->[$lex]{foo}[$gbl]: no exception ok 5182 - exists $vrgbl->[$lex]{foo}[$gbl]: value ok 5183 - delete $vrgbl->[$lex]{foo}[$gbl]: no exception ok 5184 - delete $vrgbl->[$lex]{foo}[$gbl]: value ok 5185 - $vlex[$gbl]{foo}[$gbl]: no exception ok 5186 - $vlex[$gbl]{foo}[$gbl]: value ok 5187 - $vlex[$gbl]{foo}[$gbl] = 123: no exception ok 5188 - $vlex[$gbl]{foo}[$gbl] = 123: value ok 5189 - exists $vlex[$gbl]{foo}[$gbl]: no exception ok 5190 - exists $vlex[$gbl]{foo}[$gbl]: value ok 5191 - delete $vlex[$gbl]{foo}[$gbl]: no exception ok 5192 - delete $vlex[$gbl]{foo}[$gbl]: value ok 5193 - $vgbl[$gbl]{foo}[$gbl]: no exception ok 5194 - $vgbl[$gbl]{foo}[$gbl]: value ok 5195 - $vgbl[$gbl]{foo}[$gbl] = 123: no exception ok 5196 - $vgbl[$gbl]{foo}[$gbl] = 123: value ok 5197 - exists $vgbl[$gbl]{foo}[$gbl]: no exception ok 5198 - exists $vgbl[$gbl]{foo}[$gbl]: value ok 5199 - delete $vgbl[$gbl]{foo}[$gbl]: no exception ok 5200 - delete $vgbl[$gbl]{foo}[$gbl]: value ok 5201 - $vrlex->[$gbl]{foo}[$gbl]: no exception ok 5202 - $vrlex->[$gbl]{foo}[$gbl]: value ok 5203 - $vrlex->[$gbl]{foo}[$gbl] = 123: no exception ok 5204 - $vrlex->[$gbl]{foo}[$gbl] = 123: value ok 5205 - exists $vrlex->[$gbl]{foo}[$gbl]: no exception ok 5206 - exists $vrlex->[$gbl]{foo}[$gbl]: value ok 5207 - delete $vrlex->[$gbl]{foo}[$gbl]: no exception ok 5208 - delete $vrlex->[$gbl]{foo}[$gbl]: value ok 5209 - $vrgbl->[$gbl]{foo}[$gbl]: no exception ok 5210 - $vrgbl->[$gbl]{foo}[$gbl]: value ok 5211 - $vrgbl->[$gbl]{foo}[$gbl] = 123: no exception ok 5212 - $vrgbl->[$gbl]{foo}[$gbl] = 123: value ok 5213 - exists $vrgbl->[$gbl]{foo}[$gbl]: no exception ok 5214 - exists $vrgbl->[$gbl]{foo}[$gbl]: value ok 5215 - delete $vrgbl->[$gbl]{foo}[$gbl]: no exception ok 5216 - delete $vrgbl->[$gbl]{foo}[$gbl]: value ok 5217 - $vlex[$lex+1]{foo}[$gbl]: no exception ok 5218 - $vlex[$lex+1]{foo}[$gbl]: value ok 5219 - $vlex[$lex+1]{foo}[$gbl] = 123: no exception ok 5220 - $vlex[$lex+1]{foo}[$gbl] = 123: value ok 5221 - exists $vlex[$lex+1]{foo}[$gbl]: no exception ok 5222 - exists $vlex[$lex+1]{foo}[$gbl]: value ok 5223 - delete $vlex[$lex+1]{foo}[$gbl]: no exception ok 5224 - delete $vlex[$lex+1]{foo}[$gbl]: value ok 5225 - $vgbl[$lex+1]{foo}[$gbl]: no exception ok 5226 - $vgbl[$lex+1]{foo}[$gbl]: value ok 5227 - $vgbl[$lex+1]{foo}[$gbl] = 123: no exception ok 5228 - $vgbl[$lex+1]{foo}[$gbl] = 123: value ok 5229 - exists $vgbl[$lex+1]{foo}[$gbl]: no exception ok 5230 - exists $vgbl[$lex+1]{foo}[$gbl]: value ok 5231 - delete $vgbl[$lex+1]{foo}[$gbl]: no exception ok 5232 - delete $vgbl[$lex+1]{foo}[$gbl]: value ok 5233 - $vrlex->[$lex+1]{foo}[$gbl]: no exception ok 5234 - $vrlex->[$lex+1]{foo}[$gbl]: value ok 5235 - $vrlex->[$lex+1]{foo}[$gbl] = 123: no exception ok 5236 - $vrlex->[$lex+1]{foo}[$gbl] = 123: value ok 5237 - exists $vrlex->[$lex+1]{foo}[$gbl]: no exception ok 5238 - exists $vrlex->[$lex+1]{foo}[$gbl]: value ok 5239 - delete $vrlex->[$lex+1]{foo}[$gbl]: no exception ok 5240 - delete $vrlex->[$lex+1]{foo}[$gbl]: value ok 5241 - $vrgbl->[$lex+1]{foo}[$gbl]: no exception ok 5242 - $vrgbl->[$lex+1]{foo}[$gbl]: value ok 5243 - $vrgbl->[$lex+1]{foo}[$gbl] = 123: no exception ok 5244 - $vrgbl->[$lex+1]{foo}[$gbl] = 123: value ok 5245 - exists $vrgbl->[$lex+1]{foo}[$gbl]: no exception ok 5246 - exists $vrgbl->[$lex+1]{foo}[$gbl]: value ok 5247 - delete $vrgbl->[$lex+1]{foo}[$gbl]: no exception ok 5248 - delete $vrgbl->[$lex+1]{foo}[$gbl]: value ok 5249 - $vlex{foo}{foo}[$gbl]: no exception ok 5250 - $vlex{foo}{foo}[$gbl]: value ok 5251 - $vlex{foo}{foo}[$gbl] = 123: no exception ok 5252 - $vlex{foo}{foo}[$gbl] = 123: value ok 5253 - exists $vlex{foo}{foo}[$gbl]: no exception ok 5254 - exists $vlex{foo}{foo}[$gbl]: value ok 5255 - delete $vlex{foo}{foo}[$gbl]: no exception ok 5256 - delete $vlex{foo}{foo}[$gbl]: value ok 5257 - $vgbl{foo}{foo}[$gbl]: no exception ok 5258 - $vgbl{foo}{foo}[$gbl]: value ok 5259 - $vgbl{foo}{foo}[$gbl] = 123: no exception ok 5260 - $vgbl{foo}{foo}[$gbl] = 123: value ok 5261 - exists $vgbl{foo}{foo}[$gbl]: no exception ok 5262 - exists $vgbl{foo}{foo}[$gbl]: value ok 5263 - delete $vgbl{foo}{foo}[$gbl]: no exception ok 5264 - delete $vgbl{foo}{foo}[$gbl]: value ok 5265 - $vrlex->{foo}{foo}[$gbl]: no exception ok 5266 - $vrlex->{foo}{foo}[$gbl]: value ok 5267 - $vrlex->{foo}{foo}[$gbl] = 123: no exception ok 5268 - $vrlex->{foo}{foo}[$gbl] = 123: value ok 5269 - exists $vrlex->{foo}{foo}[$gbl]: no exception ok 5270 - exists $vrlex->{foo}{foo}[$gbl]: value ok 5271 - delete $vrlex->{foo}{foo}[$gbl]: no exception ok 5272 - delete $vrlex->{foo}{foo}[$gbl]: value ok 5273 - $vrgbl->{foo}{foo}[$gbl]: no exception ok 5274 - $vrgbl->{foo}{foo}[$gbl]: value ok 5275 - $vrgbl->{foo}{foo}[$gbl] = 123: no exception ok 5276 - $vrgbl->{foo}{foo}[$gbl] = 123: value ok 5277 - exists $vrgbl->{foo}{foo}[$gbl]: no exception ok 5278 - exists $vrgbl->{foo}{foo}[$gbl]: value ok 5279 - delete $vrgbl->{foo}{foo}[$gbl]: no exception ok 5280 - delete $vrgbl->{foo}{foo}[$gbl]: value ok 5281 - $vlex{$lex}{foo}[$gbl]: no exception ok 5282 - $vlex{$lex}{foo}[$gbl]: value ok 5283 - $vlex{$lex}{foo}[$gbl] = 123: no exception ok 5284 - $vlex{$lex}{foo}[$gbl] = 123: value ok 5285 - exists $vlex{$lex}{foo}[$gbl]: no exception ok 5286 - exists $vlex{$lex}{foo}[$gbl]: value ok 5287 - delete $vlex{$lex}{foo}[$gbl]: no exception ok 5288 - delete $vlex{$lex}{foo}[$gbl]: value ok 5289 - $vgbl{$lex}{foo}[$gbl]: no exception ok 5290 - $vgbl{$lex}{foo}[$gbl]: value ok 5291 - $vgbl{$lex}{foo}[$gbl] = 123: no exception ok 5292 - $vgbl{$lex}{foo}[$gbl] = 123: value ok 5293 - exists $vgbl{$lex}{foo}[$gbl]: no exception ok 5294 - exists $vgbl{$lex}{foo}[$gbl]: value ok 5295 - delete $vgbl{$lex}{foo}[$gbl]: no exception ok 5296 - delete $vgbl{$lex}{foo}[$gbl]: value ok 5297 - $vrlex->{$lex}{foo}[$gbl]: no exception ok 5298 - $vrlex->{$lex}{foo}[$gbl]: value ok 5299 - $vrlex->{$lex}{foo}[$gbl] = 123: no exception ok 5300 - $vrlex->{$lex}{foo}[$gbl] = 123: value ok 5301 - exists $vrlex->{$lex}{foo}[$gbl]: no exception ok 5302 - exists $vrlex->{$lex}{foo}[$gbl]: value ok 5303 - delete $vrlex->{$lex}{foo}[$gbl]: no exception ok 5304 - delete $vrlex->{$lex}{foo}[$gbl]: value ok 5305 - $vrgbl->{$lex}{foo}[$gbl]: no exception ok 5306 - $vrgbl->{$lex}{foo}[$gbl]: value ok 5307 - $vrgbl->{$lex}{foo}[$gbl] = 123: no exception ok 5308 - $vrgbl->{$lex}{foo}[$gbl] = 123: value ok 5309 - exists $vrgbl->{$lex}{foo}[$gbl]: no exception ok 5310 - exists $vrgbl->{$lex}{foo}[$gbl]: value ok 5311 - delete $vrgbl->{$lex}{foo}[$gbl]: no exception ok 5312 - delete $vrgbl->{$lex}{foo}[$gbl]: value ok 5313 - $vlex{$gbl}{foo}[$gbl]: no exception ok 5314 - $vlex{$gbl}{foo}[$gbl]: value ok 5315 - $vlex{$gbl}{foo}[$gbl] = 123: no exception ok 5316 - $vlex{$gbl}{foo}[$gbl] = 123: value ok 5317 - exists $vlex{$gbl}{foo}[$gbl]: no exception ok 5318 - exists $vlex{$gbl}{foo}[$gbl]: value ok 5319 - delete $vlex{$gbl}{foo}[$gbl]: no exception ok 5320 - delete $vlex{$gbl}{foo}[$gbl]: value ok 5321 - $vgbl{$gbl}{foo}[$gbl]: no exception ok 5322 - $vgbl{$gbl}{foo}[$gbl]: value ok 5323 - $vgbl{$gbl}{foo}[$gbl] = 123: no exception ok 5324 - $vgbl{$gbl}{foo}[$gbl] = 123: value ok 5325 - exists $vgbl{$gbl}{foo}[$gbl]: no exception ok 5326 - exists $vgbl{$gbl}{foo}[$gbl]: value ok 5327 - delete $vgbl{$gbl}{foo}[$gbl]: no exception ok 5328 - delete $vgbl{$gbl}{foo}[$gbl]: value ok 5329 - $vrlex->{$gbl}{foo}[$gbl]: no exception ok 5330 - $vrlex->{$gbl}{foo}[$gbl]: value ok 5331 - $vrlex->{$gbl}{foo}[$gbl] = 123: no exception ok 5332 - $vrlex->{$gbl}{foo}[$gbl] = 123: value ok 5333 - exists $vrlex->{$gbl}{foo}[$gbl]: no exception ok 5334 - exists $vrlex->{$gbl}{foo}[$gbl]: value ok 5335 - delete $vrlex->{$gbl}{foo}[$gbl]: no exception ok 5336 - delete $vrlex->{$gbl}{foo}[$gbl]: value ok 5337 - $vrgbl->{$gbl}{foo}[$gbl]: no exception ok 5338 - $vrgbl->{$gbl}{foo}[$gbl]: value ok 5339 - $vrgbl->{$gbl}{foo}[$gbl] = 123: no exception ok 5340 - $vrgbl->{$gbl}{foo}[$gbl] = 123: value ok 5341 - exists $vrgbl->{$gbl}{foo}[$gbl]: no exception ok 5342 - exists $vrgbl->{$gbl}{foo}[$gbl]: value ok 5343 - delete $vrgbl->{$gbl}{foo}[$gbl]: no exception ok 5344 - delete $vrgbl->{$gbl}{foo}[$gbl]: value ok 5345 - $vlex{"x$lex"}{foo}[$gbl]: no exception ok 5346 - $vlex{"x$lex"}{foo}[$gbl]: value ok 5347 - $vlex{"x$lex"}{foo}[$gbl] = 123: no exception ok 5348 - $vlex{"x$lex"}{foo}[$gbl] = 123: value ok 5349 - exists $vlex{"x$lex"}{foo}[$gbl]: no exception ok 5350 - exists $vlex{"x$lex"}{foo}[$gbl]: value ok 5351 - delete $vlex{"x$lex"}{foo}[$gbl]: no exception ok 5352 - delete $vlex{"x$lex"}{foo}[$gbl]: value ok 5353 - $vgbl{"x$lex"}{foo}[$gbl]: no exception ok 5354 - $vgbl{"x$lex"}{foo}[$gbl]: value ok 5355 - $vgbl{"x$lex"}{foo}[$gbl] = 123: no exception ok 5356 - $vgbl{"x$lex"}{foo}[$gbl] = 123: value ok 5357 - exists $vgbl{"x$lex"}{foo}[$gbl]: no exception ok 5358 - exists $vgbl{"x$lex"}{foo}[$gbl]: value ok 5359 - delete $vgbl{"x$lex"}{foo}[$gbl]: no exception ok 5360 - delete $vgbl{"x$lex"}{foo}[$gbl]: value ok 5361 - $vrlex->{"x$lex"}{foo}[$gbl]: no exception ok 5362 - $vrlex->{"x$lex"}{foo}[$gbl]: value ok 5363 - $vrlex->{"x$lex"}{foo}[$gbl] = 123: no exception ok 5364 - $vrlex->{"x$lex"}{foo}[$gbl] = 123: value ok 5365 - exists $vrlex->{"x$lex"}{foo}[$gbl]: no exception ok 5366 - exists $vrlex->{"x$lex"}{foo}[$gbl]: value ok 5367 - delete $vrlex->{"x$lex"}{foo}[$gbl]: no exception ok 5368 - delete $vrlex->{"x$lex"}{foo}[$gbl]: value ok 5369 - $vrgbl->{"x$lex"}{foo}[$gbl]: no exception ok 5370 - $vrgbl->{"x$lex"}{foo}[$gbl]: value ok 5371 - $vrgbl->{"x$lex"}{foo}[$gbl] = 123: no exception ok 5372 - $vrgbl->{"x$lex"}{foo}[$gbl] = 123: value ok 5373 - exists $vrgbl->{"x$lex"}{foo}[$gbl]: no exception ok 5374 - exists $vrgbl->{"x$lex"}{foo}[$gbl]: value ok 5375 - delete $vrgbl->{"x$lex"}{foo}[$gbl]: no exception ok 5376 - delete $vrgbl->{"x$lex"}{foo}[$gbl]: value ok 5377 - $vlex[0]{$lex}[$gbl]: no exception ok 5378 - $vlex[0]{$lex}[$gbl]: value ok 5379 - $vlex[0]{$lex}[$gbl] = 123: no exception ok 5380 - $vlex[0]{$lex}[$gbl] = 123: value ok 5381 - exists $vlex[0]{$lex}[$gbl]: no exception ok 5382 - exists $vlex[0]{$lex}[$gbl]: value ok 5383 - delete $vlex[0]{$lex}[$gbl]: no exception ok 5384 - delete $vlex[0]{$lex}[$gbl]: value ok 5385 - $vgbl[0]{$lex}[$gbl]: no exception ok 5386 - $vgbl[0]{$lex}[$gbl]: value ok 5387 - $vgbl[0]{$lex}[$gbl] = 123: no exception ok 5388 - $vgbl[0]{$lex}[$gbl] = 123: value ok 5389 - exists $vgbl[0]{$lex}[$gbl]: no exception ok 5390 - exists $vgbl[0]{$lex}[$gbl]: value ok 5391 - delete $vgbl[0]{$lex}[$gbl]: no exception ok 5392 - delete $vgbl[0]{$lex}[$gbl]: value ok 5393 - $vrlex->[0]{$lex}[$gbl]: no exception ok 5394 - $vrlex->[0]{$lex}[$gbl]: value ok 5395 - $vrlex->[0]{$lex}[$gbl] = 123: no exception ok 5396 - $vrlex->[0]{$lex}[$gbl] = 123: value ok 5397 - exists $vrlex->[0]{$lex}[$gbl]: no exception ok 5398 - exists $vrlex->[0]{$lex}[$gbl]: value ok 5399 - delete $vrlex->[0]{$lex}[$gbl]: no exception ok 5400 - delete $vrlex->[0]{$lex}[$gbl]: value ok 5401 - $vrgbl->[0]{$lex}[$gbl]: no exception ok 5402 - $vrgbl->[0]{$lex}[$gbl]: value ok 5403 - $vrgbl->[0]{$lex}[$gbl] = 123: no exception ok 5404 - $vrgbl->[0]{$lex}[$gbl] = 123: value ok 5405 - exists $vrgbl->[0]{$lex}[$gbl]: no exception ok 5406 - exists $vrgbl->[0]{$lex}[$gbl]: value ok 5407 - delete $vrgbl->[0]{$lex}[$gbl]: no exception ok 5408 - delete $vrgbl->[0]{$lex}[$gbl]: value ok 5409 - $vlex[$lex]{$lex}[$gbl]: no exception ok 5410 - $vlex[$lex]{$lex}[$gbl]: value ok 5411 - $vlex[$lex]{$lex}[$gbl] = 123: no exception ok 5412 - $vlex[$lex]{$lex}[$gbl] = 123: value ok 5413 - exists $vlex[$lex]{$lex}[$gbl]: no exception ok 5414 - exists $vlex[$lex]{$lex}[$gbl]: value ok 5415 - delete $vlex[$lex]{$lex}[$gbl]: no exception ok 5416 - delete $vlex[$lex]{$lex}[$gbl]: value ok 5417 - $vgbl[$lex]{$lex}[$gbl]: no exception ok 5418 - $vgbl[$lex]{$lex}[$gbl]: value ok 5419 - $vgbl[$lex]{$lex}[$gbl] = 123: no exception ok 5420 - $vgbl[$lex]{$lex}[$gbl] = 123: value ok 5421 - exists $vgbl[$lex]{$lex}[$gbl]: no exception ok 5422 - exists $vgbl[$lex]{$lex}[$gbl]: value ok 5423 - delete $vgbl[$lex]{$lex}[$gbl]: no exception ok 5424 - delete $vgbl[$lex]{$lex}[$gbl]: value ok 5425 - $vrlex->[$lex]{$lex}[$gbl]: no exception ok 5426 - $vrlex->[$lex]{$lex}[$gbl]: value ok 5427 - $vrlex->[$lex]{$lex}[$gbl] = 123: no exception ok 5428 - $vrlex->[$lex]{$lex}[$gbl] = 123: value ok 5429 - exists $vrlex->[$lex]{$lex}[$gbl]: no exception ok 5430 - exists $vrlex->[$lex]{$lex}[$gbl]: value ok 5431 - delete $vrlex->[$lex]{$lex}[$gbl]: no exception ok 5432 - delete $vrlex->[$lex]{$lex}[$gbl]: value ok 5433 - $vrgbl->[$lex]{$lex}[$gbl]: no exception ok 5434 - $vrgbl->[$lex]{$lex}[$gbl]: value ok 5435 - $vrgbl->[$lex]{$lex}[$gbl] = 123: no exception ok 5436 - $vrgbl->[$lex]{$lex}[$gbl] = 123: value ok 5437 - exists $vrgbl->[$lex]{$lex}[$gbl]: no exception ok 5438 - exists $vrgbl->[$lex]{$lex}[$gbl]: value ok 5439 - delete $vrgbl->[$lex]{$lex}[$gbl]: no exception ok 5440 - delete $vrgbl->[$lex]{$lex}[$gbl]: value ok 5441 - $vlex[$gbl]{$lex}[$gbl]: no exception ok 5442 - $vlex[$gbl]{$lex}[$gbl]: value ok 5443 - $vlex[$gbl]{$lex}[$gbl] = 123: no exception ok 5444 - $vlex[$gbl]{$lex}[$gbl] = 123: value ok 5445 - exists $vlex[$gbl]{$lex}[$gbl]: no exception ok 5446 - exists $vlex[$gbl]{$lex}[$gbl]: value ok 5447 - delete $vlex[$gbl]{$lex}[$gbl]: no exception ok 5448 - delete $vlex[$gbl]{$lex}[$gbl]: value ok 5449 - $vgbl[$gbl]{$lex}[$gbl]: no exception ok 5450 - $vgbl[$gbl]{$lex}[$gbl]: value ok 5451 - $vgbl[$gbl]{$lex}[$gbl] = 123: no exception ok 5452 - $vgbl[$gbl]{$lex}[$gbl] = 123: value ok 5453 - exists $vgbl[$gbl]{$lex}[$gbl]: no exception ok 5454 - exists $vgbl[$gbl]{$lex}[$gbl]: value ok 5455 - delete $vgbl[$gbl]{$lex}[$gbl]: no exception ok 5456 - delete $vgbl[$gbl]{$lex}[$gbl]: value ok 5457 - $vrlex->[$gbl]{$lex}[$gbl]: no exception ok 5458 - $vrlex->[$gbl]{$lex}[$gbl]: value ok 5459 - $vrlex->[$gbl]{$lex}[$gbl] = 123: no exception ok 5460 - $vrlex->[$gbl]{$lex}[$gbl] = 123: value ok 5461 - exists $vrlex->[$gbl]{$lex}[$gbl]: no exception ok 5462 - exists $vrlex->[$gbl]{$lex}[$gbl]: value ok 5463 - delete $vrlex->[$gbl]{$lex}[$gbl]: no exception ok 5464 - delete $vrlex->[$gbl]{$lex}[$gbl]: value ok 5465 - $vrgbl->[$gbl]{$lex}[$gbl]: no exception ok 5466 - $vrgbl->[$gbl]{$lex}[$gbl]: value ok 5467 - $vrgbl->[$gbl]{$lex}[$gbl] = 123: no exception ok 5468 - $vrgbl->[$gbl]{$lex}[$gbl] = 123: value ok 5469 - exists $vrgbl->[$gbl]{$lex}[$gbl]: no exception ok 5470 - exists $vrgbl->[$gbl]{$lex}[$gbl]: value ok 5471 - delete $vrgbl->[$gbl]{$lex}[$gbl]: no exception ok 5472 - delete $vrgbl->[$gbl]{$lex}[$gbl]: value ok 5473 - $vlex[$lex+1]{$lex}[$gbl]: no exception ok 5474 - $vlex[$lex+1]{$lex}[$gbl]: value ok 5475 - $vlex[$lex+1]{$lex}[$gbl] = 123: no exception ok 5476 - $vlex[$lex+1]{$lex}[$gbl] = 123: value ok 5477 - exists $vlex[$lex+1]{$lex}[$gbl]: no exception ok 5478 - exists $vlex[$lex+1]{$lex}[$gbl]: value ok 5479 - delete $vlex[$lex+1]{$lex}[$gbl]: no exception ok 5480 - delete $vlex[$lex+1]{$lex}[$gbl]: value ok 5481 - $vgbl[$lex+1]{$lex}[$gbl]: no exception ok 5482 - $vgbl[$lex+1]{$lex}[$gbl]: value ok 5483 - $vgbl[$lex+1]{$lex}[$gbl] = 123: no exception ok 5484 - $vgbl[$lex+1]{$lex}[$gbl] = 123: value ok 5485 - exists $vgbl[$lex+1]{$lex}[$gbl]: no exception ok 5486 - exists $vgbl[$lex+1]{$lex}[$gbl]: value ok 5487 - delete $vgbl[$lex+1]{$lex}[$gbl]: no exception ok 5488 - delete $vgbl[$lex+1]{$lex}[$gbl]: value ok 5489 - $vrlex->[$lex+1]{$lex}[$gbl]: no exception ok 5490 - $vrlex->[$lex+1]{$lex}[$gbl]: value ok 5491 - $vrlex->[$lex+1]{$lex}[$gbl] = 123: no exception ok 5492 - $vrlex->[$lex+1]{$lex}[$gbl] = 123: value ok 5493 - exists $vrlex->[$lex+1]{$lex}[$gbl]: no exception ok 5494 - exists $vrlex->[$lex+1]{$lex}[$gbl]: value ok 5495 - delete $vrlex->[$lex+1]{$lex}[$gbl]: no exception ok 5496 - delete $vrlex->[$lex+1]{$lex}[$gbl]: value ok 5497 - $vrgbl->[$lex+1]{$lex}[$gbl]: no exception ok 5498 - $vrgbl->[$lex+1]{$lex}[$gbl]: value ok 5499 - $vrgbl->[$lex+1]{$lex}[$gbl] = 123: no exception ok 5500 - $vrgbl->[$lex+1]{$lex}[$gbl] = 123: value ok 5501 - exists $vrgbl->[$lex+1]{$lex}[$gbl]: no exception ok 5502 - exists $vrgbl->[$lex+1]{$lex}[$gbl]: value ok 5503 - delete $vrgbl->[$lex+1]{$lex}[$gbl]: no exception ok 5504 - delete $vrgbl->[$lex+1]{$lex}[$gbl]: value ok 5505 - $vlex{foo}{$lex}[$gbl]: no exception ok 5506 - $vlex{foo}{$lex}[$gbl]: value ok 5507 - $vlex{foo}{$lex}[$gbl] = 123: no exception ok 5508 - $vlex{foo}{$lex}[$gbl] = 123: value ok 5509 - exists $vlex{foo}{$lex}[$gbl]: no exception ok 5510 - exists $vlex{foo}{$lex}[$gbl]: value ok 5511 - delete $vlex{foo}{$lex}[$gbl]: no exception ok 5512 - delete $vlex{foo}{$lex}[$gbl]: value ok 5513 - $vgbl{foo}{$lex}[$gbl]: no exception ok 5514 - $vgbl{foo}{$lex}[$gbl]: value ok 5515 - $vgbl{foo}{$lex}[$gbl] = 123: no exception ok 5516 - $vgbl{foo}{$lex}[$gbl] = 123: value ok 5517 - exists $vgbl{foo}{$lex}[$gbl]: no exception ok 5518 - exists $vgbl{foo}{$lex}[$gbl]: value ok 5519 - delete $vgbl{foo}{$lex}[$gbl]: no exception ok 5520 - delete $vgbl{foo}{$lex}[$gbl]: value ok 5521 - $vrlex->{foo}{$lex}[$gbl]: no exception ok 5522 - $vrlex->{foo}{$lex}[$gbl]: value ok 5523 - $vrlex->{foo}{$lex}[$gbl] = 123: no exception ok 5524 - $vrlex->{foo}{$lex}[$gbl] = 123: value ok 5525 - exists $vrlex->{foo}{$lex}[$gbl]: no exception ok 5526 - exists $vrlex->{foo}{$lex}[$gbl]: value ok 5527 - delete $vrlex->{foo}{$lex}[$gbl]: no exception ok 5528 - delete $vrlex->{foo}{$lex}[$gbl]: value ok 5529 - $vrgbl->{foo}{$lex}[$gbl]: no exception ok 5530 - $vrgbl->{foo}{$lex}[$gbl]: value ok 5531 - $vrgbl->{foo}{$lex}[$gbl] = 123: no exception ok 5532 - $vrgbl->{foo}{$lex}[$gbl] = 123: value ok 5533 - exists $vrgbl->{foo}{$lex}[$gbl]: no exception ok 5534 - exists $vrgbl->{foo}{$lex}[$gbl]: value ok 5535 - delete $vrgbl->{foo}{$lex}[$gbl]: no exception ok 5536 - delete $vrgbl->{foo}{$lex}[$gbl]: value ok 5537 - $vlex{$lex}{$lex}[$gbl]: no exception ok 5538 - $vlex{$lex}{$lex}[$gbl]: value ok 5539 - $vlex{$lex}{$lex}[$gbl] = 123: no exception ok 5540 - $vlex{$lex}{$lex}[$gbl] = 123: value ok 5541 - exists $vlex{$lex}{$lex}[$gbl]: no exception ok 5542 - exists $vlex{$lex}{$lex}[$gbl]: value ok 5543 - delete $vlex{$lex}{$lex}[$gbl]: no exception ok 5544 - delete $vlex{$lex}{$lex}[$gbl]: value ok 5545 - $vgbl{$lex}{$lex}[$gbl]: no exception ok 5546 - $vgbl{$lex}{$lex}[$gbl]: value ok 5547 - $vgbl{$lex}{$lex}[$gbl] = 123: no exception ok 5548 - $vgbl{$lex}{$lex}[$gbl] = 123: value ok 5549 - exists $vgbl{$lex}{$lex}[$gbl]: no exception ok 5550 - exists $vgbl{$lex}{$lex}[$gbl]: value ok 5551 - delete $vgbl{$lex}{$lex}[$gbl]: no exception ok 5552 - delete $vgbl{$lex}{$lex}[$gbl]: value ok 5553 - $vrlex->{$lex}{$lex}[$gbl]: no exception ok 5554 - $vrlex->{$lex}{$lex}[$gbl]: value ok 5555 - $vrlex->{$lex}{$lex}[$gbl] = 123: no exception ok 5556 - $vrlex->{$lex}{$lex}[$gbl] = 123: value ok 5557 - exists $vrlex->{$lex}{$lex}[$gbl]: no exception ok 5558 - exists $vrlex->{$lex}{$lex}[$gbl]: value ok 5559 - delete $vrlex->{$lex}{$lex}[$gbl]: no exception ok 5560 - delete $vrlex->{$lex}{$lex}[$gbl]: value ok 5561 - $vrgbl->{$lex}{$lex}[$gbl]: no exception ok 5562 - $vrgbl->{$lex}{$lex}[$gbl]: value ok 5563 - $vrgbl->{$lex}{$lex}[$gbl] = 123: no exception ok 5564 - $vrgbl->{$lex}{$lex}[$gbl] = 123: value ok 5565 - exists $vrgbl->{$lex}{$lex}[$gbl]: no exception ok 5566 - exists $vrgbl->{$lex}{$lex}[$gbl]: value ok 5567 - delete $vrgbl->{$lex}{$lex}[$gbl]: no exception ok 5568 - delete $vrgbl->{$lex}{$lex}[$gbl]: value ok 5569 - $vlex{$gbl}{$lex}[$gbl]: no exception ok 5570 - $vlex{$gbl}{$lex}[$gbl]: value ok 5571 - $vlex{$gbl}{$lex}[$gbl] = 123: no exception ok 5572 - $vlex{$gbl}{$lex}[$gbl] = 123: value ok 5573 - exists $vlex{$gbl}{$lex}[$gbl]: no exception ok 5574 - exists $vlex{$gbl}{$lex}[$gbl]: value ok 5575 - delete $vlex{$gbl}{$lex}[$gbl]: no exception ok 5576 - delete $vlex{$gbl}{$lex}[$gbl]: value ok 5577 - $vgbl{$gbl}{$lex}[$gbl]: no exception ok 5578 - $vgbl{$gbl}{$lex}[$gbl]: value ok 5579 - $vgbl{$gbl}{$lex}[$gbl] = 123: no exception ok 5580 - $vgbl{$gbl}{$lex}[$gbl] = 123: value ok 5581 - exists $vgbl{$gbl}{$lex}[$gbl]: no exception ok 5582 - exists $vgbl{$gbl}{$lex}[$gbl]: value ok 5583 - delete $vgbl{$gbl}{$lex}[$gbl]: no exception ok 5584 - delete $vgbl{$gbl}{$lex}[$gbl]: value ok 5585 - $vrlex->{$gbl}{$lex}[$gbl]: no exception ok 5586 - $vrlex->{$gbl}{$lex}[$gbl]: value ok 5587 - $vrlex->{$gbl}{$lex}[$gbl] = 123: no exception ok 5588 - $vrlex->{$gbl}{$lex}[$gbl] = 123: value ok 5589 - exists $vrlex->{$gbl}{$lex}[$gbl]: no exception ok 5590 - exists $vrlex->{$gbl}{$lex}[$gbl]: value ok 5591 - delete $vrlex->{$gbl}{$lex}[$gbl]: no exception ok 5592 - delete $vrlex->{$gbl}{$lex}[$gbl]: value ok 5593 - $vrgbl->{$gbl}{$lex}[$gbl]: no exception ok 5594 - $vrgbl->{$gbl}{$lex}[$gbl]: value ok 5595 - $vrgbl->{$gbl}{$lex}[$gbl] = 123: no exception ok 5596 - $vrgbl->{$gbl}{$lex}[$gbl] = 123: value ok 5597 - exists $vrgbl->{$gbl}{$lex}[$gbl]: no exception ok 5598 - exists $vrgbl->{$gbl}{$lex}[$gbl]: value ok 5599 - delete $vrgbl->{$gbl}{$lex}[$gbl]: no exception ok 5600 - delete $vrgbl->{$gbl}{$lex}[$gbl]: value ok 5601 - $vlex{"x$lex"}{$lex}[$gbl]: no exception ok 5602 - $vlex{"x$lex"}{$lex}[$gbl]: value ok 5603 - $vlex{"x$lex"}{$lex}[$gbl] = 123: no exception ok 5604 - $vlex{"x$lex"}{$lex}[$gbl] = 123: value ok 5605 - exists $vlex{"x$lex"}{$lex}[$gbl]: no exception ok 5606 - exists $vlex{"x$lex"}{$lex}[$gbl]: value ok 5607 - delete $vlex{"x$lex"}{$lex}[$gbl]: no exception ok 5608 - delete $vlex{"x$lex"}{$lex}[$gbl]: value ok 5609 - $vgbl{"x$lex"}{$lex}[$gbl]: no exception ok 5610 - $vgbl{"x$lex"}{$lex}[$gbl]: value ok 5611 - $vgbl{"x$lex"}{$lex}[$gbl] = 123: no exception ok 5612 - $vgbl{"x$lex"}{$lex}[$gbl] = 123: value ok 5613 - exists $vgbl{"x$lex"}{$lex}[$gbl]: no exception ok 5614 - exists $vgbl{"x$lex"}{$lex}[$gbl]: value ok 5615 - delete $vgbl{"x$lex"}{$lex}[$gbl]: no exception ok 5616 - delete $vgbl{"x$lex"}{$lex}[$gbl]: value ok 5617 - $vrlex->{"x$lex"}{$lex}[$gbl]: no exception ok 5618 - $vrlex->{"x$lex"}{$lex}[$gbl]: value ok 5619 - $vrlex->{"x$lex"}{$lex}[$gbl] = 123: no exception ok 5620 - $vrlex->{"x$lex"}{$lex}[$gbl] = 123: value ok 5621 - exists $vrlex->{"x$lex"}{$lex}[$gbl]: no exception ok 5622 - exists $vrlex->{"x$lex"}{$lex}[$gbl]: value ok 5623 - delete $vrlex->{"x$lex"}{$lex}[$gbl]: no exception ok 5624 - delete $vrlex->{"x$lex"}{$lex}[$gbl]: value ok 5625 - $vrgbl->{"x$lex"}{$lex}[$gbl]: no exception ok 5626 - $vrgbl->{"x$lex"}{$lex}[$gbl]: value ok 5627 - $vrgbl->{"x$lex"}{$lex}[$gbl] = 123: no exception ok 5628 - $vrgbl->{"x$lex"}{$lex}[$gbl] = 123: value ok 5629 - exists $vrgbl->{"x$lex"}{$lex}[$gbl]: no exception ok 5630 - exists $vrgbl->{"x$lex"}{$lex}[$gbl]: value ok 5631 - delete $vrgbl->{"x$lex"}{$lex}[$gbl]: no exception ok 5632 - delete $vrgbl->{"x$lex"}{$lex}[$gbl]: value ok 5633 - $vlex[0]{$gbl}[$gbl]: no exception ok 5634 - $vlex[0]{$gbl}[$gbl]: value ok 5635 - $vlex[0]{$gbl}[$gbl] = 123: no exception ok 5636 - $vlex[0]{$gbl}[$gbl] = 123: value ok 5637 - exists $vlex[0]{$gbl}[$gbl]: no exception ok 5638 - exists $vlex[0]{$gbl}[$gbl]: value ok 5639 - delete $vlex[0]{$gbl}[$gbl]: no exception ok 5640 - delete $vlex[0]{$gbl}[$gbl]: value ok 5641 - $vgbl[0]{$gbl}[$gbl]: no exception ok 5642 - $vgbl[0]{$gbl}[$gbl]: value ok 5643 - $vgbl[0]{$gbl}[$gbl] = 123: no exception ok 5644 - $vgbl[0]{$gbl}[$gbl] = 123: value ok 5645 - exists $vgbl[0]{$gbl}[$gbl]: no exception ok 5646 - exists $vgbl[0]{$gbl}[$gbl]: value ok 5647 - delete $vgbl[0]{$gbl}[$gbl]: no exception ok 5648 - delete $vgbl[0]{$gbl}[$gbl]: value ok 5649 - $vrlex->[0]{$gbl}[$gbl]: no exception ok 5650 - $vrlex->[0]{$gbl}[$gbl]: value ok 5651 - $vrlex->[0]{$gbl}[$gbl] = 123: no exception ok 5652 - $vrlex->[0]{$gbl}[$gbl] = 123: value ok 5653 - exists $vrlex->[0]{$gbl}[$gbl]: no exception ok 5654 - exists $vrlex->[0]{$gbl}[$gbl]: value ok 5655 - delete $vrlex->[0]{$gbl}[$gbl]: no exception ok 5656 - delete $vrlex->[0]{$gbl}[$gbl]: value ok 5657 - $vrgbl->[0]{$gbl}[$gbl]: no exception ok 5658 - $vrgbl->[0]{$gbl}[$gbl]: value ok 5659 - $vrgbl->[0]{$gbl}[$gbl] = 123: no exception ok 5660 - $vrgbl->[0]{$gbl}[$gbl] = 123: value ok 5661 - exists $vrgbl->[0]{$gbl}[$gbl]: no exception ok 5662 - exists $vrgbl->[0]{$gbl}[$gbl]: value ok 5663 - delete $vrgbl->[0]{$gbl}[$gbl]: no exception ok 5664 - delete $vrgbl->[0]{$gbl}[$gbl]: value ok 5665 - $vlex[$lex]{$gbl}[$gbl]: no exception ok 5666 - $vlex[$lex]{$gbl}[$gbl]: value ok 5667 - $vlex[$lex]{$gbl}[$gbl] = 123: no exception ok 5668 - $vlex[$lex]{$gbl}[$gbl] = 123: value ok 5669 - exists $vlex[$lex]{$gbl}[$gbl]: no exception ok 5670 - exists $vlex[$lex]{$gbl}[$gbl]: value ok 5671 - delete $vlex[$lex]{$gbl}[$gbl]: no exception ok 5672 - delete $vlex[$lex]{$gbl}[$gbl]: value ok 5673 - $vgbl[$lex]{$gbl}[$gbl]: no exception ok 5674 - $vgbl[$lex]{$gbl}[$gbl]: value ok 5675 - $vgbl[$lex]{$gbl}[$gbl] = 123: no exception ok 5676 - $vgbl[$lex]{$gbl}[$gbl] = 123: value ok 5677 - exists $vgbl[$lex]{$gbl}[$gbl]: no exception ok 5678 - exists $vgbl[$lex]{$gbl}[$gbl]: value ok 5679 - delete $vgbl[$lex]{$gbl}[$gbl]: no exception ok 5680 - delete $vgbl[$lex]{$gbl}[$gbl]: value ok 5681 - $vrlex->[$lex]{$gbl}[$gbl]: no exception ok 5682 - $vrlex->[$lex]{$gbl}[$gbl]: value ok 5683 - $vrlex->[$lex]{$gbl}[$gbl] = 123: no exception ok 5684 - $vrlex->[$lex]{$gbl}[$gbl] = 123: value ok 5685 - exists $vrlex->[$lex]{$gbl}[$gbl]: no exception ok 5686 - exists $vrlex->[$lex]{$gbl}[$gbl]: value ok 5687 - delete $vrlex->[$lex]{$gbl}[$gbl]: no exception ok 5688 - delete $vrlex->[$lex]{$gbl}[$gbl]: value ok 5689 - $vrgbl->[$lex]{$gbl}[$gbl]: no exception ok 5690 - $vrgbl->[$lex]{$gbl}[$gbl]: value ok 5691 - $vrgbl->[$lex]{$gbl}[$gbl] = 123: no exception ok 5692 - $vrgbl->[$lex]{$gbl}[$gbl] = 123: value ok 5693 - exists $vrgbl->[$lex]{$gbl}[$gbl]: no exception ok 5694 - exists $vrgbl->[$lex]{$gbl}[$gbl]: value ok 5695 - delete $vrgbl->[$lex]{$gbl}[$gbl]: no exception ok 5696 - delete $vrgbl->[$lex]{$gbl}[$gbl]: value ok 5697 - $vlex[$gbl]{$gbl}[$gbl]: no exception ok 5698 - $vlex[$gbl]{$gbl}[$gbl]: value ok 5699 - $vlex[$gbl]{$gbl}[$gbl] = 123: no exception ok 5700 - $vlex[$gbl]{$gbl}[$gbl] = 123: value ok 5701 - exists $vlex[$gbl]{$gbl}[$gbl]: no exception ok 5702 - exists $vlex[$gbl]{$gbl}[$gbl]: value ok 5703 - delete $vlex[$gbl]{$gbl}[$gbl]: no exception ok 5704 - delete $vlex[$gbl]{$gbl}[$gbl]: value ok 5705 - $vgbl[$gbl]{$gbl}[$gbl]: no exception ok 5706 - $vgbl[$gbl]{$gbl}[$gbl]: value ok 5707 - $vgbl[$gbl]{$gbl}[$gbl] = 123: no exception ok 5708 - $vgbl[$gbl]{$gbl}[$gbl] = 123: value ok 5709 - exists $vgbl[$gbl]{$gbl}[$gbl]: no exception ok 5710 - exists $vgbl[$gbl]{$gbl}[$gbl]: value ok 5711 - delete $vgbl[$gbl]{$gbl}[$gbl]: no exception ok 5712 - delete $vgbl[$gbl]{$gbl}[$gbl]: value ok 5713 - $vrlex->[$gbl]{$gbl}[$gbl]: no exception ok 5714 - $vrlex->[$gbl]{$gbl}[$gbl]: value ok 5715 - $vrlex->[$gbl]{$gbl}[$gbl] = 123: no exception ok 5716 - $vrlex->[$gbl]{$gbl}[$gbl] = 123: value ok 5717 - exists $vrlex->[$gbl]{$gbl}[$gbl]: no exception ok 5718 - exists $vrlex->[$gbl]{$gbl}[$gbl]: value ok 5719 - delete $vrlex->[$gbl]{$gbl}[$gbl]: no exception ok 5720 - delete $vrlex->[$gbl]{$gbl}[$gbl]: value ok 5721 - $vrgbl->[$gbl]{$gbl}[$gbl]: no exception ok 5722 - $vrgbl->[$gbl]{$gbl}[$gbl]: value ok 5723 - $vrgbl->[$gbl]{$gbl}[$gbl] = 123: no exception ok 5724 - $vrgbl->[$gbl]{$gbl}[$gbl] = 123: value ok 5725 - exists $vrgbl->[$gbl]{$gbl}[$gbl]: no exception ok 5726 - exists $vrgbl->[$gbl]{$gbl}[$gbl]: value ok 5727 - delete $vrgbl->[$gbl]{$gbl}[$gbl]: no exception ok 5728 - delete $vrgbl->[$gbl]{$gbl}[$gbl]: value ok 5729 - $vlex[$lex+1]{$gbl}[$gbl]: no exception ok 5730 - $vlex[$lex+1]{$gbl}[$gbl]: value ok 5731 - $vlex[$lex+1]{$gbl}[$gbl] = 123: no exception ok 5732 - $vlex[$lex+1]{$gbl}[$gbl] = 123: value ok 5733 - exists $vlex[$lex+1]{$gbl}[$gbl]: no exception ok 5734 - exists $vlex[$lex+1]{$gbl}[$gbl]: value ok 5735 - delete $vlex[$lex+1]{$gbl}[$gbl]: no exception ok 5736 - delete $vlex[$lex+1]{$gbl}[$gbl]: value ok 5737 - $vgbl[$lex+1]{$gbl}[$gbl]: no exception ok 5738 - $vgbl[$lex+1]{$gbl}[$gbl]: value ok 5739 - $vgbl[$lex+1]{$gbl}[$gbl] = 123: no exception ok 5740 - $vgbl[$lex+1]{$gbl}[$gbl] = 123: value ok 5741 - exists $vgbl[$lex+1]{$gbl}[$gbl]: no exception ok 5742 - exists $vgbl[$lex+1]{$gbl}[$gbl]: value ok 5743 - delete $vgbl[$lex+1]{$gbl}[$gbl]: no exception ok 5744 - delete $vgbl[$lex+1]{$gbl}[$gbl]: value ok 5745 - $vrlex->[$lex+1]{$gbl}[$gbl]: no exception ok 5746 - $vrlex->[$lex+1]{$gbl}[$gbl]: value ok 5747 - $vrlex->[$lex+1]{$gbl}[$gbl] = 123: no exception ok 5748 - $vrlex->[$lex+1]{$gbl}[$gbl] = 123: value ok 5749 - exists $vrlex->[$lex+1]{$gbl}[$gbl]: no exception ok 5750 - exists $vrlex->[$lex+1]{$gbl}[$gbl]: value ok 5751 - delete $vrlex->[$lex+1]{$gbl}[$gbl]: no exception ok 5752 - delete $vrlex->[$lex+1]{$gbl}[$gbl]: value ok 5753 - $vrgbl->[$lex+1]{$gbl}[$gbl]: no exception ok 5754 - $vrgbl->[$lex+1]{$gbl}[$gbl]: value ok 5755 - $vrgbl->[$lex+1]{$gbl}[$gbl] = 123: no exception ok 5756 - $vrgbl->[$lex+1]{$gbl}[$gbl] = 123: value ok 5757 - exists $vrgbl->[$lex+1]{$gbl}[$gbl]: no exception ok 5758 - exists $vrgbl->[$lex+1]{$gbl}[$gbl]: value ok 5759 - delete $vrgbl->[$lex+1]{$gbl}[$gbl]: no exception ok 5760 - delete $vrgbl->[$lex+1]{$gbl}[$gbl]: value ok 5761 - $vlex{foo}{$gbl}[$gbl]: no exception ok 5762 - $vlex{foo}{$gbl}[$gbl]: value ok 5763 - $vlex{foo}{$gbl}[$gbl] = 123: no exception ok 5764 - $vlex{foo}{$gbl}[$gbl] = 123: value ok 5765 - exists $vlex{foo}{$gbl}[$gbl]: no exception ok 5766 - exists $vlex{foo}{$gbl}[$gbl]: value ok 5767 - delete $vlex{foo}{$gbl}[$gbl]: no exception ok 5768 - delete $vlex{foo}{$gbl}[$gbl]: value ok 5769 - $vgbl{foo}{$gbl}[$gbl]: no exception ok 5770 - $vgbl{foo}{$gbl}[$gbl]: value ok 5771 - $vgbl{foo}{$gbl}[$gbl] = 123: no exception ok 5772 - $vgbl{foo}{$gbl}[$gbl] = 123: value ok 5773 - exists $vgbl{foo}{$gbl}[$gbl]: no exception ok 5774 - exists $vgbl{foo}{$gbl}[$gbl]: value ok 5775 - delete $vgbl{foo}{$gbl}[$gbl]: no exception ok 5776 - delete $vgbl{foo}{$gbl}[$gbl]: value ok 5777 - $vrlex->{foo}{$gbl}[$gbl]: no exception ok 5778 - $vrlex->{foo}{$gbl}[$gbl]: value ok 5779 - $vrlex->{foo}{$gbl}[$gbl] = 123: no exception ok 5780 - $vrlex->{foo}{$gbl}[$gbl] = 123: value ok 5781 - exists $vrlex->{foo}{$gbl}[$gbl]: no exception ok 5782 - exists $vrlex->{foo}{$gbl}[$gbl]: value ok 5783 - delete $vrlex->{foo}{$gbl}[$gbl]: no exception ok 5784 - delete $vrlex->{foo}{$gbl}[$gbl]: value ok 5785 - $vrgbl->{foo}{$gbl}[$gbl]: no exception ok 5786 - $vrgbl->{foo}{$gbl}[$gbl]: value ok 5787 - $vrgbl->{foo}{$gbl}[$gbl] = 123: no exception ok 5788 - $vrgbl->{foo}{$gbl}[$gbl] = 123: value ok 5789 - exists $vrgbl->{foo}{$gbl}[$gbl]: no exception ok 5790 - exists $vrgbl->{foo}{$gbl}[$gbl]: value ok 5791 - delete $vrgbl->{foo}{$gbl}[$gbl]: no exception ok 5792 - delete $vrgbl->{foo}{$gbl}[$gbl]: value ok 5793 - $vlex{$lex}{$gbl}[$gbl]: no exception ok 5794 - $vlex{$lex}{$gbl}[$gbl]: value ok 5795 - $vlex{$lex}{$gbl}[$gbl] = 123: no exception ok 5796 - $vlex{$lex}{$gbl}[$gbl] = 123: value ok 5797 - exists $vlex{$lex}{$gbl}[$gbl]: no exception ok 5798 - exists $vlex{$lex}{$gbl}[$gbl]: value ok 5799 - delete $vlex{$lex}{$gbl}[$gbl]: no exception ok 5800 - delete $vlex{$lex}{$gbl}[$gbl]: value ok 5801 - $vgbl{$lex}{$gbl}[$gbl]: no exception ok 5802 - $vgbl{$lex}{$gbl}[$gbl]: value ok 5803 - $vgbl{$lex}{$gbl}[$gbl] = 123: no exception ok 5804 - $vgbl{$lex}{$gbl}[$gbl] = 123: value ok 5805 - exists $vgbl{$lex}{$gbl}[$gbl]: no exception ok 5806 - exists $vgbl{$lex}{$gbl}[$gbl]: value ok 5807 - delete $vgbl{$lex}{$gbl}[$gbl]: no exception ok 5808 - delete $vgbl{$lex}{$gbl}[$gbl]: value ok 5809 - $vrlex->{$lex}{$gbl}[$gbl]: no exception ok 5810 - $vrlex->{$lex}{$gbl}[$gbl]: value ok 5811 - $vrlex->{$lex}{$gbl}[$gbl] = 123: no exception ok 5812 - $vrlex->{$lex}{$gbl}[$gbl] = 123: value ok 5813 - exists $vrlex->{$lex}{$gbl}[$gbl]: no exception ok 5814 - exists $vrlex->{$lex}{$gbl}[$gbl]: value ok 5815 - delete $vrlex->{$lex}{$gbl}[$gbl]: no exception ok 5816 - delete $vrlex->{$lex}{$gbl}[$gbl]: value ok 5817 - $vrgbl->{$lex}{$gbl}[$gbl]: no exception ok 5818 - $vrgbl->{$lex}{$gbl}[$gbl]: value ok 5819 - $vrgbl->{$lex}{$gbl}[$gbl] = 123: no exception ok 5820 - $vrgbl->{$lex}{$gbl}[$gbl] = 123: value ok 5821 - exists $vrgbl->{$lex}{$gbl}[$gbl]: no exception ok 5822 - exists $vrgbl->{$lex}{$gbl}[$gbl]: value ok 5823 - delete $vrgbl->{$lex}{$gbl}[$gbl]: no exception ok 5824 - delete $vrgbl->{$lex}{$gbl}[$gbl]: value ok 5825 - $vlex{$gbl}{$gbl}[$gbl]: no exception ok 5826 - $vlex{$gbl}{$gbl}[$gbl]: value ok 5827 - $vlex{$gbl}{$gbl}[$gbl] = 123: no exception ok 5828 - $vlex{$gbl}{$gbl}[$gbl] = 123: value ok 5829 - exists $vlex{$gbl}{$gbl}[$gbl]: no exception ok 5830 - exists $vlex{$gbl}{$gbl}[$gbl]: value ok 5831 - delete $vlex{$gbl}{$gbl}[$gbl]: no exception ok 5832 - delete $vlex{$gbl}{$gbl}[$gbl]: value ok 5833 - $vgbl{$gbl}{$gbl}[$gbl]: no exception ok 5834 - $vgbl{$gbl}{$gbl}[$gbl]: value ok 5835 - $vgbl{$gbl}{$gbl}[$gbl] = 123: no exception ok 5836 - $vgbl{$gbl}{$gbl}[$gbl] = 123: value ok 5837 - exists $vgbl{$gbl}{$gbl}[$gbl]: no exception ok 5838 - exists $vgbl{$gbl}{$gbl}[$gbl]: value ok 5839 - delete $vgbl{$gbl}{$gbl}[$gbl]: no exception ok 5840 - delete $vgbl{$gbl}{$gbl}[$gbl]: value ok 5841 - $vrlex->{$gbl}{$gbl}[$gbl]: no exception ok 5842 - $vrlex->{$gbl}{$gbl}[$gbl]: value ok 5843 - $vrlex->{$gbl}{$gbl}[$gbl] = 123: no exception ok 5844 - $vrlex->{$gbl}{$gbl}[$gbl] = 123: value ok 5845 - exists $vrlex->{$gbl}{$gbl}[$gbl]: no exception ok 5846 - exists $vrlex->{$gbl}{$gbl}[$gbl]: value ok 5847 - delete $vrlex->{$gbl}{$gbl}[$gbl]: no exception ok 5848 - delete $vrlex->{$gbl}{$gbl}[$gbl]: value ok 5849 - $vrgbl->{$gbl}{$gbl}[$gbl]: no exception ok 5850 - $vrgbl->{$gbl}{$gbl}[$gbl]: value ok 5851 - $vrgbl->{$gbl}{$gbl}[$gbl] = 123: no exception ok 5852 - $vrgbl->{$gbl}{$gbl}[$gbl] = 123: value ok 5853 - exists $vrgbl->{$gbl}{$gbl}[$gbl]: no exception ok 5854 - exists $vrgbl->{$gbl}{$gbl}[$gbl]: value ok 5855 - delete $vrgbl->{$gbl}{$gbl}[$gbl]: no exception ok 5856 - delete $vrgbl->{$gbl}{$gbl}[$gbl]: value ok 5857 - $vlex{"x$lex"}{$gbl}[$gbl]: no exception ok 5858 - $vlex{"x$lex"}{$gbl}[$gbl]: value ok 5859 - $vlex{"x$lex"}{$gbl}[$gbl] = 123: no exception ok 5860 - $vlex{"x$lex"}{$gbl}[$gbl] = 123: value ok 5861 - exists $vlex{"x$lex"}{$gbl}[$gbl]: no exception ok 5862 - exists $vlex{"x$lex"}{$gbl}[$gbl]: value ok 5863 - delete $vlex{"x$lex"}{$gbl}[$gbl]: no exception ok 5864 - delete $vlex{"x$lex"}{$gbl}[$gbl]: value ok 5865 - $vgbl{"x$lex"}{$gbl}[$gbl]: no exception ok 5866 - $vgbl{"x$lex"}{$gbl}[$gbl]: value ok 5867 - $vgbl{"x$lex"}{$gbl}[$gbl] = 123: no exception ok 5868 - $vgbl{"x$lex"}{$gbl}[$gbl] = 123: value ok 5869 - exists $vgbl{"x$lex"}{$gbl}[$gbl]: no exception ok 5870 - exists $vgbl{"x$lex"}{$gbl}[$gbl]: value ok 5871 - delete $vgbl{"x$lex"}{$gbl}[$gbl]: no exception ok 5872 - delete $vgbl{"x$lex"}{$gbl}[$gbl]: value ok 5873 - $vrlex->{"x$lex"}{$gbl}[$gbl]: no exception ok 5874 - $vrlex->{"x$lex"}{$gbl}[$gbl]: value ok 5875 - $vrlex->{"x$lex"}{$gbl}[$gbl] = 123: no exception ok 5876 - $vrlex->{"x$lex"}{$gbl}[$gbl] = 123: value ok 5877 - exists $vrlex->{"x$lex"}{$gbl}[$gbl]: no exception ok 5878 - exists $vrlex->{"x$lex"}{$gbl}[$gbl]: value ok 5879 - delete $vrlex->{"x$lex"}{$gbl}[$gbl]: no exception ok 5880 - delete $vrlex->{"x$lex"}{$gbl}[$gbl]: value ok 5881 - $vrgbl->{"x$lex"}{$gbl}[$gbl]: no exception ok 5882 - $vrgbl->{"x$lex"}{$gbl}[$gbl]: value ok 5883 - $vrgbl->{"x$lex"}{$gbl}[$gbl] = 123: no exception ok 5884 - $vrgbl->{"x$lex"}{$gbl}[$gbl] = 123: value ok 5885 - exists $vrgbl->{"x$lex"}{$gbl}[$gbl]: no exception ok 5886 - exists $vrgbl->{"x$lex"}{$gbl}[$gbl]: value ok 5887 - delete $vrgbl->{"x$lex"}{$gbl}[$gbl]: no exception ok 5888 - delete $vrgbl->{"x$lex"}{$gbl}[$gbl]: value ok 5889 - $vlex[0]{"x$lex"}[$gbl]: no exception ok 5890 - $vlex[0]{"x$lex"}[$gbl]: value ok 5891 - $vlex[0]{"x$lex"}[$gbl] = 123: no exception ok 5892 - $vlex[0]{"x$lex"}[$gbl] = 123: value ok 5893 - exists $vlex[0]{"x$lex"}[$gbl]: no exception ok 5894 - exists $vlex[0]{"x$lex"}[$gbl]: value ok 5895 - delete $vlex[0]{"x$lex"}[$gbl]: no exception ok 5896 - delete $vlex[0]{"x$lex"}[$gbl]: value ok 5897 - $vgbl[0]{"x$lex"}[$gbl]: no exception ok 5898 - $vgbl[0]{"x$lex"}[$gbl]: value ok 5899 - $vgbl[0]{"x$lex"}[$gbl] = 123: no exception ok 5900 - $vgbl[0]{"x$lex"}[$gbl] = 123: value ok 5901 - exists $vgbl[0]{"x$lex"}[$gbl]: no exception ok 5902 - exists $vgbl[0]{"x$lex"}[$gbl]: value ok 5903 - delete $vgbl[0]{"x$lex"}[$gbl]: no exception ok 5904 - delete $vgbl[0]{"x$lex"}[$gbl]: value ok 5905 - $vrlex->[0]{"x$lex"}[$gbl]: no exception ok 5906 - $vrlex->[0]{"x$lex"}[$gbl]: value ok 5907 - $vrlex->[0]{"x$lex"}[$gbl] = 123: no exception ok 5908 - $vrlex->[0]{"x$lex"}[$gbl] = 123: value ok 5909 - exists $vrlex->[0]{"x$lex"}[$gbl]: no exception ok 5910 - exists $vrlex->[0]{"x$lex"}[$gbl]: value ok 5911 - delete $vrlex->[0]{"x$lex"}[$gbl]: no exception ok 5912 - delete $vrlex->[0]{"x$lex"}[$gbl]: value ok 5913 - $vrgbl->[0]{"x$lex"}[$gbl]: no exception ok 5914 - $vrgbl->[0]{"x$lex"}[$gbl]: value ok 5915 - $vrgbl->[0]{"x$lex"}[$gbl] = 123: no exception ok 5916 - $vrgbl->[0]{"x$lex"}[$gbl] = 123: value ok 5917 - exists $vrgbl->[0]{"x$lex"}[$gbl]: no exception ok 5918 - exists $vrgbl->[0]{"x$lex"}[$gbl]: value ok 5919 - delete $vrgbl->[0]{"x$lex"}[$gbl]: no exception ok 5920 - delete $vrgbl->[0]{"x$lex"}[$gbl]: value ok 5921 - $vlex[$lex]{"x$lex"}[$gbl]: no exception ok 5922 - $vlex[$lex]{"x$lex"}[$gbl]: value ok 5923 - $vlex[$lex]{"x$lex"}[$gbl] = 123: no exception ok 5924 - $vlex[$lex]{"x$lex"}[$gbl] = 123: value ok 5925 - exists $vlex[$lex]{"x$lex"}[$gbl]: no exception ok 5926 - exists $vlex[$lex]{"x$lex"}[$gbl]: value ok 5927 - delete $vlex[$lex]{"x$lex"}[$gbl]: no exception ok 5928 - delete $vlex[$lex]{"x$lex"}[$gbl]: value ok 5929 - $vgbl[$lex]{"x$lex"}[$gbl]: no exception ok 5930 - $vgbl[$lex]{"x$lex"}[$gbl]: value ok 5931 - $vgbl[$lex]{"x$lex"}[$gbl] = 123: no exception ok 5932 - $vgbl[$lex]{"x$lex"}[$gbl] = 123: value ok 5933 - exists $vgbl[$lex]{"x$lex"}[$gbl]: no exception ok 5934 - exists $vgbl[$lex]{"x$lex"}[$gbl]: value ok 5935 - delete $vgbl[$lex]{"x$lex"}[$gbl]: no exception ok 5936 - delete $vgbl[$lex]{"x$lex"}[$gbl]: value ok 5937 - $vrlex->[$lex]{"x$lex"}[$gbl]: no exception ok 5938 - $vrlex->[$lex]{"x$lex"}[$gbl]: value ok 5939 - $vrlex->[$lex]{"x$lex"}[$gbl] = 123: no exception ok 5940 - $vrlex->[$lex]{"x$lex"}[$gbl] = 123: value ok 5941 - exists $vrlex->[$lex]{"x$lex"}[$gbl]: no exception ok 5942 - exists $vrlex->[$lex]{"x$lex"}[$gbl]: value ok 5943 - delete $vrlex->[$lex]{"x$lex"}[$gbl]: no exception ok 5944 - delete $vrlex->[$lex]{"x$lex"}[$gbl]: value ok 5945 - $vrgbl->[$lex]{"x$lex"}[$gbl]: no exception ok 5946 - $vrgbl->[$lex]{"x$lex"}[$gbl]: value ok 5947 - $vrgbl->[$lex]{"x$lex"}[$gbl] = 123: no exception ok 5948 - $vrgbl->[$lex]{"x$lex"}[$gbl] = 123: value ok 5949 - exists $vrgbl->[$lex]{"x$lex"}[$gbl]: no exception ok 5950 - exists $vrgbl->[$lex]{"x$lex"}[$gbl]: value ok 5951 - delete $vrgbl->[$lex]{"x$lex"}[$gbl]: no exception ok 5952 - delete $vrgbl->[$lex]{"x$lex"}[$gbl]: value ok 5953 - $vlex[$gbl]{"x$lex"}[$gbl]: no exception ok 5954 - $vlex[$gbl]{"x$lex"}[$gbl]: value ok 5955 - $vlex[$gbl]{"x$lex"}[$gbl] = 123: no exception ok 5956 - $vlex[$gbl]{"x$lex"}[$gbl] = 123: value ok 5957 - exists $vlex[$gbl]{"x$lex"}[$gbl]: no exception ok 5958 - exists $vlex[$gbl]{"x$lex"}[$gbl]: value ok 5959 - delete $vlex[$gbl]{"x$lex"}[$gbl]: no exception ok 5960 - delete $vlex[$gbl]{"x$lex"}[$gbl]: value ok 5961 - $vgbl[$gbl]{"x$lex"}[$gbl]: no exception ok 5962 - $vgbl[$gbl]{"x$lex"}[$gbl]: value ok 5963 - $vgbl[$gbl]{"x$lex"}[$gbl] = 123: no exception ok 5964 - $vgbl[$gbl]{"x$lex"}[$gbl] = 123: value ok 5965 - exists $vgbl[$gbl]{"x$lex"}[$gbl]: no exception ok 5966 - exists $vgbl[$gbl]{"x$lex"}[$gbl]: value ok 5967 - delete $vgbl[$gbl]{"x$lex"}[$gbl]: no exception ok 5968 - delete $vgbl[$gbl]{"x$lex"}[$gbl]: value ok 5969 - $vrlex->[$gbl]{"x$lex"}[$gbl]: no exception ok 5970 - $vrlex->[$gbl]{"x$lex"}[$gbl]: value ok 5971 - $vrlex->[$gbl]{"x$lex"}[$gbl] = 123: no exception ok 5972 - $vrlex->[$gbl]{"x$lex"}[$gbl] = 123: value ok 5973 - exists $vrlex->[$gbl]{"x$lex"}[$gbl]: no exception ok 5974 - exists $vrlex->[$gbl]{"x$lex"}[$gbl]: value ok 5975 - delete $vrlex->[$gbl]{"x$lex"}[$gbl]: no exception ok 5976 - delete $vrlex->[$gbl]{"x$lex"}[$gbl]: value ok 5977 - $vrgbl->[$gbl]{"x$lex"}[$gbl]: no exception ok 5978 - $vrgbl->[$gbl]{"x$lex"}[$gbl]: value ok 5979 - $vrgbl->[$gbl]{"x$lex"}[$gbl] = 123: no exception ok 5980 - $vrgbl->[$gbl]{"x$lex"}[$gbl] = 123: value ok 5981 - exists $vrgbl->[$gbl]{"x$lex"}[$gbl]: no exception ok 5982 - exists $vrgbl->[$gbl]{"x$lex"}[$gbl]: value ok 5983 - delete $vrgbl->[$gbl]{"x$lex"}[$gbl]: no exception ok 5984 - delete $vrgbl->[$gbl]{"x$lex"}[$gbl]: value ok 5985 - $vlex[$lex+1]{"x$lex"}[$gbl]: no exception ok 5986 - $vlex[$lex+1]{"x$lex"}[$gbl]: value ok 5987 - $vlex[$lex+1]{"x$lex"}[$gbl] = 123: no exception ok 5988 - $vlex[$lex+1]{"x$lex"}[$gbl] = 123: value ok 5989 - exists $vlex[$lex+1]{"x$lex"}[$gbl]: no exception ok 5990 - exists $vlex[$lex+1]{"x$lex"}[$gbl]: value ok 5991 - delete $vlex[$lex+1]{"x$lex"}[$gbl]: no exception ok 5992 - delete $vlex[$lex+1]{"x$lex"}[$gbl]: value ok 5993 - $vgbl[$lex+1]{"x$lex"}[$gbl]: no exception ok 5994 - $vgbl[$lex+1]{"x$lex"}[$gbl]: value ok 5995 - $vgbl[$lex+1]{"x$lex"}[$gbl] = 123: no exception ok 5996 - $vgbl[$lex+1]{"x$lex"}[$gbl] = 123: value ok 5997 - exists $vgbl[$lex+1]{"x$lex"}[$gbl]: no exception ok 5998 - exists $vgbl[$lex+1]{"x$lex"}[$gbl]: value ok 5999 - delete $vgbl[$lex+1]{"x$lex"}[$gbl]: no exception ok 6000 - delete $vgbl[$lex+1]{"x$lex"}[$gbl]: value ok 6001 - $vrlex->[$lex+1]{"x$lex"}[$gbl]: no exception ok 6002 - $vrlex->[$lex+1]{"x$lex"}[$gbl]: value ok 6003 - $vrlex->[$lex+1]{"x$lex"}[$gbl] = 123: no exception ok 6004 - $vrlex->[$lex+1]{"x$lex"}[$gbl] = 123: value ok 6005 - exists $vrlex->[$lex+1]{"x$lex"}[$gbl]: no exception ok 6006 - exists $vrlex->[$lex+1]{"x$lex"}[$gbl]: value ok 6007 - delete $vrlex->[$lex+1]{"x$lex"}[$gbl]: no exception ok 6008 - delete $vrlex->[$lex+1]{"x$lex"}[$gbl]: value ok 6009 - $vrgbl->[$lex+1]{"x$lex"}[$gbl]: no exception ok 6010 - $vrgbl->[$lex+1]{"x$lex"}[$gbl]: value ok 6011 - $vrgbl->[$lex+1]{"x$lex"}[$gbl] = 123: no exception ok 6012 - $vrgbl->[$lex+1]{"x$lex"}[$gbl] = 123: value ok 6013 - exists $vrgbl->[$lex+1]{"x$lex"}[$gbl]: no exception ok 6014 - exists $vrgbl->[$lex+1]{"x$lex"}[$gbl]: value ok 6015 - delete $vrgbl->[$lex+1]{"x$lex"}[$gbl]: no exception ok 6016 - delete $vrgbl->[$lex+1]{"x$lex"}[$gbl]: value ok 6017 - $vlex{foo}{"x$lex"}[$gbl]: no exception ok 6018 - $vlex{foo}{"x$lex"}[$gbl]: value ok 6019 - $vlex{foo}{"x$lex"}[$gbl] = 123: no exception ok 6020 - $vlex{foo}{"x$lex"}[$gbl] = 123: value ok 6021 - exists $vlex{foo}{"x$lex"}[$gbl]: no exception ok 6022 - exists $vlex{foo}{"x$lex"}[$gbl]: value ok 6023 - delete $vlex{foo}{"x$lex"}[$gbl]: no exception ok 6024 - delete $vlex{foo}{"x$lex"}[$gbl]: value ok 6025 - $vgbl{foo}{"x$lex"}[$gbl]: no exception ok 6026 - $vgbl{foo}{"x$lex"}[$gbl]: value ok 6027 - $vgbl{foo}{"x$lex"}[$gbl] = 123: no exception ok 6028 - $vgbl{foo}{"x$lex"}[$gbl] = 123: value ok 6029 - exists $vgbl{foo}{"x$lex"}[$gbl]: no exception ok 6030 - exists $vgbl{foo}{"x$lex"}[$gbl]: value ok 6031 - delete $vgbl{foo}{"x$lex"}[$gbl]: no exception ok 6032 - delete $vgbl{foo}{"x$lex"}[$gbl]: value ok 6033 - $vrlex->{foo}{"x$lex"}[$gbl]: no exception ok 6034 - $vrlex->{foo}{"x$lex"}[$gbl]: value ok 6035 - $vrlex->{foo}{"x$lex"}[$gbl] = 123: no exception ok 6036 - $vrlex->{foo}{"x$lex"}[$gbl] = 123: value ok 6037 - exists $vrlex->{foo}{"x$lex"}[$gbl]: no exception ok 6038 - exists $vrlex->{foo}{"x$lex"}[$gbl]: value ok 6039 - delete $vrlex->{foo}{"x$lex"}[$gbl]: no exception ok 6040 - delete $vrlex->{foo}{"x$lex"}[$gbl]: value ok 6041 - $vrgbl->{foo}{"x$lex"}[$gbl]: no exception ok 6042 - $vrgbl->{foo}{"x$lex"}[$gbl]: value ok 6043 - $vrgbl->{foo}{"x$lex"}[$gbl] = 123: no exception ok 6044 - $vrgbl->{foo}{"x$lex"}[$gbl] = 123: value ok 6045 - exists $vrgbl->{foo}{"x$lex"}[$gbl]: no exception ok 6046 - exists $vrgbl->{foo}{"x$lex"}[$gbl]: value ok 6047 - delete $vrgbl->{foo}{"x$lex"}[$gbl]: no exception ok 6048 - delete $vrgbl->{foo}{"x$lex"}[$gbl]: value ok 6049 - $vlex{$lex}{"x$lex"}[$gbl]: no exception ok 6050 - $vlex{$lex}{"x$lex"}[$gbl]: value ok 6051 - $vlex{$lex}{"x$lex"}[$gbl] = 123: no exception ok 6052 - $vlex{$lex}{"x$lex"}[$gbl] = 123: value ok 6053 - exists $vlex{$lex}{"x$lex"}[$gbl]: no exception ok 6054 - exists $vlex{$lex}{"x$lex"}[$gbl]: value ok 6055 - delete $vlex{$lex}{"x$lex"}[$gbl]: no exception ok 6056 - delete $vlex{$lex}{"x$lex"}[$gbl]: value ok 6057 - $vgbl{$lex}{"x$lex"}[$gbl]: no exception ok 6058 - $vgbl{$lex}{"x$lex"}[$gbl]: value ok 6059 - $vgbl{$lex}{"x$lex"}[$gbl] = 123: no exception ok 6060 - $vgbl{$lex}{"x$lex"}[$gbl] = 123: value ok 6061 - exists $vgbl{$lex}{"x$lex"}[$gbl]: no exception ok 6062 - exists $vgbl{$lex}{"x$lex"}[$gbl]: value ok 6063 - delete $vgbl{$lex}{"x$lex"}[$gbl]: no exception ok 6064 - delete $vgbl{$lex}{"x$lex"}[$gbl]: value ok 6065 - $vrlex->{$lex}{"x$lex"}[$gbl]: no exception ok 6066 - $vrlex->{$lex}{"x$lex"}[$gbl]: value ok 6067 - $vrlex->{$lex}{"x$lex"}[$gbl] = 123: no exception ok 6068 - $vrlex->{$lex}{"x$lex"}[$gbl] = 123: value ok 6069 - exists $vrlex->{$lex}{"x$lex"}[$gbl]: no exception ok 6070 - exists $vrlex->{$lex}{"x$lex"}[$gbl]: value ok 6071 - delete $vrlex->{$lex}{"x$lex"}[$gbl]: no exception ok 6072 - delete $vrlex->{$lex}{"x$lex"}[$gbl]: value ok 6073 - $vrgbl->{$lex}{"x$lex"}[$gbl]: no exception ok 6074 - $vrgbl->{$lex}{"x$lex"}[$gbl]: value ok 6075 - $vrgbl->{$lex}{"x$lex"}[$gbl] = 123: no exception ok 6076 - $vrgbl->{$lex}{"x$lex"}[$gbl] = 123: value ok 6077 - exists $vrgbl->{$lex}{"x$lex"}[$gbl]: no exception ok 6078 - exists $vrgbl->{$lex}{"x$lex"}[$gbl]: value ok 6079 - delete $vrgbl->{$lex}{"x$lex"}[$gbl]: no exception ok 6080 - delete $vrgbl->{$lex}{"x$lex"}[$gbl]: value ok 6081 - $vlex{$gbl}{"x$lex"}[$gbl]: no exception ok 6082 - $vlex{$gbl}{"x$lex"}[$gbl]: value ok 6083 - $vlex{$gbl}{"x$lex"}[$gbl] = 123: no exception ok 6084 - $vlex{$gbl}{"x$lex"}[$gbl] = 123: value ok 6085 - exists $vlex{$gbl}{"x$lex"}[$gbl]: no exception ok 6086 - exists $vlex{$gbl}{"x$lex"}[$gbl]: value ok 6087 - delete $vlex{$gbl}{"x$lex"}[$gbl]: no exception ok 6088 - delete $vlex{$gbl}{"x$lex"}[$gbl]: value ok 6089 - $vgbl{$gbl}{"x$lex"}[$gbl]: no exception ok 6090 - $vgbl{$gbl}{"x$lex"}[$gbl]: value ok 6091 - $vgbl{$gbl}{"x$lex"}[$gbl] = 123: no exception ok 6092 - $vgbl{$gbl}{"x$lex"}[$gbl] = 123: value ok 6093 - exists $vgbl{$gbl}{"x$lex"}[$gbl]: no exception ok 6094 - exists $vgbl{$gbl}{"x$lex"}[$gbl]: value ok 6095 - delete $vgbl{$gbl}{"x$lex"}[$gbl]: no exception ok 6096 - delete $vgbl{$gbl}{"x$lex"}[$gbl]: value ok 6097 - $vrlex->{$gbl}{"x$lex"}[$gbl]: no exception ok 6098 - $vrlex->{$gbl}{"x$lex"}[$gbl]: value ok 6099 - $vrlex->{$gbl}{"x$lex"}[$gbl] = 123: no exception ok 6100 - $vrlex->{$gbl}{"x$lex"}[$gbl] = 123: value ok 6101 - exists $vrlex->{$gbl}{"x$lex"}[$gbl]: no exception ok 6102 - exists $vrlex->{$gbl}{"x$lex"}[$gbl]: value ok 6103 - delete $vrlex->{$gbl}{"x$lex"}[$gbl]: no exception ok 6104 - delete $vrlex->{$gbl}{"x$lex"}[$gbl]: value ok 6105 - $vrgbl->{$gbl}{"x$lex"}[$gbl]: no exception ok 6106 - $vrgbl->{$gbl}{"x$lex"}[$gbl]: value ok 6107 - $vrgbl->{$gbl}{"x$lex"}[$gbl] = 123: no exception ok 6108 - $vrgbl->{$gbl}{"x$lex"}[$gbl] = 123: value ok 6109 - exists $vrgbl->{$gbl}{"x$lex"}[$gbl]: no exception ok 6110 - exists $vrgbl->{$gbl}{"x$lex"}[$gbl]: value ok 6111 - delete $vrgbl->{$gbl}{"x$lex"}[$gbl]: no exception ok 6112 - delete $vrgbl->{$gbl}{"x$lex"}[$gbl]: value ok 6113 - $vlex{"x$lex"}{"x$lex"}[$gbl]: no exception ok 6114 - $vlex{"x$lex"}{"x$lex"}[$gbl]: value ok 6115 - $vlex{"x$lex"}{"x$lex"}[$gbl] = 123: no exception ok 6116 - $vlex{"x$lex"}{"x$lex"}[$gbl] = 123: value ok 6117 - exists $vlex{"x$lex"}{"x$lex"}[$gbl]: no exception ok 6118 - exists $vlex{"x$lex"}{"x$lex"}[$gbl]: value ok 6119 - delete $vlex{"x$lex"}{"x$lex"}[$gbl]: no exception ok 6120 - delete $vlex{"x$lex"}{"x$lex"}[$gbl]: value ok 6121 - $vgbl{"x$lex"}{"x$lex"}[$gbl]: no exception ok 6122 - $vgbl{"x$lex"}{"x$lex"}[$gbl]: value ok 6123 - $vgbl{"x$lex"}{"x$lex"}[$gbl] = 123: no exception ok 6124 - $vgbl{"x$lex"}{"x$lex"}[$gbl] = 123: value ok 6125 - exists $vgbl{"x$lex"}{"x$lex"}[$gbl]: no exception ok 6126 - exists $vgbl{"x$lex"}{"x$lex"}[$gbl]: value ok 6127 - delete $vgbl{"x$lex"}{"x$lex"}[$gbl]: no exception ok 6128 - delete $vgbl{"x$lex"}{"x$lex"}[$gbl]: value ok 6129 - $vrlex->{"x$lex"}{"x$lex"}[$gbl]: no exception ok 6130 - $vrlex->{"x$lex"}{"x$lex"}[$gbl]: value ok 6131 - $vrlex->{"x$lex"}{"x$lex"}[$gbl] = 123: no exception ok 6132 - $vrlex->{"x$lex"}{"x$lex"}[$gbl] = 123: value ok 6133 - exists $vrlex->{"x$lex"}{"x$lex"}[$gbl]: no exception ok 6134 - exists $vrlex->{"x$lex"}{"x$lex"}[$gbl]: value ok 6135 - delete $vrlex->{"x$lex"}{"x$lex"}[$gbl]: no exception ok 6136 - delete $vrlex->{"x$lex"}{"x$lex"}[$gbl]: value ok 6137 - $vrgbl->{"x$lex"}{"x$lex"}[$gbl]: no exception ok 6138 - $vrgbl->{"x$lex"}{"x$lex"}[$gbl]: value ok 6139 - $vrgbl->{"x$lex"}{"x$lex"}[$gbl] = 123: no exception ok 6140 - $vrgbl->{"x$lex"}{"x$lex"}[$gbl] = 123: value ok 6141 - exists $vrgbl->{"x$lex"}{"x$lex"}[$gbl]: no exception ok 6142 - exists $vrgbl->{"x$lex"}{"x$lex"}[$gbl]: value ok 6143 - delete $vrgbl->{"x$lex"}{"x$lex"}[$gbl]: no exception ok 6144 - delete $vrgbl->{"x$lex"}{"x$lex"}[$gbl]: value ok 6145 - $vlex[0][0][$lex+1]: no exception ok 6146 - $vlex[0][0][$lex+1]: value ok 6147 - $vlex[0][0][$lex+1] = 123: no exception ok 6148 - $vlex[0][0][$lex+1] = 123: value ok 6149 - exists $vlex[0][0][$lex+1]: no exception ok 6150 - exists $vlex[0][0][$lex+1]: value ok 6151 - delete $vlex[0][0][$lex+1]: no exception ok 6152 - delete $vlex[0][0][$lex+1]: value ok 6153 - $vgbl[0][0][$lex+1]: no exception ok 6154 - $vgbl[0][0][$lex+1]: value ok 6155 - $vgbl[0][0][$lex+1] = 123: no exception ok 6156 - $vgbl[0][0][$lex+1] = 123: value ok 6157 - exists $vgbl[0][0][$lex+1]: no exception ok 6158 - exists $vgbl[0][0][$lex+1]: value ok 6159 - delete $vgbl[0][0][$lex+1]: no exception ok 6160 - delete $vgbl[0][0][$lex+1]: value ok 6161 - $vrlex->[0][0][$lex+1]: no exception ok 6162 - $vrlex->[0][0][$lex+1]: value ok 6163 - $vrlex->[0][0][$lex+1] = 123: no exception ok 6164 - $vrlex->[0][0][$lex+1] = 123: value ok 6165 - exists $vrlex->[0][0][$lex+1]: no exception ok 6166 - exists $vrlex->[0][0][$lex+1]: value ok 6167 - delete $vrlex->[0][0][$lex+1]: no exception ok 6168 - delete $vrlex->[0][0][$lex+1]: value ok 6169 - $vrgbl->[0][0][$lex+1]: no exception ok 6170 - $vrgbl->[0][0][$lex+1]: value ok 6171 - $vrgbl->[0][0][$lex+1] = 123: no exception ok 6172 - $vrgbl->[0][0][$lex+1] = 123: value ok 6173 - exists $vrgbl->[0][0][$lex+1]: no exception ok 6174 - exists $vrgbl->[0][0][$lex+1]: value ok 6175 - delete $vrgbl->[0][0][$lex+1]: no exception ok 6176 - delete $vrgbl->[0][0][$lex+1]: value ok 6177 - $vlex[$lex][0][$lex+1]: no exception ok 6178 - $vlex[$lex][0][$lex+1]: value ok 6179 - $vlex[$lex][0][$lex+1] = 123: no exception ok 6180 - $vlex[$lex][0][$lex+1] = 123: value ok 6181 - exists $vlex[$lex][0][$lex+1]: no exception ok 6182 - exists $vlex[$lex][0][$lex+1]: value ok 6183 - delete $vlex[$lex][0][$lex+1]: no exception ok 6184 - delete $vlex[$lex][0][$lex+1]: value ok 6185 - $vgbl[$lex][0][$lex+1]: no exception ok 6186 - $vgbl[$lex][0][$lex+1]: value ok 6187 - $vgbl[$lex][0][$lex+1] = 123: no exception ok 6188 - $vgbl[$lex][0][$lex+1] = 123: value ok 6189 - exists $vgbl[$lex][0][$lex+1]: no exception ok 6190 - exists $vgbl[$lex][0][$lex+1]: value ok 6191 - delete $vgbl[$lex][0][$lex+1]: no exception ok 6192 - delete $vgbl[$lex][0][$lex+1]: value ok 6193 - $vrlex->[$lex][0][$lex+1]: no exception ok 6194 - $vrlex->[$lex][0][$lex+1]: value ok 6195 - $vrlex->[$lex][0][$lex+1] = 123: no exception ok 6196 - $vrlex->[$lex][0][$lex+1] = 123: value ok 6197 - exists $vrlex->[$lex][0][$lex+1]: no exception ok 6198 - exists $vrlex->[$lex][0][$lex+1]: value ok 6199 - delete $vrlex->[$lex][0][$lex+1]: no exception ok 6200 - delete $vrlex->[$lex][0][$lex+1]: value ok 6201 - $vrgbl->[$lex][0][$lex+1]: no exception ok 6202 - $vrgbl->[$lex][0][$lex+1]: value ok 6203 - $vrgbl->[$lex][0][$lex+1] = 123: no exception ok 6204 - $vrgbl->[$lex][0][$lex+1] = 123: value ok 6205 - exists $vrgbl->[$lex][0][$lex+1]: no exception ok 6206 - exists $vrgbl->[$lex][0][$lex+1]: value ok 6207 - delete $vrgbl->[$lex][0][$lex+1]: no exception ok 6208 - delete $vrgbl->[$lex][0][$lex+1]: value ok 6209 - $vlex[$gbl][0][$lex+1]: no exception ok 6210 - $vlex[$gbl][0][$lex+1]: value ok 6211 - $vlex[$gbl][0][$lex+1] = 123: no exception ok 6212 - $vlex[$gbl][0][$lex+1] = 123: value ok 6213 - exists $vlex[$gbl][0][$lex+1]: no exception ok 6214 - exists $vlex[$gbl][0][$lex+1]: value ok 6215 - delete $vlex[$gbl][0][$lex+1]: no exception ok 6216 - delete $vlex[$gbl][0][$lex+1]: value ok 6217 - $vgbl[$gbl][0][$lex+1]: no exception ok 6218 - $vgbl[$gbl][0][$lex+1]: value ok 6219 - $vgbl[$gbl][0][$lex+1] = 123: no exception ok 6220 - $vgbl[$gbl][0][$lex+1] = 123: value ok 6221 - exists $vgbl[$gbl][0][$lex+1]: no exception ok 6222 - exists $vgbl[$gbl][0][$lex+1]: value ok 6223 - delete $vgbl[$gbl][0][$lex+1]: no exception ok 6224 - delete $vgbl[$gbl][0][$lex+1]: value ok 6225 - $vrlex->[$gbl][0][$lex+1]: no exception ok 6226 - $vrlex->[$gbl][0][$lex+1]: value ok 6227 - $vrlex->[$gbl][0][$lex+1] = 123: no exception ok 6228 - $vrlex->[$gbl][0][$lex+1] = 123: value ok 6229 - exists $vrlex->[$gbl][0][$lex+1]: no exception ok 6230 - exists $vrlex->[$gbl][0][$lex+1]: value ok 6231 - delete $vrlex->[$gbl][0][$lex+1]: no exception ok 6232 - delete $vrlex->[$gbl][0][$lex+1]: value ok 6233 - $vrgbl->[$gbl][0][$lex+1]: no exception ok 6234 - $vrgbl->[$gbl][0][$lex+1]: value ok 6235 - $vrgbl->[$gbl][0][$lex+1] = 123: no exception ok 6236 - $vrgbl->[$gbl][0][$lex+1] = 123: value ok 6237 - exists $vrgbl->[$gbl][0][$lex+1]: no exception ok 6238 - exists $vrgbl->[$gbl][0][$lex+1]: value ok 6239 - delete $vrgbl->[$gbl][0][$lex+1]: no exception ok 6240 - delete $vrgbl->[$gbl][0][$lex+1]: value ok 6241 - $vlex[$lex+1][0][$lex+1]: no exception ok 6242 - $vlex[$lex+1][0][$lex+1]: value ok 6243 - $vlex[$lex+1][0][$lex+1] = 123: no exception ok 6244 - $vlex[$lex+1][0][$lex+1] = 123: value ok 6245 - exists $vlex[$lex+1][0][$lex+1]: no exception ok 6246 - exists $vlex[$lex+1][0][$lex+1]: value ok 6247 - delete $vlex[$lex+1][0][$lex+1]: no exception ok 6248 - delete $vlex[$lex+1][0][$lex+1]: value ok 6249 - $vgbl[$lex+1][0][$lex+1]: no exception ok 6250 - $vgbl[$lex+1][0][$lex+1]: value ok 6251 - $vgbl[$lex+1][0][$lex+1] = 123: no exception ok 6252 - $vgbl[$lex+1][0][$lex+1] = 123: value ok 6253 - exists $vgbl[$lex+1][0][$lex+1]: no exception ok 6254 - exists $vgbl[$lex+1][0][$lex+1]: value ok 6255 - delete $vgbl[$lex+1][0][$lex+1]: no exception ok 6256 - delete $vgbl[$lex+1][0][$lex+1]: value ok 6257 - $vrlex->[$lex+1][0][$lex+1]: no exception ok 6258 - $vrlex->[$lex+1][0][$lex+1]: value ok 6259 - $vrlex->[$lex+1][0][$lex+1] = 123: no exception ok 6260 - $vrlex->[$lex+1][0][$lex+1] = 123: value ok 6261 - exists $vrlex->[$lex+1][0][$lex+1]: no exception ok 6262 - exists $vrlex->[$lex+1][0][$lex+1]: value ok 6263 - delete $vrlex->[$lex+1][0][$lex+1]: no exception ok 6264 - delete $vrlex->[$lex+1][0][$lex+1]: value ok 6265 - $vrgbl->[$lex+1][0][$lex+1]: no exception ok 6266 - $vrgbl->[$lex+1][0][$lex+1]: value ok 6267 - $vrgbl->[$lex+1][0][$lex+1] = 123: no exception ok 6268 - $vrgbl->[$lex+1][0][$lex+1] = 123: value ok 6269 - exists $vrgbl->[$lex+1][0][$lex+1]: no exception ok 6270 - exists $vrgbl->[$lex+1][0][$lex+1]: value ok 6271 - delete $vrgbl->[$lex+1][0][$lex+1]: no exception ok 6272 - delete $vrgbl->[$lex+1][0][$lex+1]: value ok 6273 - $vlex{foo}[0][$lex+1]: no exception ok 6274 - $vlex{foo}[0][$lex+1]: value ok 6275 - $vlex{foo}[0][$lex+1] = 123: no exception ok 6276 - $vlex{foo}[0][$lex+1] = 123: value ok 6277 - exists $vlex{foo}[0][$lex+1]: no exception ok 6278 - exists $vlex{foo}[0][$lex+1]: value ok 6279 - delete $vlex{foo}[0][$lex+1]: no exception ok 6280 - delete $vlex{foo}[0][$lex+1]: value ok 6281 - $vgbl{foo}[0][$lex+1]: no exception ok 6282 - $vgbl{foo}[0][$lex+1]: value ok 6283 - $vgbl{foo}[0][$lex+1] = 123: no exception ok 6284 - $vgbl{foo}[0][$lex+1] = 123: value ok 6285 - exists $vgbl{foo}[0][$lex+1]: no exception ok 6286 - exists $vgbl{foo}[0][$lex+1]: value ok 6287 - delete $vgbl{foo}[0][$lex+1]: no exception ok 6288 - delete $vgbl{foo}[0][$lex+1]: value ok 6289 - $vrlex->{foo}[0][$lex+1]: no exception ok 6290 - $vrlex->{foo}[0][$lex+1]: value ok 6291 - $vrlex->{foo}[0][$lex+1] = 123: no exception ok 6292 - $vrlex->{foo}[0][$lex+1] = 123: value ok 6293 - exists $vrlex->{foo}[0][$lex+1]: no exception ok 6294 - exists $vrlex->{foo}[0][$lex+1]: value ok 6295 - delete $vrlex->{foo}[0][$lex+1]: no exception ok 6296 - delete $vrlex->{foo}[0][$lex+1]: value ok 6297 - $vrgbl->{foo}[0][$lex+1]: no exception ok 6298 - $vrgbl->{foo}[0][$lex+1]: value ok 6299 - $vrgbl->{foo}[0][$lex+1] = 123: no exception ok 6300 - $vrgbl->{foo}[0][$lex+1] = 123: value ok 6301 - exists $vrgbl->{foo}[0][$lex+1]: no exception ok 6302 - exists $vrgbl->{foo}[0][$lex+1]: value ok 6303 - delete $vrgbl->{foo}[0][$lex+1]: no exception ok 6304 - delete $vrgbl->{foo}[0][$lex+1]: value ok 6305 - $vlex{$lex}[0][$lex+1]: no exception ok 6306 - $vlex{$lex}[0][$lex+1]: value ok 6307 - $vlex{$lex}[0][$lex+1] = 123: no exception ok 6308 - $vlex{$lex}[0][$lex+1] = 123: value ok 6309 - exists $vlex{$lex}[0][$lex+1]: no exception ok 6310 - exists $vlex{$lex}[0][$lex+1]: value ok 6311 - delete $vlex{$lex}[0][$lex+1]: no exception ok 6312 - delete $vlex{$lex}[0][$lex+1]: value ok 6313 - $vgbl{$lex}[0][$lex+1]: no exception ok 6314 - $vgbl{$lex}[0][$lex+1]: value ok 6315 - $vgbl{$lex}[0][$lex+1] = 123: no exception ok 6316 - $vgbl{$lex}[0][$lex+1] = 123: value ok 6317 - exists $vgbl{$lex}[0][$lex+1]: no exception ok 6318 - exists $vgbl{$lex}[0][$lex+1]: value ok 6319 - delete $vgbl{$lex}[0][$lex+1]: no exception ok 6320 - delete $vgbl{$lex}[0][$lex+1]: value ok 6321 - $vrlex->{$lex}[0][$lex+1]: no exception ok 6322 - $vrlex->{$lex}[0][$lex+1]: value ok 6323 - $vrlex->{$lex}[0][$lex+1] = 123: no exception ok 6324 - $vrlex->{$lex}[0][$lex+1] = 123: value ok 6325 - exists $vrlex->{$lex}[0][$lex+1]: no exception ok 6326 - exists $vrlex->{$lex}[0][$lex+1]: value ok 6327 - delete $vrlex->{$lex}[0][$lex+1]: no exception ok 6328 - delete $vrlex->{$lex}[0][$lex+1]: value ok 6329 - $vrgbl->{$lex}[0][$lex+1]: no exception ok 6330 - $vrgbl->{$lex}[0][$lex+1]: value ok 6331 - $vrgbl->{$lex}[0][$lex+1] = 123: no exception ok 6332 - $vrgbl->{$lex}[0][$lex+1] = 123: value ok 6333 - exists $vrgbl->{$lex}[0][$lex+1]: no exception ok 6334 - exists $vrgbl->{$lex}[0][$lex+1]: value ok 6335 - delete $vrgbl->{$lex}[0][$lex+1]: no exception ok 6336 - delete $vrgbl->{$lex}[0][$lex+1]: value ok 6337 - $vlex{$gbl}[0][$lex+1]: no exception ok 6338 - $vlex{$gbl}[0][$lex+1]: value ok 6339 - $vlex{$gbl}[0][$lex+1] = 123: no exception ok 6340 - $vlex{$gbl}[0][$lex+1] = 123: value ok 6341 - exists $vlex{$gbl}[0][$lex+1]: no exception ok 6342 - exists $vlex{$gbl}[0][$lex+1]: value ok 6343 - delete $vlex{$gbl}[0][$lex+1]: no exception ok 6344 - delete $vlex{$gbl}[0][$lex+1]: value ok 6345 - $vgbl{$gbl}[0][$lex+1]: no exception ok 6346 - $vgbl{$gbl}[0][$lex+1]: value ok 6347 - $vgbl{$gbl}[0][$lex+1] = 123: no exception ok 6348 - $vgbl{$gbl}[0][$lex+1] = 123: value ok 6349 - exists $vgbl{$gbl}[0][$lex+1]: no exception ok 6350 - exists $vgbl{$gbl}[0][$lex+1]: value ok 6351 - delete $vgbl{$gbl}[0][$lex+1]: no exception ok 6352 - delete $vgbl{$gbl}[0][$lex+1]: value ok 6353 - $vrlex->{$gbl}[0][$lex+1]: no exception ok 6354 - $vrlex->{$gbl}[0][$lex+1]: value ok 6355 - $vrlex->{$gbl}[0][$lex+1] = 123: no exception ok 6356 - $vrlex->{$gbl}[0][$lex+1] = 123: value ok 6357 - exists $vrlex->{$gbl}[0][$lex+1]: no exception ok 6358 - exists $vrlex->{$gbl}[0][$lex+1]: value ok 6359 - delete $vrlex->{$gbl}[0][$lex+1]: no exception ok 6360 - delete $vrlex->{$gbl}[0][$lex+1]: value ok 6361 - $vrgbl->{$gbl}[0][$lex+1]: no exception ok 6362 - $vrgbl->{$gbl}[0][$lex+1]: value ok 6363 - $vrgbl->{$gbl}[0][$lex+1] = 123: no exception ok 6364 - $vrgbl->{$gbl}[0][$lex+1] = 123: value ok 6365 - exists $vrgbl->{$gbl}[0][$lex+1]: no exception ok 6366 - exists $vrgbl->{$gbl}[0][$lex+1]: value ok 6367 - delete $vrgbl->{$gbl}[0][$lex+1]: no exception ok 6368 - delete $vrgbl->{$gbl}[0][$lex+1]: value ok 6369 - $vlex{"x$lex"}[0][$lex+1]: no exception ok 6370 - $vlex{"x$lex"}[0][$lex+1]: value ok 6371 - $vlex{"x$lex"}[0][$lex+1] = 123: no exception ok 6372 - $vlex{"x$lex"}[0][$lex+1] = 123: value ok 6373 - exists $vlex{"x$lex"}[0][$lex+1]: no exception ok 6374 - exists $vlex{"x$lex"}[0][$lex+1]: value ok 6375 - delete $vlex{"x$lex"}[0][$lex+1]: no exception ok 6376 - delete $vlex{"x$lex"}[0][$lex+1]: value ok 6377 - $vgbl{"x$lex"}[0][$lex+1]: no exception ok 6378 - $vgbl{"x$lex"}[0][$lex+1]: value ok 6379 - $vgbl{"x$lex"}[0][$lex+1] = 123: no exception ok 6380 - $vgbl{"x$lex"}[0][$lex+1] = 123: value ok 6381 - exists $vgbl{"x$lex"}[0][$lex+1]: no exception ok 6382 - exists $vgbl{"x$lex"}[0][$lex+1]: value ok 6383 - delete $vgbl{"x$lex"}[0][$lex+1]: no exception ok 6384 - delete $vgbl{"x$lex"}[0][$lex+1]: value ok 6385 - $vrlex->{"x$lex"}[0][$lex+1]: no exception ok 6386 - $vrlex->{"x$lex"}[0][$lex+1]: value ok 6387 - $vrlex->{"x$lex"}[0][$lex+1] = 123: no exception ok 6388 - $vrlex->{"x$lex"}[0][$lex+1] = 123: value ok 6389 - exists $vrlex->{"x$lex"}[0][$lex+1]: no exception ok 6390 - exists $vrlex->{"x$lex"}[0][$lex+1]: value ok 6391 - delete $vrlex->{"x$lex"}[0][$lex+1]: no exception ok 6392 - delete $vrlex->{"x$lex"}[0][$lex+1]: value ok 6393 - $vrgbl->{"x$lex"}[0][$lex+1]: no exception ok 6394 - $vrgbl->{"x$lex"}[0][$lex+1]: value ok 6395 - $vrgbl->{"x$lex"}[0][$lex+1] = 123: no exception ok 6396 - $vrgbl->{"x$lex"}[0][$lex+1] = 123: value ok 6397 - exists $vrgbl->{"x$lex"}[0][$lex+1]: no exception ok 6398 - exists $vrgbl->{"x$lex"}[0][$lex+1]: value ok 6399 - delete $vrgbl->{"x$lex"}[0][$lex+1]: no exception ok 6400 - delete $vrgbl->{"x$lex"}[0][$lex+1]: value ok 6401 - $vlex[0][$lex][$lex+1]: no exception ok 6402 - $vlex[0][$lex][$lex+1]: value ok 6403 - $vlex[0][$lex][$lex+1] = 123: no exception ok 6404 - $vlex[0][$lex][$lex+1] = 123: value ok 6405 - exists $vlex[0][$lex][$lex+1]: no exception ok 6406 - exists $vlex[0][$lex][$lex+1]: value ok 6407 - delete $vlex[0][$lex][$lex+1]: no exception ok 6408 - delete $vlex[0][$lex][$lex+1]: value ok 6409 - $vgbl[0][$lex][$lex+1]: no exception ok 6410 - $vgbl[0][$lex][$lex+1]: value ok 6411 - $vgbl[0][$lex][$lex+1] = 123: no exception ok 6412 - $vgbl[0][$lex][$lex+1] = 123: value ok 6413 - exists $vgbl[0][$lex][$lex+1]: no exception ok 6414 - exists $vgbl[0][$lex][$lex+1]: value ok 6415 - delete $vgbl[0][$lex][$lex+1]: no exception ok 6416 - delete $vgbl[0][$lex][$lex+1]: value ok 6417 - $vrlex->[0][$lex][$lex+1]: no exception ok 6418 - $vrlex->[0][$lex][$lex+1]: value ok 6419 - $vrlex->[0][$lex][$lex+1] = 123: no exception ok 6420 - $vrlex->[0][$lex][$lex+1] = 123: value ok 6421 - exists $vrlex->[0][$lex][$lex+1]: no exception ok 6422 - exists $vrlex->[0][$lex][$lex+1]: value ok 6423 - delete $vrlex->[0][$lex][$lex+1]: no exception ok 6424 - delete $vrlex->[0][$lex][$lex+1]: value ok 6425 - $vrgbl->[0][$lex][$lex+1]: no exception ok 6426 - $vrgbl->[0][$lex][$lex+1]: value ok 6427 - $vrgbl->[0][$lex][$lex+1] = 123: no exception ok 6428 - $vrgbl->[0][$lex][$lex+1] = 123: value ok 6429 - exists $vrgbl->[0][$lex][$lex+1]: no exception ok 6430 - exists $vrgbl->[0][$lex][$lex+1]: value ok 6431 - delete $vrgbl->[0][$lex][$lex+1]: no exception ok 6432 - delete $vrgbl->[0][$lex][$lex+1]: value ok 6433 - $vlex[$lex][$lex][$lex+1]: no exception ok 6434 - $vlex[$lex][$lex][$lex+1]: value ok 6435 - $vlex[$lex][$lex][$lex+1] = 123: no exception ok 6436 - $vlex[$lex][$lex][$lex+1] = 123: value ok 6437 - exists $vlex[$lex][$lex][$lex+1]: no exception ok 6438 - exists $vlex[$lex][$lex][$lex+1]: value ok 6439 - delete $vlex[$lex][$lex][$lex+1]: no exception ok 6440 - delete $vlex[$lex][$lex][$lex+1]: value ok 6441 - $vgbl[$lex][$lex][$lex+1]: no exception ok 6442 - $vgbl[$lex][$lex][$lex+1]: value ok 6443 - $vgbl[$lex][$lex][$lex+1] = 123: no exception ok 6444 - $vgbl[$lex][$lex][$lex+1] = 123: value ok 6445 - exists $vgbl[$lex][$lex][$lex+1]: no exception ok 6446 - exists $vgbl[$lex][$lex][$lex+1]: value ok 6447 - delete $vgbl[$lex][$lex][$lex+1]: no exception ok 6448 - delete $vgbl[$lex][$lex][$lex+1]: value ok 6449 - $vrlex->[$lex][$lex][$lex+1]: no exception ok 6450 - $vrlex->[$lex][$lex][$lex+1]: value ok 6451 - $vrlex->[$lex][$lex][$lex+1] = 123: no exception ok 6452 - $vrlex->[$lex][$lex][$lex+1] = 123: value ok 6453 - exists $vrlex->[$lex][$lex][$lex+1]: no exception ok 6454 - exists $vrlex->[$lex][$lex][$lex+1]: value ok 6455 - delete $vrlex->[$lex][$lex][$lex+1]: no exception ok 6456 - delete $vrlex->[$lex][$lex][$lex+1]: value ok 6457 - $vrgbl->[$lex][$lex][$lex+1]: no exception ok 6458 - $vrgbl->[$lex][$lex][$lex+1]: value ok 6459 - $vrgbl->[$lex][$lex][$lex+1] = 123: no exception ok 6460 - $vrgbl->[$lex][$lex][$lex+1] = 123: value ok 6461 - exists $vrgbl->[$lex][$lex][$lex+1]: no exception ok 6462 - exists $vrgbl->[$lex][$lex][$lex+1]: value ok 6463 - delete $vrgbl->[$lex][$lex][$lex+1]: no exception ok 6464 - delete $vrgbl->[$lex][$lex][$lex+1]: value ok 6465 - $vlex[$gbl][$lex][$lex+1]: no exception ok 6466 - $vlex[$gbl][$lex][$lex+1]: value ok 6467 - $vlex[$gbl][$lex][$lex+1] = 123: no exception ok 6468 - $vlex[$gbl][$lex][$lex+1] = 123: value ok 6469 - exists $vlex[$gbl][$lex][$lex+1]: no exception ok 6470 - exists $vlex[$gbl][$lex][$lex+1]: value ok 6471 - delete $vlex[$gbl][$lex][$lex+1]: no exception ok 6472 - delete $vlex[$gbl][$lex][$lex+1]: value ok 6473 - $vgbl[$gbl][$lex][$lex+1]: no exception ok 6474 - $vgbl[$gbl][$lex][$lex+1]: value ok 6475 - $vgbl[$gbl][$lex][$lex+1] = 123: no exception ok 6476 - $vgbl[$gbl][$lex][$lex+1] = 123: value ok 6477 - exists $vgbl[$gbl][$lex][$lex+1]: no exception ok 6478 - exists $vgbl[$gbl][$lex][$lex+1]: value ok 6479 - delete $vgbl[$gbl][$lex][$lex+1]: no exception ok 6480 - delete $vgbl[$gbl][$lex][$lex+1]: value ok 6481 - $vrlex->[$gbl][$lex][$lex+1]: no exception ok 6482 - $vrlex->[$gbl][$lex][$lex+1]: value ok 6483 - $vrlex->[$gbl][$lex][$lex+1] = 123: no exception ok 6484 - $vrlex->[$gbl][$lex][$lex+1] = 123: value ok 6485 - exists $vrlex->[$gbl][$lex][$lex+1]: no exception ok 6486 - exists $vrlex->[$gbl][$lex][$lex+1]: value ok 6487 - delete $vrlex->[$gbl][$lex][$lex+1]: no exception ok 6488 - delete $vrlex->[$gbl][$lex][$lex+1]: value ok 6489 - $vrgbl->[$gbl][$lex][$lex+1]: no exception ok 6490 - $vrgbl->[$gbl][$lex][$lex+1]: value ok 6491 - $vrgbl->[$gbl][$lex][$lex+1] = 123: no exception ok 6492 - $vrgbl->[$gbl][$lex][$lex+1] = 123: value ok 6493 - exists $vrgbl->[$gbl][$lex][$lex+1]: no exception ok 6494 - exists $vrgbl->[$gbl][$lex][$lex+1]: value ok 6495 - delete $vrgbl->[$gbl][$lex][$lex+1]: no exception ok 6496 - delete $vrgbl->[$gbl][$lex][$lex+1]: value ok 6497 - $vlex[$lex+1][$lex][$lex+1]: no exception ok 6498 - $vlex[$lex+1][$lex][$lex+1]: value ok 6499 - $vlex[$lex+1][$lex][$lex+1] = 123: no exception ok 6500 - $vlex[$lex+1][$lex][$lex+1] = 123: value ok 6501 - exists $vlex[$lex+1][$lex][$lex+1]: no exception ok 6502 - exists $vlex[$lex+1][$lex][$lex+1]: value ok 6503 - delete $vlex[$lex+1][$lex][$lex+1]: no exception ok 6504 - delete $vlex[$lex+1][$lex][$lex+1]: value ok 6505 - $vgbl[$lex+1][$lex][$lex+1]: no exception ok 6506 - $vgbl[$lex+1][$lex][$lex+1]: value ok 6507 - $vgbl[$lex+1][$lex][$lex+1] = 123: no exception ok 6508 - $vgbl[$lex+1][$lex][$lex+1] = 123: value ok 6509 - exists $vgbl[$lex+1][$lex][$lex+1]: no exception ok 6510 - exists $vgbl[$lex+1][$lex][$lex+1]: value ok 6511 - delete $vgbl[$lex+1][$lex][$lex+1]: no exception ok 6512 - delete $vgbl[$lex+1][$lex][$lex+1]: value ok 6513 - $vrlex->[$lex+1][$lex][$lex+1]: no exception ok 6514 - $vrlex->[$lex+1][$lex][$lex+1]: value ok 6515 - $vrlex->[$lex+1][$lex][$lex+1] = 123: no exception ok 6516 - $vrlex->[$lex+1][$lex][$lex+1] = 123: value ok 6517 - exists $vrlex->[$lex+1][$lex][$lex+1]: no exception ok 6518 - exists $vrlex->[$lex+1][$lex][$lex+1]: value ok 6519 - delete $vrlex->[$lex+1][$lex][$lex+1]: no exception ok 6520 - delete $vrlex->[$lex+1][$lex][$lex+1]: value ok 6521 - $vrgbl->[$lex+1][$lex][$lex+1]: no exception ok 6522 - $vrgbl->[$lex+1][$lex][$lex+1]: value ok 6523 - $vrgbl->[$lex+1][$lex][$lex+1] = 123: no exception ok 6524 - $vrgbl->[$lex+1][$lex][$lex+1] = 123: value ok 6525 - exists $vrgbl->[$lex+1][$lex][$lex+1]: no exception ok 6526 - exists $vrgbl->[$lex+1][$lex][$lex+1]: value ok 6527 - delete $vrgbl->[$lex+1][$lex][$lex+1]: no exception ok 6528 - delete $vrgbl->[$lex+1][$lex][$lex+1]: value ok 6529 - $vlex{foo}[$lex][$lex+1]: no exception ok 6530 - $vlex{foo}[$lex][$lex+1]: value ok 6531 - $vlex{foo}[$lex][$lex+1] = 123: no exception ok 6532 - $vlex{foo}[$lex][$lex+1] = 123: value ok 6533 - exists $vlex{foo}[$lex][$lex+1]: no exception ok 6534 - exists $vlex{foo}[$lex][$lex+1]: value ok 6535 - delete $vlex{foo}[$lex][$lex+1]: no exception ok 6536 - delete $vlex{foo}[$lex][$lex+1]: value ok 6537 - $vgbl{foo}[$lex][$lex+1]: no exception ok 6538 - $vgbl{foo}[$lex][$lex+1]: value ok 6539 - $vgbl{foo}[$lex][$lex+1] = 123: no exception ok 6540 - $vgbl{foo}[$lex][$lex+1] = 123: value ok 6541 - exists $vgbl{foo}[$lex][$lex+1]: no exception ok 6542 - exists $vgbl{foo}[$lex][$lex+1]: value ok 6543 - delete $vgbl{foo}[$lex][$lex+1]: no exception ok 6544 - delete $vgbl{foo}[$lex][$lex+1]: value ok 6545 - $vrlex->{foo}[$lex][$lex+1]: no exception ok 6546 - $vrlex->{foo}[$lex][$lex+1]: value ok 6547 - $vrlex->{foo}[$lex][$lex+1] = 123: no exception ok 6548 - $vrlex->{foo}[$lex][$lex+1] = 123: value ok 6549 - exists $vrlex->{foo}[$lex][$lex+1]: no exception ok 6550 - exists $vrlex->{foo}[$lex][$lex+1]: value ok 6551 - delete $vrlex->{foo}[$lex][$lex+1]: no exception ok 6552 - delete $vrlex->{foo}[$lex][$lex+1]: value ok 6553 - $vrgbl->{foo}[$lex][$lex+1]: no exception ok 6554 - $vrgbl->{foo}[$lex][$lex+1]: value ok 6555 - $vrgbl->{foo}[$lex][$lex+1] = 123: no exception ok 6556 - $vrgbl->{foo}[$lex][$lex+1] = 123: value ok 6557 - exists $vrgbl->{foo}[$lex][$lex+1]: no exception ok 6558 - exists $vrgbl->{foo}[$lex][$lex+1]: value ok 6559 - delete $vrgbl->{foo}[$lex][$lex+1]: no exception ok 6560 - delete $vrgbl->{foo}[$lex][$lex+1]: value ok 6561 - $vlex{$lex}[$lex][$lex+1]: no exception ok 6562 - $vlex{$lex}[$lex][$lex+1]: value ok 6563 - $vlex{$lex}[$lex][$lex+1] = 123: no exception ok 6564 - $vlex{$lex}[$lex][$lex+1] = 123: value ok 6565 - exists $vlex{$lex}[$lex][$lex+1]: no exception ok 6566 - exists $vlex{$lex}[$lex][$lex+1]: value ok 6567 - delete $vlex{$lex}[$lex][$lex+1]: no exception ok 6568 - delete $vlex{$lex}[$lex][$lex+1]: value ok 6569 - $vgbl{$lex}[$lex][$lex+1]: no exception ok 6570 - $vgbl{$lex}[$lex][$lex+1]: value ok 6571 - $vgbl{$lex}[$lex][$lex+1] = 123: no exception ok 6572 - $vgbl{$lex}[$lex][$lex+1] = 123: value ok 6573 - exists $vgbl{$lex}[$lex][$lex+1]: no exception ok 6574 - exists $vgbl{$lex}[$lex][$lex+1]: value ok 6575 - delete $vgbl{$lex}[$lex][$lex+1]: no exception ok 6576 - delete $vgbl{$lex}[$lex][$lex+1]: value ok 6577 - $vrlex->{$lex}[$lex][$lex+1]: no exception ok 6578 - $vrlex->{$lex}[$lex][$lex+1]: value ok 6579 - $vrlex->{$lex}[$lex][$lex+1] = 123: no exception ok 6580 - $vrlex->{$lex}[$lex][$lex+1] = 123: value ok 6581 - exists $vrlex->{$lex}[$lex][$lex+1]: no exception ok 6582 - exists $vrlex->{$lex}[$lex][$lex+1]: value ok 6583 - delete $vrlex->{$lex}[$lex][$lex+1]: no exception ok 6584 - delete $vrlex->{$lex}[$lex][$lex+1]: value ok 6585 - $vrgbl->{$lex}[$lex][$lex+1]: no exception ok 6586 - $vrgbl->{$lex}[$lex][$lex+1]: value ok 6587 - $vrgbl->{$lex}[$lex][$lex+1] = 123: no exception ok 6588 - $vrgbl->{$lex}[$lex][$lex+1] = 123: value ok 6589 - exists $vrgbl->{$lex}[$lex][$lex+1]: no exception ok 6590 - exists $vrgbl->{$lex}[$lex][$lex+1]: value ok 6591 - delete $vrgbl->{$lex}[$lex][$lex+1]: no exception ok 6592 - delete $vrgbl->{$lex}[$lex][$lex+1]: value ok 6593 - $vlex{$gbl}[$lex][$lex+1]: no exception ok 6594 - $vlex{$gbl}[$lex][$lex+1]: value ok 6595 - $vlex{$gbl}[$lex][$lex+1] = 123: no exception ok 6596 - $vlex{$gbl}[$lex][$lex+1] = 123: value ok 6597 - exists $vlex{$gbl}[$lex][$lex+1]: no exception ok 6598 - exists $vlex{$gbl}[$lex][$lex+1]: value ok 6599 - delete $vlex{$gbl}[$lex][$lex+1]: no exception ok 6600 - delete $vlex{$gbl}[$lex][$lex+1]: value ok 6601 - $vgbl{$gbl}[$lex][$lex+1]: no exception ok 6602 - $vgbl{$gbl}[$lex][$lex+1]: value ok 6603 - $vgbl{$gbl}[$lex][$lex+1] = 123: no exception ok 6604 - $vgbl{$gbl}[$lex][$lex+1] = 123: value ok 6605 - exists $vgbl{$gbl}[$lex][$lex+1]: no exception ok 6606 - exists $vgbl{$gbl}[$lex][$lex+1]: value ok 6607 - delete $vgbl{$gbl}[$lex][$lex+1]: no exception ok 6608 - delete $vgbl{$gbl}[$lex][$lex+1]: value ok 6609 - $vrlex->{$gbl}[$lex][$lex+1]: no exception ok 6610 - $vrlex->{$gbl}[$lex][$lex+1]: value ok 6611 - $vrlex->{$gbl}[$lex][$lex+1] = 123: no exception ok 6612 - $vrlex->{$gbl}[$lex][$lex+1] = 123: value ok 6613 - exists $vrlex->{$gbl}[$lex][$lex+1]: no exception ok 6614 - exists $vrlex->{$gbl}[$lex][$lex+1]: value ok 6615 - delete $vrlex->{$gbl}[$lex][$lex+1]: no exception ok 6616 - delete $vrlex->{$gbl}[$lex][$lex+1]: value ok 6617 - $vrgbl->{$gbl}[$lex][$lex+1]: no exception ok 6618 - $vrgbl->{$gbl}[$lex][$lex+1]: value ok 6619 - $vrgbl->{$gbl}[$lex][$lex+1] = 123: no exception ok 6620 - $vrgbl->{$gbl}[$lex][$lex+1] = 123: value ok 6621 - exists $vrgbl->{$gbl}[$lex][$lex+1]: no exception ok 6622 - exists $vrgbl->{$gbl}[$lex][$lex+1]: value ok 6623 - delete $vrgbl->{$gbl}[$lex][$lex+1]: no exception ok 6624 - delete $vrgbl->{$gbl}[$lex][$lex+1]: value ok 6625 - $vlex{"x$lex"}[$lex][$lex+1]: no exception ok 6626 - $vlex{"x$lex"}[$lex][$lex+1]: value ok 6627 - $vlex{"x$lex"}[$lex][$lex+1] = 123: no exception ok 6628 - $vlex{"x$lex"}[$lex][$lex+1] = 123: value ok 6629 - exists $vlex{"x$lex"}[$lex][$lex+1]: no exception ok 6630 - exists $vlex{"x$lex"}[$lex][$lex+1]: value ok 6631 - delete $vlex{"x$lex"}[$lex][$lex+1]: no exception ok 6632 - delete $vlex{"x$lex"}[$lex][$lex+1]: value ok 6633 - $vgbl{"x$lex"}[$lex][$lex+1]: no exception ok 6634 - $vgbl{"x$lex"}[$lex][$lex+1]: value ok 6635 - $vgbl{"x$lex"}[$lex][$lex+1] = 123: no exception ok 6636 - $vgbl{"x$lex"}[$lex][$lex+1] = 123: value ok 6637 - exists $vgbl{"x$lex"}[$lex][$lex+1]: no exception ok 6638 - exists $vgbl{"x$lex"}[$lex][$lex+1]: value ok 6639 - delete $vgbl{"x$lex"}[$lex][$lex+1]: no exception ok 6640 - delete $vgbl{"x$lex"}[$lex][$lex+1]: value ok 6641 - $vrlex->{"x$lex"}[$lex][$lex+1]: no exception ok 6642 - $vrlex->{"x$lex"}[$lex][$lex+1]: value ok 6643 - $vrlex->{"x$lex"}[$lex][$lex+1] = 123: no exception ok 6644 - $vrlex->{"x$lex"}[$lex][$lex+1] = 123: value ok 6645 - exists $vrlex->{"x$lex"}[$lex][$lex+1]: no exception ok 6646 - exists $vrlex->{"x$lex"}[$lex][$lex+1]: value ok 6647 - delete $vrlex->{"x$lex"}[$lex][$lex+1]: no exception ok 6648 - delete $vrlex->{"x$lex"}[$lex][$lex+1]: value ok 6649 - $vrgbl->{"x$lex"}[$lex][$lex+1]: no exception ok 6650 - $vrgbl->{"x$lex"}[$lex][$lex+1]: value ok 6651 - $vrgbl->{"x$lex"}[$lex][$lex+1] = 123: no exception ok 6652 - $vrgbl->{"x$lex"}[$lex][$lex+1] = 123: value ok 6653 - exists $vrgbl->{"x$lex"}[$lex][$lex+1]: no exception ok 6654 - exists $vrgbl->{"x$lex"}[$lex][$lex+1]: value ok 6655 - delete $vrgbl->{"x$lex"}[$lex][$lex+1]: no exception ok 6656 - delete $vrgbl->{"x$lex"}[$lex][$lex+1]: value ok 6657 - $vlex[0][$gbl][$lex+1]: no exception ok 6658 - $vlex[0][$gbl][$lex+1]: value ok 6659 - $vlex[0][$gbl][$lex+1] = 123: no exception ok 6660 - $vlex[0][$gbl][$lex+1] = 123: value ok 6661 - exists $vlex[0][$gbl][$lex+1]: no exception ok 6662 - exists $vlex[0][$gbl][$lex+1]: value ok 6663 - delete $vlex[0][$gbl][$lex+1]: no exception ok 6664 - delete $vlex[0][$gbl][$lex+1]: value ok 6665 - $vgbl[0][$gbl][$lex+1]: no exception ok 6666 - $vgbl[0][$gbl][$lex+1]: value ok 6667 - $vgbl[0][$gbl][$lex+1] = 123: no exception ok 6668 - $vgbl[0][$gbl][$lex+1] = 123: value ok 6669 - exists $vgbl[0][$gbl][$lex+1]: no exception ok 6670 - exists $vgbl[0][$gbl][$lex+1]: value ok 6671 - delete $vgbl[0][$gbl][$lex+1]: no exception ok 6672 - delete $vgbl[0][$gbl][$lex+1]: value ok 6673 - $vrlex->[0][$gbl][$lex+1]: no exception ok 6674 - $vrlex->[0][$gbl][$lex+1]: value ok 6675 - $vrlex->[0][$gbl][$lex+1] = 123: no exception ok 6676 - $vrlex->[0][$gbl][$lex+1] = 123: value ok 6677 - exists $vrlex->[0][$gbl][$lex+1]: no exception ok 6678 - exists $vrlex->[0][$gbl][$lex+1]: value ok 6679 - delete $vrlex->[0][$gbl][$lex+1]: no exception ok 6680 - delete $vrlex->[0][$gbl][$lex+1]: value ok 6681 - $vrgbl->[0][$gbl][$lex+1]: no exception ok 6682 - $vrgbl->[0][$gbl][$lex+1]: value ok 6683 - $vrgbl->[0][$gbl][$lex+1] = 123: no exception ok 6684 - $vrgbl->[0][$gbl][$lex+1] = 123: value ok 6685 - exists $vrgbl->[0][$gbl][$lex+1]: no exception ok 6686 - exists $vrgbl->[0][$gbl][$lex+1]: value ok 6687 - delete $vrgbl->[0][$gbl][$lex+1]: no exception ok 6688 - delete $vrgbl->[0][$gbl][$lex+1]: value ok 6689 - $vlex[$lex][$gbl][$lex+1]: no exception ok 6690 - $vlex[$lex][$gbl][$lex+1]: value ok 6691 - $vlex[$lex][$gbl][$lex+1] = 123: no exception ok 6692 - $vlex[$lex][$gbl][$lex+1] = 123: value ok 6693 - exists $vlex[$lex][$gbl][$lex+1]: no exception ok 6694 - exists $vlex[$lex][$gbl][$lex+1]: value ok 6695 - delete $vlex[$lex][$gbl][$lex+1]: no exception ok 6696 - delete $vlex[$lex][$gbl][$lex+1]: value ok 6697 - $vgbl[$lex][$gbl][$lex+1]: no exception ok 6698 - $vgbl[$lex][$gbl][$lex+1]: value ok 6699 - $vgbl[$lex][$gbl][$lex+1] = 123: no exception ok 6700 - $vgbl[$lex][$gbl][$lex+1] = 123: value ok 6701 - exists $vgbl[$lex][$gbl][$lex+1]: no exception ok 6702 - exists $vgbl[$lex][$gbl][$lex+1]: value ok 6703 - delete $vgbl[$lex][$gbl][$lex+1]: no exception ok 6704 - delete $vgbl[$lex][$gbl][$lex+1]: value ok 6705 - $vrlex->[$lex][$gbl][$lex+1]: no exception ok 6706 - $vrlex->[$lex][$gbl][$lex+1]: value ok 6707 - $vrlex->[$lex][$gbl][$lex+1] = 123: no exception ok 6708 - $vrlex->[$lex][$gbl][$lex+1] = 123: value ok 6709 - exists $vrlex->[$lex][$gbl][$lex+1]: no exception ok 6710 - exists $vrlex->[$lex][$gbl][$lex+1]: value ok 6711 - delete $vrlex->[$lex][$gbl][$lex+1]: no exception ok 6712 - delete $vrlex->[$lex][$gbl][$lex+1]: value ok 6713 - $vrgbl->[$lex][$gbl][$lex+1]: no exception ok 6714 - $vrgbl->[$lex][$gbl][$lex+1]: value ok 6715 - $vrgbl->[$lex][$gbl][$lex+1] = 123: no exception ok 6716 - $vrgbl->[$lex][$gbl][$lex+1] = 123: value ok 6717 - exists $vrgbl->[$lex][$gbl][$lex+1]: no exception ok 6718 - exists $vrgbl->[$lex][$gbl][$lex+1]: value ok 6719 - delete $vrgbl->[$lex][$gbl][$lex+1]: no exception ok 6720 - delete $vrgbl->[$lex][$gbl][$lex+1]: value ok 6721 - $vlex[$gbl][$gbl][$lex+1]: no exception ok 6722 - $vlex[$gbl][$gbl][$lex+1]: value ok 6723 - $vlex[$gbl][$gbl][$lex+1] = 123: no exception ok 6724 - $vlex[$gbl][$gbl][$lex+1] = 123: value ok 6725 - exists $vlex[$gbl][$gbl][$lex+1]: no exception ok 6726 - exists $vlex[$gbl][$gbl][$lex+1]: value ok 6727 - delete $vlex[$gbl][$gbl][$lex+1]: no exception ok 6728 - delete $vlex[$gbl][$gbl][$lex+1]: value ok 6729 - $vgbl[$gbl][$gbl][$lex+1]: no exception ok 6730 - $vgbl[$gbl][$gbl][$lex+1]: value ok 6731 - $vgbl[$gbl][$gbl][$lex+1] = 123: no exception ok 6732 - $vgbl[$gbl][$gbl][$lex+1] = 123: value ok 6733 - exists $vgbl[$gbl][$gbl][$lex+1]: no exception ok 6734 - exists $vgbl[$gbl][$gbl][$lex+1]: value ok 6735 - delete $vgbl[$gbl][$gbl][$lex+1]: no exception ok 6736 - delete $vgbl[$gbl][$gbl][$lex+1]: value ok 6737 - $vrlex->[$gbl][$gbl][$lex+1]: no exception ok 6738 - $vrlex->[$gbl][$gbl][$lex+1]: value ok 6739 - $vrlex->[$gbl][$gbl][$lex+1] = 123: no exception ok 6740 - $vrlex->[$gbl][$gbl][$lex+1] = 123: value ok 6741 - exists $vrlex->[$gbl][$gbl][$lex+1]: no exception ok 6742 - exists $vrlex->[$gbl][$gbl][$lex+1]: value ok 6743 - delete $vrlex->[$gbl][$gbl][$lex+1]: no exception ok 6744 - delete $vrlex->[$gbl][$gbl][$lex+1]: value ok 6745 - $vrgbl->[$gbl][$gbl][$lex+1]: no exception ok 6746 - $vrgbl->[$gbl][$gbl][$lex+1]: value ok 6747 - $vrgbl->[$gbl][$gbl][$lex+1] = 123: no exception ok 6748 - $vrgbl->[$gbl][$gbl][$lex+1] = 123: value ok 6749 - exists $vrgbl->[$gbl][$gbl][$lex+1]: no exception ok 6750 - exists $vrgbl->[$gbl][$gbl][$lex+1]: value ok 6751 - delete $vrgbl->[$gbl][$gbl][$lex+1]: no exception ok 6752 - delete $vrgbl->[$gbl][$gbl][$lex+1]: value ok 6753 - $vlex[$lex+1][$gbl][$lex+1]: no exception ok 6754 - $vlex[$lex+1][$gbl][$lex+1]: value ok 6755 - $vlex[$lex+1][$gbl][$lex+1] = 123: no exception ok 6756 - $vlex[$lex+1][$gbl][$lex+1] = 123: value ok 6757 - exists $vlex[$lex+1][$gbl][$lex+1]: no exception ok 6758 - exists $vlex[$lex+1][$gbl][$lex+1]: value ok 6759 - delete $vlex[$lex+1][$gbl][$lex+1]: no exception ok 6760 - delete $vlex[$lex+1][$gbl][$lex+1]: value ok 6761 - $vgbl[$lex+1][$gbl][$lex+1]: no exception ok 6762 - $vgbl[$lex+1][$gbl][$lex+1]: value ok 6763 - $vgbl[$lex+1][$gbl][$lex+1] = 123: no exception ok 6764 - $vgbl[$lex+1][$gbl][$lex+1] = 123: value ok 6765 - exists $vgbl[$lex+1][$gbl][$lex+1]: no exception ok 6766 - exists $vgbl[$lex+1][$gbl][$lex+1]: value ok 6767 - delete $vgbl[$lex+1][$gbl][$lex+1]: no exception ok 6768 - delete $vgbl[$lex+1][$gbl][$lex+1]: value ok 6769 - $vrlex->[$lex+1][$gbl][$lex+1]: no exception ok 6770 - $vrlex->[$lex+1][$gbl][$lex+1]: value ok 6771 - $vrlex->[$lex+1][$gbl][$lex+1] = 123: no exception ok 6772 - $vrlex->[$lex+1][$gbl][$lex+1] = 123: value ok 6773 - exists $vrlex->[$lex+1][$gbl][$lex+1]: no exception ok 6774 - exists $vrlex->[$lex+1][$gbl][$lex+1]: value ok 6775 - delete $vrlex->[$lex+1][$gbl][$lex+1]: no exception ok 6776 - delete $vrlex->[$lex+1][$gbl][$lex+1]: value ok 6777 - $vrgbl->[$lex+1][$gbl][$lex+1]: no exception ok 6778 - $vrgbl->[$lex+1][$gbl][$lex+1]: value ok 6779 - $vrgbl->[$lex+1][$gbl][$lex+1] = 123: no exception ok 6780 - $vrgbl->[$lex+1][$gbl][$lex+1] = 123: value ok 6781 - exists $vrgbl->[$lex+1][$gbl][$lex+1]: no exception ok 6782 - exists $vrgbl->[$lex+1][$gbl][$lex+1]: value ok 6783 - delete $vrgbl->[$lex+1][$gbl][$lex+1]: no exception ok 6784 - delete $vrgbl->[$lex+1][$gbl][$lex+1]: value ok 6785 - $vlex{foo}[$gbl][$lex+1]: no exception ok 6786 - $vlex{foo}[$gbl][$lex+1]: value ok 6787 - $vlex{foo}[$gbl][$lex+1] = 123: no exception ok 6788 - $vlex{foo}[$gbl][$lex+1] = 123: value ok 6789 - exists $vlex{foo}[$gbl][$lex+1]: no exception ok 6790 - exists $vlex{foo}[$gbl][$lex+1]: value ok 6791 - delete $vlex{foo}[$gbl][$lex+1]: no exception ok 6792 - delete $vlex{foo}[$gbl][$lex+1]: value ok 6793 - $vgbl{foo}[$gbl][$lex+1]: no exception ok 6794 - $vgbl{foo}[$gbl][$lex+1]: value ok 6795 - $vgbl{foo}[$gbl][$lex+1] = 123: no exception ok 6796 - $vgbl{foo}[$gbl][$lex+1] = 123: value ok 6797 - exists $vgbl{foo}[$gbl][$lex+1]: no exception ok 6798 - exists $vgbl{foo}[$gbl][$lex+1]: value ok 6799 - delete $vgbl{foo}[$gbl][$lex+1]: no exception ok 6800 - delete $vgbl{foo}[$gbl][$lex+1]: value ok 6801 - $vrlex->{foo}[$gbl][$lex+1]: no exception ok 6802 - $vrlex->{foo}[$gbl][$lex+1]: value ok 6803 - $vrlex->{foo}[$gbl][$lex+1] = 123: no exception ok 6804 - $vrlex->{foo}[$gbl][$lex+1] = 123: value ok 6805 - exists $vrlex->{foo}[$gbl][$lex+1]: no exception ok 6806 - exists $vrlex->{foo}[$gbl][$lex+1]: value ok 6807 - delete $vrlex->{foo}[$gbl][$lex+1]: no exception ok 6808 - delete $vrlex->{foo}[$gbl][$lex+1]: value ok 6809 - $vrgbl->{foo}[$gbl][$lex+1]: no exception ok 6810 - $vrgbl->{foo}[$gbl][$lex+1]: value ok 6811 - $vrgbl->{foo}[$gbl][$lex+1] = 123: no exception ok 6812 - $vrgbl->{foo}[$gbl][$lex+1] = 123: value ok 6813 - exists $vrgbl->{foo}[$gbl][$lex+1]: no exception ok 6814 - exists $vrgbl->{foo}[$gbl][$lex+1]: value ok 6815 - delete $vrgbl->{foo}[$gbl][$lex+1]: no exception ok 6816 - delete $vrgbl->{foo}[$gbl][$lex+1]: value ok 6817 - $vlex{$lex}[$gbl][$lex+1]: no exception ok 6818 - $vlex{$lex}[$gbl][$lex+1]: value ok 6819 - $vlex{$lex}[$gbl][$lex+1] = 123: no exception ok 6820 - $vlex{$lex}[$gbl][$lex+1] = 123: value ok 6821 - exists $vlex{$lex}[$gbl][$lex+1]: no exception ok 6822 - exists $vlex{$lex}[$gbl][$lex+1]: value ok 6823 - delete $vlex{$lex}[$gbl][$lex+1]: no exception ok 6824 - delete $vlex{$lex}[$gbl][$lex+1]: value ok 6825 - $vgbl{$lex}[$gbl][$lex+1]: no exception ok 6826 - $vgbl{$lex}[$gbl][$lex+1]: value ok 6827 - $vgbl{$lex}[$gbl][$lex+1] = 123: no exception ok 6828 - $vgbl{$lex}[$gbl][$lex+1] = 123: value ok 6829 - exists $vgbl{$lex}[$gbl][$lex+1]: no exception ok 6830 - exists $vgbl{$lex}[$gbl][$lex+1]: value ok 6831 - delete $vgbl{$lex}[$gbl][$lex+1]: no exception ok 6832 - delete $vgbl{$lex}[$gbl][$lex+1]: value ok 6833 - $vrlex->{$lex}[$gbl][$lex+1]: no exception ok 6834 - $vrlex->{$lex}[$gbl][$lex+1]: value ok 6835 - $vrlex->{$lex}[$gbl][$lex+1] = 123: no exception ok 6836 - $vrlex->{$lex}[$gbl][$lex+1] = 123: value ok 6837 - exists $vrlex->{$lex}[$gbl][$lex+1]: no exception ok 6838 - exists $vrlex->{$lex}[$gbl][$lex+1]: value ok 6839 - delete $vrlex->{$lex}[$gbl][$lex+1]: no exception ok 6840 - delete $vrlex->{$lex}[$gbl][$lex+1]: value ok 6841 - $vrgbl->{$lex}[$gbl][$lex+1]: no exception ok 6842 - $vrgbl->{$lex}[$gbl][$lex+1]: value ok 6843 - $vrgbl->{$lex}[$gbl][$lex+1] = 123: no exception ok 6844 - $vrgbl->{$lex}[$gbl][$lex+1] = 123: value ok 6845 - exists $vrgbl->{$lex}[$gbl][$lex+1]: no exception ok 6846 - exists $vrgbl->{$lex}[$gbl][$lex+1]: value ok 6847 - delete $vrgbl->{$lex}[$gbl][$lex+1]: no exception ok 6848 - delete $vrgbl->{$lex}[$gbl][$lex+1]: value ok 6849 - $vlex{$gbl}[$gbl][$lex+1]: no exception ok 6850 - $vlex{$gbl}[$gbl][$lex+1]: value ok 6851 - $vlex{$gbl}[$gbl][$lex+1] = 123: no exception ok 6852 - $vlex{$gbl}[$gbl][$lex+1] = 123: value ok 6853 - exists $vlex{$gbl}[$gbl][$lex+1]: no exception ok 6854 - exists $vlex{$gbl}[$gbl][$lex+1]: value ok 6855 - delete $vlex{$gbl}[$gbl][$lex+1]: no exception ok 6856 - delete $vlex{$gbl}[$gbl][$lex+1]: value ok 6857 - $vgbl{$gbl}[$gbl][$lex+1]: no exception ok 6858 - $vgbl{$gbl}[$gbl][$lex+1]: value ok 6859 - $vgbl{$gbl}[$gbl][$lex+1] = 123: no exception ok 6860 - $vgbl{$gbl}[$gbl][$lex+1] = 123: value ok 6861 - exists $vgbl{$gbl}[$gbl][$lex+1]: no exception ok 6862 - exists $vgbl{$gbl}[$gbl][$lex+1]: value ok 6863 - delete $vgbl{$gbl}[$gbl][$lex+1]: no exception ok 6864 - delete $vgbl{$gbl}[$gbl][$lex+1]: value ok 6865 - $vrlex->{$gbl}[$gbl][$lex+1]: no exception ok 6866 - $vrlex->{$gbl}[$gbl][$lex+1]: value ok 6867 - $vrlex->{$gbl}[$gbl][$lex+1] = 123: no exception ok 6868 - $vrlex->{$gbl}[$gbl][$lex+1] = 123: value ok 6869 - exists $vrlex->{$gbl}[$gbl][$lex+1]: no exception ok 6870 - exists $vrlex->{$gbl}[$gbl][$lex+1]: value ok 6871 - delete $vrlex->{$gbl}[$gbl][$lex+1]: no exception ok 6872 - delete $vrlex->{$gbl}[$gbl][$lex+1]: value ok 6873 - $vrgbl->{$gbl}[$gbl][$lex+1]: no exception ok 6874 - $vrgbl->{$gbl}[$gbl][$lex+1]: value ok 6875 - $vrgbl->{$gbl}[$gbl][$lex+1] = 123: no exception ok 6876 - $vrgbl->{$gbl}[$gbl][$lex+1] = 123: value ok 6877 - exists $vrgbl->{$gbl}[$gbl][$lex+1]: no exception ok 6878 - exists $vrgbl->{$gbl}[$gbl][$lex+1]: value ok 6879 - delete $vrgbl->{$gbl}[$gbl][$lex+1]: no exception ok 6880 - delete $vrgbl->{$gbl}[$gbl][$lex+1]: value ok 6881 - $vlex{"x$lex"}[$gbl][$lex+1]: no exception ok 6882 - $vlex{"x$lex"}[$gbl][$lex+1]: value ok 6883 - $vlex{"x$lex"}[$gbl][$lex+1] = 123: no exception ok 6884 - $vlex{"x$lex"}[$gbl][$lex+1] = 123: value ok 6885 - exists $vlex{"x$lex"}[$gbl][$lex+1]: no exception ok 6886 - exists $vlex{"x$lex"}[$gbl][$lex+1]: value ok 6887 - delete $vlex{"x$lex"}[$gbl][$lex+1]: no exception ok 6888 - delete $vlex{"x$lex"}[$gbl][$lex+1]: value ok 6889 - $vgbl{"x$lex"}[$gbl][$lex+1]: no exception ok 6890 - $vgbl{"x$lex"}[$gbl][$lex+1]: value ok 6891 - $vgbl{"x$lex"}[$gbl][$lex+1] = 123: no exception ok 6892 - $vgbl{"x$lex"}[$gbl][$lex+1] = 123: value ok 6893 - exists $vgbl{"x$lex"}[$gbl][$lex+1]: no exception ok 6894 - exists $vgbl{"x$lex"}[$gbl][$lex+1]: value ok 6895 - delete $vgbl{"x$lex"}[$gbl][$lex+1]: no exception ok 6896 - delete $vgbl{"x$lex"}[$gbl][$lex+1]: value ok 6897 - $vrlex->{"x$lex"}[$gbl][$lex+1]: no exception ok 6898 - $vrlex->{"x$lex"}[$gbl][$lex+1]: value ok 6899 - $vrlex->{"x$lex"}[$gbl][$lex+1] = 123: no exception ok 6900 - $vrlex->{"x$lex"}[$gbl][$lex+1] = 123: value ok 6901 - exists $vrlex->{"x$lex"}[$gbl][$lex+1]: no exception ok 6902 - exists $vrlex->{"x$lex"}[$gbl][$lex+1]: value ok 6903 - delete $vrlex->{"x$lex"}[$gbl][$lex+1]: no exception ok 6904 - delete $vrlex->{"x$lex"}[$gbl][$lex+1]: value ok 6905 - $vrgbl->{"x$lex"}[$gbl][$lex+1]: no exception ok 6906 - $vrgbl->{"x$lex"}[$gbl][$lex+1]: value ok 6907 - $vrgbl->{"x$lex"}[$gbl][$lex+1] = 123: no exception ok 6908 - $vrgbl->{"x$lex"}[$gbl][$lex+1] = 123: value ok 6909 - exists $vrgbl->{"x$lex"}[$gbl][$lex+1]: no exception ok 6910 - exists $vrgbl->{"x$lex"}[$gbl][$lex+1]: value ok 6911 - delete $vrgbl->{"x$lex"}[$gbl][$lex+1]: no exception ok 6912 - delete $vrgbl->{"x$lex"}[$gbl][$lex+1]: value ok 6913 - $vlex[0][$lex+1][$lex+1]: no exception ok 6914 - $vlex[0][$lex+1][$lex+1]: value ok 6915 - $vlex[0][$lex+1][$lex+1] = 123: no exception ok 6916 - $vlex[0][$lex+1][$lex+1] = 123: value ok 6917 - exists $vlex[0][$lex+1][$lex+1]: no exception ok 6918 - exists $vlex[0][$lex+1][$lex+1]: value ok 6919 - delete $vlex[0][$lex+1][$lex+1]: no exception ok 6920 - delete $vlex[0][$lex+1][$lex+1]: value ok 6921 - $vgbl[0][$lex+1][$lex+1]: no exception ok 6922 - $vgbl[0][$lex+1][$lex+1]: value ok 6923 - $vgbl[0][$lex+1][$lex+1] = 123: no exception ok 6924 - $vgbl[0][$lex+1][$lex+1] = 123: value ok 6925 - exists $vgbl[0][$lex+1][$lex+1]: no exception ok 6926 - exists $vgbl[0][$lex+1][$lex+1]: value ok 6927 - delete $vgbl[0][$lex+1][$lex+1]: no exception ok 6928 - delete $vgbl[0][$lex+1][$lex+1]: value ok 6929 - $vrlex->[0][$lex+1][$lex+1]: no exception ok 6930 - $vrlex->[0][$lex+1][$lex+1]: value ok 6931 - $vrlex->[0][$lex+1][$lex+1] = 123: no exception ok 6932 - $vrlex->[0][$lex+1][$lex+1] = 123: value ok 6933 - exists $vrlex->[0][$lex+1][$lex+1]: no exception ok 6934 - exists $vrlex->[0][$lex+1][$lex+1]: value ok 6935 - delete $vrlex->[0][$lex+1][$lex+1]: no exception ok 6936 - delete $vrlex->[0][$lex+1][$lex+1]: value ok 6937 - $vrgbl->[0][$lex+1][$lex+1]: no exception ok 6938 - $vrgbl->[0][$lex+1][$lex+1]: value ok 6939 - $vrgbl->[0][$lex+1][$lex+1] = 123: no exception ok 6940 - $vrgbl->[0][$lex+1][$lex+1] = 123: value ok 6941 - exists $vrgbl->[0][$lex+1][$lex+1]: no exception ok 6942 - exists $vrgbl->[0][$lex+1][$lex+1]: value ok 6943 - delete $vrgbl->[0][$lex+1][$lex+1]: no exception ok 6944 - delete $vrgbl->[0][$lex+1][$lex+1]: value ok 6945 - $vlex[$lex][$lex+1][$lex+1]: no exception ok 6946 - $vlex[$lex][$lex+1][$lex+1]: value ok 6947 - $vlex[$lex][$lex+1][$lex+1] = 123: no exception ok 6948 - $vlex[$lex][$lex+1][$lex+1] = 123: value ok 6949 - exists $vlex[$lex][$lex+1][$lex+1]: no exception ok 6950 - exists $vlex[$lex][$lex+1][$lex+1]: value ok 6951 - delete $vlex[$lex][$lex+1][$lex+1]: no exception ok 6952 - delete $vlex[$lex][$lex+1][$lex+1]: value ok 6953 - $vgbl[$lex][$lex+1][$lex+1]: no exception ok 6954 - $vgbl[$lex][$lex+1][$lex+1]: value ok 6955 - $vgbl[$lex][$lex+1][$lex+1] = 123: no exception ok 6956 - $vgbl[$lex][$lex+1][$lex+1] = 123: value ok 6957 - exists $vgbl[$lex][$lex+1][$lex+1]: no exception ok 6958 - exists $vgbl[$lex][$lex+1][$lex+1]: value ok 6959 - delete $vgbl[$lex][$lex+1][$lex+1]: no exception ok 6960 - delete $vgbl[$lex][$lex+1][$lex+1]: value ok 6961 - $vrlex->[$lex][$lex+1][$lex+1]: no exception ok 6962 - $vrlex->[$lex][$lex+1][$lex+1]: value ok 6963 - $vrlex->[$lex][$lex+1][$lex+1] = 123: no exception ok 6964 - $vrlex->[$lex][$lex+1][$lex+1] = 123: value ok 6965 - exists $vrlex->[$lex][$lex+1][$lex+1]: no exception ok 6966 - exists $vrlex->[$lex][$lex+1][$lex+1]: value ok 6967 - delete $vrlex->[$lex][$lex+1][$lex+1]: no exception ok 6968 - delete $vrlex->[$lex][$lex+1][$lex+1]: value ok 6969 - $vrgbl->[$lex][$lex+1][$lex+1]: no exception ok 6970 - $vrgbl->[$lex][$lex+1][$lex+1]: value ok 6971 - $vrgbl->[$lex][$lex+1][$lex+1] = 123: no exception ok 6972 - $vrgbl->[$lex][$lex+1][$lex+1] = 123: value ok 6973 - exists $vrgbl->[$lex][$lex+1][$lex+1]: no exception ok 6974 - exists $vrgbl->[$lex][$lex+1][$lex+1]: value ok 6975 - delete $vrgbl->[$lex][$lex+1][$lex+1]: no exception ok 6976 - delete $vrgbl->[$lex][$lex+1][$lex+1]: value ok 6977 - $vlex[$gbl][$lex+1][$lex+1]: no exception ok 6978 - $vlex[$gbl][$lex+1][$lex+1]: value ok 6979 - $vlex[$gbl][$lex+1][$lex+1] = 123: no exception ok 6980 - $vlex[$gbl][$lex+1][$lex+1] = 123: value ok 6981 - exists $vlex[$gbl][$lex+1][$lex+1]: no exception ok 6982 - exists $vlex[$gbl][$lex+1][$lex+1]: value ok 6983 - delete $vlex[$gbl][$lex+1][$lex+1]: no exception ok 6984 - delete $vlex[$gbl][$lex+1][$lex+1]: value ok 6985 - $vgbl[$gbl][$lex+1][$lex+1]: no exception ok 6986 - $vgbl[$gbl][$lex+1][$lex+1]: value ok 6987 - $vgbl[$gbl][$lex+1][$lex+1] = 123: no exception ok 6988 - $vgbl[$gbl][$lex+1][$lex+1] = 123: value ok 6989 - exists $vgbl[$gbl][$lex+1][$lex+1]: no exception ok 6990 - exists $vgbl[$gbl][$lex+1][$lex+1]: value ok 6991 - delete $vgbl[$gbl][$lex+1][$lex+1]: no exception ok 6992 - delete $vgbl[$gbl][$lex+1][$lex+1]: value ok 6993 - $vrlex->[$gbl][$lex+1][$lex+1]: no exception ok 6994 - $vrlex->[$gbl][$lex+1][$lex+1]: value ok 6995 - $vrlex->[$gbl][$lex+1][$lex+1] = 123: no exception ok 6996 - $vrlex->[$gbl][$lex+1][$lex+1] = 123: value ok 6997 - exists $vrlex->[$gbl][$lex+1][$lex+1]: no exception ok 6998 - exists $vrlex->[$gbl][$lex+1][$lex+1]: value ok 6999 - delete $vrlex->[$gbl][$lex+1][$lex+1]: no exception ok 7000 - delete $vrlex->[$gbl][$lex+1][$lex+1]: value ok 7001 - $vrgbl->[$gbl][$lex+1][$lex+1]: no exception ok 7002 - $vrgbl->[$gbl][$lex+1][$lex+1]: value ok 7003 - $vrgbl->[$gbl][$lex+1][$lex+1] = 123: no exception ok 7004 - $vrgbl->[$gbl][$lex+1][$lex+1] = 123: value ok 7005 - exists $vrgbl->[$gbl][$lex+1][$lex+1]: no exception ok 7006 - exists $vrgbl->[$gbl][$lex+1][$lex+1]: value ok 7007 - delete $vrgbl->[$gbl][$lex+1][$lex+1]: no exception ok 7008 - delete $vrgbl->[$gbl][$lex+1][$lex+1]: value ok 7009 - $vlex[$lex+1][$lex+1][$lex+1]: no exception ok 7010 - $vlex[$lex+1][$lex+1][$lex+1]: value ok 7011 - $vlex[$lex+1][$lex+1][$lex+1] = 123: no exception ok 7012 - $vlex[$lex+1][$lex+1][$lex+1] = 123: value ok 7013 - exists $vlex[$lex+1][$lex+1][$lex+1]: no exception ok 7014 - exists $vlex[$lex+1][$lex+1][$lex+1]: value ok 7015 - delete $vlex[$lex+1][$lex+1][$lex+1]: no exception ok 7016 - delete $vlex[$lex+1][$lex+1][$lex+1]: value ok 7017 - $vgbl[$lex+1][$lex+1][$lex+1]: no exception ok 7018 - $vgbl[$lex+1][$lex+1][$lex+1]: value ok 7019 - $vgbl[$lex+1][$lex+1][$lex+1] = 123: no exception ok 7020 - $vgbl[$lex+1][$lex+1][$lex+1] = 123: value ok 7021 - exists $vgbl[$lex+1][$lex+1][$lex+1]: no exception ok 7022 - exists $vgbl[$lex+1][$lex+1][$lex+1]: value ok 7023 - delete $vgbl[$lex+1][$lex+1][$lex+1]: no exception ok 7024 - delete $vgbl[$lex+1][$lex+1][$lex+1]: value ok 7025 - $vrlex->[$lex+1][$lex+1][$lex+1]: no exception ok 7026 - $vrlex->[$lex+1][$lex+1][$lex+1]: value ok 7027 - $vrlex->[$lex+1][$lex+1][$lex+1] = 123: no exception ok 7028 - $vrlex->[$lex+1][$lex+1][$lex+1] = 123: value ok 7029 - exists $vrlex->[$lex+1][$lex+1][$lex+1]: no exception ok 7030 - exists $vrlex->[$lex+1][$lex+1][$lex+1]: value ok 7031 - delete $vrlex->[$lex+1][$lex+1][$lex+1]: no exception ok 7032 - delete $vrlex->[$lex+1][$lex+1][$lex+1]: value ok 7033 - $vrgbl->[$lex+1][$lex+1][$lex+1]: no exception ok 7034 - $vrgbl->[$lex+1][$lex+1][$lex+1]: value ok 7035 - $vrgbl->[$lex+1][$lex+1][$lex+1] = 123: no exception ok 7036 - $vrgbl->[$lex+1][$lex+1][$lex+1] = 123: value ok 7037 - exists $vrgbl->[$lex+1][$lex+1][$lex+1]: no exception ok 7038 - exists $vrgbl->[$lex+1][$lex+1][$lex+1]: value ok 7039 - delete $vrgbl->[$lex+1][$lex+1][$lex+1]: no exception ok 7040 - delete $vrgbl->[$lex+1][$lex+1][$lex+1]: value ok 7041 - $vlex{foo}[$lex+1][$lex+1]: no exception ok 7042 - $vlex{foo}[$lex+1][$lex+1]: value ok 7043 - $vlex{foo}[$lex+1][$lex+1] = 123: no exception ok 7044 - $vlex{foo}[$lex+1][$lex+1] = 123: value ok 7045 - exists $vlex{foo}[$lex+1][$lex+1]: no exception ok 7046 - exists $vlex{foo}[$lex+1][$lex+1]: value ok 7047 - delete $vlex{foo}[$lex+1][$lex+1]: no exception ok 7048 - delete $vlex{foo}[$lex+1][$lex+1]: value ok 7049 - $vgbl{foo}[$lex+1][$lex+1]: no exception ok 7050 - $vgbl{foo}[$lex+1][$lex+1]: value ok 7051 - $vgbl{foo}[$lex+1][$lex+1] = 123: no exception ok 7052 - $vgbl{foo}[$lex+1][$lex+1] = 123: value ok 7053 - exists $vgbl{foo}[$lex+1][$lex+1]: no exception ok 7054 - exists $vgbl{foo}[$lex+1][$lex+1]: value ok 7055 - delete $vgbl{foo}[$lex+1][$lex+1]: no exception ok 7056 - delete $vgbl{foo}[$lex+1][$lex+1]: value ok 7057 - $vrlex->{foo}[$lex+1][$lex+1]: no exception ok 7058 - $vrlex->{foo}[$lex+1][$lex+1]: value ok 7059 - $vrlex->{foo}[$lex+1][$lex+1] = 123: no exception ok 7060 - $vrlex->{foo}[$lex+1][$lex+1] = 123: value ok 7061 - exists $vrlex->{foo}[$lex+1][$lex+1]: no exception ok 7062 - exists $vrlex->{foo}[$lex+1][$lex+1]: value ok 7063 - delete $vrlex->{foo}[$lex+1][$lex+1]: no exception ok 7064 - delete $vrlex->{foo}[$lex+1][$lex+1]: value ok 7065 - $vrgbl->{foo}[$lex+1][$lex+1]: no exception ok 7066 - $vrgbl->{foo}[$lex+1][$lex+1]: value ok 7067 - $vrgbl->{foo}[$lex+1][$lex+1] = 123: no exception ok 7068 - $vrgbl->{foo}[$lex+1][$lex+1] = 123: value ok 7069 - exists $vrgbl->{foo}[$lex+1][$lex+1]: no exception ok 7070 - exists $vrgbl->{foo}[$lex+1][$lex+1]: value ok 7071 - delete $vrgbl->{foo}[$lex+1][$lex+1]: no exception ok 7072 - delete $vrgbl->{foo}[$lex+1][$lex+1]: value ok 7073 - $vlex{$lex}[$lex+1][$lex+1]: no exception ok 7074 - $vlex{$lex}[$lex+1][$lex+1]: value ok 7075 - $vlex{$lex}[$lex+1][$lex+1] = 123: no exception ok 7076 - $vlex{$lex}[$lex+1][$lex+1] = 123: value ok 7077 - exists $vlex{$lex}[$lex+1][$lex+1]: no exception ok 7078 - exists $vlex{$lex}[$lex+1][$lex+1]: value ok 7079 - delete $vlex{$lex}[$lex+1][$lex+1]: no exception ok 7080 - delete $vlex{$lex}[$lex+1][$lex+1]: value ok 7081 - $vgbl{$lex}[$lex+1][$lex+1]: no exception ok 7082 - $vgbl{$lex}[$lex+1][$lex+1]: value ok 7083 - $vgbl{$lex}[$lex+1][$lex+1] = 123: no exception ok 7084 - $vgbl{$lex}[$lex+1][$lex+1] = 123: value ok 7085 - exists $vgbl{$lex}[$lex+1][$lex+1]: no exception ok 7086 - exists $vgbl{$lex}[$lex+1][$lex+1]: value ok 7087 - delete $vgbl{$lex}[$lex+1][$lex+1]: no exception ok 7088 - delete $vgbl{$lex}[$lex+1][$lex+1]: value ok 7089 - $vrlex->{$lex}[$lex+1][$lex+1]: no exception ok 7090 - $vrlex->{$lex}[$lex+1][$lex+1]: value ok 7091 - $vrlex->{$lex}[$lex+1][$lex+1] = 123: no exception ok 7092 - $vrlex->{$lex}[$lex+1][$lex+1] = 123: value ok 7093 - exists $vrlex->{$lex}[$lex+1][$lex+1]: no exception ok 7094 - exists $vrlex->{$lex}[$lex+1][$lex+1]: value ok 7095 - delete $vrlex->{$lex}[$lex+1][$lex+1]: no exception ok 7096 - delete $vrlex->{$lex}[$lex+1][$lex+1]: value ok 7097 - $vrgbl->{$lex}[$lex+1][$lex+1]: no exception ok 7098 - $vrgbl->{$lex}[$lex+1][$lex+1]: value ok 7099 - $vrgbl->{$lex}[$lex+1][$lex+1] = 123: no exception ok 7100 - $vrgbl->{$lex}[$lex+1][$lex+1] = 123: value ok 7101 - exists $vrgbl->{$lex}[$lex+1][$lex+1]: no exception ok 7102 - exists $vrgbl->{$lex}[$lex+1][$lex+1]: value ok 7103 - delete $vrgbl->{$lex}[$lex+1][$lex+1]: no exception ok 7104 - delete $vrgbl->{$lex}[$lex+1][$lex+1]: value ok 7105 - $vlex{$gbl}[$lex+1][$lex+1]: no exception ok 7106 - $vlex{$gbl}[$lex+1][$lex+1]: value ok 7107 - $vlex{$gbl}[$lex+1][$lex+1] = 123: no exception ok 7108 - $vlex{$gbl}[$lex+1][$lex+1] = 123: value ok 7109 - exists $vlex{$gbl}[$lex+1][$lex+1]: no exception ok 7110 - exists $vlex{$gbl}[$lex+1][$lex+1]: value ok 7111 - delete $vlex{$gbl}[$lex+1][$lex+1]: no exception ok 7112 - delete $vlex{$gbl}[$lex+1][$lex+1]: value ok 7113 - $vgbl{$gbl}[$lex+1][$lex+1]: no exception ok 7114 - $vgbl{$gbl}[$lex+1][$lex+1]: value ok 7115 - $vgbl{$gbl}[$lex+1][$lex+1] = 123: no exception ok 7116 - $vgbl{$gbl}[$lex+1][$lex+1] = 123: value ok 7117 - exists $vgbl{$gbl}[$lex+1][$lex+1]: no exception ok 7118 - exists $vgbl{$gbl}[$lex+1][$lex+1]: value ok 7119 - delete $vgbl{$gbl}[$lex+1][$lex+1]: no exception ok 7120 - delete $vgbl{$gbl}[$lex+1][$lex+1]: value ok 7121 - $vrlex->{$gbl}[$lex+1][$lex+1]: no exception ok 7122 - $vrlex->{$gbl}[$lex+1][$lex+1]: value ok 7123 - $vrlex->{$gbl}[$lex+1][$lex+1] = 123: no exception ok 7124 - $vrlex->{$gbl}[$lex+1][$lex+1] = 123: value ok 7125 - exists $vrlex->{$gbl}[$lex+1][$lex+1]: no exception ok 7126 - exists $vrlex->{$gbl}[$lex+1][$lex+1]: value ok 7127 - delete $vrlex->{$gbl}[$lex+1][$lex+1]: no exception ok 7128 - delete $vrlex->{$gbl}[$lex+1][$lex+1]: value ok 7129 - $vrgbl->{$gbl}[$lex+1][$lex+1]: no exception ok 7130 - $vrgbl->{$gbl}[$lex+1][$lex+1]: value ok 7131 - $vrgbl->{$gbl}[$lex+1][$lex+1] = 123: no exception ok 7132 - $vrgbl->{$gbl}[$lex+1][$lex+1] = 123: value ok 7133 - exists $vrgbl->{$gbl}[$lex+1][$lex+1]: no exception ok 7134 - exists $vrgbl->{$gbl}[$lex+1][$lex+1]: value ok 7135 - delete $vrgbl->{$gbl}[$lex+1][$lex+1]: no exception ok 7136 - delete $vrgbl->{$gbl}[$lex+1][$lex+1]: value ok 7137 - $vlex{"x$lex"}[$lex+1][$lex+1]: no exception ok 7138 - $vlex{"x$lex"}[$lex+1][$lex+1]: value ok 7139 - $vlex{"x$lex"}[$lex+1][$lex+1] = 123: no exception ok 7140 - $vlex{"x$lex"}[$lex+1][$lex+1] = 123: value ok 7141 - exists $vlex{"x$lex"}[$lex+1][$lex+1]: no exception ok 7142 - exists $vlex{"x$lex"}[$lex+1][$lex+1]: value ok 7143 - delete $vlex{"x$lex"}[$lex+1][$lex+1]: no exception ok 7144 - delete $vlex{"x$lex"}[$lex+1][$lex+1]: value ok 7145 - $vgbl{"x$lex"}[$lex+1][$lex+1]: no exception ok 7146 - $vgbl{"x$lex"}[$lex+1][$lex+1]: value ok 7147 - $vgbl{"x$lex"}[$lex+1][$lex+1] = 123: no exception ok 7148 - $vgbl{"x$lex"}[$lex+1][$lex+1] = 123: value ok 7149 - exists $vgbl{"x$lex"}[$lex+1][$lex+1]: no exception ok 7150 - exists $vgbl{"x$lex"}[$lex+1][$lex+1]: value ok 7151 - delete $vgbl{"x$lex"}[$lex+1][$lex+1]: no exception ok 7152 - delete $vgbl{"x$lex"}[$lex+1][$lex+1]: value ok 7153 - $vrlex->{"x$lex"}[$lex+1][$lex+1]: no exception ok 7154 - $vrlex->{"x$lex"}[$lex+1][$lex+1]: value ok 7155 - $vrlex->{"x$lex"}[$lex+1][$lex+1] = 123: no exception ok 7156 - $vrlex->{"x$lex"}[$lex+1][$lex+1] = 123: value ok 7157 - exists $vrlex->{"x$lex"}[$lex+1][$lex+1]: no exception ok 7158 - exists $vrlex->{"x$lex"}[$lex+1][$lex+1]: value ok 7159 - delete $vrlex->{"x$lex"}[$lex+1][$lex+1]: no exception ok 7160 - delete $vrlex->{"x$lex"}[$lex+1][$lex+1]: value ok 7161 - $vrgbl->{"x$lex"}[$lex+1][$lex+1]: no exception ok 7162 - $vrgbl->{"x$lex"}[$lex+1][$lex+1]: value ok 7163 - $vrgbl->{"x$lex"}[$lex+1][$lex+1] = 123: no exception ok 7164 - $vrgbl->{"x$lex"}[$lex+1][$lex+1] = 123: value ok 7165 - exists $vrgbl->{"x$lex"}[$lex+1][$lex+1]: no exception ok 7166 - exists $vrgbl->{"x$lex"}[$lex+1][$lex+1]: value ok 7167 - delete $vrgbl->{"x$lex"}[$lex+1][$lex+1]: no exception ok 7168 - delete $vrgbl->{"x$lex"}[$lex+1][$lex+1]: value ok 7169 - $vlex[0]{foo}[$lex+1]: no exception ok 7170 - $vlex[0]{foo}[$lex+1]: value ok 7171 - $vlex[0]{foo}[$lex+1] = 123: no exception ok 7172 - $vlex[0]{foo}[$lex+1] = 123: value ok 7173 - exists $vlex[0]{foo}[$lex+1]: no exception ok 7174 - exists $vlex[0]{foo}[$lex+1]: value ok 7175 - delete $vlex[0]{foo}[$lex+1]: no exception ok 7176 - delete $vlex[0]{foo}[$lex+1]: value ok 7177 - $vgbl[0]{foo}[$lex+1]: no exception ok 7178 - $vgbl[0]{foo}[$lex+1]: value ok 7179 - $vgbl[0]{foo}[$lex+1] = 123: no exception ok 7180 - $vgbl[0]{foo}[$lex+1] = 123: value ok 7181 - exists $vgbl[0]{foo}[$lex+1]: no exception ok 7182 - exists $vgbl[0]{foo}[$lex+1]: value ok 7183 - delete $vgbl[0]{foo}[$lex+1]: no exception ok 7184 - delete $vgbl[0]{foo}[$lex+1]: value ok 7185 - $vrlex->[0]{foo}[$lex+1]: no exception ok 7186 - $vrlex->[0]{foo}[$lex+1]: value ok 7187 - $vrlex->[0]{foo}[$lex+1] = 123: no exception ok 7188 - $vrlex->[0]{foo}[$lex+1] = 123: value ok 7189 - exists $vrlex->[0]{foo}[$lex+1]: no exception ok 7190 - exists $vrlex->[0]{foo}[$lex+1]: value ok 7191 - delete $vrlex->[0]{foo}[$lex+1]: no exception ok 7192 - delete $vrlex->[0]{foo}[$lex+1]: value ok 7193 - $vrgbl->[0]{foo}[$lex+1]: no exception ok 7194 - $vrgbl->[0]{foo}[$lex+1]: value ok 7195 - $vrgbl->[0]{foo}[$lex+1] = 123: no exception ok 7196 - $vrgbl->[0]{foo}[$lex+1] = 123: value ok 7197 - exists $vrgbl->[0]{foo}[$lex+1]: no exception ok 7198 - exists $vrgbl->[0]{foo}[$lex+1]: value ok 7199 - delete $vrgbl->[0]{foo}[$lex+1]: no exception ok 7200 - delete $vrgbl->[0]{foo}[$lex+1]: value ok 7201 - $vlex[$lex]{foo}[$lex+1]: no exception ok 7202 - $vlex[$lex]{foo}[$lex+1]: value ok 7203 - $vlex[$lex]{foo}[$lex+1] = 123: no exception ok 7204 - $vlex[$lex]{foo}[$lex+1] = 123: value ok 7205 - exists $vlex[$lex]{foo}[$lex+1]: no exception ok 7206 - exists $vlex[$lex]{foo}[$lex+1]: value ok 7207 - delete $vlex[$lex]{foo}[$lex+1]: no exception ok 7208 - delete $vlex[$lex]{foo}[$lex+1]: value ok 7209 - $vgbl[$lex]{foo}[$lex+1]: no exception ok 7210 - $vgbl[$lex]{foo}[$lex+1]: value ok 7211 - $vgbl[$lex]{foo}[$lex+1] = 123: no exception ok 7212 - $vgbl[$lex]{foo}[$lex+1] = 123: value ok 7213 - exists $vgbl[$lex]{foo}[$lex+1]: no exception ok 7214 - exists $vgbl[$lex]{foo}[$lex+1]: value ok 7215 - delete $vgbl[$lex]{foo}[$lex+1]: no exception ok 7216 - delete $vgbl[$lex]{foo}[$lex+1]: value ok 7217 - $vrlex->[$lex]{foo}[$lex+1]: no exception ok 7218 - $vrlex->[$lex]{foo}[$lex+1]: value ok 7219 - $vrlex->[$lex]{foo}[$lex+1] = 123: no exception ok 7220 - $vrlex->[$lex]{foo}[$lex+1] = 123: value ok 7221 - exists $vrlex->[$lex]{foo}[$lex+1]: no exception ok 7222 - exists $vrlex->[$lex]{foo}[$lex+1]: value ok 7223 - delete $vrlex->[$lex]{foo}[$lex+1]: no exception ok 7224 - delete $vrlex->[$lex]{foo}[$lex+1]: value ok 7225 - $vrgbl->[$lex]{foo}[$lex+1]: no exception ok 7226 - $vrgbl->[$lex]{foo}[$lex+1]: value ok 7227 - $vrgbl->[$lex]{foo}[$lex+1] = 123: no exception ok 7228 - $vrgbl->[$lex]{foo}[$lex+1] = 123: value ok 7229 - exists $vrgbl->[$lex]{foo}[$lex+1]: no exception ok 7230 - exists $vrgbl->[$lex]{foo}[$lex+1]: value ok 7231 - delete $vrgbl->[$lex]{foo}[$lex+1]: no exception ok 7232 - delete $vrgbl->[$lex]{foo}[$lex+1]: value ok 7233 - $vlex[$gbl]{foo}[$lex+1]: no exception ok 7234 - $vlex[$gbl]{foo}[$lex+1]: value ok 7235 - $vlex[$gbl]{foo}[$lex+1] = 123: no exception ok 7236 - $vlex[$gbl]{foo}[$lex+1] = 123: value ok 7237 - exists $vlex[$gbl]{foo}[$lex+1]: no exception ok 7238 - exists $vlex[$gbl]{foo}[$lex+1]: value ok 7239 - delete $vlex[$gbl]{foo}[$lex+1]: no exception ok 7240 - delete $vlex[$gbl]{foo}[$lex+1]: value ok 7241 - $vgbl[$gbl]{foo}[$lex+1]: no exception ok 7242 - $vgbl[$gbl]{foo}[$lex+1]: value ok 7243 - $vgbl[$gbl]{foo}[$lex+1] = 123: no exception ok 7244 - $vgbl[$gbl]{foo}[$lex+1] = 123: value ok 7245 - exists $vgbl[$gbl]{foo}[$lex+1]: no exception ok 7246 - exists $vgbl[$gbl]{foo}[$lex+1]: value ok 7247 - delete $vgbl[$gbl]{foo}[$lex+1]: no exception ok 7248 - delete $vgbl[$gbl]{foo}[$lex+1]: value ok 7249 - $vrlex->[$gbl]{foo}[$lex+1]: no exception ok 7250 - $vrlex->[$gbl]{foo}[$lex+1]: value ok 7251 - $vrlex->[$gbl]{foo}[$lex+1] = 123: no exception ok 7252 - $vrlex->[$gbl]{foo}[$lex+1] = 123: value ok 7253 - exists $vrlex->[$gbl]{foo}[$lex+1]: no exception ok 7254 - exists $vrlex->[$gbl]{foo}[$lex+1]: value ok 7255 - delete $vrlex->[$gbl]{foo}[$lex+1]: no exception ok 7256 - delete $vrlex->[$gbl]{foo}[$lex+1]: value ok 7257 - $vrgbl->[$gbl]{foo}[$lex+1]: no exception ok 7258 - $vrgbl->[$gbl]{foo}[$lex+1]: value ok 7259 - $vrgbl->[$gbl]{foo}[$lex+1] = 123: no exception ok 7260 - $vrgbl->[$gbl]{foo}[$lex+1] = 123: value ok 7261 - exists $vrgbl->[$gbl]{foo}[$lex+1]: no exception ok 7262 - exists $vrgbl->[$gbl]{foo}[$lex+1]: value ok 7263 - delete $vrgbl->[$gbl]{foo}[$lex+1]: no exception ok 7264 - delete $vrgbl->[$gbl]{foo}[$lex+1]: value ok 7265 - $vlex[$lex+1]{foo}[$lex+1]: no exception ok 7266 - $vlex[$lex+1]{foo}[$lex+1]: value ok 7267 - $vlex[$lex+1]{foo}[$lex+1] = 123: no exception ok 7268 - $vlex[$lex+1]{foo}[$lex+1] = 123: value ok 7269 - exists $vlex[$lex+1]{foo}[$lex+1]: no exception ok 7270 - exists $vlex[$lex+1]{foo}[$lex+1]: value ok 7271 - delete $vlex[$lex+1]{foo}[$lex+1]: no exception ok 7272 - delete $vlex[$lex+1]{foo}[$lex+1]: value ok 7273 - $vgbl[$lex+1]{foo}[$lex+1]: no exception ok 7274 - $vgbl[$lex+1]{foo}[$lex+1]: value ok 7275 - $vgbl[$lex+1]{foo}[$lex+1] = 123: no exception ok 7276 - $vgbl[$lex+1]{foo}[$lex+1] = 123: value ok 7277 - exists $vgbl[$lex+1]{foo}[$lex+1]: no exception ok 7278 - exists $vgbl[$lex+1]{foo}[$lex+1]: value ok 7279 - delete $vgbl[$lex+1]{foo}[$lex+1]: no exception ok 7280 - delete $vgbl[$lex+1]{foo}[$lex+1]: value ok 7281 - $vrlex->[$lex+1]{foo}[$lex+1]: no exception ok 7282 - $vrlex->[$lex+1]{foo}[$lex+1]: value ok 7283 - $vrlex->[$lex+1]{foo}[$lex+1] = 123: no exception ok 7284 - $vrlex->[$lex+1]{foo}[$lex+1] = 123: value ok 7285 - exists $vrlex->[$lex+1]{foo}[$lex+1]: no exception ok 7286 - exists $vrlex->[$lex+1]{foo}[$lex+1]: value ok 7287 - delete $vrlex->[$lex+1]{foo}[$lex+1]: no exception ok 7288 - delete $vrlex->[$lex+1]{foo}[$lex+1]: value ok 7289 - $vrgbl->[$lex+1]{foo}[$lex+1]: no exception ok 7290 - $vrgbl->[$lex+1]{foo}[$lex+1]: value ok 7291 - $vrgbl->[$lex+1]{foo}[$lex+1] = 123: no exception ok 7292 - $vrgbl->[$lex+1]{foo}[$lex+1] = 123: value ok 7293 - exists $vrgbl->[$lex+1]{foo}[$lex+1]: no exception ok 7294 - exists $vrgbl->[$lex+1]{foo}[$lex+1]: value ok 7295 - delete $vrgbl->[$lex+1]{foo}[$lex+1]: no exception ok 7296 - delete $vrgbl->[$lex+1]{foo}[$lex+1]: value ok 7297 - $vlex{foo}{foo}[$lex+1]: no exception ok 7298 - $vlex{foo}{foo}[$lex+1]: value ok 7299 - $vlex{foo}{foo}[$lex+1] = 123: no exception ok 7300 - $vlex{foo}{foo}[$lex+1] = 123: value ok 7301 - exists $vlex{foo}{foo}[$lex+1]: no exception ok 7302 - exists $vlex{foo}{foo}[$lex+1]: value ok 7303 - delete $vlex{foo}{foo}[$lex+1]: no exception ok 7304 - delete $vlex{foo}{foo}[$lex+1]: value ok 7305 - $vgbl{foo}{foo}[$lex+1]: no exception ok 7306 - $vgbl{foo}{foo}[$lex+1]: value ok 7307 - $vgbl{foo}{foo}[$lex+1] = 123: no exception ok 7308 - $vgbl{foo}{foo}[$lex+1] = 123: value ok 7309 - exists $vgbl{foo}{foo}[$lex+1]: no exception ok 7310 - exists $vgbl{foo}{foo}[$lex+1]: value ok 7311 - delete $vgbl{foo}{foo}[$lex+1]: no exception ok 7312 - delete $vgbl{foo}{foo}[$lex+1]: value ok 7313 - $vrlex->{foo}{foo}[$lex+1]: no exception ok 7314 - $vrlex->{foo}{foo}[$lex+1]: value ok 7315 - $vrlex->{foo}{foo}[$lex+1] = 123: no exception ok 7316 - $vrlex->{foo}{foo}[$lex+1] = 123: value ok 7317 - exists $vrlex->{foo}{foo}[$lex+1]: no exception ok 7318 - exists $vrlex->{foo}{foo}[$lex+1]: value ok 7319 - delete $vrlex->{foo}{foo}[$lex+1]: no exception ok 7320 - delete $vrlex->{foo}{foo}[$lex+1]: value ok 7321 - $vrgbl->{foo}{foo}[$lex+1]: no exception ok 7322 - $vrgbl->{foo}{foo}[$lex+1]: value ok 7323 - $vrgbl->{foo}{foo}[$lex+1] = 123: no exception ok 7324 - $vrgbl->{foo}{foo}[$lex+1] = 123: value ok 7325 - exists $vrgbl->{foo}{foo}[$lex+1]: no exception ok 7326 - exists $vrgbl->{foo}{foo}[$lex+1]: value ok 7327 - delete $vrgbl->{foo}{foo}[$lex+1]: no exception ok 7328 - delete $vrgbl->{foo}{foo}[$lex+1]: value ok 7329 - $vlex{$lex}{foo}[$lex+1]: no exception ok 7330 - $vlex{$lex}{foo}[$lex+1]: value ok 7331 - $vlex{$lex}{foo}[$lex+1] = 123: no exception ok 7332 - $vlex{$lex}{foo}[$lex+1] = 123: value ok 7333 - exists $vlex{$lex}{foo}[$lex+1]: no exception ok 7334 - exists $vlex{$lex}{foo}[$lex+1]: value ok 7335 - delete $vlex{$lex}{foo}[$lex+1]: no exception ok 7336 - delete $vlex{$lex}{foo}[$lex+1]: value ok 7337 - $vgbl{$lex}{foo}[$lex+1]: no exception ok 7338 - $vgbl{$lex}{foo}[$lex+1]: value ok 7339 - $vgbl{$lex}{foo}[$lex+1] = 123: no exception ok 7340 - $vgbl{$lex}{foo}[$lex+1] = 123: value ok 7341 - exists $vgbl{$lex}{foo}[$lex+1]: no exception ok 7342 - exists $vgbl{$lex}{foo}[$lex+1]: value ok 7343 - delete $vgbl{$lex}{foo}[$lex+1]: no exception ok 7344 - delete $vgbl{$lex}{foo}[$lex+1]: value ok 7345 - $vrlex->{$lex}{foo}[$lex+1]: no exception ok 7346 - $vrlex->{$lex}{foo}[$lex+1]: value ok 7347 - $vrlex->{$lex}{foo}[$lex+1] = 123: no exception ok 7348 - $vrlex->{$lex}{foo}[$lex+1] = 123: value ok 7349 - exists $vrlex->{$lex}{foo}[$lex+1]: no exception ok 7350 - exists $vrlex->{$lex}{foo}[$lex+1]: value ok 7351 - delete $vrlex->{$lex}{foo}[$lex+1]: no exception ok 7352 - delete $vrlex->{$lex}{foo}[$lex+1]: value ok 7353 - $vrgbl->{$lex}{foo}[$lex+1]: no exception ok 7354 - $vrgbl->{$lex}{foo}[$lex+1]: value ok 7355 - $vrgbl->{$lex}{foo}[$lex+1] = 123: no exception ok 7356 - $vrgbl->{$lex}{foo}[$lex+1] = 123: value ok 7357 - exists $vrgbl->{$lex}{foo}[$lex+1]: no exception ok 7358 - exists $vrgbl->{$lex}{foo}[$lex+1]: value ok 7359 - delete $vrgbl->{$lex}{foo}[$lex+1]: no exception ok 7360 - delete $vrgbl->{$lex}{foo}[$lex+1]: value ok 7361 - $vlex{$gbl}{foo}[$lex+1]: no exception ok 7362 - $vlex{$gbl}{foo}[$lex+1]: value ok 7363 - $vlex{$gbl}{foo}[$lex+1] = 123: no exception ok 7364 - $vlex{$gbl}{foo}[$lex+1] = 123: value ok 7365 - exists $vlex{$gbl}{foo}[$lex+1]: no exception ok 7366 - exists $vlex{$gbl}{foo}[$lex+1]: value ok 7367 - delete $vlex{$gbl}{foo}[$lex+1]: no exception ok 7368 - delete $vlex{$gbl}{foo}[$lex+1]: value ok 7369 - $vgbl{$gbl}{foo}[$lex+1]: no exception ok 7370 - $vgbl{$gbl}{foo}[$lex+1]: value ok 7371 - $vgbl{$gbl}{foo}[$lex+1] = 123: no exception ok 7372 - $vgbl{$gbl}{foo}[$lex+1] = 123: value ok 7373 - exists $vgbl{$gbl}{foo}[$lex+1]: no exception ok 7374 - exists $vgbl{$gbl}{foo}[$lex+1]: value ok 7375 - delete $vgbl{$gbl}{foo}[$lex+1]: no exception ok 7376 - delete $vgbl{$gbl}{foo}[$lex+1]: value ok 7377 - $vrlex->{$gbl}{foo}[$lex+1]: no exception ok 7378 - $vrlex->{$gbl}{foo}[$lex+1]: value ok 7379 - $vrlex->{$gbl}{foo}[$lex+1] = 123: no exception ok 7380 - $vrlex->{$gbl}{foo}[$lex+1] = 123: value ok 7381 - exists $vrlex->{$gbl}{foo}[$lex+1]: no exception ok 7382 - exists $vrlex->{$gbl}{foo}[$lex+1]: value ok 7383 - delete $vrlex->{$gbl}{foo}[$lex+1]: no exception ok 7384 - delete $vrlex->{$gbl}{foo}[$lex+1]: value ok 7385 - $vrgbl->{$gbl}{foo}[$lex+1]: no exception ok 7386 - $vrgbl->{$gbl}{foo}[$lex+1]: value ok 7387 - $vrgbl->{$gbl}{foo}[$lex+1] = 123: no exception ok 7388 - $vrgbl->{$gbl}{foo}[$lex+1] = 123: value ok 7389 - exists $vrgbl->{$gbl}{foo}[$lex+1]: no exception ok 7390 - exists $vrgbl->{$gbl}{foo}[$lex+1]: value ok 7391 - delete $vrgbl->{$gbl}{foo}[$lex+1]: no exception ok 7392 - delete $vrgbl->{$gbl}{foo}[$lex+1]: value ok 7393 - $vlex{"x$lex"}{foo}[$lex+1]: no exception ok 7394 - $vlex{"x$lex"}{foo}[$lex+1]: value ok 7395 - $vlex{"x$lex"}{foo}[$lex+1] = 123: no exception ok 7396 - $vlex{"x$lex"}{foo}[$lex+1] = 123: value ok 7397 - exists $vlex{"x$lex"}{foo}[$lex+1]: no exception ok 7398 - exists $vlex{"x$lex"}{foo}[$lex+1]: value ok 7399 - delete $vlex{"x$lex"}{foo}[$lex+1]: no exception ok 7400 - delete $vlex{"x$lex"}{foo}[$lex+1]: value ok 7401 - $vgbl{"x$lex"}{foo}[$lex+1]: no exception ok 7402 - $vgbl{"x$lex"}{foo}[$lex+1]: value ok 7403 - $vgbl{"x$lex"}{foo}[$lex+1] = 123: no exception ok 7404 - $vgbl{"x$lex"}{foo}[$lex+1] = 123: value ok 7405 - exists $vgbl{"x$lex"}{foo}[$lex+1]: no exception ok 7406 - exists $vgbl{"x$lex"}{foo}[$lex+1]: value ok 7407 - delete $vgbl{"x$lex"}{foo}[$lex+1]: no exception ok 7408 - delete $vgbl{"x$lex"}{foo}[$lex+1]: value ok 7409 - $vrlex->{"x$lex"}{foo}[$lex+1]: no exception ok 7410 - $vrlex->{"x$lex"}{foo}[$lex+1]: value ok 7411 - $vrlex->{"x$lex"}{foo}[$lex+1] = 123: no exception ok 7412 - $vrlex->{"x$lex"}{foo}[$lex+1] = 123: value ok 7413 - exists $vrlex->{"x$lex"}{foo}[$lex+1]: no exception ok 7414 - exists $vrlex->{"x$lex"}{foo}[$lex+1]: value ok 7415 - delete $vrlex->{"x$lex"}{foo}[$lex+1]: no exception ok 7416 - delete $vrlex->{"x$lex"}{foo}[$lex+1]: value ok 7417 - $vrgbl->{"x$lex"}{foo}[$lex+1]: no exception ok 7418 - $vrgbl->{"x$lex"}{foo}[$lex+1]: value ok 7419 - $vrgbl->{"x$lex"}{foo}[$lex+1] = 123: no exception ok 7420 - $vrgbl->{"x$lex"}{foo}[$lex+1] = 123: value ok 7421 - exists $vrgbl->{"x$lex"}{foo}[$lex+1]: no exception ok 7422 - exists $vrgbl->{"x$lex"}{foo}[$lex+1]: value ok 7423 - delete $vrgbl->{"x$lex"}{foo}[$lex+1]: no exception ok 7424 - delete $vrgbl->{"x$lex"}{foo}[$lex+1]: value ok 7425 - $vlex[0]{$lex}[$lex+1]: no exception ok 7426 - $vlex[0]{$lex}[$lex+1]: value ok 7427 - $vlex[0]{$lex}[$lex+1] = 123: no exception ok 7428 - $vlex[0]{$lex}[$lex+1] = 123: value ok 7429 - exists $vlex[0]{$lex}[$lex+1]: no exception ok 7430 - exists $vlex[0]{$lex}[$lex+1]: value ok 7431 - delete $vlex[0]{$lex}[$lex+1]: no exception ok 7432 - delete $vlex[0]{$lex}[$lex+1]: value ok 7433 - $vgbl[0]{$lex}[$lex+1]: no exception ok 7434 - $vgbl[0]{$lex}[$lex+1]: value ok 7435 - $vgbl[0]{$lex}[$lex+1] = 123: no exception ok 7436 - $vgbl[0]{$lex}[$lex+1] = 123: value ok 7437 - exists $vgbl[0]{$lex}[$lex+1]: no exception ok 7438 - exists $vgbl[0]{$lex}[$lex+1]: value ok 7439 - delete $vgbl[0]{$lex}[$lex+1]: no exception ok 7440 - delete $vgbl[0]{$lex}[$lex+1]: value ok 7441 - $vrlex->[0]{$lex}[$lex+1]: no exception ok 7442 - $vrlex->[0]{$lex}[$lex+1]: value ok 7443 - $vrlex->[0]{$lex}[$lex+1] = 123: no exception ok 7444 - $vrlex->[0]{$lex}[$lex+1] = 123: value ok 7445 - exists $vrlex->[0]{$lex}[$lex+1]: no exception ok 7446 - exists $vrlex->[0]{$lex}[$lex+1]: value ok 7447 - delete $vrlex->[0]{$lex}[$lex+1]: no exception ok 7448 - delete $vrlex->[0]{$lex}[$lex+1]: value ok 7449 - $vrgbl->[0]{$lex}[$lex+1]: no exception ok 7450 - $vrgbl->[0]{$lex}[$lex+1]: value ok 7451 - $vrgbl->[0]{$lex}[$lex+1] = 123: no exception ok 7452 - $vrgbl->[0]{$lex}[$lex+1] = 123: value ok 7453 - exists $vrgbl->[0]{$lex}[$lex+1]: no exception ok 7454 - exists $vrgbl->[0]{$lex}[$lex+1]: value ok 7455 - delete $vrgbl->[0]{$lex}[$lex+1]: no exception ok 7456 - delete $vrgbl->[0]{$lex}[$lex+1]: value ok 7457 - $vlex[$lex]{$lex}[$lex+1]: no exception ok 7458 - $vlex[$lex]{$lex}[$lex+1]: value ok 7459 - $vlex[$lex]{$lex}[$lex+1] = 123: no exception ok 7460 - $vlex[$lex]{$lex}[$lex+1] = 123: value ok 7461 - exists $vlex[$lex]{$lex}[$lex+1]: no exception ok 7462 - exists $vlex[$lex]{$lex}[$lex+1]: value ok 7463 - delete $vlex[$lex]{$lex}[$lex+1]: no exception ok 7464 - delete $vlex[$lex]{$lex}[$lex+1]: value ok 7465 - $vgbl[$lex]{$lex}[$lex+1]: no exception ok 7466 - $vgbl[$lex]{$lex}[$lex+1]: value ok 7467 - $vgbl[$lex]{$lex}[$lex+1] = 123: no exception ok 7468 - $vgbl[$lex]{$lex}[$lex+1] = 123: value ok 7469 - exists $vgbl[$lex]{$lex}[$lex+1]: no exception ok 7470 - exists $vgbl[$lex]{$lex}[$lex+1]: value ok 7471 - delete $vgbl[$lex]{$lex}[$lex+1]: no exception ok 7472 - delete $vgbl[$lex]{$lex}[$lex+1]: value ok 7473 - $vrlex->[$lex]{$lex}[$lex+1]: no exception ok 7474 - $vrlex->[$lex]{$lex}[$lex+1]: value ok 7475 - $vrlex->[$lex]{$lex}[$lex+1] = 123: no exception ok 7476 - $vrlex->[$lex]{$lex}[$lex+1] = 123: value ok 7477 - exists $vrlex->[$lex]{$lex}[$lex+1]: no exception ok 7478 - exists $vrlex->[$lex]{$lex}[$lex+1]: value ok 7479 - delete $vrlex->[$lex]{$lex}[$lex+1]: no exception ok 7480 - delete $vrlex->[$lex]{$lex}[$lex+1]: value ok 7481 - $vrgbl->[$lex]{$lex}[$lex+1]: no exception ok 7482 - $vrgbl->[$lex]{$lex}[$lex+1]: value ok 7483 - $vrgbl->[$lex]{$lex}[$lex+1] = 123: no exception ok 7484 - $vrgbl->[$lex]{$lex}[$lex+1] = 123: value ok 7485 - exists $vrgbl->[$lex]{$lex}[$lex+1]: no exception ok 7486 - exists $vrgbl->[$lex]{$lex}[$lex+1]: value ok 7487 - delete $vrgbl->[$lex]{$lex}[$lex+1]: no exception ok 7488 - delete $vrgbl->[$lex]{$lex}[$lex+1]: value ok 7489 - $vlex[$gbl]{$lex}[$lex+1]: no exception ok 7490 - $vlex[$gbl]{$lex}[$lex+1]: value ok 7491 - $vlex[$gbl]{$lex}[$lex+1] = 123: no exception ok 7492 - $vlex[$gbl]{$lex}[$lex+1] = 123: value ok 7493 - exists $vlex[$gbl]{$lex}[$lex+1]: no exception ok 7494 - exists $vlex[$gbl]{$lex}[$lex+1]: value ok 7495 - delete $vlex[$gbl]{$lex}[$lex+1]: no exception ok 7496 - delete $vlex[$gbl]{$lex}[$lex+1]: value ok 7497 - $vgbl[$gbl]{$lex}[$lex+1]: no exception ok 7498 - $vgbl[$gbl]{$lex}[$lex+1]: value ok 7499 - $vgbl[$gbl]{$lex}[$lex+1] = 123: no exception ok 7500 - $vgbl[$gbl]{$lex}[$lex+1] = 123: value ok 7501 - exists $vgbl[$gbl]{$lex}[$lex+1]: no exception ok 7502 - exists $vgbl[$gbl]{$lex}[$lex+1]: value ok 7503 - delete $vgbl[$gbl]{$lex}[$lex+1]: no exception ok 7504 - delete $vgbl[$gbl]{$lex}[$lex+1]: value ok 7505 - $vrlex->[$gbl]{$lex}[$lex+1]: no exception ok 7506 - $vrlex->[$gbl]{$lex}[$lex+1]: value ok 7507 - $vrlex->[$gbl]{$lex}[$lex+1] = 123: no exception ok 7508 - $vrlex->[$gbl]{$lex}[$lex+1] = 123: value ok 7509 - exists $vrlex->[$gbl]{$lex}[$lex+1]: no exception ok 7510 - exists $vrlex->[$gbl]{$lex}[$lex+1]: value ok 7511 - delete $vrlex->[$gbl]{$lex}[$lex+1]: no exception ok 7512 - delete $vrlex->[$gbl]{$lex}[$lex+1]: value ok 7513 - $vrgbl->[$gbl]{$lex}[$lex+1]: no exception ok 7514 - $vrgbl->[$gbl]{$lex}[$lex+1]: value ok 7515 - $vrgbl->[$gbl]{$lex}[$lex+1] = 123: no exception ok 7516 - $vrgbl->[$gbl]{$lex}[$lex+1] = 123: value ok 7517 - exists $vrgbl->[$gbl]{$lex}[$lex+1]: no exception ok 7518 - exists $vrgbl->[$gbl]{$lex}[$lex+1]: value ok 7519 - delete $vrgbl->[$gbl]{$lex}[$lex+1]: no exception ok 7520 - delete $vrgbl->[$gbl]{$lex}[$lex+1]: value ok 7521 - $vlex[$lex+1]{$lex}[$lex+1]: no exception ok 7522 - $vlex[$lex+1]{$lex}[$lex+1]: value ok 7523 - $vlex[$lex+1]{$lex}[$lex+1] = 123: no exception ok 7524 - $vlex[$lex+1]{$lex}[$lex+1] = 123: value ok 7525 - exists $vlex[$lex+1]{$lex}[$lex+1]: no exception ok 7526 - exists $vlex[$lex+1]{$lex}[$lex+1]: value ok 7527 - delete $vlex[$lex+1]{$lex}[$lex+1]: no exception ok 7528 - delete $vlex[$lex+1]{$lex}[$lex+1]: value ok 7529 - $vgbl[$lex+1]{$lex}[$lex+1]: no exception ok 7530 - $vgbl[$lex+1]{$lex}[$lex+1]: value ok 7531 - $vgbl[$lex+1]{$lex}[$lex+1] = 123: no exception ok 7532 - $vgbl[$lex+1]{$lex}[$lex+1] = 123: value ok 7533 - exists $vgbl[$lex+1]{$lex}[$lex+1]: no exception ok 7534 - exists $vgbl[$lex+1]{$lex}[$lex+1]: value ok 7535 - delete $vgbl[$lex+1]{$lex}[$lex+1]: no exception ok 7536 - delete $vgbl[$lex+1]{$lex}[$lex+1]: value ok 7537 - $vrlex->[$lex+1]{$lex}[$lex+1]: no exception ok 7538 - $vrlex->[$lex+1]{$lex}[$lex+1]: value ok 7539 - $vrlex->[$lex+1]{$lex}[$lex+1] = 123: no exception ok 7540 - $vrlex->[$lex+1]{$lex}[$lex+1] = 123: value ok 7541 - exists $vrlex->[$lex+1]{$lex}[$lex+1]: no exception ok 7542 - exists $vrlex->[$lex+1]{$lex}[$lex+1]: value ok 7543 - delete $vrlex->[$lex+1]{$lex}[$lex+1]: no exception ok 7544 - delete $vrlex->[$lex+1]{$lex}[$lex+1]: value ok 7545 - $vrgbl->[$lex+1]{$lex}[$lex+1]: no exception ok 7546 - $vrgbl->[$lex+1]{$lex}[$lex+1]: value ok 7547 - $vrgbl->[$lex+1]{$lex}[$lex+1] = 123: no exception ok 7548 - $vrgbl->[$lex+1]{$lex}[$lex+1] = 123: value ok 7549 - exists $vrgbl->[$lex+1]{$lex}[$lex+1]: no exception ok 7550 - exists $vrgbl->[$lex+1]{$lex}[$lex+1]: value ok 7551 - delete $vrgbl->[$lex+1]{$lex}[$lex+1]: no exception ok 7552 - delete $vrgbl->[$lex+1]{$lex}[$lex+1]: value ok 7553 - $vlex{foo}{$lex}[$lex+1]: no exception ok 7554 - $vlex{foo}{$lex}[$lex+1]: value ok 7555 - $vlex{foo}{$lex}[$lex+1] = 123: no exception ok 7556 - $vlex{foo}{$lex}[$lex+1] = 123: value ok 7557 - exists $vlex{foo}{$lex}[$lex+1]: no exception ok 7558 - exists $vlex{foo}{$lex}[$lex+1]: value ok 7559 - delete $vlex{foo}{$lex}[$lex+1]: no exception ok 7560 - delete $vlex{foo}{$lex}[$lex+1]: value ok 7561 - $vgbl{foo}{$lex}[$lex+1]: no exception ok 7562 - $vgbl{foo}{$lex}[$lex+1]: value ok 7563 - $vgbl{foo}{$lex}[$lex+1] = 123: no exception ok 7564 - $vgbl{foo}{$lex}[$lex+1] = 123: value ok 7565 - exists $vgbl{foo}{$lex}[$lex+1]: no exception ok 7566 - exists $vgbl{foo}{$lex}[$lex+1]: value ok 7567 - delete $vgbl{foo}{$lex}[$lex+1]: no exception ok 7568 - delete $vgbl{foo}{$lex}[$lex+1]: value ok 7569 - $vrlex->{foo}{$lex}[$lex+1]: no exception ok 7570 - $vrlex->{foo}{$lex}[$lex+1]: value ok 7571 - $vrlex->{foo}{$lex}[$lex+1] = 123: no exception ok 7572 - $vrlex->{foo}{$lex}[$lex+1] = 123: value ok 7573 - exists $vrlex->{foo}{$lex}[$lex+1]: no exception ok 7574 - exists $vrlex->{foo}{$lex}[$lex+1]: value ok 7575 - delete $vrlex->{foo}{$lex}[$lex+1]: no exception ok 7576 - delete $vrlex->{foo}{$lex}[$lex+1]: value ok 7577 - $vrgbl->{foo}{$lex}[$lex+1]: no exception ok 7578 - $vrgbl->{foo}{$lex}[$lex+1]: value ok 7579 - $vrgbl->{foo}{$lex}[$lex+1] = 123: no exception ok 7580 - $vrgbl->{foo}{$lex}[$lex+1] = 123: value ok 7581 - exists $vrgbl->{foo}{$lex}[$lex+1]: no exception ok 7582 - exists $vrgbl->{foo}{$lex}[$lex+1]: value ok 7583 - delete $vrgbl->{foo}{$lex}[$lex+1]: no exception ok 7584 - delete $vrgbl->{foo}{$lex}[$lex+1]: value ok 7585 - $vlex{$lex}{$lex}[$lex+1]: no exception ok 7586 - $vlex{$lex}{$lex}[$lex+1]: value ok 7587 - $vlex{$lex}{$lex}[$lex+1] = 123: no exception ok 7588 - $vlex{$lex}{$lex}[$lex+1] = 123: value ok 7589 - exists $vlex{$lex}{$lex}[$lex+1]: no exception ok 7590 - exists $vlex{$lex}{$lex}[$lex+1]: value ok 7591 - delete $vlex{$lex}{$lex}[$lex+1]: no exception ok 7592 - delete $vlex{$lex}{$lex}[$lex+1]: value ok 7593 - $vgbl{$lex}{$lex}[$lex+1]: no exception ok 7594 - $vgbl{$lex}{$lex}[$lex+1]: value ok 7595 - $vgbl{$lex}{$lex}[$lex+1] = 123: no exception ok 7596 - $vgbl{$lex}{$lex}[$lex+1] = 123: value ok 7597 - exists $vgbl{$lex}{$lex}[$lex+1]: no exception ok 7598 - exists $vgbl{$lex}{$lex}[$lex+1]: value ok 7599 - delete $vgbl{$lex}{$lex}[$lex+1]: no exception ok 7600 - delete $vgbl{$lex}{$lex}[$lex+1]: value ok 7601 - $vrlex->{$lex}{$lex}[$lex+1]: no exception ok 7602 - $vrlex->{$lex}{$lex}[$lex+1]: value ok 7603 - $vrlex->{$lex}{$lex}[$lex+1] = 123: no exception ok 7604 - $vrlex->{$lex}{$lex}[$lex+1] = 123: value ok 7605 - exists $vrlex->{$lex}{$lex}[$lex+1]: no exception ok 7606 - exists $vrlex->{$lex}{$lex}[$lex+1]: value ok 7607 - delete $vrlex->{$lex}{$lex}[$lex+1]: no exception ok 7608 - delete $vrlex->{$lex}{$lex}[$lex+1]: value ok 7609 - $vrgbl->{$lex}{$lex}[$lex+1]: no exception ok 7610 - $vrgbl->{$lex}{$lex}[$lex+1]: value ok 7611 - $vrgbl->{$lex}{$lex}[$lex+1] = 123: no exception ok 7612 - $vrgbl->{$lex}{$lex}[$lex+1] = 123: value ok 7613 - exists $vrgbl->{$lex}{$lex}[$lex+1]: no exception ok 7614 - exists $vrgbl->{$lex}{$lex}[$lex+1]: value ok 7615 - delete $vrgbl->{$lex}{$lex}[$lex+1]: no exception ok 7616 - delete $vrgbl->{$lex}{$lex}[$lex+1]: value ok 7617 - $vlex{$gbl}{$lex}[$lex+1]: no exception ok 7618 - $vlex{$gbl}{$lex}[$lex+1]: value ok 7619 - $vlex{$gbl}{$lex}[$lex+1] = 123: no exception ok 7620 - $vlex{$gbl}{$lex}[$lex+1] = 123: value ok 7621 - exists $vlex{$gbl}{$lex}[$lex+1]: no exception ok 7622 - exists $vlex{$gbl}{$lex}[$lex+1]: value ok 7623 - delete $vlex{$gbl}{$lex}[$lex+1]: no exception ok 7624 - delete $vlex{$gbl}{$lex}[$lex+1]: value ok 7625 - $vgbl{$gbl}{$lex}[$lex+1]: no exception ok 7626 - $vgbl{$gbl}{$lex}[$lex+1]: value ok 7627 - $vgbl{$gbl}{$lex}[$lex+1] = 123: no exception ok 7628 - $vgbl{$gbl}{$lex}[$lex+1] = 123: value ok 7629 - exists $vgbl{$gbl}{$lex}[$lex+1]: no exception ok 7630 - exists $vgbl{$gbl}{$lex}[$lex+1]: value ok 7631 - delete $vgbl{$gbl}{$lex}[$lex+1]: no exception ok 7632 - delete $vgbl{$gbl}{$lex}[$lex+1]: value ok 7633 - $vrlex->{$gbl}{$lex}[$lex+1]: no exception ok 7634 - $vrlex->{$gbl}{$lex}[$lex+1]: value ok 7635 - $vrlex->{$gbl}{$lex}[$lex+1] = 123: no exception ok 7636 - $vrlex->{$gbl}{$lex}[$lex+1] = 123: value ok 7637 - exists $vrlex->{$gbl}{$lex}[$lex+1]: no exception ok 7638 - exists $vrlex->{$gbl}{$lex}[$lex+1]: value ok 7639 - delete $vrlex->{$gbl}{$lex}[$lex+1]: no exception ok 7640 - delete $vrlex->{$gbl}{$lex}[$lex+1]: value ok 7641 - $vrgbl->{$gbl}{$lex}[$lex+1]: no exception ok 7642 - $vrgbl->{$gbl}{$lex}[$lex+1]: value ok 7643 - $vrgbl->{$gbl}{$lex}[$lex+1] = 123: no exception ok 7644 - $vrgbl->{$gbl}{$lex}[$lex+1] = 123: value ok 7645 - exists $vrgbl->{$gbl}{$lex}[$lex+1]: no exception ok 7646 - exists $vrgbl->{$gbl}{$lex}[$lex+1]: value ok 7647 - delete $vrgbl->{$gbl}{$lex}[$lex+1]: no exception ok 7648 - delete $vrgbl->{$gbl}{$lex}[$lex+1]: value ok 7649 - $vlex{"x$lex"}{$lex}[$lex+1]: no exception ok 7650 - $vlex{"x$lex"}{$lex}[$lex+1]: value ok 7651 - $vlex{"x$lex"}{$lex}[$lex+1] = 123: no exception ok 7652 - $vlex{"x$lex"}{$lex}[$lex+1] = 123: value ok 7653 - exists $vlex{"x$lex"}{$lex}[$lex+1]: no exception ok 7654 - exists $vlex{"x$lex"}{$lex}[$lex+1]: value ok 7655 - delete $vlex{"x$lex"}{$lex}[$lex+1]: no exception ok 7656 - delete $vlex{"x$lex"}{$lex}[$lex+1]: value ok 7657 - $vgbl{"x$lex"}{$lex}[$lex+1]: no exception ok 7658 - $vgbl{"x$lex"}{$lex}[$lex+1]: value ok 7659 - $vgbl{"x$lex"}{$lex}[$lex+1] = 123: no exception ok 7660 - $vgbl{"x$lex"}{$lex}[$lex+1] = 123: value ok 7661 - exists $vgbl{"x$lex"}{$lex}[$lex+1]: no exception ok 7662 - exists $vgbl{"x$lex"}{$lex}[$lex+1]: value ok 7663 - delete $vgbl{"x$lex"}{$lex}[$lex+1]: no exception ok 7664 - delete $vgbl{"x$lex"}{$lex}[$lex+1]: value ok 7665 - $vrlex->{"x$lex"}{$lex}[$lex+1]: no exception ok 7666 - $vrlex->{"x$lex"}{$lex}[$lex+1]: value ok 7667 - $vrlex->{"x$lex"}{$lex}[$lex+1] = 123: no exception ok 7668 - $vrlex->{"x$lex"}{$lex}[$lex+1] = 123: value ok 7669 - exists $vrlex->{"x$lex"}{$lex}[$lex+1]: no exception ok 7670 - exists $vrlex->{"x$lex"}{$lex}[$lex+1]: value ok 7671 - delete $vrlex->{"x$lex"}{$lex}[$lex+1]: no exception ok 7672 - delete $vrlex->{"x$lex"}{$lex}[$lex+1]: value ok 7673 - $vrgbl->{"x$lex"}{$lex}[$lex+1]: no exception ok 7674 - $vrgbl->{"x$lex"}{$lex}[$lex+1]: value ok 7675 - $vrgbl->{"x$lex"}{$lex}[$lex+1] = 123: no exception ok 7676 - $vrgbl->{"x$lex"}{$lex}[$lex+1] = 123: value ok 7677 - exists $vrgbl->{"x$lex"}{$lex}[$lex+1]: no exception ok 7678 - exists $vrgbl->{"x$lex"}{$lex}[$lex+1]: value ok 7679 - delete $vrgbl->{"x$lex"}{$lex}[$lex+1]: no exception ok 7680 - delete $vrgbl->{"x$lex"}{$lex}[$lex+1]: value ok 7681 - $vlex[0]{$gbl}[$lex+1]: no exception ok 7682 - $vlex[0]{$gbl}[$lex+1]: value ok 7683 - $vlex[0]{$gbl}[$lex+1] = 123: no exception ok 7684 - $vlex[0]{$gbl}[$lex+1] = 123: value ok 7685 - exists $vlex[0]{$gbl}[$lex+1]: no exception ok 7686 - exists $vlex[0]{$gbl}[$lex+1]: value ok 7687 - delete $vlex[0]{$gbl}[$lex+1]: no exception ok 7688 - delete $vlex[0]{$gbl}[$lex+1]: value ok 7689 - $vgbl[0]{$gbl}[$lex+1]: no exception ok 7690 - $vgbl[0]{$gbl}[$lex+1]: value ok 7691 - $vgbl[0]{$gbl}[$lex+1] = 123: no exception ok 7692 - $vgbl[0]{$gbl}[$lex+1] = 123: value ok 7693 - exists $vgbl[0]{$gbl}[$lex+1]: no exception ok 7694 - exists $vgbl[0]{$gbl}[$lex+1]: value ok 7695 - delete $vgbl[0]{$gbl}[$lex+1]: no exception ok 7696 - delete $vgbl[0]{$gbl}[$lex+1]: value ok 7697 - $vrlex->[0]{$gbl}[$lex+1]: no exception ok 7698 - $vrlex->[0]{$gbl}[$lex+1]: value ok 7699 - $vrlex->[0]{$gbl}[$lex+1] = 123: no exception ok 7700 - $vrlex->[0]{$gbl}[$lex+1] = 123: value ok 7701 - exists $vrlex->[0]{$gbl}[$lex+1]: no exception ok 7702 - exists $vrlex->[0]{$gbl}[$lex+1]: value ok 7703 - delete $vrlex->[0]{$gbl}[$lex+1]: no exception ok 7704 - delete $vrlex->[0]{$gbl}[$lex+1]: value ok 7705 - $vrgbl->[0]{$gbl}[$lex+1]: no exception ok 7706 - $vrgbl->[0]{$gbl}[$lex+1]: value ok 7707 - $vrgbl->[0]{$gbl}[$lex+1] = 123: no exception ok 7708 - $vrgbl->[0]{$gbl}[$lex+1] = 123: value ok 7709 - exists $vrgbl->[0]{$gbl}[$lex+1]: no exception ok 7710 - exists $vrgbl->[0]{$gbl}[$lex+1]: value ok 7711 - delete $vrgbl->[0]{$gbl}[$lex+1]: no exception ok 7712 - delete $vrgbl->[0]{$gbl}[$lex+1]: value ok 7713 - $vlex[$lex]{$gbl}[$lex+1]: no exception ok 7714 - $vlex[$lex]{$gbl}[$lex+1]: value ok 7715 - $vlex[$lex]{$gbl}[$lex+1] = 123: no exception ok 7716 - $vlex[$lex]{$gbl}[$lex+1] = 123: value ok 7717 - exists $vlex[$lex]{$gbl}[$lex+1]: no exception ok 7718 - exists $vlex[$lex]{$gbl}[$lex+1]: value ok 7719 - delete $vlex[$lex]{$gbl}[$lex+1]: no exception ok 7720 - delete $vlex[$lex]{$gbl}[$lex+1]: value ok 7721 - $vgbl[$lex]{$gbl}[$lex+1]: no exception ok 7722 - $vgbl[$lex]{$gbl}[$lex+1]: value ok 7723 - $vgbl[$lex]{$gbl}[$lex+1] = 123: no exception ok 7724 - $vgbl[$lex]{$gbl}[$lex+1] = 123: value ok 7725 - exists $vgbl[$lex]{$gbl}[$lex+1]: no exception ok 7726 - exists $vgbl[$lex]{$gbl}[$lex+1]: value ok 7727 - delete $vgbl[$lex]{$gbl}[$lex+1]: no exception ok 7728 - delete $vgbl[$lex]{$gbl}[$lex+1]: value ok 7729 - $vrlex->[$lex]{$gbl}[$lex+1]: no exception ok 7730 - $vrlex->[$lex]{$gbl}[$lex+1]: value ok 7731 - $vrlex->[$lex]{$gbl}[$lex+1] = 123: no exception ok 7732 - $vrlex->[$lex]{$gbl}[$lex+1] = 123: value ok 7733 - exists $vrlex->[$lex]{$gbl}[$lex+1]: no exception ok 7734 - exists $vrlex->[$lex]{$gbl}[$lex+1]: value ok 7735 - delete $vrlex->[$lex]{$gbl}[$lex+1]: no exception ok 7736 - delete $vrlex->[$lex]{$gbl}[$lex+1]: value ok 7737 - $vrgbl->[$lex]{$gbl}[$lex+1]: no exception ok 7738 - $vrgbl->[$lex]{$gbl}[$lex+1]: value ok 7739 - $vrgbl->[$lex]{$gbl}[$lex+1] = 123: no exception ok 7740 - $vrgbl->[$lex]{$gbl}[$lex+1] = 123: value ok 7741 - exists $vrgbl->[$lex]{$gbl}[$lex+1]: no exception ok 7742 - exists $vrgbl->[$lex]{$gbl}[$lex+1]: value ok 7743 - delete $vrgbl->[$lex]{$gbl}[$lex+1]: no exception ok 7744 - delete $vrgbl->[$lex]{$gbl}[$lex+1]: value ok 7745 - $vlex[$gbl]{$gbl}[$lex+1]: no exception ok 7746 - $vlex[$gbl]{$gbl}[$lex+1]: value ok 7747 - $vlex[$gbl]{$gbl}[$lex+1] = 123: no exception ok 7748 - $vlex[$gbl]{$gbl}[$lex+1] = 123: value ok 7749 - exists $vlex[$gbl]{$gbl}[$lex+1]: no exception ok 7750 - exists $vlex[$gbl]{$gbl}[$lex+1]: value ok 7751 - delete $vlex[$gbl]{$gbl}[$lex+1]: no exception ok 7752 - delete $vlex[$gbl]{$gbl}[$lex+1]: value ok 7753 - $vgbl[$gbl]{$gbl}[$lex+1]: no exception ok 7754 - $vgbl[$gbl]{$gbl}[$lex+1]: value ok 7755 - $vgbl[$gbl]{$gbl}[$lex+1] = 123: no exception ok 7756 - $vgbl[$gbl]{$gbl}[$lex+1] = 123: value ok 7757 - exists $vgbl[$gbl]{$gbl}[$lex+1]: no exception ok 7758 - exists $vgbl[$gbl]{$gbl}[$lex+1]: value ok 7759 - delete $vgbl[$gbl]{$gbl}[$lex+1]: no exception ok 7760 - delete $vgbl[$gbl]{$gbl}[$lex+1]: value ok 7761 - $vrlex->[$gbl]{$gbl}[$lex+1]: no exception ok 7762 - $vrlex->[$gbl]{$gbl}[$lex+1]: value ok 7763 - $vrlex->[$gbl]{$gbl}[$lex+1] = 123: no exception ok 7764 - $vrlex->[$gbl]{$gbl}[$lex+1] = 123: value ok 7765 - exists $vrlex->[$gbl]{$gbl}[$lex+1]: no exception ok 7766 - exists $vrlex->[$gbl]{$gbl}[$lex+1]: value ok 7767 - delete $vrlex->[$gbl]{$gbl}[$lex+1]: no exception ok 7768 - delete $vrlex->[$gbl]{$gbl}[$lex+1]: value ok 7769 - $vrgbl->[$gbl]{$gbl}[$lex+1]: no exception ok 7770 - $vrgbl->[$gbl]{$gbl}[$lex+1]: value ok 7771 - $vrgbl->[$gbl]{$gbl}[$lex+1] = 123: no exception ok 7772 - $vrgbl->[$gbl]{$gbl}[$lex+1] = 123: value ok 7773 - exists $vrgbl->[$gbl]{$gbl}[$lex+1]: no exception ok 7774 - exists $vrgbl->[$gbl]{$gbl}[$lex+1]: value ok 7775 - delete $vrgbl->[$gbl]{$gbl}[$lex+1]: no exception ok 7776 - delete $vrgbl->[$gbl]{$gbl}[$lex+1]: value ok 7777 - $vlex[$lex+1]{$gbl}[$lex+1]: no exception ok 7778 - $vlex[$lex+1]{$gbl}[$lex+1]: value ok 7779 - $vlex[$lex+1]{$gbl}[$lex+1] = 123: no exception ok 7780 - $vlex[$lex+1]{$gbl}[$lex+1] = 123: value ok 7781 - exists $vlex[$lex+1]{$gbl}[$lex+1]: no exception ok 7782 - exists $vlex[$lex+1]{$gbl}[$lex+1]: value ok 7783 - delete $vlex[$lex+1]{$gbl}[$lex+1]: no exception ok 7784 - delete $vlex[$lex+1]{$gbl}[$lex+1]: value ok 7785 - $vgbl[$lex+1]{$gbl}[$lex+1]: no exception ok 7786 - $vgbl[$lex+1]{$gbl}[$lex+1]: value ok 7787 - $vgbl[$lex+1]{$gbl}[$lex+1] = 123: no exception ok 7788 - $vgbl[$lex+1]{$gbl}[$lex+1] = 123: value ok 7789 - exists $vgbl[$lex+1]{$gbl}[$lex+1]: no exception ok 7790 - exists $vgbl[$lex+1]{$gbl}[$lex+1]: value ok 7791 - delete $vgbl[$lex+1]{$gbl}[$lex+1]: no exception ok 7792 - delete $vgbl[$lex+1]{$gbl}[$lex+1]: value ok 7793 - $vrlex->[$lex+1]{$gbl}[$lex+1]: no exception ok 7794 - $vrlex->[$lex+1]{$gbl}[$lex+1]: value ok 7795 - $vrlex->[$lex+1]{$gbl}[$lex+1] = 123: no exception ok 7796 - $vrlex->[$lex+1]{$gbl}[$lex+1] = 123: value ok 7797 - exists $vrlex->[$lex+1]{$gbl}[$lex+1]: no exception ok 7798 - exists $vrlex->[$lex+1]{$gbl}[$lex+1]: value ok 7799 - delete $vrlex->[$lex+1]{$gbl}[$lex+1]: no exception ok 7800 - delete $vrlex->[$lex+1]{$gbl}[$lex+1]: value ok 7801 - $vrgbl->[$lex+1]{$gbl}[$lex+1]: no exception ok 7802 - $vrgbl->[$lex+1]{$gbl}[$lex+1]: value ok 7803 - $vrgbl->[$lex+1]{$gbl}[$lex+1] = 123: no exception ok 7804 - $vrgbl->[$lex+1]{$gbl}[$lex+1] = 123: value ok 7805 - exists $vrgbl->[$lex+1]{$gbl}[$lex+1]: no exception ok 7806 - exists $vrgbl->[$lex+1]{$gbl}[$lex+1]: value ok 7807 - delete $vrgbl->[$lex+1]{$gbl}[$lex+1]: no exception ok 7808 - delete $vrgbl->[$lex+1]{$gbl}[$lex+1]: value ok 7809 - $vlex{foo}{$gbl}[$lex+1]: no exception ok 7810 - $vlex{foo}{$gbl}[$lex+1]: value ok 7811 - $vlex{foo}{$gbl}[$lex+1] = 123: no exception ok 7812 - $vlex{foo}{$gbl}[$lex+1] = 123: value ok 7813 - exists $vlex{foo}{$gbl}[$lex+1]: no exception ok 7814 - exists $vlex{foo}{$gbl}[$lex+1]: value ok 7815 - delete $vlex{foo}{$gbl}[$lex+1]: no exception ok 7816 - delete $vlex{foo}{$gbl}[$lex+1]: value ok 7817 - $vgbl{foo}{$gbl}[$lex+1]: no exception ok 7818 - $vgbl{foo}{$gbl}[$lex+1]: value ok 7819 - $vgbl{foo}{$gbl}[$lex+1] = 123: no exception ok 7820 - $vgbl{foo}{$gbl}[$lex+1] = 123: value ok 7821 - exists $vgbl{foo}{$gbl}[$lex+1]: no exception ok 7822 - exists $vgbl{foo}{$gbl}[$lex+1]: value ok 7823 - delete $vgbl{foo}{$gbl}[$lex+1]: no exception ok 7824 - delete $vgbl{foo}{$gbl}[$lex+1]: value ok 7825 - $vrlex->{foo}{$gbl}[$lex+1]: no exception ok 7826 - $vrlex->{foo}{$gbl}[$lex+1]: value ok 7827 - $vrlex->{foo}{$gbl}[$lex+1] = 123: no exception ok 7828 - $vrlex->{foo}{$gbl}[$lex+1] = 123: value ok 7829 - exists $vrlex->{foo}{$gbl}[$lex+1]: no exception ok 7830 - exists $vrlex->{foo}{$gbl}[$lex+1]: value ok 7831 - delete $vrlex->{foo}{$gbl}[$lex+1]: no exception ok 7832 - delete $vrlex->{foo}{$gbl}[$lex+1]: value ok 7833 - $vrgbl->{foo}{$gbl}[$lex+1]: no exception ok 7834 - $vrgbl->{foo}{$gbl}[$lex+1]: value ok 7835 - $vrgbl->{foo}{$gbl}[$lex+1] = 123: no exception ok 7836 - $vrgbl->{foo}{$gbl}[$lex+1] = 123: value ok 7837 - exists $vrgbl->{foo}{$gbl}[$lex+1]: no exception ok 7838 - exists $vrgbl->{foo}{$gbl}[$lex+1]: value ok 7839 - delete $vrgbl->{foo}{$gbl}[$lex+1]: no exception ok 7840 - delete $vrgbl->{foo}{$gbl}[$lex+1]: value ok 7841 - $vlex{$lex}{$gbl}[$lex+1]: no exception ok 7842 - $vlex{$lex}{$gbl}[$lex+1]: value ok 7843 - $vlex{$lex}{$gbl}[$lex+1] = 123: no exception ok 7844 - $vlex{$lex}{$gbl}[$lex+1] = 123: value ok 7845 - exists $vlex{$lex}{$gbl}[$lex+1]: no exception ok 7846 - exists $vlex{$lex}{$gbl}[$lex+1]: value ok 7847 - delete $vlex{$lex}{$gbl}[$lex+1]: no exception ok 7848 - delete $vlex{$lex}{$gbl}[$lex+1]: value ok 7849 - $vgbl{$lex}{$gbl}[$lex+1]: no exception ok 7850 - $vgbl{$lex}{$gbl}[$lex+1]: value ok 7851 - $vgbl{$lex}{$gbl}[$lex+1] = 123: no exception ok 7852 - $vgbl{$lex}{$gbl}[$lex+1] = 123: value ok 7853 - exists $vgbl{$lex}{$gbl}[$lex+1]: no exception ok 7854 - exists $vgbl{$lex}{$gbl}[$lex+1]: value ok 7855 - delete $vgbl{$lex}{$gbl}[$lex+1]: no exception ok 7856 - delete $vgbl{$lex}{$gbl}[$lex+1]: value ok 7857 - $vrlex->{$lex}{$gbl}[$lex+1]: no exception ok 7858 - $vrlex->{$lex}{$gbl}[$lex+1]: value ok 7859 - $vrlex->{$lex}{$gbl}[$lex+1] = 123: no exception ok 7860 - $vrlex->{$lex}{$gbl}[$lex+1] = 123: value ok 7861 - exists $vrlex->{$lex}{$gbl}[$lex+1]: no exception ok 7862 - exists $vrlex->{$lex}{$gbl}[$lex+1]: value ok 7863 - delete $vrlex->{$lex}{$gbl}[$lex+1]: no exception ok 7864 - delete $vrlex->{$lex}{$gbl}[$lex+1]: value ok 7865 - $vrgbl->{$lex}{$gbl}[$lex+1]: no exception ok 7866 - $vrgbl->{$lex}{$gbl}[$lex+1]: value ok 7867 - $vrgbl->{$lex}{$gbl}[$lex+1] = 123: no exception ok 7868 - $vrgbl->{$lex}{$gbl}[$lex+1] = 123: value ok 7869 - exists $vrgbl->{$lex}{$gbl}[$lex+1]: no exception ok 7870 - exists $vrgbl->{$lex}{$gbl}[$lex+1]: value ok 7871 - delete $vrgbl->{$lex}{$gbl}[$lex+1]: no exception ok 7872 - delete $vrgbl->{$lex}{$gbl}[$lex+1]: value ok 7873 - $vlex{$gbl}{$gbl}[$lex+1]: no exception ok 7874 - $vlex{$gbl}{$gbl}[$lex+1]: value ok 7875 - $vlex{$gbl}{$gbl}[$lex+1] = 123: no exception ok 7876 - $vlex{$gbl}{$gbl}[$lex+1] = 123: value ok 7877 - exists $vlex{$gbl}{$gbl}[$lex+1]: no exception ok 7878 - exists $vlex{$gbl}{$gbl}[$lex+1]: value ok 7879 - delete $vlex{$gbl}{$gbl}[$lex+1]: no exception ok 7880 - delete $vlex{$gbl}{$gbl}[$lex+1]: value ok 7881 - $vgbl{$gbl}{$gbl}[$lex+1]: no exception ok 7882 - $vgbl{$gbl}{$gbl}[$lex+1]: value ok 7883 - $vgbl{$gbl}{$gbl}[$lex+1] = 123: no exception ok 7884 - $vgbl{$gbl}{$gbl}[$lex+1] = 123: value ok 7885 - exists $vgbl{$gbl}{$gbl}[$lex+1]: no exception ok 7886 - exists $vgbl{$gbl}{$gbl}[$lex+1]: value ok 7887 - delete $vgbl{$gbl}{$gbl}[$lex+1]: no exception ok 7888 - delete $vgbl{$gbl}{$gbl}[$lex+1]: value ok 7889 - $vrlex->{$gbl}{$gbl}[$lex+1]: no exception ok 7890 - $vrlex->{$gbl}{$gbl}[$lex+1]: value ok 7891 - $vrlex->{$gbl}{$gbl}[$lex+1] = 123: no exception ok 7892 - $vrlex->{$gbl}{$gbl}[$lex+1] = 123: value ok 7893 - exists $vrlex->{$gbl}{$gbl}[$lex+1]: no exception ok 7894 - exists $vrlex->{$gbl}{$gbl}[$lex+1]: value ok 7895 - delete $vrlex->{$gbl}{$gbl}[$lex+1]: no exception ok 7896 - delete $vrlex->{$gbl}{$gbl}[$lex+1]: value ok 7897 - $vrgbl->{$gbl}{$gbl}[$lex+1]: no exception ok 7898 - $vrgbl->{$gbl}{$gbl}[$lex+1]: value ok 7899 - $vrgbl->{$gbl}{$gbl}[$lex+1] = 123: no exception ok 7900 - $vrgbl->{$gbl}{$gbl}[$lex+1] = 123: value ok 7901 - exists $vrgbl->{$gbl}{$gbl}[$lex+1]: no exception ok 7902 - exists $vrgbl->{$gbl}{$gbl}[$lex+1]: value ok 7903 - delete $vrgbl->{$gbl}{$gbl}[$lex+1]: no exception ok 7904 - delete $vrgbl->{$gbl}{$gbl}[$lex+1]: value ok 7905 - $vlex{"x$lex"}{$gbl}[$lex+1]: no exception ok 7906 - $vlex{"x$lex"}{$gbl}[$lex+1]: value ok 7907 - $vlex{"x$lex"}{$gbl}[$lex+1] = 123: no exception ok 7908 - $vlex{"x$lex"}{$gbl}[$lex+1] = 123: value ok 7909 - exists $vlex{"x$lex"}{$gbl}[$lex+1]: no exception ok 7910 - exists $vlex{"x$lex"}{$gbl}[$lex+1]: value ok 7911 - delete $vlex{"x$lex"}{$gbl}[$lex+1]: no exception ok 7912 - delete $vlex{"x$lex"}{$gbl}[$lex+1]: value ok 7913 - $vgbl{"x$lex"}{$gbl}[$lex+1]: no exception ok 7914 - $vgbl{"x$lex"}{$gbl}[$lex+1]: value ok 7915 - $vgbl{"x$lex"}{$gbl}[$lex+1] = 123: no exception ok 7916 - $vgbl{"x$lex"}{$gbl}[$lex+1] = 123: value ok 7917 - exists $vgbl{"x$lex"}{$gbl}[$lex+1]: no exception ok 7918 - exists $vgbl{"x$lex"}{$gbl}[$lex+1]: value ok 7919 - delete $vgbl{"x$lex"}{$gbl}[$lex+1]: no exception ok 7920 - delete $vgbl{"x$lex"}{$gbl}[$lex+1]: value ok 7921 - $vrlex->{"x$lex"}{$gbl}[$lex+1]: no exception ok 7922 - $vrlex->{"x$lex"}{$gbl}[$lex+1]: value ok 7923 - $vrlex->{"x$lex"}{$gbl}[$lex+1] = 123: no exception ok 7924 - $vrlex->{"x$lex"}{$gbl}[$lex+1] = 123: value ok 7925 - exists $vrlex->{"x$lex"}{$gbl}[$lex+1]: no exception ok 7926 - exists $vrlex->{"x$lex"}{$gbl}[$lex+1]: value ok 7927 - delete $vrlex->{"x$lex"}{$gbl}[$lex+1]: no exception ok 7928 - delete $vrlex->{"x$lex"}{$gbl}[$lex+1]: value ok 7929 - $vrgbl->{"x$lex"}{$gbl}[$lex+1]: no exception ok 7930 - $vrgbl->{"x$lex"}{$gbl}[$lex+1]: value ok 7931 - $vrgbl->{"x$lex"}{$gbl}[$lex+1] = 123: no exception ok 7932 - $vrgbl->{"x$lex"}{$gbl}[$lex+1] = 123: value ok 7933 - exists $vrgbl->{"x$lex"}{$gbl}[$lex+1]: no exception ok 7934 - exists $vrgbl->{"x$lex"}{$gbl}[$lex+1]: value ok 7935 - delete $vrgbl->{"x$lex"}{$gbl}[$lex+1]: no exception ok 7936 - delete $vrgbl->{"x$lex"}{$gbl}[$lex+1]: value ok 7937 - $vlex[0]{"x$lex"}[$lex+1]: no exception ok 7938 - $vlex[0]{"x$lex"}[$lex+1]: value ok 7939 - $vlex[0]{"x$lex"}[$lex+1] = 123: no exception ok 7940 - $vlex[0]{"x$lex"}[$lex+1] = 123: value ok 7941 - exists $vlex[0]{"x$lex"}[$lex+1]: no exception ok 7942 - exists $vlex[0]{"x$lex"}[$lex+1]: value ok 7943 - delete $vlex[0]{"x$lex"}[$lex+1]: no exception ok 7944 - delete $vlex[0]{"x$lex"}[$lex+1]: value ok 7945 - $vgbl[0]{"x$lex"}[$lex+1]: no exception ok 7946 - $vgbl[0]{"x$lex"}[$lex+1]: value ok 7947 - $vgbl[0]{"x$lex"}[$lex+1] = 123: no exception ok 7948 - $vgbl[0]{"x$lex"}[$lex+1] = 123: value ok 7949 - exists $vgbl[0]{"x$lex"}[$lex+1]: no exception ok 7950 - exists $vgbl[0]{"x$lex"}[$lex+1]: value ok 7951 - delete $vgbl[0]{"x$lex"}[$lex+1]: no exception ok 7952 - delete $vgbl[0]{"x$lex"}[$lex+1]: value ok 7953 - $vrlex->[0]{"x$lex"}[$lex+1]: no exception ok 7954 - $vrlex->[0]{"x$lex"}[$lex+1]: value ok 7955 - $vrlex->[0]{"x$lex"}[$lex+1] = 123: no exception ok 7956 - $vrlex->[0]{"x$lex"}[$lex+1] = 123: value ok 7957 - exists $vrlex->[0]{"x$lex"}[$lex+1]: no exception ok 7958 - exists $vrlex->[0]{"x$lex"}[$lex+1]: value ok 7959 - delete $vrlex->[0]{"x$lex"}[$lex+1]: no exception ok 7960 - delete $vrlex->[0]{"x$lex"}[$lex+1]: value ok 7961 - $vrgbl->[0]{"x$lex"}[$lex+1]: no exception ok 7962 - $vrgbl->[0]{"x$lex"}[$lex+1]: value ok 7963 - $vrgbl->[0]{"x$lex"}[$lex+1] = 123: no exception ok 7964 - $vrgbl->[0]{"x$lex"}[$lex+1] = 123: value ok 7965 - exists $vrgbl->[0]{"x$lex"}[$lex+1]: no exception ok 7966 - exists $vrgbl->[0]{"x$lex"}[$lex+1]: value ok 7967 - delete $vrgbl->[0]{"x$lex"}[$lex+1]: no exception ok 7968 - delete $vrgbl->[0]{"x$lex"}[$lex+1]: value ok 7969 - $vlex[$lex]{"x$lex"}[$lex+1]: no exception ok 7970 - $vlex[$lex]{"x$lex"}[$lex+1]: value ok 7971 - $vlex[$lex]{"x$lex"}[$lex+1] = 123: no exception ok 7972 - $vlex[$lex]{"x$lex"}[$lex+1] = 123: value ok 7973 - exists $vlex[$lex]{"x$lex"}[$lex+1]: no exception ok 7974 - exists $vlex[$lex]{"x$lex"}[$lex+1]: value ok 7975 - delete $vlex[$lex]{"x$lex"}[$lex+1]: no exception ok 7976 - delete $vlex[$lex]{"x$lex"}[$lex+1]: value ok 7977 - $vgbl[$lex]{"x$lex"}[$lex+1]: no exception ok 7978 - $vgbl[$lex]{"x$lex"}[$lex+1]: value ok 7979 - $vgbl[$lex]{"x$lex"}[$lex+1] = 123: no exception ok 7980 - $vgbl[$lex]{"x$lex"}[$lex+1] = 123: value ok 7981 - exists $vgbl[$lex]{"x$lex"}[$lex+1]: no exception ok 7982 - exists $vgbl[$lex]{"x$lex"}[$lex+1]: value ok 7983 - delete $vgbl[$lex]{"x$lex"}[$lex+1]: no exception ok 7984 - delete $vgbl[$lex]{"x$lex"}[$lex+1]: value ok 7985 - $vrlex->[$lex]{"x$lex"}[$lex+1]: no exception ok 7986 - $vrlex->[$lex]{"x$lex"}[$lex+1]: value ok 7987 - $vrlex->[$lex]{"x$lex"}[$lex+1] = 123: no exception ok 7988 - $vrlex->[$lex]{"x$lex"}[$lex+1] = 123: value ok 7989 - exists $vrlex->[$lex]{"x$lex"}[$lex+1]: no exception ok 7990 - exists $vrlex->[$lex]{"x$lex"}[$lex+1]: value ok 7991 - delete $vrlex->[$lex]{"x$lex"}[$lex+1]: no exception ok 7992 - delete $vrlex->[$lex]{"x$lex"}[$lex+1]: value ok 7993 - $vrgbl->[$lex]{"x$lex"}[$lex+1]: no exception ok 7994 - $vrgbl->[$lex]{"x$lex"}[$lex+1]: value ok 7995 - $vrgbl->[$lex]{"x$lex"}[$lex+1] = 123: no exception ok 7996 - $vrgbl->[$lex]{"x$lex"}[$lex+1] = 123: value ok 7997 - exists $vrgbl->[$lex]{"x$lex"}[$lex+1]: no exception ok 7998 - exists $vrgbl->[$lex]{"x$lex"}[$lex+1]: value ok 7999 - delete $vrgbl->[$lex]{"x$lex"}[$lex+1]: no exception ok 8000 - delete $vrgbl->[$lex]{"x$lex"}[$lex+1]: value ok 8001 - $vlex[$gbl]{"x$lex"}[$lex+1]: no exception ok 8002 - $vlex[$gbl]{"x$lex"}[$lex+1]: value ok 8003 - $vlex[$gbl]{"x$lex"}[$lex+1] = 123: no exception ok 8004 - $vlex[$gbl]{"x$lex"}[$lex+1] = 123: value ok 8005 - exists $vlex[$gbl]{"x$lex"}[$lex+1]: no exception ok 8006 - exists $vlex[$gbl]{"x$lex"}[$lex+1]: value ok 8007 - delete $vlex[$gbl]{"x$lex"}[$lex+1]: no exception ok 8008 - delete $vlex[$gbl]{"x$lex"}[$lex+1]: value ok 8009 - $vgbl[$gbl]{"x$lex"}[$lex+1]: no exception ok 8010 - $vgbl[$gbl]{"x$lex"}[$lex+1]: value ok 8011 - $vgbl[$gbl]{"x$lex"}[$lex+1] = 123: no exception ok 8012 - $vgbl[$gbl]{"x$lex"}[$lex+1] = 123: value ok 8013 - exists $vgbl[$gbl]{"x$lex"}[$lex+1]: no exception ok 8014 - exists $vgbl[$gbl]{"x$lex"}[$lex+1]: value ok 8015 - delete $vgbl[$gbl]{"x$lex"}[$lex+1]: no exception ok 8016 - delete $vgbl[$gbl]{"x$lex"}[$lex+1]: value ok 8017 - $vrlex->[$gbl]{"x$lex"}[$lex+1]: no exception ok 8018 - $vrlex->[$gbl]{"x$lex"}[$lex+1]: value ok 8019 - $vrlex->[$gbl]{"x$lex"}[$lex+1] = 123: no exception ok 8020 - $vrlex->[$gbl]{"x$lex"}[$lex+1] = 123: value ok 8021 - exists $vrlex->[$gbl]{"x$lex"}[$lex+1]: no exception ok 8022 - exists $vrlex->[$gbl]{"x$lex"}[$lex+1]: value ok 8023 - delete $vrlex->[$gbl]{"x$lex"}[$lex+1]: no exception ok 8024 - delete $vrlex->[$gbl]{"x$lex"}[$lex+1]: value ok 8025 - $vrgbl->[$gbl]{"x$lex"}[$lex+1]: no exception ok 8026 - $vrgbl->[$gbl]{"x$lex"}[$lex+1]: value ok 8027 - $vrgbl->[$gbl]{"x$lex"}[$lex+1] = 123: no exception ok 8028 - $vrgbl->[$gbl]{"x$lex"}[$lex+1] = 123: value ok 8029 - exists $vrgbl->[$gbl]{"x$lex"}[$lex+1]: no exception ok 8030 - exists $vrgbl->[$gbl]{"x$lex"}[$lex+1]: value ok 8031 - delete $vrgbl->[$gbl]{"x$lex"}[$lex+1]: no exception ok 8032 - delete $vrgbl->[$gbl]{"x$lex"}[$lex+1]: value ok 8033 - $vlex[$lex+1]{"x$lex"}[$lex+1]: no exception ok 8034 - $vlex[$lex+1]{"x$lex"}[$lex+1]: value ok 8035 - $vlex[$lex+1]{"x$lex"}[$lex+1] = 123: no exception ok 8036 - $vlex[$lex+1]{"x$lex"}[$lex+1] = 123: value ok 8037 - exists $vlex[$lex+1]{"x$lex"}[$lex+1]: no exception ok 8038 - exists $vlex[$lex+1]{"x$lex"}[$lex+1]: value ok 8039 - delete $vlex[$lex+1]{"x$lex"}[$lex+1]: no exception ok 8040 - delete $vlex[$lex+1]{"x$lex"}[$lex+1]: value ok 8041 - $vgbl[$lex+1]{"x$lex"}[$lex+1]: no exception ok 8042 - $vgbl[$lex+1]{"x$lex"}[$lex+1]: value ok 8043 - $vgbl[$lex+1]{"x$lex"}[$lex+1] = 123: no exception ok 8044 - $vgbl[$lex+1]{"x$lex"}[$lex+1] = 123: value ok 8045 - exists $vgbl[$lex+1]{"x$lex"}[$lex+1]: no exception ok 8046 - exists $vgbl[$lex+1]{"x$lex"}[$lex+1]: value ok 8047 - delete $vgbl[$lex+1]{"x$lex"}[$lex+1]: no exception ok 8048 - delete $vgbl[$lex+1]{"x$lex"}[$lex+1]: value ok 8049 - $vrlex->[$lex+1]{"x$lex"}[$lex+1]: no exception ok 8050 - $vrlex->[$lex+1]{"x$lex"}[$lex+1]: value ok 8051 - $vrlex->[$lex+1]{"x$lex"}[$lex+1] = 123: no exception ok 8052 - $vrlex->[$lex+1]{"x$lex"}[$lex+1] = 123: value ok 8053 - exists $vrlex->[$lex+1]{"x$lex"}[$lex+1]: no exception ok 8054 - exists $vrlex->[$lex+1]{"x$lex"}[$lex+1]: value ok 8055 - delete $vrlex->[$lex+1]{"x$lex"}[$lex+1]: no exception ok 8056 - delete $vrlex->[$lex+1]{"x$lex"}[$lex+1]: value ok 8057 - $vrgbl->[$lex+1]{"x$lex"}[$lex+1]: no exception ok 8058 - $vrgbl->[$lex+1]{"x$lex"}[$lex+1]: value ok 8059 - $vrgbl->[$lex+1]{"x$lex"}[$lex+1] = 123: no exception ok 8060 - $vrgbl->[$lex+1]{"x$lex"}[$lex+1] = 123: value ok 8061 - exists $vrgbl->[$lex+1]{"x$lex"}[$lex+1]: no exception ok 8062 - exists $vrgbl->[$lex+1]{"x$lex"}[$lex+1]: value ok 8063 - delete $vrgbl->[$lex+1]{"x$lex"}[$lex+1]: no exception ok 8064 - delete $vrgbl->[$lex+1]{"x$lex"}[$lex+1]: value ok 8065 - $vlex{foo}{"x$lex"}[$lex+1]: no exception ok 8066 - $vlex{foo}{"x$lex"}[$lex+1]: value ok 8067 - $vlex{foo}{"x$lex"}[$lex+1] = 123: no exception ok 8068 - $vlex{foo}{"x$lex"}[$lex+1] = 123: value ok 8069 - exists $vlex{foo}{"x$lex"}[$lex+1]: no exception ok 8070 - exists $vlex{foo}{"x$lex"}[$lex+1]: value ok 8071 - delete $vlex{foo}{"x$lex"}[$lex+1]: no exception ok 8072 - delete $vlex{foo}{"x$lex"}[$lex+1]: value ok 8073 - $vgbl{foo}{"x$lex"}[$lex+1]: no exception ok 8074 - $vgbl{foo}{"x$lex"}[$lex+1]: value ok 8075 - $vgbl{foo}{"x$lex"}[$lex+1] = 123: no exception ok 8076 - $vgbl{foo}{"x$lex"}[$lex+1] = 123: value ok 8077 - exists $vgbl{foo}{"x$lex"}[$lex+1]: no exception ok 8078 - exists $vgbl{foo}{"x$lex"}[$lex+1]: value ok 8079 - delete $vgbl{foo}{"x$lex"}[$lex+1]: no exception ok 8080 - delete $vgbl{foo}{"x$lex"}[$lex+1]: value ok 8081 - $vrlex->{foo}{"x$lex"}[$lex+1]: no exception ok 8082 - $vrlex->{foo}{"x$lex"}[$lex+1]: value ok 8083 - $vrlex->{foo}{"x$lex"}[$lex+1] = 123: no exception ok 8084 - $vrlex->{foo}{"x$lex"}[$lex+1] = 123: value ok 8085 - exists $vrlex->{foo}{"x$lex"}[$lex+1]: no exception ok 8086 - exists $vrlex->{foo}{"x$lex"}[$lex+1]: value ok 8087 - delete $vrlex->{foo}{"x$lex"}[$lex+1]: no exception ok 8088 - delete $vrlex->{foo}{"x$lex"}[$lex+1]: value ok 8089 - $vrgbl->{foo}{"x$lex"}[$lex+1]: no exception ok 8090 - $vrgbl->{foo}{"x$lex"}[$lex+1]: value ok 8091 - $vrgbl->{foo}{"x$lex"}[$lex+1] = 123: no exception ok 8092 - $vrgbl->{foo}{"x$lex"}[$lex+1] = 123: value ok 8093 - exists $vrgbl->{foo}{"x$lex"}[$lex+1]: no exception ok 8094 - exists $vrgbl->{foo}{"x$lex"}[$lex+1]: value ok 8095 - delete $vrgbl->{foo}{"x$lex"}[$lex+1]: no exception ok 8096 - delete $vrgbl->{foo}{"x$lex"}[$lex+1]: value ok 8097 - $vlex{$lex}{"x$lex"}[$lex+1]: no exception ok 8098 - $vlex{$lex}{"x$lex"}[$lex+1]: value ok 8099 - $vlex{$lex}{"x$lex"}[$lex+1] = 123: no exception ok 8100 - $vlex{$lex}{"x$lex"}[$lex+1] = 123: value ok 8101 - exists $vlex{$lex}{"x$lex"}[$lex+1]: no exception ok 8102 - exists $vlex{$lex}{"x$lex"}[$lex+1]: value ok 8103 - delete $vlex{$lex}{"x$lex"}[$lex+1]: no exception ok 8104 - delete $vlex{$lex}{"x$lex"}[$lex+1]: value ok 8105 - $vgbl{$lex}{"x$lex"}[$lex+1]: no exception ok 8106 - $vgbl{$lex}{"x$lex"}[$lex+1]: value ok 8107 - $vgbl{$lex}{"x$lex"}[$lex+1] = 123: no exception ok 8108 - $vgbl{$lex}{"x$lex"}[$lex+1] = 123: value ok 8109 - exists $vgbl{$lex}{"x$lex"}[$lex+1]: no exception ok 8110 - exists $vgbl{$lex}{"x$lex"}[$lex+1]: value ok 8111 - delete $vgbl{$lex}{"x$lex"}[$lex+1]: no exception ok 8112 - delete $vgbl{$lex}{"x$lex"}[$lex+1]: value ok 8113 - $vrlex->{$lex}{"x$lex"}[$lex+1]: no exception ok 8114 - $vrlex->{$lex}{"x$lex"}[$lex+1]: value ok 8115 - $vrlex->{$lex}{"x$lex"}[$lex+1] = 123: no exception ok 8116 - $vrlex->{$lex}{"x$lex"}[$lex+1] = 123: value ok 8117 - exists $vrlex->{$lex}{"x$lex"}[$lex+1]: no exception ok 8118 - exists $vrlex->{$lex}{"x$lex"}[$lex+1]: value ok 8119 - delete $vrlex->{$lex}{"x$lex"}[$lex+1]: no exception ok 8120 - delete $vrlex->{$lex}{"x$lex"}[$lex+1]: value ok 8121 - $vrgbl->{$lex}{"x$lex"}[$lex+1]: no exception ok 8122 - $vrgbl->{$lex}{"x$lex"}[$lex+1]: value ok 8123 - $vrgbl->{$lex}{"x$lex"}[$lex+1] = 123: no exception ok 8124 - $vrgbl->{$lex}{"x$lex"}[$lex+1] = 123: value ok 8125 - exists $vrgbl->{$lex}{"x$lex"}[$lex+1]: no exception ok 8126 - exists $vrgbl->{$lex}{"x$lex"}[$lex+1]: value ok 8127 - delete $vrgbl->{$lex}{"x$lex"}[$lex+1]: no exception ok 8128 - delete $vrgbl->{$lex}{"x$lex"}[$lex+1]: value ok 8129 - $vlex{$gbl}{"x$lex"}[$lex+1]: no exception ok 8130 - $vlex{$gbl}{"x$lex"}[$lex+1]: value ok 8131 - $vlex{$gbl}{"x$lex"}[$lex+1] = 123: no exception ok 8132 - $vlex{$gbl}{"x$lex"}[$lex+1] = 123: value ok 8133 - exists $vlex{$gbl}{"x$lex"}[$lex+1]: no exception ok 8134 - exists $vlex{$gbl}{"x$lex"}[$lex+1]: value ok 8135 - delete $vlex{$gbl}{"x$lex"}[$lex+1]: no exception ok 8136 - delete $vlex{$gbl}{"x$lex"}[$lex+1]: value ok 8137 - $vgbl{$gbl}{"x$lex"}[$lex+1]: no exception ok 8138 - $vgbl{$gbl}{"x$lex"}[$lex+1]: value ok 8139 - $vgbl{$gbl}{"x$lex"}[$lex+1] = 123: no exception ok 8140 - $vgbl{$gbl}{"x$lex"}[$lex+1] = 123: value ok 8141 - exists $vgbl{$gbl}{"x$lex"}[$lex+1]: no exception ok 8142 - exists $vgbl{$gbl}{"x$lex"}[$lex+1]: value ok 8143 - delete $vgbl{$gbl}{"x$lex"}[$lex+1]: no exception ok 8144 - delete $vgbl{$gbl}{"x$lex"}[$lex+1]: value ok 8145 - $vrlex->{$gbl}{"x$lex"}[$lex+1]: no exception ok 8146 - $vrlex->{$gbl}{"x$lex"}[$lex+1]: value ok 8147 - $vrlex->{$gbl}{"x$lex"}[$lex+1] = 123: no exception ok 8148 - $vrlex->{$gbl}{"x$lex"}[$lex+1] = 123: value ok 8149 - exists $vrlex->{$gbl}{"x$lex"}[$lex+1]: no exception ok 8150 - exists $vrlex->{$gbl}{"x$lex"}[$lex+1]: value ok 8151 - delete $vrlex->{$gbl}{"x$lex"}[$lex+1]: no exception ok 8152 - delete $vrlex->{$gbl}{"x$lex"}[$lex+1]: value ok 8153 - $vrgbl->{$gbl}{"x$lex"}[$lex+1]: no exception ok 8154 - $vrgbl->{$gbl}{"x$lex"}[$lex+1]: value ok 8155 - $vrgbl->{$gbl}{"x$lex"}[$lex+1] = 123: no exception ok 8156 - $vrgbl->{$gbl}{"x$lex"}[$lex+1] = 123: value ok 8157 - exists $vrgbl->{$gbl}{"x$lex"}[$lex+1]: no exception ok 8158 - exists $vrgbl->{$gbl}{"x$lex"}[$lex+1]: value ok 8159 - delete $vrgbl->{$gbl}{"x$lex"}[$lex+1]: no exception ok 8160 - delete $vrgbl->{$gbl}{"x$lex"}[$lex+1]: value ok 8161 - $vlex{"x$lex"}{"x$lex"}[$lex+1]: no exception ok 8162 - $vlex{"x$lex"}{"x$lex"}[$lex+1]: value ok 8163 - $vlex{"x$lex"}{"x$lex"}[$lex+1] = 123: no exception ok 8164 - $vlex{"x$lex"}{"x$lex"}[$lex+1] = 123: value ok 8165 - exists $vlex{"x$lex"}{"x$lex"}[$lex+1]: no exception ok 8166 - exists $vlex{"x$lex"}{"x$lex"}[$lex+1]: value ok 8167 - delete $vlex{"x$lex"}{"x$lex"}[$lex+1]: no exception ok 8168 - delete $vlex{"x$lex"}{"x$lex"}[$lex+1]: value ok 8169 - $vgbl{"x$lex"}{"x$lex"}[$lex+1]: no exception ok 8170 - $vgbl{"x$lex"}{"x$lex"}[$lex+1]: value ok 8171 - $vgbl{"x$lex"}{"x$lex"}[$lex+1] = 123: no exception ok 8172 - $vgbl{"x$lex"}{"x$lex"}[$lex+1] = 123: value ok 8173 - exists $vgbl{"x$lex"}{"x$lex"}[$lex+1]: no exception ok 8174 - exists $vgbl{"x$lex"}{"x$lex"}[$lex+1]: value ok 8175 - delete $vgbl{"x$lex"}{"x$lex"}[$lex+1]: no exception ok 8176 - delete $vgbl{"x$lex"}{"x$lex"}[$lex+1]: value ok 8177 - $vrlex->{"x$lex"}{"x$lex"}[$lex+1]: no exception ok 8178 - $vrlex->{"x$lex"}{"x$lex"}[$lex+1]: value ok 8179 - $vrlex->{"x$lex"}{"x$lex"}[$lex+1] = 123: no exception ok 8180 - $vrlex->{"x$lex"}{"x$lex"}[$lex+1] = 123: value ok 8181 - exists $vrlex->{"x$lex"}{"x$lex"}[$lex+1]: no exception ok 8182 - exists $vrlex->{"x$lex"}{"x$lex"}[$lex+1]: value ok 8183 - delete $vrlex->{"x$lex"}{"x$lex"}[$lex+1]: no exception ok 8184 - delete $vrlex->{"x$lex"}{"x$lex"}[$lex+1]: value ok 8185 - $vrgbl->{"x$lex"}{"x$lex"}[$lex+1]: no exception ok 8186 - $vrgbl->{"x$lex"}{"x$lex"}[$lex+1]: value ok 8187 - $vrgbl->{"x$lex"}{"x$lex"}[$lex+1] = 123: no exception ok 8188 - $vrgbl->{"x$lex"}{"x$lex"}[$lex+1] = 123: value ok 8189 - exists $vrgbl->{"x$lex"}{"x$lex"}[$lex+1]: no exception ok 8190 - exists $vrgbl->{"x$lex"}{"x$lex"}[$lex+1]: value ok 8191 - delete $vrgbl->{"x$lex"}{"x$lex"}[$lex+1]: no exception ok 8192 - delete $vrgbl->{"x$lex"}{"x$lex"}[$lex+1]: value ok 8193 - $vlex[0][0]{foo}: no exception ok 8194 - $vlex[0][0]{foo}: value ok 8195 - $vlex[0][0]{foo} = 123: no exception ok 8196 - $vlex[0][0]{foo} = 123: value ok 8197 - exists $vlex[0][0]{foo}: no exception ok 8198 - exists $vlex[0][0]{foo}: value ok 8199 - delete $vlex[0][0]{foo}: no exception ok 8200 - delete $vlex[0][0]{foo}: value ok 8201 - $vgbl[0][0]{foo}: no exception ok 8202 - $vgbl[0][0]{foo}: value ok 8203 - $vgbl[0][0]{foo} = 123: no exception ok 8204 - $vgbl[0][0]{foo} = 123: value ok 8205 - exists $vgbl[0][0]{foo}: no exception ok 8206 - exists $vgbl[0][0]{foo}: value ok 8207 - delete $vgbl[0][0]{foo}: no exception ok 8208 - delete $vgbl[0][0]{foo}: value ok 8209 - $vrlex->[0][0]{foo}: no exception ok 8210 - $vrlex->[0][0]{foo}: value ok 8211 - $vrlex->[0][0]{foo} = 123: no exception ok 8212 - $vrlex->[0][0]{foo} = 123: value ok 8213 - exists $vrlex->[0][0]{foo}: no exception ok 8214 - exists $vrlex->[0][0]{foo}: value ok 8215 - delete $vrlex->[0][0]{foo}: no exception ok 8216 - delete $vrlex->[0][0]{foo}: value ok 8217 - $vrgbl->[0][0]{foo}: no exception ok 8218 - $vrgbl->[0][0]{foo}: value ok 8219 - $vrgbl->[0][0]{foo} = 123: no exception ok 8220 - $vrgbl->[0][0]{foo} = 123: value ok 8221 - exists $vrgbl->[0][0]{foo}: no exception ok 8222 - exists $vrgbl->[0][0]{foo}: value ok 8223 - delete $vrgbl->[0][0]{foo}: no exception ok 8224 - delete $vrgbl->[0][0]{foo}: value ok 8225 - $vlex[$lex][0]{foo}: no exception ok 8226 - $vlex[$lex][0]{foo}: value ok 8227 - $vlex[$lex][0]{foo} = 123: no exception ok 8228 - $vlex[$lex][0]{foo} = 123: value ok 8229 - exists $vlex[$lex][0]{foo}: no exception ok 8230 - exists $vlex[$lex][0]{foo}: value ok 8231 - delete $vlex[$lex][0]{foo}: no exception ok 8232 - delete $vlex[$lex][0]{foo}: value ok 8233 - $vgbl[$lex][0]{foo}: no exception ok 8234 - $vgbl[$lex][0]{foo}: value ok 8235 - $vgbl[$lex][0]{foo} = 123: no exception ok 8236 - $vgbl[$lex][0]{foo} = 123: value ok 8237 - exists $vgbl[$lex][0]{foo}: no exception ok 8238 - exists $vgbl[$lex][0]{foo}: value ok 8239 - delete $vgbl[$lex][0]{foo}: no exception ok 8240 - delete $vgbl[$lex][0]{foo}: value ok 8241 - $vrlex->[$lex][0]{foo}: no exception ok 8242 - $vrlex->[$lex][0]{foo}: value ok 8243 - $vrlex->[$lex][0]{foo} = 123: no exception ok 8244 - $vrlex->[$lex][0]{foo} = 123: value ok 8245 - exists $vrlex->[$lex][0]{foo}: no exception ok 8246 - exists $vrlex->[$lex][0]{foo}: value ok 8247 - delete $vrlex->[$lex][0]{foo}: no exception ok 8248 - delete $vrlex->[$lex][0]{foo}: value ok 8249 - $vrgbl->[$lex][0]{foo}: no exception ok 8250 - $vrgbl->[$lex][0]{foo}: value ok 8251 - $vrgbl->[$lex][0]{foo} = 123: no exception ok 8252 - $vrgbl->[$lex][0]{foo} = 123: value ok 8253 - exists $vrgbl->[$lex][0]{foo}: no exception ok 8254 - exists $vrgbl->[$lex][0]{foo}: value ok 8255 - delete $vrgbl->[$lex][0]{foo}: no exception ok 8256 - delete $vrgbl->[$lex][0]{foo}: value ok 8257 - $vlex[$gbl][0]{foo}: no exception ok 8258 - $vlex[$gbl][0]{foo}: value ok 8259 - $vlex[$gbl][0]{foo} = 123: no exception ok 8260 - $vlex[$gbl][0]{foo} = 123: value ok 8261 - exists $vlex[$gbl][0]{foo}: no exception ok 8262 - exists $vlex[$gbl][0]{foo}: value ok 8263 - delete $vlex[$gbl][0]{foo}: no exception ok 8264 - delete $vlex[$gbl][0]{foo}: value ok 8265 - $vgbl[$gbl][0]{foo}: no exception ok 8266 - $vgbl[$gbl][0]{foo}: value ok 8267 - $vgbl[$gbl][0]{foo} = 123: no exception ok 8268 - $vgbl[$gbl][0]{foo} = 123: value ok 8269 - exists $vgbl[$gbl][0]{foo}: no exception ok 8270 - exists $vgbl[$gbl][0]{foo}: value ok 8271 - delete $vgbl[$gbl][0]{foo}: no exception ok 8272 - delete $vgbl[$gbl][0]{foo}: value ok 8273 - $vrlex->[$gbl][0]{foo}: no exception ok 8274 - $vrlex->[$gbl][0]{foo}: value ok 8275 - $vrlex->[$gbl][0]{foo} = 123: no exception ok 8276 - $vrlex->[$gbl][0]{foo} = 123: value ok 8277 - exists $vrlex->[$gbl][0]{foo}: no exception ok 8278 - exists $vrlex->[$gbl][0]{foo}: value ok 8279 - delete $vrlex->[$gbl][0]{foo}: no exception ok 8280 - delete $vrlex->[$gbl][0]{foo}: value ok 8281 - $vrgbl->[$gbl][0]{foo}: no exception ok 8282 - $vrgbl->[$gbl][0]{foo}: value ok 8283 - $vrgbl->[$gbl][0]{foo} = 123: no exception ok 8284 - $vrgbl->[$gbl][0]{foo} = 123: value ok 8285 - exists $vrgbl->[$gbl][0]{foo}: no exception ok 8286 - exists $vrgbl->[$gbl][0]{foo}: value ok 8287 - delete $vrgbl->[$gbl][0]{foo}: no exception ok 8288 - delete $vrgbl->[$gbl][0]{foo}: value ok 8289 - $vlex[$lex+1][0]{foo}: no exception ok 8290 - $vlex[$lex+1][0]{foo}: value ok 8291 - $vlex[$lex+1][0]{foo} = 123: no exception ok 8292 - $vlex[$lex+1][0]{foo} = 123: value ok 8293 - exists $vlex[$lex+1][0]{foo}: no exception ok 8294 - exists $vlex[$lex+1][0]{foo}: value ok 8295 - delete $vlex[$lex+1][0]{foo}: no exception ok 8296 - delete $vlex[$lex+1][0]{foo}: value ok 8297 - $vgbl[$lex+1][0]{foo}: no exception ok 8298 - $vgbl[$lex+1][0]{foo}: value ok 8299 - $vgbl[$lex+1][0]{foo} = 123: no exception ok 8300 - $vgbl[$lex+1][0]{foo} = 123: value ok 8301 - exists $vgbl[$lex+1][0]{foo}: no exception ok 8302 - exists $vgbl[$lex+1][0]{foo}: value ok 8303 - delete $vgbl[$lex+1][0]{foo}: no exception ok 8304 - delete $vgbl[$lex+1][0]{foo}: value ok 8305 - $vrlex->[$lex+1][0]{foo}: no exception ok 8306 - $vrlex->[$lex+1][0]{foo}: value ok 8307 - $vrlex->[$lex+1][0]{foo} = 123: no exception ok 8308 - $vrlex->[$lex+1][0]{foo} = 123: value ok 8309 - exists $vrlex->[$lex+1][0]{foo}: no exception ok 8310 - exists $vrlex->[$lex+1][0]{foo}: value ok 8311 - delete $vrlex->[$lex+1][0]{foo}: no exception ok 8312 - delete $vrlex->[$lex+1][0]{foo}: value ok 8313 - $vrgbl->[$lex+1][0]{foo}: no exception ok 8314 - $vrgbl->[$lex+1][0]{foo}: value ok 8315 - $vrgbl->[$lex+1][0]{foo} = 123: no exception ok 8316 - $vrgbl->[$lex+1][0]{foo} = 123: value ok 8317 - exists $vrgbl->[$lex+1][0]{foo}: no exception ok 8318 - exists $vrgbl->[$lex+1][0]{foo}: value ok 8319 - delete $vrgbl->[$lex+1][0]{foo}: no exception ok 8320 - delete $vrgbl->[$lex+1][0]{foo}: value ok 8321 - $vlex{foo}[0]{foo}: no exception ok 8322 - $vlex{foo}[0]{foo}: value ok 8323 - $vlex{foo}[0]{foo} = 123: no exception ok 8324 - $vlex{foo}[0]{foo} = 123: value ok 8325 - exists $vlex{foo}[0]{foo}: no exception ok 8326 - exists $vlex{foo}[0]{foo}: value ok 8327 - delete $vlex{foo}[0]{foo}: no exception ok 8328 - delete $vlex{foo}[0]{foo}: value ok 8329 - $vgbl{foo}[0]{foo}: no exception ok 8330 - $vgbl{foo}[0]{foo}: value ok 8331 - $vgbl{foo}[0]{foo} = 123: no exception ok 8332 - $vgbl{foo}[0]{foo} = 123: value ok 8333 - exists $vgbl{foo}[0]{foo}: no exception ok 8334 - exists $vgbl{foo}[0]{foo}: value ok 8335 - delete $vgbl{foo}[0]{foo}: no exception ok 8336 - delete $vgbl{foo}[0]{foo}: value ok 8337 - $vrlex->{foo}[0]{foo}: no exception ok 8338 - $vrlex->{foo}[0]{foo}: value ok 8339 - $vrlex->{foo}[0]{foo} = 123: no exception ok 8340 - $vrlex->{foo}[0]{foo} = 123: value ok 8341 - exists $vrlex->{foo}[0]{foo}: no exception ok 8342 - exists $vrlex->{foo}[0]{foo}: value ok 8343 - delete $vrlex->{foo}[0]{foo}: no exception ok 8344 - delete $vrlex->{foo}[0]{foo}: value ok 8345 - $vrgbl->{foo}[0]{foo}: no exception ok 8346 - $vrgbl->{foo}[0]{foo}: value ok 8347 - $vrgbl->{foo}[0]{foo} = 123: no exception ok 8348 - $vrgbl->{foo}[0]{foo} = 123: value ok 8349 - exists $vrgbl->{foo}[0]{foo}: no exception ok 8350 - exists $vrgbl->{foo}[0]{foo}: value ok 8351 - delete $vrgbl->{foo}[0]{foo}: no exception ok 8352 - delete $vrgbl->{foo}[0]{foo}: value ok 8353 - $vlex{$lex}[0]{foo}: no exception ok 8354 - $vlex{$lex}[0]{foo}: value ok 8355 - $vlex{$lex}[0]{foo} = 123: no exception ok 8356 - $vlex{$lex}[0]{foo} = 123: value ok 8357 - exists $vlex{$lex}[0]{foo}: no exception ok 8358 - exists $vlex{$lex}[0]{foo}: value ok 8359 - delete $vlex{$lex}[0]{foo}: no exception ok 8360 - delete $vlex{$lex}[0]{foo}: value ok 8361 - $vgbl{$lex}[0]{foo}: no exception ok 8362 - $vgbl{$lex}[0]{foo}: value ok 8363 - $vgbl{$lex}[0]{foo} = 123: no exception ok 8364 - $vgbl{$lex}[0]{foo} = 123: value ok 8365 - exists $vgbl{$lex}[0]{foo}: no exception ok 8366 - exists $vgbl{$lex}[0]{foo}: value ok 8367 - delete $vgbl{$lex}[0]{foo}: no exception ok 8368 - delete $vgbl{$lex}[0]{foo}: value ok 8369 - $vrlex->{$lex}[0]{foo}: no exception ok 8370 - $vrlex->{$lex}[0]{foo}: value ok 8371 - $vrlex->{$lex}[0]{foo} = 123: no exception ok 8372 - $vrlex->{$lex}[0]{foo} = 123: value ok 8373 - exists $vrlex->{$lex}[0]{foo}: no exception ok 8374 - exists $vrlex->{$lex}[0]{foo}: value ok 8375 - delete $vrlex->{$lex}[0]{foo}: no exception ok 8376 - delete $vrlex->{$lex}[0]{foo}: value ok 8377 - $vrgbl->{$lex}[0]{foo}: no exception ok 8378 - $vrgbl->{$lex}[0]{foo}: value ok 8379 - $vrgbl->{$lex}[0]{foo} = 123: no exception ok 8380 - $vrgbl->{$lex}[0]{foo} = 123: value ok 8381 - exists $vrgbl->{$lex}[0]{foo}: no exception ok 8382 - exists $vrgbl->{$lex}[0]{foo}: value ok 8383 - delete $vrgbl->{$lex}[0]{foo}: no exception ok 8384 - delete $vrgbl->{$lex}[0]{foo}: value ok 8385 - $vlex{$gbl}[0]{foo}: no exception ok 8386 - $vlex{$gbl}[0]{foo}: value ok 8387 - $vlex{$gbl}[0]{foo} = 123: no exception ok 8388 - $vlex{$gbl}[0]{foo} = 123: value ok 8389 - exists $vlex{$gbl}[0]{foo}: no exception ok 8390 - exists $vlex{$gbl}[0]{foo}: value ok 8391 - delete $vlex{$gbl}[0]{foo}: no exception ok 8392 - delete $vlex{$gbl}[0]{foo}: value ok 8393 - $vgbl{$gbl}[0]{foo}: no exception ok 8394 - $vgbl{$gbl}[0]{foo}: value ok 8395 - $vgbl{$gbl}[0]{foo} = 123: no exception ok 8396 - $vgbl{$gbl}[0]{foo} = 123: value ok 8397 - exists $vgbl{$gbl}[0]{foo}: no exception ok 8398 - exists $vgbl{$gbl}[0]{foo}: value ok 8399 - delete $vgbl{$gbl}[0]{foo}: no exception ok 8400 - delete $vgbl{$gbl}[0]{foo}: value ok 8401 - $vrlex->{$gbl}[0]{foo}: no exception ok 8402 - $vrlex->{$gbl}[0]{foo}: value ok 8403 - $vrlex->{$gbl}[0]{foo} = 123: no exception ok 8404 - $vrlex->{$gbl}[0]{foo} = 123: value ok 8405 - exists $vrlex->{$gbl}[0]{foo}: no exception ok 8406 - exists $vrlex->{$gbl}[0]{foo}: value ok 8407 - delete $vrlex->{$gbl}[0]{foo}: no exception ok 8408 - delete $vrlex->{$gbl}[0]{foo}: value ok 8409 - $vrgbl->{$gbl}[0]{foo}: no exception ok 8410 - $vrgbl->{$gbl}[0]{foo}: value ok 8411 - $vrgbl->{$gbl}[0]{foo} = 123: no exception ok 8412 - $vrgbl->{$gbl}[0]{foo} = 123: value ok 8413 - exists $vrgbl->{$gbl}[0]{foo}: no exception ok 8414 - exists $vrgbl->{$gbl}[0]{foo}: value ok 8415 - delete $vrgbl->{$gbl}[0]{foo}: no exception ok 8416 - delete $vrgbl->{$gbl}[0]{foo}: value ok 8417 - $vlex{"x$lex"}[0]{foo}: no exception ok 8418 - $vlex{"x$lex"}[0]{foo}: value ok 8419 - $vlex{"x$lex"}[0]{foo} = 123: no exception ok 8420 - $vlex{"x$lex"}[0]{foo} = 123: value ok 8421 - exists $vlex{"x$lex"}[0]{foo}: no exception ok 8422 - exists $vlex{"x$lex"}[0]{foo}: value ok 8423 - delete $vlex{"x$lex"}[0]{foo}: no exception ok 8424 - delete $vlex{"x$lex"}[0]{foo}: value ok 8425 - $vgbl{"x$lex"}[0]{foo}: no exception ok 8426 - $vgbl{"x$lex"}[0]{foo}: value ok 8427 - $vgbl{"x$lex"}[0]{foo} = 123: no exception ok 8428 - $vgbl{"x$lex"}[0]{foo} = 123: value ok 8429 - exists $vgbl{"x$lex"}[0]{foo}: no exception ok 8430 - exists $vgbl{"x$lex"}[0]{foo}: value ok 8431 - delete $vgbl{"x$lex"}[0]{foo}: no exception ok 8432 - delete $vgbl{"x$lex"}[0]{foo}: value ok 8433 - $vrlex->{"x$lex"}[0]{foo}: no exception ok 8434 - $vrlex->{"x$lex"}[0]{foo}: value ok 8435 - $vrlex->{"x$lex"}[0]{foo} = 123: no exception ok 8436 - $vrlex->{"x$lex"}[0]{foo} = 123: value ok 8437 - exists $vrlex->{"x$lex"}[0]{foo}: no exception ok 8438 - exists $vrlex->{"x$lex"}[0]{foo}: value ok 8439 - delete $vrlex->{"x$lex"}[0]{foo}: no exception ok 8440 - delete $vrlex->{"x$lex"}[0]{foo}: value ok 8441 - $vrgbl->{"x$lex"}[0]{foo}: no exception ok 8442 - $vrgbl->{"x$lex"}[0]{foo}: value ok 8443 - $vrgbl->{"x$lex"}[0]{foo} = 123: no exception ok 8444 - $vrgbl->{"x$lex"}[0]{foo} = 123: value ok 8445 - exists $vrgbl->{"x$lex"}[0]{foo}: no exception ok 8446 - exists $vrgbl->{"x$lex"}[0]{foo}: value ok 8447 - delete $vrgbl->{"x$lex"}[0]{foo}: no exception ok 8448 - delete $vrgbl->{"x$lex"}[0]{foo}: value ok 8449 - $vlex[0][$lex]{foo}: no exception ok 8450 - $vlex[0][$lex]{foo}: value ok 8451 - $vlex[0][$lex]{foo} = 123: no exception ok 8452 - $vlex[0][$lex]{foo} = 123: value ok 8453 - exists $vlex[0][$lex]{foo}: no exception ok 8454 - exists $vlex[0][$lex]{foo}: value ok 8455 - delete $vlex[0][$lex]{foo}: no exception ok 8456 - delete $vlex[0][$lex]{foo}: value ok 8457 - $vgbl[0][$lex]{foo}: no exception ok 8458 - $vgbl[0][$lex]{foo}: value ok 8459 - $vgbl[0][$lex]{foo} = 123: no exception ok 8460 - $vgbl[0][$lex]{foo} = 123: value ok 8461 - exists $vgbl[0][$lex]{foo}: no exception ok 8462 - exists $vgbl[0][$lex]{foo}: value ok 8463 - delete $vgbl[0][$lex]{foo}: no exception ok 8464 - delete $vgbl[0][$lex]{foo}: value ok 8465 - $vrlex->[0][$lex]{foo}: no exception ok 8466 - $vrlex->[0][$lex]{foo}: value ok 8467 - $vrlex->[0][$lex]{foo} = 123: no exception ok 8468 - $vrlex->[0][$lex]{foo} = 123: value ok 8469 - exists $vrlex->[0][$lex]{foo}: no exception ok 8470 - exists $vrlex->[0][$lex]{foo}: value ok 8471 - delete $vrlex->[0][$lex]{foo}: no exception ok 8472 - delete $vrlex->[0][$lex]{foo}: value ok 8473 - $vrgbl->[0][$lex]{foo}: no exception ok 8474 - $vrgbl->[0][$lex]{foo}: value ok 8475 - $vrgbl->[0][$lex]{foo} = 123: no exception ok 8476 - $vrgbl->[0][$lex]{foo} = 123: value ok 8477 - exists $vrgbl->[0][$lex]{foo}: no exception ok 8478 - exists $vrgbl->[0][$lex]{foo}: value ok 8479 - delete $vrgbl->[0][$lex]{foo}: no exception ok 8480 - delete $vrgbl->[0][$lex]{foo}: value ok 8481 - $vlex[$lex][$lex]{foo}: no exception ok 8482 - $vlex[$lex][$lex]{foo}: value ok 8483 - $vlex[$lex][$lex]{foo} = 123: no exception ok 8484 - $vlex[$lex][$lex]{foo} = 123: value ok 8485 - exists $vlex[$lex][$lex]{foo}: no exception ok 8486 - exists $vlex[$lex][$lex]{foo}: value ok 8487 - delete $vlex[$lex][$lex]{foo}: no exception ok 8488 - delete $vlex[$lex][$lex]{foo}: value ok 8489 - $vgbl[$lex][$lex]{foo}: no exception ok 8490 - $vgbl[$lex][$lex]{foo}: value ok 8491 - $vgbl[$lex][$lex]{foo} = 123: no exception ok 8492 - $vgbl[$lex][$lex]{foo} = 123: value ok 8493 - exists $vgbl[$lex][$lex]{foo}: no exception ok 8494 - exists $vgbl[$lex][$lex]{foo}: value ok 8495 - delete $vgbl[$lex][$lex]{foo}: no exception ok 8496 - delete $vgbl[$lex][$lex]{foo}: value ok 8497 - $vrlex->[$lex][$lex]{foo}: no exception ok 8498 - $vrlex->[$lex][$lex]{foo}: value ok 8499 - $vrlex->[$lex][$lex]{foo} = 123: no exception ok 8500 - $vrlex->[$lex][$lex]{foo} = 123: value ok 8501 - exists $vrlex->[$lex][$lex]{foo}: no exception ok 8502 - exists $vrlex->[$lex][$lex]{foo}: value ok 8503 - delete $vrlex->[$lex][$lex]{foo}: no exception ok 8504 - delete $vrlex->[$lex][$lex]{foo}: value ok 8505 - $vrgbl->[$lex][$lex]{foo}: no exception ok 8506 - $vrgbl->[$lex][$lex]{foo}: value ok 8507 - $vrgbl->[$lex][$lex]{foo} = 123: no exception ok 8508 - $vrgbl->[$lex][$lex]{foo} = 123: value ok 8509 - exists $vrgbl->[$lex][$lex]{foo}: no exception ok 8510 - exists $vrgbl->[$lex][$lex]{foo}: value ok 8511 - delete $vrgbl->[$lex][$lex]{foo}: no exception ok 8512 - delete $vrgbl->[$lex][$lex]{foo}: value ok 8513 - $vlex[$gbl][$lex]{foo}: no exception ok 8514 - $vlex[$gbl][$lex]{foo}: value ok 8515 - $vlex[$gbl][$lex]{foo} = 123: no exception ok 8516 - $vlex[$gbl][$lex]{foo} = 123: value ok 8517 - exists $vlex[$gbl][$lex]{foo}: no exception ok 8518 - exists $vlex[$gbl][$lex]{foo}: value ok 8519 - delete $vlex[$gbl][$lex]{foo}: no exception ok 8520 - delete $vlex[$gbl][$lex]{foo}: value ok 8521 - $vgbl[$gbl][$lex]{foo}: no exception ok 8522 - $vgbl[$gbl][$lex]{foo}: value ok 8523 - $vgbl[$gbl][$lex]{foo} = 123: no exception ok 8524 - $vgbl[$gbl][$lex]{foo} = 123: value ok 8525 - exists $vgbl[$gbl][$lex]{foo}: no exception ok 8526 - exists $vgbl[$gbl][$lex]{foo}: value ok 8527 - delete $vgbl[$gbl][$lex]{foo}: no exception ok 8528 - delete $vgbl[$gbl][$lex]{foo}: value ok 8529 - $vrlex->[$gbl][$lex]{foo}: no exception ok 8530 - $vrlex->[$gbl][$lex]{foo}: value ok 8531 - $vrlex->[$gbl][$lex]{foo} = 123: no exception ok 8532 - $vrlex->[$gbl][$lex]{foo} = 123: value ok 8533 - exists $vrlex->[$gbl][$lex]{foo}: no exception ok 8534 - exists $vrlex->[$gbl][$lex]{foo}: value ok 8535 - delete $vrlex->[$gbl][$lex]{foo}: no exception ok 8536 - delete $vrlex->[$gbl][$lex]{foo}: value ok 8537 - $vrgbl->[$gbl][$lex]{foo}: no exception ok 8538 - $vrgbl->[$gbl][$lex]{foo}: value ok 8539 - $vrgbl->[$gbl][$lex]{foo} = 123: no exception ok 8540 - $vrgbl->[$gbl][$lex]{foo} = 123: value ok 8541 - exists $vrgbl->[$gbl][$lex]{foo}: no exception ok 8542 - exists $vrgbl->[$gbl][$lex]{foo}: value ok 8543 - delete $vrgbl->[$gbl][$lex]{foo}: no exception ok 8544 - delete $vrgbl->[$gbl][$lex]{foo}: value ok 8545 - $vlex[$lex+1][$lex]{foo}: no exception ok 8546 - $vlex[$lex+1][$lex]{foo}: value ok 8547 - $vlex[$lex+1][$lex]{foo} = 123: no exception ok 8548 - $vlex[$lex+1][$lex]{foo} = 123: value ok 8549 - exists $vlex[$lex+1][$lex]{foo}: no exception ok 8550 - exists $vlex[$lex+1][$lex]{foo}: value ok 8551 - delete $vlex[$lex+1][$lex]{foo}: no exception ok 8552 - delete $vlex[$lex+1][$lex]{foo}: value ok 8553 - $vgbl[$lex+1][$lex]{foo}: no exception ok 8554 - $vgbl[$lex+1][$lex]{foo}: value ok 8555 - $vgbl[$lex+1][$lex]{foo} = 123: no exception ok 8556 - $vgbl[$lex+1][$lex]{foo} = 123: value ok 8557 - exists $vgbl[$lex+1][$lex]{foo}: no exception ok 8558 - exists $vgbl[$lex+1][$lex]{foo}: value ok 8559 - delete $vgbl[$lex+1][$lex]{foo}: no exception ok 8560 - delete $vgbl[$lex+1][$lex]{foo}: value ok 8561 - $vrlex->[$lex+1][$lex]{foo}: no exception ok 8562 - $vrlex->[$lex+1][$lex]{foo}: value ok 8563 - $vrlex->[$lex+1][$lex]{foo} = 123: no exception ok 8564 - $vrlex->[$lex+1][$lex]{foo} = 123: value ok 8565 - exists $vrlex->[$lex+1][$lex]{foo}: no exception ok 8566 - exists $vrlex->[$lex+1][$lex]{foo}: value ok 8567 - delete $vrlex->[$lex+1][$lex]{foo}: no exception ok 8568 - delete $vrlex->[$lex+1][$lex]{foo}: value ok 8569 - $vrgbl->[$lex+1][$lex]{foo}: no exception ok 8570 - $vrgbl->[$lex+1][$lex]{foo}: value ok 8571 - $vrgbl->[$lex+1][$lex]{foo} = 123: no exception ok 8572 - $vrgbl->[$lex+1][$lex]{foo} = 123: value ok 8573 - exists $vrgbl->[$lex+1][$lex]{foo}: no exception ok 8574 - exists $vrgbl->[$lex+1][$lex]{foo}: value ok 8575 - delete $vrgbl->[$lex+1][$lex]{foo}: no exception ok 8576 - delete $vrgbl->[$lex+1][$lex]{foo}: value ok 8577 - $vlex{foo}[$lex]{foo}: no exception ok 8578 - $vlex{foo}[$lex]{foo}: value ok 8579 - $vlex{foo}[$lex]{foo} = 123: no exception ok 8580 - $vlex{foo}[$lex]{foo} = 123: value ok 8581 - exists $vlex{foo}[$lex]{foo}: no exception ok 8582 - exists $vlex{foo}[$lex]{foo}: value ok 8583 - delete $vlex{foo}[$lex]{foo}: no exception ok 8584 - delete $vlex{foo}[$lex]{foo}: value ok 8585 - $vgbl{foo}[$lex]{foo}: no exception ok 8586 - $vgbl{foo}[$lex]{foo}: value ok 8587 - $vgbl{foo}[$lex]{foo} = 123: no exception ok 8588 - $vgbl{foo}[$lex]{foo} = 123: value ok 8589 - exists $vgbl{foo}[$lex]{foo}: no exception ok 8590 - exists $vgbl{foo}[$lex]{foo}: value ok 8591 - delete $vgbl{foo}[$lex]{foo}: no exception ok 8592 - delete $vgbl{foo}[$lex]{foo}: value ok 8593 - $vrlex->{foo}[$lex]{foo}: no exception ok 8594 - $vrlex->{foo}[$lex]{foo}: value ok 8595 - $vrlex->{foo}[$lex]{foo} = 123: no exception ok 8596 - $vrlex->{foo}[$lex]{foo} = 123: value ok 8597 - exists $vrlex->{foo}[$lex]{foo}: no exception ok 8598 - exists $vrlex->{foo}[$lex]{foo}: value ok 8599 - delete $vrlex->{foo}[$lex]{foo}: no exception ok 8600 - delete $vrlex->{foo}[$lex]{foo}: value ok 8601 - $vrgbl->{foo}[$lex]{foo}: no exception ok 8602 - $vrgbl->{foo}[$lex]{foo}: value ok 8603 - $vrgbl->{foo}[$lex]{foo} = 123: no exception ok 8604 - $vrgbl->{foo}[$lex]{foo} = 123: value ok 8605 - exists $vrgbl->{foo}[$lex]{foo}: no exception ok 8606 - exists $vrgbl->{foo}[$lex]{foo}: value ok 8607 - delete $vrgbl->{foo}[$lex]{foo}: no exception ok 8608 - delete $vrgbl->{foo}[$lex]{foo}: value ok 8609 - $vlex{$lex}[$lex]{foo}: no exception ok 8610 - $vlex{$lex}[$lex]{foo}: value ok 8611 - $vlex{$lex}[$lex]{foo} = 123: no exception ok 8612 - $vlex{$lex}[$lex]{foo} = 123: value ok 8613 - exists $vlex{$lex}[$lex]{foo}: no exception ok 8614 - exists $vlex{$lex}[$lex]{foo}: value ok 8615 - delete $vlex{$lex}[$lex]{foo}: no exception ok 8616 - delete $vlex{$lex}[$lex]{foo}: value ok 8617 - $vgbl{$lex}[$lex]{foo}: no exception ok 8618 - $vgbl{$lex}[$lex]{foo}: value ok 8619 - $vgbl{$lex}[$lex]{foo} = 123: no exception ok 8620 - $vgbl{$lex}[$lex]{foo} = 123: value ok 8621 - exists $vgbl{$lex}[$lex]{foo}: no exception ok 8622 - exists $vgbl{$lex}[$lex]{foo}: value ok 8623 - delete $vgbl{$lex}[$lex]{foo}: no exception ok 8624 - delete $vgbl{$lex}[$lex]{foo}: value ok 8625 - $vrlex->{$lex}[$lex]{foo}: no exception ok 8626 - $vrlex->{$lex}[$lex]{foo}: value ok 8627 - $vrlex->{$lex}[$lex]{foo} = 123: no exception ok 8628 - $vrlex->{$lex}[$lex]{foo} = 123: value ok 8629 - exists $vrlex->{$lex}[$lex]{foo}: no exception ok 8630 - exists $vrlex->{$lex}[$lex]{foo}: value ok 8631 - delete $vrlex->{$lex}[$lex]{foo}: no exception ok 8632 - delete $vrlex->{$lex}[$lex]{foo}: value ok 8633 - $vrgbl->{$lex}[$lex]{foo}: no exception ok 8634 - $vrgbl->{$lex}[$lex]{foo}: value ok 8635 - $vrgbl->{$lex}[$lex]{foo} = 123: no exception ok 8636 - $vrgbl->{$lex}[$lex]{foo} = 123: value ok 8637 - exists $vrgbl->{$lex}[$lex]{foo}: no exception ok 8638 - exists $vrgbl->{$lex}[$lex]{foo}: value ok 8639 - delete $vrgbl->{$lex}[$lex]{foo}: no exception ok 8640 - delete $vrgbl->{$lex}[$lex]{foo}: value ok 8641 - $vlex{$gbl}[$lex]{foo}: no exception ok 8642 - $vlex{$gbl}[$lex]{foo}: value ok 8643 - $vlex{$gbl}[$lex]{foo} = 123: no exception ok 8644 - $vlex{$gbl}[$lex]{foo} = 123: value ok 8645 - exists $vlex{$gbl}[$lex]{foo}: no exception ok 8646 - exists $vlex{$gbl}[$lex]{foo}: value ok 8647 - delete $vlex{$gbl}[$lex]{foo}: no exception ok 8648 - delete $vlex{$gbl}[$lex]{foo}: value ok 8649 - $vgbl{$gbl}[$lex]{foo}: no exception ok 8650 - $vgbl{$gbl}[$lex]{foo}: value ok 8651 - $vgbl{$gbl}[$lex]{foo} = 123: no exception ok 8652 - $vgbl{$gbl}[$lex]{foo} = 123: value ok 8653 - exists $vgbl{$gbl}[$lex]{foo}: no exception ok 8654 - exists $vgbl{$gbl}[$lex]{foo}: value ok 8655 - delete $vgbl{$gbl}[$lex]{foo}: no exception ok 8656 - delete $vgbl{$gbl}[$lex]{foo}: value ok 8657 - $vrlex->{$gbl}[$lex]{foo}: no exception ok 8658 - $vrlex->{$gbl}[$lex]{foo}: value ok 8659 - $vrlex->{$gbl}[$lex]{foo} = 123: no exception ok 8660 - $vrlex->{$gbl}[$lex]{foo} = 123: value ok 8661 - exists $vrlex->{$gbl}[$lex]{foo}: no exception ok 8662 - exists $vrlex->{$gbl}[$lex]{foo}: value ok 8663 - delete $vrlex->{$gbl}[$lex]{foo}: no exception ok 8664 - delete $vrlex->{$gbl}[$lex]{foo}: value ok 8665 - $vrgbl->{$gbl}[$lex]{foo}: no exception ok 8666 - $vrgbl->{$gbl}[$lex]{foo}: value ok 8667 - $vrgbl->{$gbl}[$lex]{foo} = 123: no exception ok 8668 - $vrgbl->{$gbl}[$lex]{foo} = 123: value ok 8669 - exists $vrgbl->{$gbl}[$lex]{foo}: no exception ok 8670 - exists $vrgbl->{$gbl}[$lex]{foo}: value ok 8671 - delete $vrgbl->{$gbl}[$lex]{foo}: no exception ok 8672 - delete $vrgbl->{$gbl}[$lex]{foo}: value ok 8673 - $vlex{"x$lex"}[$lex]{foo}: no exception ok 8674 - $vlex{"x$lex"}[$lex]{foo}: value ok 8675 - $vlex{"x$lex"}[$lex]{foo} = 123: no exception ok 8676 - $vlex{"x$lex"}[$lex]{foo} = 123: value ok 8677 - exists $vlex{"x$lex"}[$lex]{foo}: no exception ok 8678 - exists $vlex{"x$lex"}[$lex]{foo}: value ok 8679 - delete $vlex{"x$lex"}[$lex]{foo}: no exception ok 8680 - delete $vlex{"x$lex"}[$lex]{foo}: value ok 8681 - $vgbl{"x$lex"}[$lex]{foo}: no exception ok 8682 - $vgbl{"x$lex"}[$lex]{foo}: value ok 8683 - $vgbl{"x$lex"}[$lex]{foo} = 123: no exception ok 8684 - $vgbl{"x$lex"}[$lex]{foo} = 123: value ok 8685 - exists $vgbl{"x$lex"}[$lex]{foo}: no exception ok 8686 - exists $vgbl{"x$lex"}[$lex]{foo}: value ok 8687 - delete $vgbl{"x$lex"}[$lex]{foo}: no exception ok 8688 - delete $vgbl{"x$lex"}[$lex]{foo}: value ok 8689 - $vrlex->{"x$lex"}[$lex]{foo}: no exception ok 8690 - $vrlex->{"x$lex"}[$lex]{foo}: value ok 8691 - $vrlex->{"x$lex"}[$lex]{foo} = 123: no exception ok 8692 - $vrlex->{"x$lex"}[$lex]{foo} = 123: value ok 8693 - exists $vrlex->{"x$lex"}[$lex]{foo}: no exception ok 8694 - exists $vrlex->{"x$lex"}[$lex]{foo}: value ok 8695 - delete $vrlex->{"x$lex"}[$lex]{foo}: no exception ok 8696 - delete $vrlex->{"x$lex"}[$lex]{foo}: value ok 8697 - $vrgbl->{"x$lex"}[$lex]{foo}: no exception ok 8698 - $vrgbl->{"x$lex"}[$lex]{foo}: value ok 8699 - $vrgbl->{"x$lex"}[$lex]{foo} = 123: no exception ok 8700 - $vrgbl->{"x$lex"}[$lex]{foo} = 123: value ok 8701 - exists $vrgbl->{"x$lex"}[$lex]{foo}: no exception ok 8702 - exists $vrgbl->{"x$lex"}[$lex]{foo}: value ok 8703 - delete $vrgbl->{"x$lex"}[$lex]{foo}: no exception ok 8704 - delete $vrgbl->{"x$lex"}[$lex]{foo}: value ok 8705 - $vlex[0][$gbl]{foo}: no exception ok 8706 - $vlex[0][$gbl]{foo}: value ok 8707 - $vlex[0][$gbl]{foo} = 123: no exception ok 8708 - $vlex[0][$gbl]{foo} = 123: value ok 8709 - exists $vlex[0][$gbl]{foo}: no exception ok 8710 - exists $vlex[0][$gbl]{foo}: value ok 8711 - delete $vlex[0][$gbl]{foo}: no exception ok 8712 - delete $vlex[0][$gbl]{foo}: value ok 8713 - $vgbl[0][$gbl]{foo}: no exception ok 8714 - $vgbl[0][$gbl]{foo}: value ok 8715 - $vgbl[0][$gbl]{foo} = 123: no exception ok 8716 - $vgbl[0][$gbl]{foo} = 123: value ok 8717 - exists $vgbl[0][$gbl]{foo}: no exception ok 8718 - exists $vgbl[0][$gbl]{foo}: value ok 8719 - delete $vgbl[0][$gbl]{foo}: no exception ok 8720 - delete $vgbl[0][$gbl]{foo}: value ok 8721 - $vrlex->[0][$gbl]{foo}: no exception ok 8722 - $vrlex->[0][$gbl]{foo}: value ok 8723 - $vrlex->[0][$gbl]{foo} = 123: no exception ok 8724 - $vrlex->[0][$gbl]{foo} = 123: value ok 8725 - exists $vrlex->[0][$gbl]{foo}: no exception ok 8726 - exists $vrlex->[0][$gbl]{foo}: value ok 8727 - delete $vrlex->[0][$gbl]{foo}: no exception ok 8728 - delete $vrlex->[0][$gbl]{foo}: value ok 8729 - $vrgbl->[0][$gbl]{foo}: no exception ok 8730 - $vrgbl->[0][$gbl]{foo}: value ok 8731 - $vrgbl->[0][$gbl]{foo} = 123: no exception ok 8732 - $vrgbl->[0][$gbl]{foo} = 123: value ok 8733 - exists $vrgbl->[0][$gbl]{foo}: no exception ok 8734 - exists $vrgbl->[0][$gbl]{foo}: value ok 8735 - delete $vrgbl->[0][$gbl]{foo}: no exception ok 8736 - delete $vrgbl->[0][$gbl]{foo}: value ok 8737 - $vlex[$lex][$gbl]{foo}: no exception ok 8738 - $vlex[$lex][$gbl]{foo}: value ok 8739 - $vlex[$lex][$gbl]{foo} = 123: no exception ok 8740 - $vlex[$lex][$gbl]{foo} = 123: value ok 8741 - exists $vlex[$lex][$gbl]{foo}: no exception ok 8742 - exists $vlex[$lex][$gbl]{foo}: value ok 8743 - delete $vlex[$lex][$gbl]{foo}: no exception ok 8744 - delete $vlex[$lex][$gbl]{foo}: value ok 8745 - $vgbl[$lex][$gbl]{foo}: no exception ok 8746 - $vgbl[$lex][$gbl]{foo}: value ok 8747 - $vgbl[$lex][$gbl]{foo} = 123: no exception ok 8748 - $vgbl[$lex][$gbl]{foo} = 123: value ok 8749 - exists $vgbl[$lex][$gbl]{foo}: no exception ok 8750 - exists $vgbl[$lex][$gbl]{foo}: value ok 8751 - delete $vgbl[$lex][$gbl]{foo}: no exception ok 8752 - delete $vgbl[$lex][$gbl]{foo}: value ok 8753 - $vrlex->[$lex][$gbl]{foo}: no exception ok 8754 - $vrlex->[$lex][$gbl]{foo}: value ok 8755 - $vrlex->[$lex][$gbl]{foo} = 123: no exception ok 8756 - $vrlex->[$lex][$gbl]{foo} = 123: value ok 8757 - exists $vrlex->[$lex][$gbl]{foo}: no exception ok 8758 - exists $vrlex->[$lex][$gbl]{foo}: value ok 8759 - delete $vrlex->[$lex][$gbl]{foo}: no exception ok 8760 - delete $vrlex->[$lex][$gbl]{foo}: value ok 8761 - $vrgbl->[$lex][$gbl]{foo}: no exception ok 8762 - $vrgbl->[$lex][$gbl]{foo}: value ok 8763 - $vrgbl->[$lex][$gbl]{foo} = 123: no exception ok 8764 - $vrgbl->[$lex][$gbl]{foo} = 123: value ok 8765 - exists $vrgbl->[$lex][$gbl]{foo}: no exception ok 8766 - exists $vrgbl->[$lex][$gbl]{foo}: value ok 8767 - delete $vrgbl->[$lex][$gbl]{foo}: no exception ok 8768 - delete $vrgbl->[$lex][$gbl]{foo}: value ok 8769 - $vlex[$gbl][$gbl]{foo}: no exception ok 8770 - $vlex[$gbl][$gbl]{foo}: value ok 8771 - $vlex[$gbl][$gbl]{foo} = 123: no exception ok 8772 - $vlex[$gbl][$gbl]{foo} = 123: value ok 8773 - exists $vlex[$gbl][$gbl]{foo}: no exception ok 8774 - exists $vlex[$gbl][$gbl]{foo}: value ok 8775 - delete $vlex[$gbl][$gbl]{foo}: no exception ok 8776 - delete $vlex[$gbl][$gbl]{foo}: value ok 8777 - $vgbl[$gbl][$gbl]{foo}: no exception ok 8778 - $vgbl[$gbl][$gbl]{foo}: value ok 8779 - $vgbl[$gbl][$gbl]{foo} = 123: no exception ok 8780 - $vgbl[$gbl][$gbl]{foo} = 123: value ok 8781 - exists $vgbl[$gbl][$gbl]{foo}: no exception ok 8782 - exists $vgbl[$gbl][$gbl]{foo}: value ok 8783 - delete $vgbl[$gbl][$gbl]{foo}: no exception ok 8784 - delete $vgbl[$gbl][$gbl]{foo}: value ok 8785 - $vrlex->[$gbl][$gbl]{foo}: no exception ok 8786 - $vrlex->[$gbl][$gbl]{foo}: value ok 8787 - $vrlex->[$gbl][$gbl]{foo} = 123: no exception ok 8788 - $vrlex->[$gbl][$gbl]{foo} = 123: value ok 8789 - exists $vrlex->[$gbl][$gbl]{foo}: no exception ok 8790 - exists $vrlex->[$gbl][$gbl]{foo}: value ok 8791 - delete $vrlex->[$gbl][$gbl]{foo}: no exception ok 8792 - delete $vrlex->[$gbl][$gbl]{foo}: value ok 8793 - $vrgbl->[$gbl][$gbl]{foo}: no exception ok 8794 - $vrgbl->[$gbl][$gbl]{foo}: value ok 8795 - $vrgbl->[$gbl][$gbl]{foo} = 123: no exception ok 8796 - $vrgbl->[$gbl][$gbl]{foo} = 123: value ok 8797 - exists $vrgbl->[$gbl][$gbl]{foo}: no exception ok 8798 - exists $vrgbl->[$gbl][$gbl]{foo}: value ok 8799 - delete $vrgbl->[$gbl][$gbl]{foo}: no exception ok 8800 - delete $vrgbl->[$gbl][$gbl]{foo}: value ok 8801 - $vlex[$lex+1][$gbl]{foo}: no exception ok 8802 - $vlex[$lex+1][$gbl]{foo}: value ok 8803 - $vlex[$lex+1][$gbl]{foo} = 123: no exception ok 8804 - $vlex[$lex+1][$gbl]{foo} = 123: value ok 8805 - exists $vlex[$lex+1][$gbl]{foo}: no exception ok 8806 - exists $vlex[$lex+1][$gbl]{foo}: value ok 8807 - delete $vlex[$lex+1][$gbl]{foo}: no exception ok 8808 - delete $vlex[$lex+1][$gbl]{foo}: value ok 8809 - $vgbl[$lex+1][$gbl]{foo}: no exception ok 8810 - $vgbl[$lex+1][$gbl]{foo}: value ok 8811 - $vgbl[$lex+1][$gbl]{foo} = 123: no exception ok 8812 - $vgbl[$lex+1][$gbl]{foo} = 123: value ok 8813 - exists $vgbl[$lex+1][$gbl]{foo}: no exception ok 8814 - exists $vgbl[$lex+1][$gbl]{foo}: value ok 8815 - delete $vgbl[$lex+1][$gbl]{foo}: no exception ok 8816 - delete $vgbl[$lex+1][$gbl]{foo}: value ok 8817 - $vrlex->[$lex+1][$gbl]{foo}: no exception ok 8818 - $vrlex->[$lex+1][$gbl]{foo}: value ok 8819 - $vrlex->[$lex+1][$gbl]{foo} = 123: no exception ok 8820 - $vrlex->[$lex+1][$gbl]{foo} = 123: value ok 8821 - exists $vrlex->[$lex+1][$gbl]{foo}: no exception ok 8822 - exists $vrlex->[$lex+1][$gbl]{foo}: value ok 8823 - delete $vrlex->[$lex+1][$gbl]{foo}: no exception ok 8824 - delete $vrlex->[$lex+1][$gbl]{foo}: value ok 8825 - $vrgbl->[$lex+1][$gbl]{foo}: no exception ok 8826 - $vrgbl->[$lex+1][$gbl]{foo}: value ok 8827 - $vrgbl->[$lex+1][$gbl]{foo} = 123: no exception ok 8828 - $vrgbl->[$lex+1][$gbl]{foo} = 123: value ok 8829 - exists $vrgbl->[$lex+1][$gbl]{foo}: no exception ok 8830 - exists $vrgbl->[$lex+1][$gbl]{foo}: value ok 8831 - delete $vrgbl->[$lex+1][$gbl]{foo}: no exception ok 8832 - delete $vrgbl->[$lex+1][$gbl]{foo}: value ok 8833 - $vlex{foo}[$gbl]{foo}: no exception ok 8834 - $vlex{foo}[$gbl]{foo}: value ok 8835 - $vlex{foo}[$gbl]{foo} = 123: no exception ok 8836 - $vlex{foo}[$gbl]{foo} = 123: value ok 8837 - exists $vlex{foo}[$gbl]{foo}: no exception ok 8838 - exists $vlex{foo}[$gbl]{foo}: value ok 8839 - delete $vlex{foo}[$gbl]{foo}: no exception ok 8840 - delete $vlex{foo}[$gbl]{foo}: value ok 8841 - $vgbl{foo}[$gbl]{foo}: no exception ok 8842 - $vgbl{foo}[$gbl]{foo}: value ok 8843 - $vgbl{foo}[$gbl]{foo} = 123: no exception ok 8844 - $vgbl{foo}[$gbl]{foo} = 123: value ok 8845 - exists $vgbl{foo}[$gbl]{foo}: no exception ok 8846 - exists $vgbl{foo}[$gbl]{foo}: value ok 8847 - delete $vgbl{foo}[$gbl]{foo}: no exception ok 8848 - delete $vgbl{foo}[$gbl]{foo}: value ok 8849 - $vrlex->{foo}[$gbl]{foo}: no exception ok 8850 - $vrlex->{foo}[$gbl]{foo}: value ok 8851 - $vrlex->{foo}[$gbl]{foo} = 123: no exception ok 8852 - $vrlex->{foo}[$gbl]{foo} = 123: value ok 8853 - exists $vrlex->{foo}[$gbl]{foo}: no exception ok 8854 - exists $vrlex->{foo}[$gbl]{foo}: value ok 8855 - delete $vrlex->{foo}[$gbl]{foo}: no exception ok 8856 - delete $vrlex->{foo}[$gbl]{foo}: value ok 8857 - $vrgbl->{foo}[$gbl]{foo}: no exception ok 8858 - $vrgbl->{foo}[$gbl]{foo}: value ok 8859 - $vrgbl->{foo}[$gbl]{foo} = 123: no exception ok 8860 - $vrgbl->{foo}[$gbl]{foo} = 123: value ok 8861 - exists $vrgbl->{foo}[$gbl]{foo}: no exception ok 8862 - exists $vrgbl->{foo}[$gbl]{foo}: value ok 8863 - delete $vrgbl->{foo}[$gbl]{foo}: no exception ok 8864 - delete $vrgbl->{foo}[$gbl]{foo}: value ok 8865 - $vlex{$lex}[$gbl]{foo}: no exception ok 8866 - $vlex{$lex}[$gbl]{foo}: value ok 8867 - $vlex{$lex}[$gbl]{foo} = 123: no exception ok 8868 - $vlex{$lex}[$gbl]{foo} = 123: value ok 8869 - exists $vlex{$lex}[$gbl]{foo}: no exception ok 8870 - exists $vlex{$lex}[$gbl]{foo}: value ok 8871 - delete $vlex{$lex}[$gbl]{foo}: no exception ok 8872 - delete $vlex{$lex}[$gbl]{foo}: value ok 8873 - $vgbl{$lex}[$gbl]{foo}: no exception ok 8874 - $vgbl{$lex}[$gbl]{foo}: value ok 8875 - $vgbl{$lex}[$gbl]{foo} = 123: no exception ok 8876 - $vgbl{$lex}[$gbl]{foo} = 123: value ok 8877 - exists $vgbl{$lex}[$gbl]{foo}: no exception ok 8878 - exists $vgbl{$lex}[$gbl]{foo}: value ok 8879 - delete $vgbl{$lex}[$gbl]{foo}: no exception ok 8880 - delete $vgbl{$lex}[$gbl]{foo}: value ok 8881 - $vrlex->{$lex}[$gbl]{foo}: no exception ok 8882 - $vrlex->{$lex}[$gbl]{foo}: value ok 8883 - $vrlex->{$lex}[$gbl]{foo} = 123: no exception ok 8884 - $vrlex->{$lex}[$gbl]{foo} = 123: value ok 8885 - exists $vrlex->{$lex}[$gbl]{foo}: no exception ok 8886 - exists $vrlex->{$lex}[$gbl]{foo}: value ok 8887 - delete $vrlex->{$lex}[$gbl]{foo}: no exception ok 8888 - delete $vrlex->{$lex}[$gbl]{foo}: value ok 8889 - $vrgbl->{$lex}[$gbl]{foo}: no exception ok 8890 - $vrgbl->{$lex}[$gbl]{foo}: value ok 8891 - $vrgbl->{$lex}[$gbl]{foo} = 123: no exception ok 8892 - $vrgbl->{$lex}[$gbl]{foo} = 123: value ok 8893 - exists $vrgbl->{$lex}[$gbl]{foo}: no exception ok 8894 - exists $vrgbl->{$lex}[$gbl]{foo}: value ok 8895 - delete $vrgbl->{$lex}[$gbl]{foo}: no exception ok 8896 - delete $vrgbl->{$lex}[$gbl]{foo}: value ok 8897 - $vlex{$gbl}[$gbl]{foo}: no exception ok 8898 - $vlex{$gbl}[$gbl]{foo}: value ok 8899 - $vlex{$gbl}[$gbl]{foo} = 123: no exception ok 8900 - $vlex{$gbl}[$gbl]{foo} = 123: value ok 8901 - exists $vlex{$gbl}[$gbl]{foo}: no exception ok 8902 - exists $vlex{$gbl}[$gbl]{foo}: value ok 8903 - delete $vlex{$gbl}[$gbl]{foo}: no exception ok 8904 - delete $vlex{$gbl}[$gbl]{foo}: value ok 8905 - $vgbl{$gbl}[$gbl]{foo}: no exception ok 8906 - $vgbl{$gbl}[$gbl]{foo}: value ok 8907 - $vgbl{$gbl}[$gbl]{foo} = 123: no exception ok 8908 - $vgbl{$gbl}[$gbl]{foo} = 123: value ok 8909 - exists $vgbl{$gbl}[$gbl]{foo}: no exception ok 8910 - exists $vgbl{$gbl}[$gbl]{foo}: value ok 8911 - delete $vgbl{$gbl}[$gbl]{foo}: no exception ok 8912 - delete $vgbl{$gbl}[$gbl]{foo}: value ok 8913 - $vrlex->{$gbl}[$gbl]{foo}: no exception ok 8914 - $vrlex->{$gbl}[$gbl]{foo}: value ok 8915 - $vrlex->{$gbl}[$gbl]{foo} = 123: no exception ok 8916 - $vrlex->{$gbl}[$gbl]{foo} = 123: value ok 8917 - exists $vrlex->{$gbl}[$gbl]{foo}: no exception ok 8918 - exists $vrlex->{$gbl}[$gbl]{foo}: value ok 8919 - delete $vrlex->{$gbl}[$gbl]{foo}: no exception ok 8920 - delete $vrlex->{$gbl}[$gbl]{foo}: value ok 8921 - $vrgbl->{$gbl}[$gbl]{foo}: no exception ok 8922 - $vrgbl->{$gbl}[$gbl]{foo}: value ok 8923 - $vrgbl->{$gbl}[$gbl]{foo} = 123: no exception ok 8924 - $vrgbl->{$gbl}[$gbl]{foo} = 123: value ok 8925 - exists $vrgbl->{$gbl}[$gbl]{foo}: no exception ok 8926 - exists $vrgbl->{$gbl}[$gbl]{foo}: value ok 8927 - delete $vrgbl->{$gbl}[$gbl]{foo}: no exception ok 8928 - delete $vrgbl->{$gbl}[$gbl]{foo}: value ok 8929 - $vlex{"x$lex"}[$gbl]{foo}: no exception ok 8930 - $vlex{"x$lex"}[$gbl]{foo}: value ok 8931 - $vlex{"x$lex"}[$gbl]{foo} = 123: no exception ok 8932 - $vlex{"x$lex"}[$gbl]{foo} = 123: value ok 8933 - exists $vlex{"x$lex"}[$gbl]{foo}: no exception ok 8934 - exists $vlex{"x$lex"}[$gbl]{foo}: value ok 8935 - delete $vlex{"x$lex"}[$gbl]{foo}: no exception ok 8936 - delete $vlex{"x$lex"}[$gbl]{foo}: value ok 8937 - $vgbl{"x$lex"}[$gbl]{foo}: no exception ok 8938 - $vgbl{"x$lex"}[$gbl]{foo}: value ok 8939 - $vgbl{"x$lex"}[$gbl]{foo} = 123: no exception ok 8940 - $vgbl{"x$lex"}[$gbl]{foo} = 123: value ok 8941 - exists $vgbl{"x$lex"}[$gbl]{foo}: no exception ok 8942 - exists $vgbl{"x$lex"}[$gbl]{foo}: value ok 8943 - delete $vgbl{"x$lex"}[$gbl]{foo}: no exception ok 8944 - delete $vgbl{"x$lex"}[$gbl]{foo}: value ok 8945 - $vrlex->{"x$lex"}[$gbl]{foo}: no exception ok 8946 - $vrlex->{"x$lex"}[$gbl]{foo}: value ok 8947 - $vrlex->{"x$lex"}[$gbl]{foo} = 123: no exception ok 8948 - $vrlex->{"x$lex"}[$gbl]{foo} = 123: value ok 8949 - exists $vrlex->{"x$lex"}[$gbl]{foo}: no exception ok 8950 - exists $vrlex->{"x$lex"}[$gbl]{foo}: value ok 8951 - delete $vrlex->{"x$lex"}[$gbl]{foo}: no exception ok 8952 - delete $vrlex->{"x$lex"}[$gbl]{foo}: value ok 8953 - $vrgbl->{"x$lex"}[$gbl]{foo}: no exception ok 8954 - $vrgbl->{"x$lex"}[$gbl]{foo}: value ok 8955 - $vrgbl->{"x$lex"}[$gbl]{foo} = 123: no exception ok 8956 - $vrgbl->{"x$lex"}[$gbl]{foo} = 123: value ok 8957 - exists $vrgbl->{"x$lex"}[$gbl]{foo}: no exception ok 8958 - exists $vrgbl->{"x$lex"}[$gbl]{foo}: value ok 8959 - delete $vrgbl->{"x$lex"}[$gbl]{foo}: no exception ok 8960 - delete $vrgbl->{"x$lex"}[$gbl]{foo}: value ok 8961 - $vlex[0][$lex+1]{foo}: no exception ok 8962 - $vlex[0][$lex+1]{foo}: value ok 8963 - $vlex[0][$lex+1]{foo} = 123: no exception ok 8964 - $vlex[0][$lex+1]{foo} = 123: value ok 8965 - exists $vlex[0][$lex+1]{foo}: no exception ok 8966 - exists $vlex[0][$lex+1]{foo}: value ok 8967 - delete $vlex[0][$lex+1]{foo}: no exception ok 8968 - delete $vlex[0][$lex+1]{foo}: value ok 8969 - $vgbl[0][$lex+1]{foo}: no exception ok 8970 - $vgbl[0][$lex+1]{foo}: value ok 8971 - $vgbl[0][$lex+1]{foo} = 123: no exception ok 8972 - $vgbl[0][$lex+1]{foo} = 123: value ok 8973 - exists $vgbl[0][$lex+1]{foo}: no exception ok 8974 - exists $vgbl[0][$lex+1]{foo}: value ok 8975 - delete $vgbl[0][$lex+1]{foo}: no exception ok 8976 - delete $vgbl[0][$lex+1]{foo}: value ok 8977 - $vrlex->[0][$lex+1]{foo}: no exception ok 8978 - $vrlex->[0][$lex+1]{foo}: value ok 8979 - $vrlex->[0][$lex+1]{foo} = 123: no exception ok 8980 - $vrlex->[0][$lex+1]{foo} = 123: value ok 8981 - exists $vrlex->[0][$lex+1]{foo}: no exception ok 8982 - exists $vrlex->[0][$lex+1]{foo}: value ok 8983 - delete $vrlex->[0][$lex+1]{foo}: no exception ok 8984 - delete $vrlex->[0][$lex+1]{foo}: value ok 8985 - $vrgbl->[0][$lex+1]{foo}: no exception ok 8986 - $vrgbl->[0][$lex+1]{foo}: value ok 8987 - $vrgbl->[0][$lex+1]{foo} = 123: no exception ok 8988 - $vrgbl->[0][$lex+1]{foo} = 123: value ok 8989 - exists $vrgbl->[0][$lex+1]{foo}: no exception ok 8990 - exists $vrgbl->[0][$lex+1]{foo}: value ok 8991 - delete $vrgbl->[0][$lex+1]{foo}: no exception ok 8992 - delete $vrgbl->[0][$lex+1]{foo}: value ok 8993 - $vlex[$lex][$lex+1]{foo}: no exception ok 8994 - $vlex[$lex][$lex+1]{foo}: value ok 8995 - $vlex[$lex][$lex+1]{foo} = 123: no exception ok 8996 - $vlex[$lex][$lex+1]{foo} = 123: value ok 8997 - exists $vlex[$lex][$lex+1]{foo}: no exception ok 8998 - exists $vlex[$lex][$lex+1]{foo}: value ok 8999 - delete $vlex[$lex][$lex+1]{foo}: no exception ok 9000 - delete $vlex[$lex][$lex+1]{foo}: value ok 9001 - $vgbl[$lex][$lex+1]{foo}: no exception ok 9002 - $vgbl[$lex][$lex+1]{foo}: value ok 9003 - $vgbl[$lex][$lex+1]{foo} = 123: no exception ok 9004 - $vgbl[$lex][$lex+1]{foo} = 123: value ok 9005 - exists $vgbl[$lex][$lex+1]{foo}: no exception ok 9006 - exists $vgbl[$lex][$lex+1]{foo}: value ok 9007 - delete $vgbl[$lex][$lex+1]{foo}: no exception ok 9008 - delete $vgbl[$lex][$lex+1]{foo}: value ok 9009 - $vrlex->[$lex][$lex+1]{foo}: no exception ok 9010 - $vrlex->[$lex][$lex+1]{foo}: value ok 9011 - $vrlex->[$lex][$lex+1]{foo} = 123: no exception ok 9012 - $vrlex->[$lex][$lex+1]{foo} = 123: value ok 9013 - exists $vrlex->[$lex][$lex+1]{foo}: no exception ok 9014 - exists $vrlex->[$lex][$lex+1]{foo}: value ok 9015 - delete $vrlex->[$lex][$lex+1]{foo}: no exception ok 9016 - delete $vrlex->[$lex][$lex+1]{foo}: value ok 9017 - $vrgbl->[$lex][$lex+1]{foo}: no exception ok 9018 - $vrgbl->[$lex][$lex+1]{foo}: value ok 9019 - $vrgbl->[$lex][$lex+1]{foo} = 123: no exception ok 9020 - $vrgbl->[$lex][$lex+1]{foo} = 123: value ok 9021 - exists $vrgbl->[$lex][$lex+1]{foo}: no exception ok 9022 - exists $vrgbl->[$lex][$lex+1]{foo}: value ok 9023 - delete $vrgbl->[$lex][$lex+1]{foo}: no exception ok 9024 - delete $vrgbl->[$lex][$lex+1]{foo}: value ok 9025 - $vlex[$gbl][$lex+1]{foo}: no exception ok 9026 - $vlex[$gbl][$lex+1]{foo}: value ok 9027 - $vlex[$gbl][$lex+1]{foo} = 123: no exception ok 9028 - $vlex[$gbl][$lex+1]{foo} = 123: value ok 9029 - exists $vlex[$gbl][$lex+1]{foo}: no exception ok 9030 - exists $vlex[$gbl][$lex+1]{foo}: value ok 9031 - delete $vlex[$gbl][$lex+1]{foo}: no exception ok 9032 - delete $vlex[$gbl][$lex+1]{foo}: value ok 9033 - $vgbl[$gbl][$lex+1]{foo}: no exception ok 9034 - $vgbl[$gbl][$lex+1]{foo}: value ok 9035 - $vgbl[$gbl][$lex+1]{foo} = 123: no exception ok 9036 - $vgbl[$gbl][$lex+1]{foo} = 123: value ok 9037 - exists $vgbl[$gbl][$lex+1]{foo}: no exception ok 9038 - exists $vgbl[$gbl][$lex+1]{foo}: value ok 9039 - delete $vgbl[$gbl][$lex+1]{foo}: no exception ok 9040 - delete $vgbl[$gbl][$lex+1]{foo}: value ok 9041 - $vrlex->[$gbl][$lex+1]{foo}: no exception ok 9042 - $vrlex->[$gbl][$lex+1]{foo}: value ok 9043 - $vrlex->[$gbl][$lex+1]{foo} = 123: no exception ok 9044 - $vrlex->[$gbl][$lex+1]{foo} = 123: value ok 9045 - exists $vrlex->[$gbl][$lex+1]{foo}: no exception ok 9046 - exists $vrlex->[$gbl][$lex+1]{foo}: value ok 9047 - delete $vrlex->[$gbl][$lex+1]{foo}: no exception ok 9048 - delete $vrlex->[$gbl][$lex+1]{foo}: value ok 9049 - $vrgbl->[$gbl][$lex+1]{foo}: no exception ok 9050 - $vrgbl->[$gbl][$lex+1]{foo}: value ok 9051 - $vrgbl->[$gbl][$lex+1]{foo} = 123: no exception ok 9052 - $vrgbl->[$gbl][$lex+1]{foo} = 123: value ok 9053 - exists $vrgbl->[$gbl][$lex+1]{foo}: no exception ok 9054 - exists $vrgbl->[$gbl][$lex+1]{foo}: value ok 9055 - delete $vrgbl->[$gbl][$lex+1]{foo}: no exception ok 9056 - delete $vrgbl->[$gbl][$lex+1]{foo}: value ok 9057 - $vlex[$lex+1][$lex+1]{foo}: no exception ok 9058 - $vlex[$lex+1][$lex+1]{foo}: value ok 9059 - $vlex[$lex+1][$lex+1]{foo} = 123: no exception ok 9060 - $vlex[$lex+1][$lex+1]{foo} = 123: value ok 9061 - exists $vlex[$lex+1][$lex+1]{foo}: no exception ok 9062 - exists $vlex[$lex+1][$lex+1]{foo}: value ok 9063 - delete $vlex[$lex+1][$lex+1]{foo}: no exception ok 9064 - delete $vlex[$lex+1][$lex+1]{foo}: value ok 9065 - $vgbl[$lex+1][$lex+1]{foo}: no exception ok 9066 - $vgbl[$lex+1][$lex+1]{foo}: value ok 9067 - $vgbl[$lex+1][$lex+1]{foo} = 123: no exception ok 9068 - $vgbl[$lex+1][$lex+1]{foo} = 123: value ok 9069 - exists $vgbl[$lex+1][$lex+1]{foo}: no exception ok 9070 - exists $vgbl[$lex+1][$lex+1]{foo}: value ok 9071 - delete $vgbl[$lex+1][$lex+1]{foo}: no exception ok 9072 - delete $vgbl[$lex+1][$lex+1]{foo}: value ok 9073 - $vrlex->[$lex+1][$lex+1]{foo}: no exception ok 9074 - $vrlex->[$lex+1][$lex+1]{foo}: value ok 9075 - $vrlex->[$lex+1][$lex+1]{foo} = 123: no exception ok 9076 - $vrlex->[$lex+1][$lex+1]{foo} = 123: value ok 9077 - exists $vrlex->[$lex+1][$lex+1]{foo}: no exception ok 9078 - exists $vrlex->[$lex+1][$lex+1]{foo}: value ok 9079 - delete $vrlex->[$lex+1][$lex+1]{foo}: no exception ok 9080 - delete $vrlex->[$lex+1][$lex+1]{foo}: value ok 9081 - $vrgbl->[$lex+1][$lex+1]{foo}: no exception ok 9082 - $vrgbl->[$lex+1][$lex+1]{foo}: value ok 9083 - $vrgbl->[$lex+1][$lex+1]{foo} = 123: no exception ok 9084 - $vrgbl->[$lex+1][$lex+1]{foo} = 123: value ok 9085 - exists $vrgbl->[$lex+1][$lex+1]{foo}: no exception ok 9086 - exists $vrgbl->[$lex+1][$lex+1]{foo}: value ok 9087 - delete $vrgbl->[$lex+1][$lex+1]{foo}: no exception ok 9088 - delete $vrgbl->[$lex+1][$lex+1]{foo}: value ok 9089 - $vlex{foo}[$lex+1]{foo}: no exception ok 9090 - $vlex{foo}[$lex+1]{foo}: value ok 9091 - $vlex{foo}[$lex+1]{foo} = 123: no exception ok 9092 - $vlex{foo}[$lex+1]{foo} = 123: value ok 9093 - exists $vlex{foo}[$lex+1]{foo}: no exception ok 9094 - exists $vlex{foo}[$lex+1]{foo}: value ok 9095 - delete $vlex{foo}[$lex+1]{foo}: no exception ok 9096 - delete $vlex{foo}[$lex+1]{foo}: value ok 9097 - $vgbl{foo}[$lex+1]{foo}: no exception ok 9098 - $vgbl{foo}[$lex+1]{foo}: value ok 9099 - $vgbl{foo}[$lex+1]{foo} = 123: no exception ok 9100 - $vgbl{foo}[$lex+1]{foo} = 123: value ok 9101 - exists $vgbl{foo}[$lex+1]{foo}: no exception ok 9102 - exists $vgbl{foo}[$lex+1]{foo}: value ok 9103 - delete $vgbl{foo}[$lex+1]{foo}: no exception ok 9104 - delete $vgbl{foo}[$lex+1]{foo}: value ok 9105 - $vrlex->{foo}[$lex+1]{foo}: no exception ok 9106 - $vrlex->{foo}[$lex+1]{foo}: value ok 9107 - $vrlex->{foo}[$lex+1]{foo} = 123: no exception ok 9108 - $vrlex->{foo}[$lex+1]{foo} = 123: value ok 9109 - exists $vrlex->{foo}[$lex+1]{foo}: no exception ok 9110 - exists $vrlex->{foo}[$lex+1]{foo}: value ok 9111 - delete $vrlex->{foo}[$lex+1]{foo}: no exception ok 9112 - delete $vrlex->{foo}[$lex+1]{foo}: value ok 9113 - $vrgbl->{foo}[$lex+1]{foo}: no exception ok 9114 - $vrgbl->{foo}[$lex+1]{foo}: value ok 9115 - $vrgbl->{foo}[$lex+1]{foo} = 123: no exception ok 9116 - $vrgbl->{foo}[$lex+1]{foo} = 123: value ok 9117 - exists $vrgbl->{foo}[$lex+1]{foo}: no exception ok 9118 - exists $vrgbl->{foo}[$lex+1]{foo}: value ok 9119 - delete $vrgbl->{foo}[$lex+1]{foo}: no exception ok 9120 - delete $vrgbl->{foo}[$lex+1]{foo}: value ok 9121 - $vlex{$lex}[$lex+1]{foo}: no exception ok 9122 - $vlex{$lex}[$lex+1]{foo}: value ok 9123 - $vlex{$lex}[$lex+1]{foo} = 123: no exception ok 9124 - $vlex{$lex}[$lex+1]{foo} = 123: value ok 9125 - exists $vlex{$lex}[$lex+1]{foo}: no exception ok 9126 - exists $vlex{$lex}[$lex+1]{foo}: value ok 9127 - delete $vlex{$lex}[$lex+1]{foo}: no exception ok 9128 - delete $vlex{$lex}[$lex+1]{foo}: value ok 9129 - $vgbl{$lex}[$lex+1]{foo}: no exception ok 9130 - $vgbl{$lex}[$lex+1]{foo}: value ok 9131 - $vgbl{$lex}[$lex+1]{foo} = 123: no exception ok 9132 - $vgbl{$lex}[$lex+1]{foo} = 123: value ok 9133 - exists $vgbl{$lex}[$lex+1]{foo}: no exception ok 9134 - exists $vgbl{$lex}[$lex+1]{foo}: value ok 9135 - delete $vgbl{$lex}[$lex+1]{foo}: no exception ok 9136 - delete $vgbl{$lex}[$lex+1]{foo}: value ok 9137 - $vrlex->{$lex}[$lex+1]{foo}: no exception ok 9138 - $vrlex->{$lex}[$lex+1]{foo}: value ok 9139 - $vrlex->{$lex}[$lex+1]{foo} = 123: no exception ok 9140 - $vrlex->{$lex}[$lex+1]{foo} = 123: value ok 9141 - exists $vrlex->{$lex}[$lex+1]{foo}: no exception ok 9142 - exists $vrlex->{$lex}[$lex+1]{foo}: value ok 9143 - delete $vrlex->{$lex}[$lex+1]{foo}: no exception ok 9144 - delete $vrlex->{$lex}[$lex+1]{foo}: value ok 9145 - $vrgbl->{$lex}[$lex+1]{foo}: no exception ok 9146 - $vrgbl->{$lex}[$lex+1]{foo}: value ok 9147 - $vrgbl->{$lex}[$lex+1]{foo} = 123: no exception ok 9148 - $vrgbl->{$lex}[$lex+1]{foo} = 123: value ok 9149 - exists $vrgbl->{$lex}[$lex+1]{foo}: no exception ok 9150 - exists $vrgbl->{$lex}[$lex+1]{foo}: value ok 9151 - delete $vrgbl->{$lex}[$lex+1]{foo}: no exception ok 9152 - delete $vrgbl->{$lex}[$lex+1]{foo}: value ok 9153 - $vlex{$gbl}[$lex+1]{foo}: no exception ok 9154 - $vlex{$gbl}[$lex+1]{foo}: value ok 9155 - $vlex{$gbl}[$lex+1]{foo} = 123: no exception ok 9156 - $vlex{$gbl}[$lex+1]{foo} = 123: value ok 9157 - exists $vlex{$gbl}[$lex+1]{foo}: no exception ok 9158 - exists $vlex{$gbl}[$lex+1]{foo}: value ok 9159 - delete $vlex{$gbl}[$lex+1]{foo}: no exception ok 9160 - delete $vlex{$gbl}[$lex+1]{foo}: value ok 9161 - $vgbl{$gbl}[$lex+1]{foo}: no exception ok 9162 - $vgbl{$gbl}[$lex+1]{foo}: value ok 9163 - $vgbl{$gbl}[$lex+1]{foo} = 123: no exception ok 9164 - $vgbl{$gbl}[$lex+1]{foo} = 123: value ok 9165 - exists $vgbl{$gbl}[$lex+1]{foo}: no exception ok 9166 - exists $vgbl{$gbl}[$lex+1]{foo}: value ok 9167 - delete $vgbl{$gbl}[$lex+1]{foo}: no exception ok 9168 - delete $vgbl{$gbl}[$lex+1]{foo}: value ok 9169 - $vrlex->{$gbl}[$lex+1]{foo}: no exception ok 9170 - $vrlex->{$gbl}[$lex+1]{foo}: value ok 9171 - $vrlex->{$gbl}[$lex+1]{foo} = 123: no exception ok 9172 - $vrlex->{$gbl}[$lex+1]{foo} = 123: value ok 9173 - exists $vrlex->{$gbl}[$lex+1]{foo}: no exception ok 9174 - exists $vrlex->{$gbl}[$lex+1]{foo}: value ok 9175 - delete $vrlex->{$gbl}[$lex+1]{foo}: no exception ok 9176 - delete $vrlex->{$gbl}[$lex+1]{foo}: value ok 9177 - $vrgbl->{$gbl}[$lex+1]{foo}: no exception ok 9178 - $vrgbl->{$gbl}[$lex+1]{foo}: value ok 9179 - $vrgbl->{$gbl}[$lex+1]{foo} = 123: no exception ok 9180 - $vrgbl->{$gbl}[$lex+1]{foo} = 123: value ok 9181 - exists $vrgbl->{$gbl}[$lex+1]{foo}: no exception ok 9182 - exists $vrgbl->{$gbl}[$lex+1]{foo}: value ok 9183 - delete $vrgbl->{$gbl}[$lex+1]{foo}: no exception ok 9184 - delete $vrgbl->{$gbl}[$lex+1]{foo}: value ok 9185 - $vlex{"x$lex"}[$lex+1]{foo}: no exception ok 9186 - $vlex{"x$lex"}[$lex+1]{foo}: value ok 9187 - $vlex{"x$lex"}[$lex+1]{foo} = 123: no exception ok 9188 - $vlex{"x$lex"}[$lex+1]{foo} = 123: value ok 9189 - exists $vlex{"x$lex"}[$lex+1]{foo}: no exception ok 9190 - exists $vlex{"x$lex"}[$lex+1]{foo}: value ok 9191 - delete $vlex{"x$lex"}[$lex+1]{foo}: no exception ok 9192 - delete $vlex{"x$lex"}[$lex+1]{foo}: value ok 9193 - $vgbl{"x$lex"}[$lex+1]{foo}: no exception ok 9194 - $vgbl{"x$lex"}[$lex+1]{foo}: value ok 9195 - $vgbl{"x$lex"}[$lex+1]{foo} = 123: no exception ok 9196 - $vgbl{"x$lex"}[$lex+1]{foo} = 123: value ok 9197 - exists $vgbl{"x$lex"}[$lex+1]{foo}: no exception ok 9198 - exists $vgbl{"x$lex"}[$lex+1]{foo}: value ok 9199 - delete $vgbl{"x$lex"}[$lex+1]{foo}: no exception ok 9200 - delete $vgbl{"x$lex"}[$lex+1]{foo}: value ok 9201 - $vrlex->{"x$lex"}[$lex+1]{foo}: no exception ok 9202 - $vrlex->{"x$lex"}[$lex+1]{foo}: value ok 9203 - $vrlex->{"x$lex"}[$lex+1]{foo} = 123: no exception ok 9204 - $vrlex->{"x$lex"}[$lex+1]{foo} = 123: value ok 9205 - exists $vrlex->{"x$lex"}[$lex+1]{foo}: no exception ok 9206 - exists $vrlex->{"x$lex"}[$lex+1]{foo}: value ok 9207 - delete $vrlex->{"x$lex"}[$lex+1]{foo}: no exception ok 9208 - delete $vrlex->{"x$lex"}[$lex+1]{foo}: value ok 9209 - $vrgbl->{"x$lex"}[$lex+1]{foo}: no exception ok 9210 - $vrgbl->{"x$lex"}[$lex+1]{foo}: value ok 9211 - $vrgbl->{"x$lex"}[$lex+1]{foo} = 123: no exception ok 9212 - $vrgbl->{"x$lex"}[$lex+1]{foo} = 123: value ok 9213 - exists $vrgbl->{"x$lex"}[$lex+1]{foo}: no exception ok 9214 - exists $vrgbl->{"x$lex"}[$lex+1]{foo}: value ok 9215 - delete $vrgbl->{"x$lex"}[$lex+1]{foo}: no exception ok 9216 - delete $vrgbl->{"x$lex"}[$lex+1]{foo}: value ok 9217 - $vlex[0]{foo}{foo}: no exception ok 9218 - $vlex[0]{foo}{foo}: value ok 9219 - $vlex[0]{foo}{foo} = 123: no exception ok 9220 - $vlex[0]{foo}{foo} = 123: value ok 9221 - exists $vlex[0]{foo}{foo}: no exception ok 9222 - exists $vlex[0]{foo}{foo}: value ok 9223 - delete $vlex[0]{foo}{foo}: no exception ok 9224 - delete $vlex[0]{foo}{foo}: value ok 9225 - $vgbl[0]{foo}{foo}: no exception ok 9226 - $vgbl[0]{foo}{foo}: value ok 9227 - $vgbl[0]{foo}{foo} = 123: no exception ok 9228 - $vgbl[0]{foo}{foo} = 123: value ok 9229 - exists $vgbl[0]{foo}{foo}: no exception ok 9230 - exists $vgbl[0]{foo}{foo}: value ok 9231 - delete $vgbl[0]{foo}{foo}: no exception ok 9232 - delete $vgbl[0]{foo}{foo}: value ok 9233 - $vrlex->[0]{foo}{foo}: no exception ok 9234 - $vrlex->[0]{foo}{foo}: value ok 9235 - $vrlex->[0]{foo}{foo} = 123: no exception ok 9236 - $vrlex->[0]{foo}{foo} = 123: value ok 9237 - exists $vrlex->[0]{foo}{foo}: no exception ok 9238 - exists $vrlex->[0]{foo}{foo}: value ok 9239 - delete $vrlex->[0]{foo}{foo}: no exception ok 9240 - delete $vrlex->[0]{foo}{foo}: value ok 9241 - $vrgbl->[0]{foo}{foo}: no exception ok 9242 - $vrgbl->[0]{foo}{foo}: value ok 9243 - $vrgbl->[0]{foo}{foo} = 123: no exception ok 9244 - $vrgbl->[0]{foo}{foo} = 123: value ok 9245 - exists $vrgbl->[0]{foo}{foo}: no exception ok 9246 - exists $vrgbl->[0]{foo}{foo}: value ok 9247 - delete $vrgbl->[0]{foo}{foo}: no exception ok 9248 - delete $vrgbl->[0]{foo}{foo}: value ok 9249 - $vlex[$lex]{foo}{foo}: no exception ok 9250 - $vlex[$lex]{foo}{foo}: value ok 9251 - $vlex[$lex]{foo}{foo} = 123: no exception ok 9252 - $vlex[$lex]{foo}{foo} = 123: value ok 9253 - exists $vlex[$lex]{foo}{foo}: no exception ok 9254 - exists $vlex[$lex]{foo}{foo}: value ok 9255 - delete $vlex[$lex]{foo}{foo}: no exception ok 9256 - delete $vlex[$lex]{foo}{foo}: value ok 9257 - $vgbl[$lex]{foo}{foo}: no exception ok 9258 - $vgbl[$lex]{foo}{foo}: value ok 9259 - $vgbl[$lex]{foo}{foo} = 123: no exception ok 9260 - $vgbl[$lex]{foo}{foo} = 123: value ok 9261 - exists $vgbl[$lex]{foo}{foo}: no exception ok 9262 - exists $vgbl[$lex]{foo}{foo}: value ok 9263 - delete $vgbl[$lex]{foo}{foo}: no exception ok 9264 - delete $vgbl[$lex]{foo}{foo}: value ok 9265 - $vrlex->[$lex]{foo}{foo}: no exception ok 9266 - $vrlex->[$lex]{foo}{foo}: value ok 9267 - $vrlex->[$lex]{foo}{foo} = 123: no exception ok 9268 - $vrlex->[$lex]{foo}{foo} = 123: value ok 9269 - exists $vrlex->[$lex]{foo}{foo}: no exception ok 9270 - exists $vrlex->[$lex]{foo}{foo}: value ok 9271 - delete $vrlex->[$lex]{foo}{foo}: no exception ok 9272 - delete $vrlex->[$lex]{foo}{foo}: value ok 9273 - $vrgbl->[$lex]{foo}{foo}: no exception ok 9274 - $vrgbl->[$lex]{foo}{foo}: value ok 9275 - $vrgbl->[$lex]{foo}{foo} = 123: no exception ok 9276 - $vrgbl->[$lex]{foo}{foo} = 123: value ok 9277 - exists $vrgbl->[$lex]{foo}{foo}: no exception ok 9278 - exists $vrgbl->[$lex]{foo}{foo}: value ok 9279 - delete $vrgbl->[$lex]{foo}{foo}: no exception ok 9280 - delete $vrgbl->[$lex]{foo}{foo}: value ok 9281 - $vlex[$gbl]{foo}{foo}: no exception ok 9282 - $vlex[$gbl]{foo}{foo}: value ok 9283 - $vlex[$gbl]{foo}{foo} = 123: no exception ok 9284 - $vlex[$gbl]{foo}{foo} = 123: value ok 9285 - exists $vlex[$gbl]{foo}{foo}: no exception ok 9286 - exists $vlex[$gbl]{foo}{foo}: value ok 9287 - delete $vlex[$gbl]{foo}{foo}: no exception ok 9288 - delete $vlex[$gbl]{foo}{foo}: value ok 9289 - $vgbl[$gbl]{foo}{foo}: no exception ok 9290 - $vgbl[$gbl]{foo}{foo}: value ok 9291 - $vgbl[$gbl]{foo}{foo} = 123: no exception ok 9292 - $vgbl[$gbl]{foo}{foo} = 123: value ok 9293 - exists $vgbl[$gbl]{foo}{foo}: no exception ok 9294 - exists $vgbl[$gbl]{foo}{foo}: value ok 9295 - delete $vgbl[$gbl]{foo}{foo}: no exception ok 9296 - delete $vgbl[$gbl]{foo}{foo}: value ok 9297 - $vrlex->[$gbl]{foo}{foo}: no exception ok 9298 - $vrlex->[$gbl]{foo}{foo}: value ok 9299 - $vrlex->[$gbl]{foo}{foo} = 123: no exception ok 9300 - $vrlex->[$gbl]{foo}{foo} = 123: value ok 9301 - exists $vrlex->[$gbl]{foo}{foo}: no exception ok 9302 - exists $vrlex->[$gbl]{foo}{foo}: value ok 9303 - delete $vrlex->[$gbl]{foo}{foo}: no exception ok 9304 - delete $vrlex->[$gbl]{foo}{foo}: value ok 9305 - $vrgbl->[$gbl]{foo}{foo}: no exception ok 9306 - $vrgbl->[$gbl]{foo}{foo}: value ok 9307 - $vrgbl->[$gbl]{foo}{foo} = 123: no exception ok 9308 - $vrgbl->[$gbl]{foo}{foo} = 123: value ok 9309 - exists $vrgbl->[$gbl]{foo}{foo}: no exception ok 9310 - exists $vrgbl->[$gbl]{foo}{foo}: value ok 9311 - delete $vrgbl->[$gbl]{foo}{foo}: no exception ok 9312 - delete $vrgbl->[$gbl]{foo}{foo}: value ok 9313 - $vlex[$lex+1]{foo}{foo}: no exception ok 9314 - $vlex[$lex+1]{foo}{foo}: value ok 9315 - $vlex[$lex+1]{foo}{foo} = 123: no exception ok 9316 - $vlex[$lex+1]{foo}{foo} = 123: value ok 9317 - exists $vlex[$lex+1]{foo}{foo}: no exception ok 9318 - exists $vlex[$lex+1]{foo}{foo}: value ok 9319 - delete $vlex[$lex+1]{foo}{foo}: no exception ok 9320 - delete $vlex[$lex+1]{foo}{foo}: value ok 9321 - $vgbl[$lex+1]{foo}{foo}: no exception ok 9322 - $vgbl[$lex+1]{foo}{foo}: value ok 9323 - $vgbl[$lex+1]{foo}{foo} = 123: no exception ok 9324 - $vgbl[$lex+1]{foo}{foo} = 123: value ok 9325 - exists $vgbl[$lex+1]{foo}{foo}: no exception ok 9326 - exists $vgbl[$lex+1]{foo}{foo}: value ok 9327 - delete $vgbl[$lex+1]{foo}{foo}: no exception ok 9328 - delete $vgbl[$lex+1]{foo}{foo}: value ok 9329 - $vrlex->[$lex+1]{foo}{foo}: no exception ok 9330 - $vrlex->[$lex+1]{foo}{foo}: value ok 9331 - $vrlex->[$lex+1]{foo}{foo} = 123: no exception ok 9332 - $vrlex->[$lex+1]{foo}{foo} = 123: value ok 9333 - exists $vrlex->[$lex+1]{foo}{foo}: no exception ok 9334 - exists $vrlex->[$lex+1]{foo}{foo}: value ok 9335 - delete $vrlex->[$lex+1]{foo}{foo}: no exception ok 9336 - delete $vrlex->[$lex+1]{foo}{foo}: value ok 9337 - $vrgbl->[$lex+1]{foo}{foo}: no exception ok 9338 - $vrgbl->[$lex+1]{foo}{foo}: value ok 9339 - $vrgbl->[$lex+1]{foo}{foo} = 123: no exception ok 9340 - $vrgbl->[$lex+1]{foo}{foo} = 123: value ok 9341 - exists $vrgbl->[$lex+1]{foo}{foo}: no exception ok 9342 - exists $vrgbl->[$lex+1]{foo}{foo}: value ok 9343 - delete $vrgbl->[$lex+1]{foo}{foo}: no exception ok 9344 - delete $vrgbl->[$lex+1]{foo}{foo}: value ok 9345 - $vlex{foo}{foo}{foo}: no exception ok 9346 - $vlex{foo}{foo}{foo}: value ok 9347 - $vlex{foo}{foo}{foo} = 123: no exception ok 9348 - $vlex{foo}{foo}{foo} = 123: value ok 9349 - exists $vlex{foo}{foo}{foo}: no exception ok 9350 - exists $vlex{foo}{foo}{foo}: value ok 9351 - delete $vlex{foo}{foo}{foo}: no exception ok 9352 - delete $vlex{foo}{foo}{foo}: value ok 9353 - $vgbl{foo}{foo}{foo}: no exception ok 9354 - $vgbl{foo}{foo}{foo}: value ok 9355 - $vgbl{foo}{foo}{foo} = 123: no exception ok 9356 - $vgbl{foo}{foo}{foo} = 123: value ok 9357 - exists $vgbl{foo}{foo}{foo}: no exception ok 9358 - exists $vgbl{foo}{foo}{foo}: value ok 9359 - delete $vgbl{foo}{foo}{foo}: no exception ok 9360 - delete $vgbl{foo}{foo}{foo}: value ok 9361 - $vrlex->{foo}{foo}{foo}: no exception ok 9362 - $vrlex->{foo}{foo}{foo}: value ok 9363 - $vrlex->{foo}{foo}{foo} = 123: no exception ok 9364 - $vrlex->{foo}{foo}{foo} = 123: value ok 9365 - exists $vrlex->{foo}{foo}{foo}: no exception ok 9366 - exists $vrlex->{foo}{foo}{foo}: value ok 9367 - delete $vrlex->{foo}{foo}{foo}: no exception ok 9368 - delete $vrlex->{foo}{foo}{foo}: value ok 9369 - $vrgbl->{foo}{foo}{foo}: no exception ok 9370 - $vrgbl->{foo}{foo}{foo}: value ok 9371 - $vrgbl->{foo}{foo}{foo} = 123: no exception ok 9372 - $vrgbl->{foo}{foo}{foo} = 123: value ok 9373 - exists $vrgbl->{foo}{foo}{foo}: no exception ok 9374 - exists $vrgbl->{foo}{foo}{foo}: value ok 9375 - delete $vrgbl->{foo}{foo}{foo}: no exception ok 9376 - delete $vrgbl->{foo}{foo}{foo}: value ok 9377 - $vlex{$lex}{foo}{foo}: no exception ok 9378 - $vlex{$lex}{foo}{foo}: value ok 9379 - $vlex{$lex}{foo}{foo} = 123: no exception ok 9380 - $vlex{$lex}{foo}{foo} = 123: value ok 9381 - exists $vlex{$lex}{foo}{foo}: no exception ok 9382 - exists $vlex{$lex}{foo}{foo}: value ok 9383 - delete $vlex{$lex}{foo}{foo}: no exception ok 9384 - delete $vlex{$lex}{foo}{foo}: value ok 9385 - $vgbl{$lex}{foo}{foo}: no exception ok 9386 - $vgbl{$lex}{foo}{foo}: value ok 9387 - $vgbl{$lex}{foo}{foo} = 123: no exception ok 9388 - $vgbl{$lex}{foo}{foo} = 123: value ok 9389 - exists $vgbl{$lex}{foo}{foo}: no exception ok 9390 - exists $vgbl{$lex}{foo}{foo}: value ok 9391 - delete $vgbl{$lex}{foo}{foo}: no exception ok 9392 - delete $vgbl{$lex}{foo}{foo}: value ok 9393 - $vrlex->{$lex}{foo}{foo}: no exception ok 9394 - $vrlex->{$lex}{foo}{foo}: value ok 9395 - $vrlex->{$lex}{foo}{foo} = 123: no exception ok 9396 - $vrlex->{$lex}{foo}{foo} = 123: value ok 9397 - exists $vrlex->{$lex}{foo}{foo}: no exception ok 9398 - exists $vrlex->{$lex}{foo}{foo}: value ok 9399 - delete $vrlex->{$lex}{foo}{foo}: no exception ok 9400 - delete $vrlex->{$lex}{foo}{foo}: value ok 9401 - $vrgbl->{$lex}{foo}{foo}: no exception ok 9402 - $vrgbl->{$lex}{foo}{foo}: value ok 9403 - $vrgbl->{$lex}{foo}{foo} = 123: no exception ok 9404 - $vrgbl->{$lex}{foo}{foo} = 123: value ok 9405 - exists $vrgbl->{$lex}{foo}{foo}: no exception ok 9406 - exists $vrgbl->{$lex}{foo}{foo}: value ok 9407 - delete $vrgbl->{$lex}{foo}{foo}: no exception ok 9408 - delete $vrgbl->{$lex}{foo}{foo}: value ok 9409 - $vlex{$gbl}{foo}{foo}: no exception ok 9410 - $vlex{$gbl}{foo}{foo}: value ok 9411 - $vlex{$gbl}{foo}{foo} = 123: no exception ok 9412 - $vlex{$gbl}{foo}{foo} = 123: value ok 9413 - exists $vlex{$gbl}{foo}{foo}: no exception ok 9414 - exists $vlex{$gbl}{foo}{foo}: value ok 9415 - delete $vlex{$gbl}{foo}{foo}: no exception ok 9416 - delete $vlex{$gbl}{foo}{foo}: value ok 9417 - $vgbl{$gbl}{foo}{foo}: no exception ok 9418 - $vgbl{$gbl}{foo}{foo}: value ok 9419 - $vgbl{$gbl}{foo}{foo} = 123: no exception ok 9420 - $vgbl{$gbl}{foo}{foo} = 123: value ok 9421 - exists $vgbl{$gbl}{foo}{foo}: no exception ok 9422 - exists $vgbl{$gbl}{foo}{foo}: value ok 9423 - delete $vgbl{$gbl}{foo}{foo}: no exception ok 9424 - delete $vgbl{$gbl}{foo}{foo}: value ok 9425 - $vrlex->{$gbl}{foo}{foo}: no exception ok 9426 - $vrlex->{$gbl}{foo}{foo}: value ok 9427 - $vrlex->{$gbl}{foo}{foo} = 123: no exception ok 9428 - $vrlex->{$gbl}{foo}{foo} = 123: value ok 9429 - exists $vrlex->{$gbl}{foo}{foo}: no exception ok 9430 - exists $vrlex->{$gbl}{foo}{foo}: value ok 9431 - delete $vrlex->{$gbl}{foo}{foo}: no exception ok 9432 - delete $vrlex->{$gbl}{foo}{foo}: value ok 9433 - $vrgbl->{$gbl}{foo}{foo}: no exception ok 9434 - $vrgbl->{$gbl}{foo}{foo}: value ok 9435 - $vrgbl->{$gbl}{foo}{foo} = 123: no exception ok 9436 - $vrgbl->{$gbl}{foo}{foo} = 123: value ok 9437 - exists $vrgbl->{$gbl}{foo}{foo}: no exception ok 9438 - exists $vrgbl->{$gbl}{foo}{foo}: value ok 9439 - delete $vrgbl->{$gbl}{foo}{foo}: no exception ok 9440 - delete $vrgbl->{$gbl}{foo}{foo}: value ok 9441 - $vlex{"x$lex"}{foo}{foo}: no exception ok 9442 - $vlex{"x$lex"}{foo}{foo}: value ok 9443 - $vlex{"x$lex"}{foo}{foo} = 123: no exception ok 9444 - $vlex{"x$lex"}{foo}{foo} = 123: value ok 9445 - exists $vlex{"x$lex"}{foo}{foo}: no exception ok 9446 - exists $vlex{"x$lex"}{foo}{foo}: value ok 9447 - delete $vlex{"x$lex"}{foo}{foo}: no exception ok 9448 - delete $vlex{"x$lex"}{foo}{foo}: value ok 9449 - $vgbl{"x$lex"}{foo}{foo}: no exception ok 9450 - $vgbl{"x$lex"}{foo}{foo}: value ok 9451 - $vgbl{"x$lex"}{foo}{foo} = 123: no exception ok 9452 - $vgbl{"x$lex"}{foo}{foo} = 123: value ok 9453 - exists $vgbl{"x$lex"}{foo}{foo}: no exception ok 9454 - exists $vgbl{"x$lex"}{foo}{foo}: value ok 9455 - delete $vgbl{"x$lex"}{foo}{foo}: no exception ok 9456 - delete $vgbl{"x$lex"}{foo}{foo}: value ok 9457 - $vrlex->{"x$lex"}{foo}{foo}: no exception ok 9458 - $vrlex->{"x$lex"}{foo}{foo}: value ok 9459 - $vrlex->{"x$lex"}{foo}{foo} = 123: no exception ok 9460 - $vrlex->{"x$lex"}{foo}{foo} = 123: value ok 9461 - exists $vrlex->{"x$lex"}{foo}{foo}: no exception ok 9462 - exists $vrlex->{"x$lex"}{foo}{foo}: value ok 9463 - delete $vrlex->{"x$lex"}{foo}{foo}: no exception ok 9464 - delete $vrlex->{"x$lex"}{foo}{foo}: value ok 9465 - $vrgbl->{"x$lex"}{foo}{foo}: no exception ok 9466 - $vrgbl->{"x$lex"}{foo}{foo}: value ok 9467 - $vrgbl->{"x$lex"}{foo}{foo} = 123: no exception ok 9468 - $vrgbl->{"x$lex"}{foo}{foo} = 123: value ok 9469 - exists $vrgbl->{"x$lex"}{foo}{foo}: no exception ok 9470 - exists $vrgbl->{"x$lex"}{foo}{foo}: value ok 9471 - delete $vrgbl->{"x$lex"}{foo}{foo}: no exception ok 9472 - delete $vrgbl->{"x$lex"}{foo}{foo}: value ok 9473 - $vlex[0]{$lex}{foo}: no exception ok 9474 - $vlex[0]{$lex}{foo}: value ok 9475 - $vlex[0]{$lex}{foo} = 123: no exception ok 9476 - $vlex[0]{$lex}{foo} = 123: value ok 9477 - exists $vlex[0]{$lex}{foo}: no exception ok 9478 - exists $vlex[0]{$lex}{foo}: value ok 9479 - delete $vlex[0]{$lex}{foo}: no exception ok 9480 - delete $vlex[0]{$lex}{foo}: value ok 9481 - $vgbl[0]{$lex}{foo}: no exception ok 9482 - $vgbl[0]{$lex}{foo}: value ok 9483 - $vgbl[0]{$lex}{foo} = 123: no exception ok 9484 - $vgbl[0]{$lex}{foo} = 123: value ok 9485 - exists $vgbl[0]{$lex}{foo}: no exception ok 9486 - exists $vgbl[0]{$lex}{foo}: value ok 9487 - delete $vgbl[0]{$lex}{foo}: no exception ok 9488 - delete $vgbl[0]{$lex}{foo}: value ok 9489 - $vrlex->[0]{$lex}{foo}: no exception ok 9490 - $vrlex->[0]{$lex}{foo}: value ok 9491 - $vrlex->[0]{$lex}{foo} = 123: no exception ok 9492 - $vrlex->[0]{$lex}{foo} = 123: value ok 9493 - exists $vrlex->[0]{$lex}{foo}: no exception ok 9494 - exists $vrlex->[0]{$lex}{foo}: value ok 9495 - delete $vrlex->[0]{$lex}{foo}: no exception ok 9496 - delete $vrlex->[0]{$lex}{foo}: value ok 9497 - $vrgbl->[0]{$lex}{foo}: no exception ok 9498 - $vrgbl->[0]{$lex}{foo}: value ok 9499 - $vrgbl->[0]{$lex}{foo} = 123: no exception ok 9500 - $vrgbl->[0]{$lex}{foo} = 123: value ok 9501 - exists $vrgbl->[0]{$lex}{foo}: no exception ok 9502 - exists $vrgbl->[0]{$lex}{foo}: value ok 9503 - delete $vrgbl->[0]{$lex}{foo}: no exception ok 9504 - delete $vrgbl->[0]{$lex}{foo}: value ok 9505 - $vlex[$lex]{$lex}{foo}: no exception ok 9506 - $vlex[$lex]{$lex}{foo}: value ok 9507 - $vlex[$lex]{$lex}{foo} = 123: no exception ok 9508 - $vlex[$lex]{$lex}{foo} = 123: value ok 9509 - exists $vlex[$lex]{$lex}{foo}: no exception ok 9510 - exists $vlex[$lex]{$lex}{foo}: value ok 9511 - delete $vlex[$lex]{$lex}{foo}: no exception ok 9512 - delete $vlex[$lex]{$lex}{foo}: value ok 9513 - $vgbl[$lex]{$lex}{foo}: no exception ok 9514 - $vgbl[$lex]{$lex}{foo}: value ok 9515 - $vgbl[$lex]{$lex}{foo} = 123: no exception ok 9516 - $vgbl[$lex]{$lex}{foo} = 123: value ok 9517 - exists $vgbl[$lex]{$lex}{foo}: no exception ok 9518 - exists $vgbl[$lex]{$lex}{foo}: value ok 9519 - delete $vgbl[$lex]{$lex}{foo}: no exception ok 9520 - delete $vgbl[$lex]{$lex}{foo}: value ok 9521 - $vrlex->[$lex]{$lex}{foo}: no exception ok 9522 - $vrlex->[$lex]{$lex}{foo}: value ok 9523 - $vrlex->[$lex]{$lex}{foo} = 123: no exception ok 9524 - $vrlex->[$lex]{$lex}{foo} = 123: value ok 9525 - exists $vrlex->[$lex]{$lex}{foo}: no exception ok 9526 - exists $vrlex->[$lex]{$lex}{foo}: value ok 9527 - delete $vrlex->[$lex]{$lex}{foo}: no exception ok 9528 - delete $vrlex->[$lex]{$lex}{foo}: value ok 9529 - $vrgbl->[$lex]{$lex}{foo}: no exception ok 9530 - $vrgbl->[$lex]{$lex}{foo}: value ok 9531 - $vrgbl->[$lex]{$lex}{foo} = 123: no exception ok 9532 - $vrgbl->[$lex]{$lex}{foo} = 123: value ok 9533 - exists $vrgbl->[$lex]{$lex}{foo}: no exception ok 9534 - exists $vrgbl->[$lex]{$lex}{foo}: value ok 9535 - delete $vrgbl->[$lex]{$lex}{foo}: no exception ok 9536 - delete $vrgbl->[$lex]{$lex}{foo}: value ok 9537 - $vlex[$gbl]{$lex}{foo}: no exception ok 9538 - $vlex[$gbl]{$lex}{foo}: value ok 9539 - $vlex[$gbl]{$lex}{foo} = 123: no exception ok 9540 - $vlex[$gbl]{$lex}{foo} = 123: value ok 9541 - exists $vlex[$gbl]{$lex}{foo}: no exception ok 9542 - exists $vlex[$gbl]{$lex}{foo}: value ok 9543 - delete $vlex[$gbl]{$lex}{foo}: no exception ok 9544 - delete $vlex[$gbl]{$lex}{foo}: value ok 9545 - $vgbl[$gbl]{$lex}{foo}: no exception ok 9546 - $vgbl[$gbl]{$lex}{foo}: value ok 9547 - $vgbl[$gbl]{$lex}{foo} = 123: no exception ok 9548 - $vgbl[$gbl]{$lex}{foo} = 123: value ok 9549 - exists $vgbl[$gbl]{$lex}{foo}: no exception ok 9550 - exists $vgbl[$gbl]{$lex}{foo}: value ok 9551 - delete $vgbl[$gbl]{$lex}{foo}: no exception ok 9552 - delete $vgbl[$gbl]{$lex}{foo}: value ok 9553 - $vrlex->[$gbl]{$lex}{foo}: no exception ok 9554 - $vrlex->[$gbl]{$lex}{foo}: value ok 9555 - $vrlex->[$gbl]{$lex}{foo} = 123: no exception ok 9556 - $vrlex->[$gbl]{$lex}{foo} = 123: value ok 9557 - exists $vrlex->[$gbl]{$lex}{foo}: no exception ok 9558 - exists $vrlex->[$gbl]{$lex}{foo}: value ok 9559 - delete $vrlex->[$gbl]{$lex}{foo}: no exception ok 9560 - delete $vrlex->[$gbl]{$lex}{foo}: value ok 9561 - $vrgbl->[$gbl]{$lex}{foo}: no exception ok 9562 - $vrgbl->[$gbl]{$lex}{foo}: value ok 9563 - $vrgbl->[$gbl]{$lex}{foo} = 123: no exception ok 9564 - $vrgbl->[$gbl]{$lex}{foo} = 123: value ok 9565 - exists $vrgbl->[$gbl]{$lex}{foo}: no exception ok 9566 - exists $vrgbl->[$gbl]{$lex}{foo}: value ok 9567 - delete $vrgbl->[$gbl]{$lex}{foo}: no exception ok 9568 - delete $vrgbl->[$gbl]{$lex}{foo}: value ok 9569 - $vlex[$lex+1]{$lex}{foo}: no exception ok 9570 - $vlex[$lex+1]{$lex}{foo}: value ok 9571 - $vlex[$lex+1]{$lex}{foo} = 123: no exception ok 9572 - $vlex[$lex+1]{$lex}{foo} = 123: value ok 9573 - exists $vlex[$lex+1]{$lex}{foo}: no exception ok 9574 - exists $vlex[$lex+1]{$lex}{foo}: value ok 9575 - delete $vlex[$lex+1]{$lex}{foo}: no exception ok 9576 - delete $vlex[$lex+1]{$lex}{foo}: value ok 9577 - $vgbl[$lex+1]{$lex}{foo}: no exception ok 9578 - $vgbl[$lex+1]{$lex}{foo}: value ok 9579 - $vgbl[$lex+1]{$lex}{foo} = 123: no exception ok 9580 - $vgbl[$lex+1]{$lex}{foo} = 123: value ok 9581 - exists $vgbl[$lex+1]{$lex}{foo}: no exception ok 9582 - exists $vgbl[$lex+1]{$lex}{foo}: value ok 9583 - delete $vgbl[$lex+1]{$lex}{foo}: no exception ok 9584 - delete $vgbl[$lex+1]{$lex}{foo}: value ok 9585 - $vrlex->[$lex+1]{$lex}{foo}: no exception ok 9586 - $vrlex->[$lex+1]{$lex}{foo}: value ok 9587 - $vrlex->[$lex+1]{$lex}{foo} = 123: no exception ok 9588 - $vrlex->[$lex+1]{$lex}{foo} = 123: value ok 9589 - exists $vrlex->[$lex+1]{$lex}{foo}: no exception ok 9590 - exists $vrlex->[$lex+1]{$lex}{foo}: value ok 9591 - delete $vrlex->[$lex+1]{$lex}{foo}: no exception ok 9592 - delete $vrlex->[$lex+1]{$lex}{foo}: value ok 9593 - $vrgbl->[$lex+1]{$lex}{foo}: no exception ok 9594 - $vrgbl->[$lex+1]{$lex}{foo}: value ok 9595 - $vrgbl->[$lex+1]{$lex}{foo} = 123: no exception ok 9596 - $vrgbl->[$lex+1]{$lex}{foo} = 123: value ok 9597 - exists $vrgbl->[$lex+1]{$lex}{foo}: no exception ok 9598 - exists $vrgbl->[$lex+1]{$lex}{foo}: value ok 9599 - delete $vrgbl->[$lex+1]{$lex}{foo}: no exception ok 9600 - delete $vrgbl->[$lex+1]{$lex}{foo}: value ok 9601 - $vlex{foo}{$lex}{foo}: no exception ok 9602 - $vlex{foo}{$lex}{foo}: value ok 9603 - $vlex{foo}{$lex}{foo} = 123: no exception ok 9604 - $vlex{foo}{$lex}{foo} = 123: value ok 9605 - exists $vlex{foo}{$lex}{foo}: no exception ok 9606 - exists $vlex{foo}{$lex}{foo}: value ok 9607 - delete $vlex{foo}{$lex}{foo}: no exception ok 9608 - delete $vlex{foo}{$lex}{foo}: value ok 9609 - $vgbl{foo}{$lex}{foo}: no exception ok 9610 - $vgbl{foo}{$lex}{foo}: value ok 9611 - $vgbl{foo}{$lex}{foo} = 123: no exception ok 9612 - $vgbl{foo}{$lex}{foo} = 123: value ok 9613 - exists $vgbl{foo}{$lex}{foo}: no exception ok 9614 - exists $vgbl{foo}{$lex}{foo}: value ok 9615 - delete $vgbl{foo}{$lex}{foo}: no exception ok 9616 - delete $vgbl{foo}{$lex}{foo}: value ok 9617 - $vrlex->{foo}{$lex}{foo}: no exception ok 9618 - $vrlex->{foo}{$lex}{foo}: value ok 9619 - $vrlex->{foo}{$lex}{foo} = 123: no exception ok 9620 - $vrlex->{foo}{$lex}{foo} = 123: value ok 9621 - exists $vrlex->{foo}{$lex}{foo}: no exception ok 9622 - exists $vrlex->{foo}{$lex}{foo}: value ok 9623 - delete $vrlex->{foo}{$lex}{foo}: no exception ok 9624 - delete $vrlex->{foo}{$lex}{foo}: value ok 9625 - $vrgbl->{foo}{$lex}{foo}: no exception ok 9626 - $vrgbl->{foo}{$lex}{foo}: value ok 9627 - $vrgbl->{foo}{$lex}{foo} = 123: no exception ok 9628 - $vrgbl->{foo}{$lex}{foo} = 123: value ok 9629 - exists $vrgbl->{foo}{$lex}{foo}: no exception ok 9630 - exists $vrgbl->{foo}{$lex}{foo}: value ok 9631 - delete $vrgbl->{foo}{$lex}{foo}: no exception ok 9632 - delete $vrgbl->{foo}{$lex}{foo}: value ok 9633 - $vlex{$lex}{$lex}{foo}: no exception ok 9634 - $vlex{$lex}{$lex}{foo}: value ok 9635 - $vlex{$lex}{$lex}{foo} = 123: no exception ok 9636 - $vlex{$lex}{$lex}{foo} = 123: value ok 9637 - exists $vlex{$lex}{$lex}{foo}: no exception ok 9638 - exists $vlex{$lex}{$lex}{foo}: value ok 9639 - delete $vlex{$lex}{$lex}{foo}: no exception ok 9640 - delete $vlex{$lex}{$lex}{foo}: value ok 9641 - $vgbl{$lex}{$lex}{foo}: no exception ok 9642 - $vgbl{$lex}{$lex}{foo}: value ok 9643 - $vgbl{$lex}{$lex}{foo} = 123: no exception ok 9644 - $vgbl{$lex}{$lex}{foo} = 123: value ok 9645 - exists $vgbl{$lex}{$lex}{foo}: no exception ok 9646 - exists $vgbl{$lex}{$lex}{foo}: value ok 9647 - delete $vgbl{$lex}{$lex}{foo}: no exception ok 9648 - delete $vgbl{$lex}{$lex}{foo}: value ok 9649 - $vrlex->{$lex}{$lex}{foo}: no exception ok 9650 - $vrlex->{$lex}{$lex}{foo}: value ok 9651 - $vrlex->{$lex}{$lex}{foo} = 123: no exception ok 9652 - $vrlex->{$lex}{$lex}{foo} = 123: value ok 9653 - exists $vrlex->{$lex}{$lex}{foo}: no exception ok 9654 - exists $vrlex->{$lex}{$lex}{foo}: value ok 9655 - delete $vrlex->{$lex}{$lex}{foo}: no exception ok 9656 - delete $vrlex->{$lex}{$lex}{foo}: value ok 9657 - $vrgbl->{$lex}{$lex}{foo}: no exception ok 9658 - $vrgbl->{$lex}{$lex}{foo}: value ok 9659 - $vrgbl->{$lex}{$lex}{foo} = 123: no exception ok 9660 - $vrgbl->{$lex}{$lex}{foo} = 123: value ok 9661 - exists $vrgbl->{$lex}{$lex}{foo}: no exception ok 9662 - exists $vrgbl->{$lex}{$lex}{foo}: value ok 9663 - delete $vrgbl->{$lex}{$lex}{foo}: no exception ok 9664 - delete $vrgbl->{$lex}{$lex}{foo}: value ok 9665 - $vlex{$gbl}{$lex}{foo}: no exception ok 9666 - $vlex{$gbl}{$lex}{foo}: value ok 9667 - $vlex{$gbl}{$lex}{foo} = 123: no exception ok 9668 - $vlex{$gbl}{$lex}{foo} = 123: value ok 9669 - exists $vlex{$gbl}{$lex}{foo}: no exception ok 9670 - exists $vlex{$gbl}{$lex}{foo}: value ok 9671 - delete $vlex{$gbl}{$lex}{foo}: no exception ok 9672 - delete $vlex{$gbl}{$lex}{foo}: value ok 9673 - $vgbl{$gbl}{$lex}{foo}: no exception ok 9674 - $vgbl{$gbl}{$lex}{foo}: value ok 9675 - $vgbl{$gbl}{$lex}{foo} = 123: no exception ok 9676 - $vgbl{$gbl}{$lex}{foo} = 123: value ok 9677 - exists $vgbl{$gbl}{$lex}{foo}: no exception ok 9678 - exists $vgbl{$gbl}{$lex}{foo}: value ok 9679 - delete $vgbl{$gbl}{$lex}{foo}: no exception ok 9680 - delete $vgbl{$gbl}{$lex}{foo}: value ok 9681 - $vrlex->{$gbl}{$lex}{foo}: no exception ok 9682 - $vrlex->{$gbl}{$lex}{foo}: value ok 9683 - $vrlex->{$gbl}{$lex}{foo} = 123: no exception ok 9684 - $vrlex->{$gbl}{$lex}{foo} = 123: value ok 9685 - exists $vrlex->{$gbl}{$lex}{foo}: no exception ok 9686 - exists $vrlex->{$gbl}{$lex}{foo}: value ok 9687 - delete $vrlex->{$gbl}{$lex}{foo}: no exception ok 9688 - delete $vrlex->{$gbl}{$lex}{foo}: value ok 9689 - $vrgbl->{$gbl}{$lex}{foo}: no exception ok 9690 - $vrgbl->{$gbl}{$lex}{foo}: value ok 9691 - $vrgbl->{$gbl}{$lex}{foo} = 123: no exception ok 9692 - $vrgbl->{$gbl}{$lex}{foo} = 123: value ok 9693 - exists $vrgbl->{$gbl}{$lex}{foo}: no exception ok 9694 - exists $vrgbl->{$gbl}{$lex}{foo}: value ok 9695 - delete $vrgbl->{$gbl}{$lex}{foo}: no exception ok 9696 - delete $vrgbl->{$gbl}{$lex}{foo}: value ok 9697 - $vlex{"x$lex"}{$lex}{foo}: no exception ok 9698 - $vlex{"x$lex"}{$lex}{foo}: value ok 9699 - $vlex{"x$lex"}{$lex}{foo} = 123: no exception ok 9700 - $vlex{"x$lex"}{$lex}{foo} = 123: value ok 9701 - exists $vlex{"x$lex"}{$lex}{foo}: no exception ok 9702 - exists $vlex{"x$lex"}{$lex}{foo}: value ok 9703 - delete $vlex{"x$lex"}{$lex}{foo}: no exception ok 9704 - delete $vlex{"x$lex"}{$lex}{foo}: value ok 9705 - $vgbl{"x$lex"}{$lex}{foo}: no exception ok 9706 - $vgbl{"x$lex"}{$lex}{foo}: value ok 9707 - $vgbl{"x$lex"}{$lex}{foo} = 123: no exception ok 9708 - $vgbl{"x$lex"}{$lex}{foo} = 123: value ok 9709 - exists $vgbl{"x$lex"}{$lex}{foo}: no exception ok 9710 - exists $vgbl{"x$lex"}{$lex}{foo}: value ok 9711 - delete $vgbl{"x$lex"}{$lex}{foo}: no exception ok 9712 - delete $vgbl{"x$lex"}{$lex}{foo}: value ok 9713 - $vrlex->{"x$lex"}{$lex}{foo}: no exception ok 9714 - $vrlex->{"x$lex"}{$lex}{foo}: value ok 9715 - $vrlex->{"x$lex"}{$lex}{foo} = 123: no exception ok 9716 - $vrlex->{"x$lex"}{$lex}{foo} = 123: value ok 9717 - exists $vrlex->{"x$lex"}{$lex}{foo}: no exception ok 9718 - exists $vrlex->{"x$lex"}{$lex}{foo}: value ok 9719 - delete $vrlex->{"x$lex"}{$lex}{foo}: no exception ok 9720 - delete $vrlex->{"x$lex"}{$lex}{foo}: value ok 9721 - $vrgbl->{"x$lex"}{$lex}{foo}: no exception ok 9722 - $vrgbl->{"x$lex"}{$lex}{foo}: value ok 9723 - $vrgbl->{"x$lex"}{$lex}{foo} = 123: no exception ok 9724 - $vrgbl->{"x$lex"}{$lex}{foo} = 123: value ok 9725 - exists $vrgbl->{"x$lex"}{$lex}{foo}: no exception ok 9726 - exists $vrgbl->{"x$lex"}{$lex}{foo}: value ok 9727 - delete $vrgbl->{"x$lex"}{$lex}{foo}: no exception ok 9728 - delete $vrgbl->{"x$lex"}{$lex}{foo}: value ok 9729 - $vlex[0]{$gbl}{foo}: no exception ok 9730 - $vlex[0]{$gbl}{foo}: value ok 9731 - $vlex[0]{$gbl}{foo} = 123: no exception ok 9732 - $vlex[0]{$gbl}{foo} = 123: value ok 9733 - exists $vlex[0]{$gbl}{foo}: no exception ok 9734 - exists $vlex[0]{$gbl}{foo}: value ok 9735 - delete $vlex[0]{$gbl}{foo}: no exception ok 9736 - delete $vlex[0]{$gbl}{foo}: value ok 9737 - $vgbl[0]{$gbl}{foo}: no exception ok 9738 - $vgbl[0]{$gbl}{foo}: value ok 9739 - $vgbl[0]{$gbl}{foo} = 123: no exception ok 9740 - $vgbl[0]{$gbl}{foo} = 123: value ok 9741 - exists $vgbl[0]{$gbl}{foo}: no exception ok 9742 - exists $vgbl[0]{$gbl}{foo}: value ok 9743 - delete $vgbl[0]{$gbl}{foo}: no exception ok 9744 - delete $vgbl[0]{$gbl}{foo}: value ok 9745 - $vrlex->[0]{$gbl}{foo}: no exception ok 9746 - $vrlex->[0]{$gbl}{foo}: value ok 9747 - $vrlex->[0]{$gbl}{foo} = 123: no exception ok 9748 - $vrlex->[0]{$gbl}{foo} = 123: value ok 9749 - exists $vrlex->[0]{$gbl}{foo}: no exception ok 9750 - exists $vrlex->[0]{$gbl}{foo}: value ok 9751 - delete $vrlex->[0]{$gbl}{foo}: no exception ok 9752 - delete $vrlex->[0]{$gbl}{foo}: value ok 9753 - $vrgbl->[0]{$gbl}{foo}: no exception ok 9754 - $vrgbl->[0]{$gbl}{foo}: value ok 9755 - $vrgbl->[0]{$gbl}{foo} = 123: no exception ok 9756 - $vrgbl->[0]{$gbl}{foo} = 123: value ok 9757 - exists $vrgbl->[0]{$gbl}{foo}: no exception ok 9758 - exists $vrgbl->[0]{$gbl}{foo}: value ok 9759 - delete $vrgbl->[0]{$gbl}{foo}: no exception ok 9760 - delete $vrgbl->[0]{$gbl}{foo}: value ok 9761 - $vlex[$lex]{$gbl}{foo}: no exception ok 9762 - $vlex[$lex]{$gbl}{foo}: value ok 9763 - $vlex[$lex]{$gbl}{foo} = 123: no exception ok 9764 - $vlex[$lex]{$gbl}{foo} = 123: value ok 9765 - exists $vlex[$lex]{$gbl}{foo}: no exception ok 9766 - exists $vlex[$lex]{$gbl}{foo}: value ok 9767 - delete $vlex[$lex]{$gbl}{foo}: no exception ok 9768 - delete $vlex[$lex]{$gbl}{foo}: value ok 9769 - $vgbl[$lex]{$gbl}{foo}: no exception ok 9770 - $vgbl[$lex]{$gbl}{foo}: value ok 9771 - $vgbl[$lex]{$gbl}{foo} = 123: no exception ok 9772 - $vgbl[$lex]{$gbl}{foo} = 123: value ok 9773 - exists $vgbl[$lex]{$gbl}{foo}: no exception ok 9774 - exists $vgbl[$lex]{$gbl}{foo}: value ok 9775 - delete $vgbl[$lex]{$gbl}{foo}: no exception ok 9776 - delete $vgbl[$lex]{$gbl}{foo}: value ok 9777 - $vrlex->[$lex]{$gbl}{foo}: no exception ok 9778 - $vrlex->[$lex]{$gbl}{foo}: value ok 9779 - $vrlex->[$lex]{$gbl}{foo} = 123: no exception ok 9780 - $vrlex->[$lex]{$gbl}{foo} = 123: value ok 9781 - exists $vrlex->[$lex]{$gbl}{foo}: no exception ok 9782 - exists $vrlex->[$lex]{$gbl}{foo}: value ok 9783 - delete $vrlex->[$lex]{$gbl}{foo}: no exception ok 9784 - delete $vrlex->[$lex]{$gbl}{foo}: value ok 9785 - $vrgbl->[$lex]{$gbl}{foo}: no exception ok 9786 - $vrgbl->[$lex]{$gbl}{foo}: value ok 9787 - $vrgbl->[$lex]{$gbl}{foo} = 123: no exception ok 9788 - $vrgbl->[$lex]{$gbl}{foo} = 123: value ok 9789 - exists $vrgbl->[$lex]{$gbl}{foo}: no exception ok 9790 - exists $vrgbl->[$lex]{$gbl}{foo}: value ok 9791 - delete $vrgbl->[$lex]{$gbl}{foo}: no exception ok 9792 - delete $vrgbl->[$lex]{$gbl}{foo}: value ok 9793 - $vlex[$gbl]{$gbl}{foo}: no exception ok 9794 - $vlex[$gbl]{$gbl}{foo}: value ok 9795 - $vlex[$gbl]{$gbl}{foo} = 123: no exception ok 9796 - $vlex[$gbl]{$gbl}{foo} = 123: value ok 9797 - exists $vlex[$gbl]{$gbl}{foo}: no exception ok 9798 - exists $vlex[$gbl]{$gbl}{foo}: value ok 9799 - delete $vlex[$gbl]{$gbl}{foo}: no exception ok 9800 - delete $vlex[$gbl]{$gbl}{foo}: value ok 9801 - $vgbl[$gbl]{$gbl}{foo}: no exception ok 9802 - $vgbl[$gbl]{$gbl}{foo}: value ok 9803 - $vgbl[$gbl]{$gbl}{foo} = 123: no exception ok 9804 - $vgbl[$gbl]{$gbl}{foo} = 123: value ok 9805 - exists $vgbl[$gbl]{$gbl}{foo}: no exception ok 9806 - exists $vgbl[$gbl]{$gbl}{foo}: value ok 9807 - delete $vgbl[$gbl]{$gbl}{foo}: no exception ok 9808 - delete $vgbl[$gbl]{$gbl}{foo}: value ok 9809 - $vrlex->[$gbl]{$gbl}{foo}: no exception ok 9810 - $vrlex->[$gbl]{$gbl}{foo}: value ok 9811 - $vrlex->[$gbl]{$gbl}{foo} = 123: no exception ok 9812 - $vrlex->[$gbl]{$gbl}{foo} = 123: value ok 9813 - exists $vrlex->[$gbl]{$gbl}{foo}: no exception ok 9814 - exists $vrlex->[$gbl]{$gbl}{foo}: value ok 9815 - delete $vrlex->[$gbl]{$gbl}{foo}: no exception ok 9816 - delete $vrlex->[$gbl]{$gbl}{foo}: value ok 9817 - $vrgbl->[$gbl]{$gbl}{foo}: no exception ok 9818 - $vrgbl->[$gbl]{$gbl}{foo}: value ok 9819 - $vrgbl->[$gbl]{$gbl}{foo} = 123: no exception ok 9820 - $vrgbl->[$gbl]{$gbl}{foo} = 123: value ok 9821 - exists $vrgbl->[$gbl]{$gbl}{foo}: no exception ok 9822 - exists $vrgbl->[$gbl]{$gbl}{foo}: value ok 9823 - delete $vrgbl->[$gbl]{$gbl}{foo}: no exception ok 9824 - delete $vrgbl->[$gbl]{$gbl}{foo}: value ok 9825 - $vlex[$lex+1]{$gbl}{foo}: no exception ok 9826 - $vlex[$lex+1]{$gbl}{foo}: value ok 9827 - $vlex[$lex+1]{$gbl}{foo} = 123: no exception ok 9828 - $vlex[$lex+1]{$gbl}{foo} = 123: value ok 9829 - exists $vlex[$lex+1]{$gbl}{foo}: no exception ok 9830 - exists $vlex[$lex+1]{$gbl}{foo}: value ok 9831 - delete $vlex[$lex+1]{$gbl}{foo}: no exception ok 9832 - delete $vlex[$lex+1]{$gbl}{foo}: value ok 9833 - $vgbl[$lex+1]{$gbl}{foo}: no exception ok 9834 - $vgbl[$lex+1]{$gbl}{foo}: value ok 9835 - $vgbl[$lex+1]{$gbl}{foo} = 123: no exception ok 9836 - $vgbl[$lex+1]{$gbl}{foo} = 123: value ok 9837 - exists $vgbl[$lex+1]{$gbl}{foo}: no exception ok 9838 - exists $vgbl[$lex+1]{$gbl}{foo}: value ok 9839 - delete $vgbl[$lex+1]{$gbl}{foo}: no exception ok 9840 - delete $vgbl[$lex+1]{$gbl}{foo}: value ok 9841 - $vrlex->[$lex+1]{$gbl}{foo}: no exception ok 9842 - $vrlex->[$lex+1]{$gbl}{foo}: value ok 9843 - $vrlex->[$lex+1]{$gbl}{foo} = 123: no exception ok 9844 - $vrlex->[$lex+1]{$gbl}{foo} = 123: value ok 9845 - exists $vrlex->[$lex+1]{$gbl}{foo}: no exception ok 9846 - exists $vrlex->[$lex+1]{$gbl}{foo}: value ok 9847 - delete $vrlex->[$lex+1]{$gbl}{foo}: no exception ok 9848 - delete $vrlex->[$lex+1]{$gbl}{foo}: value ok 9849 - $vrgbl->[$lex+1]{$gbl}{foo}: no exception ok 9850 - $vrgbl->[$lex+1]{$gbl}{foo}: value ok 9851 - $vrgbl->[$lex+1]{$gbl}{foo} = 123: no exception ok 9852 - $vrgbl->[$lex+1]{$gbl}{foo} = 123: value ok 9853 - exists $vrgbl->[$lex+1]{$gbl}{foo}: no exception ok 9854 - exists $vrgbl->[$lex+1]{$gbl}{foo}: value ok 9855 - delete $vrgbl->[$lex+1]{$gbl}{foo}: no exception ok 9856 - delete $vrgbl->[$lex+1]{$gbl}{foo}: value ok 9857 - $vlex{foo}{$gbl}{foo}: no exception ok 9858 - $vlex{foo}{$gbl}{foo}: value ok 9859 - $vlex{foo}{$gbl}{foo} = 123: no exception ok 9860 - $vlex{foo}{$gbl}{foo} = 123: value ok 9861 - exists $vlex{foo}{$gbl}{foo}: no exception ok 9862 - exists $vlex{foo}{$gbl}{foo}: value ok 9863 - delete $vlex{foo}{$gbl}{foo}: no exception ok 9864 - delete $vlex{foo}{$gbl}{foo}: value ok 9865 - $vgbl{foo}{$gbl}{foo}: no exception ok 9866 - $vgbl{foo}{$gbl}{foo}: value ok 9867 - $vgbl{foo}{$gbl}{foo} = 123: no exception ok 9868 - $vgbl{foo}{$gbl}{foo} = 123: value ok 9869 - exists $vgbl{foo}{$gbl}{foo}: no exception ok 9870 - exists $vgbl{foo}{$gbl}{foo}: value ok 9871 - delete $vgbl{foo}{$gbl}{foo}: no exception ok 9872 - delete $vgbl{foo}{$gbl}{foo}: value ok 9873 - $vrlex->{foo}{$gbl}{foo}: no exception ok 9874 - $vrlex->{foo}{$gbl}{foo}: value ok 9875 - $vrlex->{foo}{$gbl}{foo} = 123: no exception ok 9876 - $vrlex->{foo}{$gbl}{foo} = 123: value ok 9877 - exists $vrlex->{foo}{$gbl}{foo}: no exception ok 9878 - exists $vrlex->{foo}{$gbl}{foo}: value ok 9879 - delete $vrlex->{foo}{$gbl}{foo}: no exception ok 9880 - delete $vrlex->{foo}{$gbl}{foo}: value ok 9881 - $vrgbl->{foo}{$gbl}{foo}: no exception ok 9882 - $vrgbl->{foo}{$gbl}{foo}: value ok 9883 - $vrgbl->{foo}{$gbl}{foo} = 123: no exception ok 9884 - $vrgbl->{foo}{$gbl}{foo} = 123: value ok 9885 - exists $vrgbl->{foo}{$gbl}{foo}: no exception ok 9886 - exists $vrgbl->{foo}{$gbl}{foo}: value ok 9887 - delete $vrgbl->{foo}{$gbl}{foo}: no exception ok 9888 - delete $vrgbl->{foo}{$gbl}{foo}: value ok 9889 - $vlex{$lex}{$gbl}{foo}: no exception ok 9890 - $vlex{$lex}{$gbl}{foo}: value ok 9891 - $vlex{$lex}{$gbl}{foo} = 123: no exception ok 9892 - $vlex{$lex}{$gbl}{foo} = 123: value ok 9893 - exists $vlex{$lex}{$gbl}{foo}: no exception ok 9894 - exists $vlex{$lex}{$gbl}{foo}: value ok 9895 - delete $vlex{$lex}{$gbl}{foo}: no exception ok 9896 - delete $vlex{$lex}{$gbl}{foo}: value ok 9897 - $vgbl{$lex}{$gbl}{foo}: no exception ok 9898 - $vgbl{$lex}{$gbl}{foo}: value ok 9899 - $vgbl{$lex}{$gbl}{foo} = 123: no exception ok 9900 - $vgbl{$lex}{$gbl}{foo} = 123: value ok 9901 - exists $vgbl{$lex}{$gbl}{foo}: no exception ok 9902 - exists $vgbl{$lex}{$gbl}{foo}: value ok 9903 - delete $vgbl{$lex}{$gbl}{foo}: no exception ok 9904 - delete $vgbl{$lex}{$gbl}{foo}: value ok 9905 - $vrlex->{$lex}{$gbl}{foo}: no exception ok 9906 - $vrlex->{$lex}{$gbl}{foo}: value ok 9907 - $vrlex->{$lex}{$gbl}{foo} = 123: no exception ok 9908 - $vrlex->{$lex}{$gbl}{foo} = 123: value ok 9909 - exists $vrlex->{$lex}{$gbl}{foo}: no exception ok 9910 - exists $vrlex->{$lex}{$gbl}{foo}: value ok 9911 - delete $vrlex->{$lex}{$gbl}{foo}: no exception ok 9912 - delete $vrlex->{$lex}{$gbl}{foo}: value ok 9913 - $vrgbl->{$lex}{$gbl}{foo}: no exception ok 9914 - $vrgbl->{$lex}{$gbl}{foo}: value ok 9915 - $vrgbl->{$lex}{$gbl}{foo} = 123: no exception ok 9916 - $vrgbl->{$lex}{$gbl}{foo} = 123: value ok 9917 - exists $vrgbl->{$lex}{$gbl}{foo}: no exception ok 9918 - exists $vrgbl->{$lex}{$gbl}{foo}: value ok 9919 - delete $vrgbl->{$lex}{$gbl}{foo}: no exception ok 9920 - delete $vrgbl->{$lex}{$gbl}{foo}: value ok 9921 - $vlex{$gbl}{$gbl}{foo}: no exception ok 9922 - $vlex{$gbl}{$gbl}{foo}: value ok 9923 - $vlex{$gbl}{$gbl}{foo} = 123: no exception ok 9924 - $vlex{$gbl}{$gbl}{foo} = 123: value ok 9925 - exists $vlex{$gbl}{$gbl}{foo}: no exception ok 9926 - exists $vlex{$gbl}{$gbl}{foo}: value ok 9927 - delete $vlex{$gbl}{$gbl}{foo}: no exception ok 9928 - delete $vlex{$gbl}{$gbl}{foo}: value ok 9929 - $vgbl{$gbl}{$gbl}{foo}: no exception ok 9930 - $vgbl{$gbl}{$gbl}{foo}: value ok 9931 - $vgbl{$gbl}{$gbl}{foo} = 123: no exception ok 9932 - $vgbl{$gbl}{$gbl}{foo} = 123: value ok 9933 - exists $vgbl{$gbl}{$gbl}{foo}: no exception ok 9934 - exists $vgbl{$gbl}{$gbl}{foo}: value ok 9935 - delete $vgbl{$gbl}{$gbl}{foo}: no exception ok 9936 - delete $vgbl{$gbl}{$gbl}{foo}: value ok 9937 - $vrlex->{$gbl}{$gbl}{foo}: no exception ok 9938 - $vrlex->{$gbl}{$gbl}{foo}: value ok 9939 - $vrlex->{$gbl}{$gbl}{foo} = 123: no exception ok 9940 - $vrlex->{$gbl}{$gbl}{foo} = 123: value ok 9941 - exists $vrlex->{$gbl}{$gbl}{foo}: no exception ok 9942 - exists $vrlex->{$gbl}{$gbl}{foo}: value ok 9943 - delete $vrlex->{$gbl}{$gbl}{foo}: no exception ok 9944 - delete $vrlex->{$gbl}{$gbl}{foo}: value ok 9945 - $vrgbl->{$gbl}{$gbl}{foo}: no exception ok 9946 - $vrgbl->{$gbl}{$gbl}{foo}: value ok 9947 - $vrgbl->{$gbl}{$gbl}{foo} = 123: no exception ok 9948 - $vrgbl->{$gbl}{$gbl}{foo} = 123: value ok 9949 - exists $vrgbl->{$gbl}{$gbl}{foo}: no exception ok 9950 - exists $vrgbl->{$gbl}{$gbl}{foo}: value ok 9951 - delete $vrgbl->{$gbl}{$gbl}{foo}: no exception ok 9952 - delete $vrgbl->{$gbl}{$gbl}{foo}: value ok 9953 - $vlex{"x$lex"}{$gbl}{foo}: no exception ok 9954 - $vlex{"x$lex"}{$gbl}{foo}: value ok 9955 - $vlex{"x$lex"}{$gbl}{foo} = 123: no exception ok 9956 - $vlex{"x$lex"}{$gbl}{foo} = 123: value ok 9957 - exists $vlex{"x$lex"}{$gbl}{foo}: no exception ok 9958 - exists $vlex{"x$lex"}{$gbl}{foo}: value ok 9959 - delete $vlex{"x$lex"}{$gbl}{foo}: no exception ok 9960 - delete $vlex{"x$lex"}{$gbl}{foo}: value ok 9961 - $vgbl{"x$lex"}{$gbl}{foo}: no exception ok 9962 - $vgbl{"x$lex"}{$gbl}{foo}: value ok 9963 - $vgbl{"x$lex"}{$gbl}{foo} = 123: no exception ok 9964 - $vgbl{"x$lex"}{$gbl}{foo} = 123: value ok 9965 - exists $vgbl{"x$lex"}{$gbl}{foo}: no exception ok 9966 - exists $vgbl{"x$lex"}{$gbl}{foo}: value ok 9967 - delete $vgbl{"x$lex"}{$gbl}{foo}: no exception ok 9968 - delete $vgbl{"x$lex"}{$gbl}{foo}: value ok 9969 - $vrlex->{"x$lex"}{$gbl}{foo}: no exception ok 9970 - $vrlex->{"x$lex"}{$gbl}{foo}: value ok 9971 - $vrlex->{"x$lex"}{$gbl}{foo} = 123: no exception ok 9972 - $vrlex->{"x$lex"}{$gbl}{foo} = 123: value ok 9973 - exists $vrlex->{"x$lex"}{$gbl}{foo}: no exception ok 9974 - exists $vrlex->{"x$lex"}{$gbl}{foo}: value ok 9975 - delete $vrlex->{"x$lex"}{$gbl}{foo}: no exception ok 9976 - delete $vrlex->{"x$lex"}{$gbl}{foo}: value ok 9977 - $vrgbl->{"x$lex"}{$gbl}{foo}: no exception ok 9978 - $vrgbl->{"x$lex"}{$gbl}{foo}: value ok 9979 - $vrgbl->{"x$lex"}{$gbl}{foo} = 123: no exception ok 9980 - $vrgbl->{"x$lex"}{$gbl}{foo} = 123: value ok 9981 - exists $vrgbl->{"x$lex"}{$gbl}{foo}: no exception ok 9982 - exists $vrgbl->{"x$lex"}{$gbl}{foo}: value ok 9983 - delete $vrgbl->{"x$lex"}{$gbl}{foo}: no exception ok 9984 - delete $vrgbl->{"x$lex"}{$gbl}{foo}: value ok 9985 - $vlex[0]{"x$lex"}{foo}: no exception ok 9986 - $vlex[0]{"x$lex"}{foo}: value ok 9987 - $vlex[0]{"x$lex"}{foo} = 123: no exception ok 9988 - $vlex[0]{"x$lex"}{foo} = 123: value ok 9989 - exists $vlex[0]{"x$lex"}{foo}: no exception ok 9990 - exists $vlex[0]{"x$lex"}{foo}: value ok 9991 - delete $vlex[0]{"x$lex"}{foo}: no exception ok 9992 - delete $vlex[0]{"x$lex"}{foo}: value ok 9993 - $vgbl[0]{"x$lex"}{foo}: no exception ok 9994 - $vgbl[0]{"x$lex"}{foo}: value ok 9995 - $vgbl[0]{"x$lex"}{foo} = 123: no exception ok 9996 - $vgbl[0]{"x$lex"}{foo} = 123: value ok 9997 - exists $vgbl[0]{"x$lex"}{foo}: no exception ok 9998 - exists $vgbl[0]{"x$lex"}{foo}: value ok 9999 - delete $vgbl[0]{"x$lex"}{foo}: no exception ok 10000 - delete $vgbl[0]{"x$lex"}{foo}: value ok 10001 - $vrlex->[0]{"x$lex"}{foo}: no exception ok 10002 - $vrlex->[0]{"x$lex"}{foo}: value ok 10003 - $vrlex->[0]{"x$lex"}{foo} = 123: no exception ok 10004 - $vrlex->[0]{"x$lex"}{foo} = 123: value ok 10005 - exists $vrlex->[0]{"x$lex"}{foo}: no exception ok 10006 - exists $vrlex->[0]{"x$lex"}{foo}: value ok 10007 - delete $vrlex->[0]{"x$lex"}{foo}: no exception ok 10008 - delete $vrlex->[0]{"x$lex"}{foo}: value ok 10009 - $vrgbl->[0]{"x$lex"}{foo}: no exception ok 10010 - $vrgbl->[0]{"x$lex"}{foo}: value ok 10011 - $vrgbl->[0]{"x$lex"}{foo} = 123: no exception ok 10012 - $vrgbl->[0]{"x$lex"}{foo} = 123: value ok 10013 - exists $vrgbl->[0]{"x$lex"}{foo}: no exception ok 10014 - exists $vrgbl->[0]{"x$lex"}{foo}: value ok 10015 - delete $vrgbl->[0]{"x$lex"}{foo}: no exception ok 10016 - delete $vrgbl->[0]{"x$lex"}{foo}: value ok 10017 - $vlex[$lex]{"x$lex"}{foo}: no exception ok 10018 - $vlex[$lex]{"x$lex"}{foo}: value ok 10019 - $vlex[$lex]{"x$lex"}{foo} = 123: no exception ok 10020 - $vlex[$lex]{"x$lex"}{foo} = 123: value ok 10021 - exists $vlex[$lex]{"x$lex"}{foo}: no exception ok 10022 - exists $vlex[$lex]{"x$lex"}{foo}: value ok 10023 - delete $vlex[$lex]{"x$lex"}{foo}: no exception ok 10024 - delete $vlex[$lex]{"x$lex"}{foo}: value ok 10025 - $vgbl[$lex]{"x$lex"}{foo}: no exception ok 10026 - $vgbl[$lex]{"x$lex"}{foo}: value ok 10027 - $vgbl[$lex]{"x$lex"}{foo} = 123: no exception ok 10028 - $vgbl[$lex]{"x$lex"}{foo} = 123: value ok 10029 - exists $vgbl[$lex]{"x$lex"}{foo}: no exception ok 10030 - exists $vgbl[$lex]{"x$lex"}{foo}: value ok 10031 - delete $vgbl[$lex]{"x$lex"}{foo}: no exception ok 10032 - delete $vgbl[$lex]{"x$lex"}{foo}: value ok 10033 - $vrlex->[$lex]{"x$lex"}{foo}: no exception ok 10034 - $vrlex->[$lex]{"x$lex"}{foo}: value ok 10035 - $vrlex->[$lex]{"x$lex"}{foo} = 123: no exception ok 10036 - $vrlex->[$lex]{"x$lex"}{foo} = 123: value ok 10037 - exists $vrlex->[$lex]{"x$lex"}{foo}: no exception ok 10038 - exists $vrlex->[$lex]{"x$lex"}{foo}: value ok 10039 - delete $vrlex->[$lex]{"x$lex"}{foo}: no exception ok 10040 - delete $vrlex->[$lex]{"x$lex"}{foo}: value ok 10041 - $vrgbl->[$lex]{"x$lex"}{foo}: no exception ok 10042 - $vrgbl->[$lex]{"x$lex"}{foo}: value ok 10043 - $vrgbl->[$lex]{"x$lex"}{foo} = 123: no exception ok 10044 - $vrgbl->[$lex]{"x$lex"}{foo} = 123: value ok 10045 - exists $vrgbl->[$lex]{"x$lex"}{foo}: no exception ok 10046 - exists $vrgbl->[$lex]{"x$lex"}{foo}: value ok 10047 - delete $vrgbl->[$lex]{"x$lex"}{foo}: no exception ok 10048 - delete $vrgbl->[$lex]{"x$lex"}{foo}: value ok 10049 - $vlex[$gbl]{"x$lex"}{foo}: no exception ok 10050 - $vlex[$gbl]{"x$lex"}{foo}: value ok 10051 - $vlex[$gbl]{"x$lex"}{foo} = 123: no exception ok 10052 - $vlex[$gbl]{"x$lex"}{foo} = 123: value ok 10053 - exists $vlex[$gbl]{"x$lex"}{foo}: no exception ok 10054 - exists $vlex[$gbl]{"x$lex"}{foo}: value ok 10055 - delete $vlex[$gbl]{"x$lex"}{foo}: no exception ok 10056 - delete $vlex[$gbl]{"x$lex"}{foo}: value ok 10057 - $vgbl[$gbl]{"x$lex"}{foo}: no exception ok 10058 - $vgbl[$gbl]{"x$lex"}{foo}: value ok 10059 - $vgbl[$gbl]{"x$lex"}{foo} = 123: no exception ok 10060 - $vgbl[$gbl]{"x$lex"}{foo} = 123: value ok 10061 - exists $vgbl[$gbl]{"x$lex"}{foo}: no exception ok 10062 - exists $vgbl[$gbl]{"x$lex"}{foo}: value ok 10063 - delete $vgbl[$gbl]{"x$lex"}{foo}: no exception ok 10064 - delete $vgbl[$gbl]{"x$lex"}{foo}: value ok 10065 - $vrlex->[$gbl]{"x$lex"}{foo}: no exception ok 10066 - $vrlex->[$gbl]{"x$lex"}{foo}: value ok 10067 - $vrlex->[$gbl]{"x$lex"}{foo} = 123: no exception ok 10068 - $vrlex->[$gbl]{"x$lex"}{foo} = 123: value ok 10069 - exists $vrlex->[$gbl]{"x$lex"}{foo}: no exception ok 10070 - exists $vrlex->[$gbl]{"x$lex"}{foo}: value ok 10071 - delete $vrlex->[$gbl]{"x$lex"}{foo}: no exception ok 10072 - delete $vrlex->[$gbl]{"x$lex"}{foo}: value ok 10073 - $vrgbl->[$gbl]{"x$lex"}{foo}: no exception ok 10074 - $vrgbl->[$gbl]{"x$lex"}{foo}: value ok 10075 - $vrgbl->[$gbl]{"x$lex"}{foo} = 123: no exception ok 10076 - $vrgbl->[$gbl]{"x$lex"}{foo} = 123: value ok 10077 - exists $vrgbl->[$gbl]{"x$lex"}{foo}: no exception ok 10078 - exists $vrgbl->[$gbl]{"x$lex"}{foo}: value ok 10079 - delete $vrgbl->[$gbl]{"x$lex"}{foo}: no exception ok 10080 - delete $vrgbl->[$gbl]{"x$lex"}{foo}: value ok 10081 - $vlex[$lex+1]{"x$lex"}{foo}: no exception ok 10082 - $vlex[$lex+1]{"x$lex"}{foo}: value ok 10083 - $vlex[$lex+1]{"x$lex"}{foo} = 123: no exception ok 10084 - $vlex[$lex+1]{"x$lex"}{foo} = 123: value ok 10085 - exists $vlex[$lex+1]{"x$lex"}{foo}: no exception ok 10086 - exists $vlex[$lex+1]{"x$lex"}{foo}: value ok 10087 - delete $vlex[$lex+1]{"x$lex"}{foo}: no exception ok 10088 - delete $vlex[$lex+1]{"x$lex"}{foo}: value ok 10089 - $vgbl[$lex+1]{"x$lex"}{foo}: no exception ok 10090 - $vgbl[$lex+1]{"x$lex"}{foo}: value ok 10091 - $vgbl[$lex+1]{"x$lex"}{foo} = 123: no exception ok 10092 - $vgbl[$lex+1]{"x$lex"}{foo} = 123: value ok 10093 - exists $vgbl[$lex+1]{"x$lex"}{foo}: no exception ok 10094 - exists $vgbl[$lex+1]{"x$lex"}{foo}: value ok 10095 - delete $vgbl[$lex+1]{"x$lex"}{foo}: no exception ok 10096 - delete $vgbl[$lex+1]{"x$lex"}{foo}: value ok 10097 - $vrlex->[$lex+1]{"x$lex"}{foo}: no exception ok 10098 - $vrlex->[$lex+1]{"x$lex"}{foo}: value ok 10099 - $vrlex->[$lex+1]{"x$lex"}{foo} = 123: no exception ok 10100 - $vrlex->[$lex+1]{"x$lex"}{foo} = 123: value ok 10101 - exists $vrlex->[$lex+1]{"x$lex"}{foo}: no exception ok 10102 - exists $vrlex->[$lex+1]{"x$lex"}{foo}: value ok 10103 - delete $vrlex->[$lex+1]{"x$lex"}{foo}: no exception ok 10104 - delete $vrlex->[$lex+1]{"x$lex"}{foo}: value ok 10105 - $vrgbl->[$lex+1]{"x$lex"}{foo}: no exception ok 10106 - $vrgbl->[$lex+1]{"x$lex"}{foo}: value ok 10107 - $vrgbl->[$lex+1]{"x$lex"}{foo} = 123: no exception ok 10108 - $vrgbl->[$lex+1]{"x$lex"}{foo} = 123: value ok 10109 - exists $vrgbl->[$lex+1]{"x$lex"}{foo}: no exception ok 10110 - exists $vrgbl->[$lex+1]{"x$lex"}{foo}: value ok 10111 - delete $vrgbl->[$lex+1]{"x$lex"}{foo}: no exception ok 10112 - delete $vrgbl->[$lex+1]{"x$lex"}{foo}: value ok 10113 - $vlex{foo}{"x$lex"}{foo}: no exception ok 10114 - $vlex{foo}{"x$lex"}{foo}: value ok 10115 - $vlex{foo}{"x$lex"}{foo} = 123: no exception ok 10116 - $vlex{foo}{"x$lex"}{foo} = 123: value ok 10117 - exists $vlex{foo}{"x$lex"}{foo}: no exception ok 10118 - exists $vlex{foo}{"x$lex"}{foo}: value ok 10119 - delete $vlex{foo}{"x$lex"}{foo}: no exception ok 10120 - delete $vlex{foo}{"x$lex"}{foo}: value ok 10121 - $vgbl{foo}{"x$lex"}{foo}: no exception ok 10122 - $vgbl{foo}{"x$lex"}{foo}: value ok 10123 - $vgbl{foo}{"x$lex"}{foo} = 123: no exception ok 10124 - $vgbl{foo}{"x$lex"}{foo} = 123: value ok 10125 - exists $vgbl{foo}{"x$lex"}{foo}: no exception ok 10126 - exists $vgbl{foo}{"x$lex"}{foo}: value ok 10127 - delete $vgbl{foo}{"x$lex"}{foo}: no exception ok 10128 - delete $vgbl{foo}{"x$lex"}{foo}: value ok 10129 - $vrlex->{foo}{"x$lex"}{foo}: no exception ok 10130 - $vrlex->{foo}{"x$lex"}{foo}: value ok 10131 - $vrlex->{foo}{"x$lex"}{foo} = 123: no exception ok 10132 - $vrlex->{foo}{"x$lex"}{foo} = 123: value ok 10133 - exists $vrlex->{foo}{"x$lex"}{foo}: no exception ok 10134 - exists $vrlex->{foo}{"x$lex"}{foo}: value ok 10135 - delete $vrlex->{foo}{"x$lex"}{foo}: no exception ok 10136 - delete $vrlex->{foo}{"x$lex"}{foo}: value ok 10137 - $vrgbl->{foo}{"x$lex"}{foo}: no exception ok 10138 - $vrgbl->{foo}{"x$lex"}{foo}: value ok 10139 - $vrgbl->{foo}{"x$lex"}{foo} = 123: no exception ok 10140 - $vrgbl->{foo}{"x$lex"}{foo} = 123: value ok 10141 - exists $vrgbl->{foo}{"x$lex"}{foo}: no exception ok 10142 - exists $vrgbl->{foo}{"x$lex"}{foo}: value ok 10143 - delete $vrgbl->{foo}{"x$lex"}{foo}: no exception ok 10144 - delete $vrgbl->{foo}{"x$lex"}{foo}: value ok 10145 - $vlex{$lex}{"x$lex"}{foo}: no exception ok 10146 - $vlex{$lex}{"x$lex"}{foo}: value ok 10147 - $vlex{$lex}{"x$lex"}{foo} = 123: no exception ok 10148 - $vlex{$lex}{"x$lex"}{foo} = 123: value ok 10149 - exists $vlex{$lex}{"x$lex"}{foo}: no exception ok 10150 - exists $vlex{$lex}{"x$lex"}{foo}: value ok 10151 - delete $vlex{$lex}{"x$lex"}{foo}: no exception ok 10152 - delete $vlex{$lex}{"x$lex"}{foo}: value ok 10153 - $vgbl{$lex}{"x$lex"}{foo}: no exception ok 10154 - $vgbl{$lex}{"x$lex"}{foo}: value ok 10155 - $vgbl{$lex}{"x$lex"}{foo} = 123: no exception ok 10156 - $vgbl{$lex}{"x$lex"}{foo} = 123: value ok 10157 - exists $vgbl{$lex}{"x$lex"}{foo}: no exception ok 10158 - exists $vgbl{$lex}{"x$lex"}{foo}: value ok 10159 - delete $vgbl{$lex}{"x$lex"}{foo}: no exception ok 10160 - delete $vgbl{$lex}{"x$lex"}{foo}: value ok 10161 - $vrlex->{$lex}{"x$lex"}{foo}: no exception ok 10162 - $vrlex->{$lex}{"x$lex"}{foo}: value ok 10163 - $vrlex->{$lex}{"x$lex"}{foo} = 123: no exception ok 10164 - $vrlex->{$lex}{"x$lex"}{foo} = 123: value ok 10165 - exists $vrlex->{$lex}{"x$lex"}{foo}: no exception ok 10166 - exists $vrlex->{$lex}{"x$lex"}{foo}: value ok 10167 - delete $vrlex->{$lex}{"x$lex"}{foo}: no exception ok 10168 - delete $vrlex->{$lex}{"x$lex"}{foo}: value ok 10169 - $vrgbl->{$lex}{"x$lex"}{foo}: no exception ok 10170 - $vrgbl->{$lex}{"x$lex"}{foo}: value ok 10171 - $vrgbl->{$lex}{"x$lex"}{foo} = 123: no exception ok 10172 - $vrgbl->{$lex}{"x$lex"}{foo} = 123: value ok 10173 - exists $vrgbl->{$lex}{"x$lex"}{foo}: no exception ok 10174 - exists $vrgbl->{$lex}{"x$lex"}{foo}: value ok 10175 - delete $vrgbl->{$lex}{"x$lex"}{foo}: no exception ok 10176 - delete $vrgbl->{$lex}{"x$lex"}{foo}: value ok 10177 - $vlex{$gbl}{"x$lex"}{foo}: no exception ok 10178 - $vlex{$gbl}{"x$lex"}{foo}: value ok 10179 - $vlex{$gbl}{"x$lex"}{foo} = 123: no exception ok 10180 - $vlex{$gbl}{"x$lex"}{foo} = 123: value ok 10181 - exists $vlex{$gbl}{"x$lex"}{foo}: no exception ok 10182 - exists $vlex{$gbl}{"x$lex"}{foo}: value ok 10183 - delete $vlex{$gbl}{"x$lex"}{foo}: no exception ok 10184 - delete $vlex{$gbl}{"x$lex"}{foo}: value ok 10185 - $vgbl{$gbl}{"x$lex"}{foo}: no exception ok 10186 - $vgbl{$gbl}{"x$lex"}{foo}: value ok 10187 - $vgbl{$gbl}{"x$lex"}{foo} = 123: no exception ok 10188 - $vgbl{$gbl}{"x$lex"}{foo} = 123: value ok 10189 - exists $vgbl{$gbl}{"x$lex"}{foo}: no exception ok 10190 - exists $vgbl{$gbl}{"x$lex"}{foo}: value ok 10191 - delete $vgbl{$gbl}{"x$lex"}{foo}: no exception ok 10192 - delete $vgbl{$gbl}{"x$lex"}{foo}: value ok 10193 - $vrlex->{$gbl}{"x$lex"}{foo}: no exception ok 10194 - $vrlex->{$gbl}{"x$lex"}{foo}: value ok 10195 - $vrlex->{$gbl}{"x$lex"}{foo} = 123: no exception ok 10196 - $vrlex->{$gbl}{"x$lex"}{foo} = 123: value ok 10197 - exists $vrlex->{$gbl}{"x$lex"}{foo}: no exception ok 10198 - exists $vrlex->{$gbl}{"x$lex"}{foo}: value ok 10199 - delete $vrlex->{$gbl}{"x$lex"}{foo}: no exception ok 10200 - delete $vrlex->{$gbl}{"x$lex"}{foo}: value ok 10201 - $vrgbl->{$gbl}{"x$lex"}{foo}: no exception ok 10202 - $vrgbl->{$gbl}{"x$lex"}{foo}: value ok 10203 - $vrgbl->{$gbl}{"x$lex"}{foo} = 123: no exception ok 10204 - $vrgbl->{$gbl}{"x$lex"}{foo} = 123: value ok 10205 - exists $vrgbl->{$gbl}{"x$lex"}{foo}: no exception ok 10206 - exists $vrgbl->{$gbl}{"x$lex"}{foo}: value ok 10207 - delete $vrgbl->{$gbl}{"x$lex"}{foo}: no exception ok 10208 - delete $vrgbl->{$gbl}{"x$lex"}{foo}: value ok 10209 - $vlex{"x$lex"}{"x$lex"}{foo}: no exception ok 10210 - $vlex{"x$lex"}{"x$lex"}{foo}: value ok 10211 - $vlex{"x$lex"}{"x$lex"}{foo} = 123: no exception ok 10212 - $vlex{"x$lex"}{"x$lex"}{foo} = 123: value ok 10213 - exists $vlex{"x$lex"}{"x$lex"}{foo}: no exception ok 10214 - exists $vlex{"x$lex"}{"x$lex"}{foo}: value ok 10215 - delete $vlex{"x$lex"}{"x$lex"}{foo}: no exception ok 10216 - delete $vlex{"x$lex"}{"x$lex"}{foo}: value ok 10217 - $vgbl{"x$lex"}{"x$lex"}{foo}: no exception ok 10218 - $vgbl{"x$lex"}{"x$lex"}{foo}: value ok 10219 - $vgbl{"x$lex"}{"x$lex"}{foo} = 123: no exception ok 10220 - $vgbl{"x$lex"}{"x$lex"}{foo} = 123: value ok 10221 - exists $vgbl{"x$lex"}{"x$lex"}{foo}: no exception ok 10222 - exists $vgbl{"x$lex"}{"x$lex"}{foo}: value ok 10223 - delete $vgbl{"x$lex"}{"x$lex"}{foo}: no exception ok 10224 - delete $vgbl{"x$lex"}{"x$lex"}{foo}: value ok 10225 - $vrlex->{"x$lex"}{"x$lex"}{foo}: no exception ok 10226 - $vrlex->{"x$lex"}{"x$lex"}{foo}: value ok 10227 - $vrlex->{"x$lex"}{"x$lex"}{foo} = 123: no exception ok 10228 - $vrlex->{"x$lex"}{"x$lex"}{foo} = 123: value ok 10229 - exists $vrlex->{"x$lex"}{"x$lex"}{foo}: no exception ok 10230 - exists $vrlex->{"x$lex"}{"x$lex"}{foo}: value ok 10231 - delete $vrlex->{"x$lex"}{"x$lex"}{foo}: no exception ok 10232 - delete $vrlex->{"x$lex"}{"x$lex"}{foo}: value ok 10233 - $vrgbl->{"x$lex"}{"x$lex"}{foo}: no exception ok 10234 - $vrgbl->{"x$lex"}{"x$lex"}{foo}: value ok 10235 - $vrgbl->{"x$lex"}{"x$lex"}{foo} = 123: no exception ok 10236 - $vrgbl->{"x$lex"}{"x$lex"}{foo} = 123: value ok 10237 - exists $vrgbl->{"x$lex"}{"x$lex"}{foo}: no exception ok 10238 - exists $vrgbl->{"x$lex"}{"x$lex"}{foo}: value ok 10239 - delete $vrgbl->{"x$lex"}{"x$lex"}{foo}: no exception ok 10240 - delete $vrgbl->{"x$lex"}{"x$lex"}{foo}: value ok 10241 - $vlex[0][0]{$lex}: no exception ok 10242 - $vlex[0][0]{$lex}: value ok 10243 - $vlex[0][0]{$lex} = 123: no exception ok 10244 - $vlex[0][0]{$lex} = 123: value ok 10245 - exists $vlex[0][0]{$lex}: no exception ok 10246 - exists $vlex[0][0]{$lex}: value ok 10247 - delete $vlex[0][0]{$lex}: no exception ok 10248 - delete $vlex[0][0]{$lex}: value ok 10249 - $vgbl[0][0]{$lex}: no exception ok 10250 - $vgbl[0][0]{$lex}: value ok 10251 - $vgbl[0][0]{$lex} = 123: no exception ok 10252 - $vgbl[0][0]{$lex} = 123: value ok 10253 - exists $vgbl[0][0]{$lex}: no exception ok 10254 - exists $vgbl[0][0]{$lex}: value ok 10255 - delete $vgbl[0][0]{$lex}: no exception ok 10256 - delete $vgbl[0][0]{$lex}: value ok 10257 - $vrlex->[0][0]{$lex}: no exception ok 10258 - $vrlex->[0][0]{$lex}: value ok 10259 - $vrlex->[0][0]{$lex} = 123: no exception ok 10260 - $vrlex->[0][0]{$lex} = 123: value ok 10261 - exists $vrlex->[0][0]{$lex}: no exception ok 10262 - exists $vrlex->[0][0]{$lex}: value ok 10263 - delete $vrlex->[0][0]{$lex}: no exception ok 10264 - delete $vrlex->[0][0]{$lex}: value ok 10265 - $vrgbl->[0][0]{$lex}: no exception ok 10266 - $vrgbl->[0][0]{$lex}: value ok 10267 - $vrgbl->[0][0]{$lex} = 123: no exception ok 10268 - $vrgbl->[0][0]{$lex} = 123: value ok 10269 - exists $vrgbl->[0][0]{$lex}: no exception ok 10270 - exists $vrgbl->[0][0]{$lex}: value ok 10271 - delete $vrgbl->[0][0]{$lex}: no exception ok 10272 - delete $vrgbl->[0][0]{$lex}: value ok 10273 - $vlex[$lex][0]{$lex}: no exception ok 10274 - $vlex[$lex][0]{$lex}: value ok 10275 - $vlex[$lex][0]{$lex} = 123: no exception ok 10276 - $vlex[$lex][0]{$lex} = 123: value ok 10277 - exists $vlex[$lex][0]{$lex}: no exception ok 10278 - exists $vlex[$lex][0]{$lex}: value ok 10279 - delete $vlex[$lex][0]{$lex}: no exception ok 10280 - delete $vlex[$lex][0]{$lex}: value ok 10281 - $vgbl[$lex][0]{$lex}: no exception ok 10282 - $vgbl[$lex][0]{$lex}: value ok 10283 - $vgbl[$lex][0]{$lex} = 123: no exception ok 10284 - $vgbl[$lex][0]{$lex} = 123: value ok 10285 - exists $vgbl[$lex][0]{$lex}: no exception ok 10286 - exists $vgbl[$lex][0]{$lex}: value ok 10287 - delete $vgbl[$lex][0]{$lex}: no exception ok 10288 - delete $vgbl[$lex][0]{$lex}: value ok 10289 - $vrlex->[$lex][0]{$lex}: no exception ok 10290 - $vrlex->[$lex][0]{$lex}: value ok 10291 - $vrlex->[$lex][0]{$lex} = 123: no exception ok 10292 - $vrlex->[$lex][0]{$lex} = 123: value ok 10293 - exists $vrlex->[$lex][0]{$lex}: no exception ok 10294 - exists $vrlex->[$lex][0]{$lex}: value ok 10295 - delete $vrlex->[$lex][0]{$lex}: no exception ok 10296 - delete $vrlex->[$lex][0]{$lex}: value ok 10297 - $vrgbl->[$lex][0]{$lex}: no exception ok 10298 - $vrgbl->[$lex][0]{$lex}: value ok 10299 - $vrgbl->[$lex][0]{$lex} = 123: no exception ok 10300 - $vrgbl->[$lex][0]{$lex} = 123: value ok 10301 - exists $vrgbl->[$lex][0]{$lex}: no exception ok 10302 - exists $vrgbl->[$lex][0]{$lex}: value ok 10303 - delete $vrgbl->[$lex][0]{$lex}: no exception ok 10304 - delete $vrgbl->[$lex][0]{$lex}: value ok 10305 - $vlex[$gbl][0]{$lex}: no exception ok 10306 - $vlex[$gbl][0]{$lex}: value ok 10307 - $vlex[$gbl][0]{$lex} = 123: no exception ok 10308 - $vlex[$gbl][0]{$lex} = 123: value ok 10309 - exists $vlex[$gbl][0]{$lex}: no exception ok 10310 - exists $vlex[$gbl][0]{$lex}: value ok 10311 - delete $vlex[$gbl][0]{$lex}: no exception ok 10312 - delete $vlex[$gbl][0]{$lex}: value ok 10313 - $vgbl[$gbl][0]{$lex}: no exception ok 10314 - $vgbl[$gbl][0]{$lex}: value ok 10315 - $vgbl[$gbl][0]{$lex} = 123: no exception ok 10316 - $vgbl[$gbl][0]{$lex} = 123: value ok 10317 - exists $vgbl[$gbl][0]{$lex}: no exception ok 10318 - exists $vgbl[$gbl][0]{$lex}: value ok 10319 - delete $vgbl[$gbl][0]{$lex}: no exception ok 10320 - delete $vgbl[$gbl][0]{$lex}: value ok 10321 - $vrlex->[$gbl][0]{$lex}: no exception ok 10322 - $vrlex->[$gbl][0]{$lex}: value ok 10323 - $vrlex->[$gbl][0]{$lex} = 123: no exception ok 10324 - $vrlex->[$gbl][0]{$lex} = 123: value ok 10325 - exists $vrlex->[$gbl][0]{$lex}: no exception ok 10326 - exists $vrlex->[$gbl][0]{$lex}: value ok 10327 - delete $vrlex->[$gbl][0]{$lex}: no exception ok 10328 - delete $vrlex->[$gbl][0]{$lex}: value ok 10329 - $vrgbl->[$gbl][0]{$lex}: no exception ok 10330 - $vrgbl->[$gbl][0]{$lex}: value ok 10331 - $vrgbl->[$gbl][0]{$lex} = 123: no exception ok 10332 - $vrgbl->[$gbl][0]{$lex} = 123: value ok 10333 - exists $vrgbl->[$gbl][0]{$lex}: no exception ok 10334 - exists $vrgbl->[$gbl][0]{$lex}: value ok 10335 - delete $vrgbl->[$gbl][0]{$lex}: no exception ok 10336 - delete $vrgbl->[$gbl][0]{$lex}: value ok 10337 - $vlex[$lex+1][0]{$lex}: no exception ok 10338 - $vlex[$lex+1][0]{$lex}: value ok 10339 - $vlex[$lex+1][0]{$lex} = 123: no exception ok 10340 - $vlex[$lex+1][0]{$lex} = 123: value ok 10341 - exists $vlex[$lex+1][0]{$lex}: no exception ok 10342 - exists $vlex[$lex+1][0]{$lex}: value ok 10343 - delete $vlex[$lex+1][0]{$lex}: no exception ok 10344 - delete $vlex[$lex+1][0]{$lex}: value ok 10345 - $vgbl[$lex+1][0]{$lex}: no exception ok 10346 - $vgbl[$lex+1][0]{$lex}: value ok 10347 - $vgbl[$lex+1][0]{$lex} = 123: no exception ok 10348 - $vgbl[$lex+1][0]{$lex} = 123: value ok 10349 - exists $vgbl[$lex+1][0]{$lex}: no exception ok 10350 - exists $vgbl[$lex+1][0]{$lex}: value ok 10351 - delete $vgbl[$lex+1][0]{$lex}: no exception ok 10352 - delete $vgbl[$lex+1][0]{$lex}: value ok 10353 - $vrlex->[$lex+1][0]{$lex}: no exception ok 10354 - $vrlex->[$lex+1][0]{$lex}: value ok 10355 - $vrlex->[$lex+1][0]{$lex} = 123: no exception ok 10356 - $vrlex->[$lex+1][0]{$lex} = 123: value ok 10357 - exists $vrlex->[$lex+1][0]{$lex}: no exception ok 10358 - exists $vrlex->[$lex+1][0]{$lex}: value ok 10359 - delete $vrlex->[$lex+1][0]{$lex}: no exception ok 10360 - delete $vrlex->[$lex+1][0]{$lex}: value ok 10361 - $vrgbl->[$lex+1][0]{$lex}: no exception ok 10362 - $vrgbl->[$lex+1][0]{$lex}: value ok 10363 - $vrgbl->[$lex+1][0]{$lex} = 123: no exception ok 10364 - $vrgbl->[$lex+1][0]{$lex} = 123: value ok 10365 - exists $vrgbl->[$lex+1][0]{$lex}: no exception ok 10366 - exists $vrgbl->[$lex+1][0]{$lex}: value ok 10367 - delete $vrgbl->[$lex+1][0]{$lex}: no exception ok 10368 - delete $vrgbl->[$lex+1][0]{$lex}: value ok 10369 - $vlex{foo}[0]{$lex}: no exception ok 10370 - $vlex{foo}[0]{$lex}: value ok 10371 - $vlex{foo}[0]{$lex} = 123: no exception ok 10372 - $vlex{foo}[0]{$lex} = 123: value ok 10373 - exists $vlex{foo}[0]{$lex}: no exception ok 10374 - exists $vlex{foo}[0]{$lex}: value ok 10375 - delete $vlex{foo}[0]{$lex}: no exception ok 10376 - delete $vlex{foo}[0]{$lex}: value ok 10377 - $vgbl{foo}[0]{$lex}: no exception ok 10378 - $vgbl{foo}[0]{$lex}: value ok 10379 - $vgbl{foo}[0]{$lex} = 123: no exception ok 10380 - $vgbl{foo}[0]{$lex} = 123: value ok 10381 - exists $vgbl{foo}[0]{$lex}: no exception ok 10382 - exists $vgbl{foo}[0]{$lex}: value ok 10383 - delete $vgbl{foo}[0]{$lex}: no exception ok 10384 - delete $vgbl{foo}[0]{$lex}: value ok 10385 - $vrlex->{foo}[0]{$lex}: no exception ok 10386 - $vrlex->{foo}[0]{$lex}: value ok 10387 - $vrlex->{foo}[0]{$lex} = 123: no exception ok 10388 - $vrlex->{foo}[0]{$lex} = 123: value ok 10389 - exists $vrlex->{foo}[0]{$lex}: no exception ok 10390 - exists $vrlex->{foo}[0]{$lex}: value ok 10391 - delete $vrlex->{foo}[0]{$lex}: no exception ok 10392 - delete $vrlex->{foo}[0]{$lex}: value ok 10393 - $vrgbl->{foo}[0]{$lex}: no exception ok 10394 - $vrgbl->{foo}[0]{$lex}: value ok 10395 - $vrgbl->{foo}[0]{$lex} = 123: no exception ok 10396 - $vrgbl->{foo}[0]{$lex} = 123: value ok 10397 - exists $vrgbl->{foo}[0]{$lex}: no exception ok 10398 - exists $vrgbl->{foo}[0]{$lex}: value ok 10399 - delete $vrgbl->{foo}[0]{$lex}: no exception ok 10400 - delete $vrgbl->{foo}[0]{$lex}: value ok 10401 - $vlex{$lex}[0]{$lex}: no exception ok 10402 - $vlex{$lex}[0]{$lex}: value ok 10403 - $vlex{$lex}[0]{$lex} = 123: no exception ok 10404 - $vlex{$lex}[0]{$lex} = 123: value ok 10405 - exists $vlex{$lex}[0]{$lex}: no exception ok 10406 - exists $vlex{$lex}[0]{$lex}: value ok 10407 - delete $vlex{$lex}[0]{$lex}: no exception ok 10408 - delete $vlex{$lex}[0]{$lex}: value ok 10409 - $vgbl{$lex}[0]{$lex}: no exception ok 10410 - $vgbl{$lex}[0]{$lex}: value ok 10411 - $vgbl{$lex}[0]{$lex} = 123: no exception ok 10412 - $vgbl{$lex}[0]{$lex} = 123: value ok 10413 - exists $vgbl{$lex}[0]{$lex}: no exception ok 10414 - exists $vgbl{$lex}[0]{$lex}: value ok 10415 - delete $vgbl{$lex}[0]{$lex}: no exception ok 10416 - delete $vgbl{$lex}[0]{$lex}: value ok 10417 - $vrlex->{$lex}[0]{$lex}: no exception ok 10418 - $vrlex->{$lex}[0]{$lex}: value ok 10419 - $vrlex->{$lex}[0]{$lex} = 123: no exception ok 10420 - $vrlex->{$lex}[0]{$lex} = 123: value ok 10421 - exists $vrlex->{$lex}[0]{$lex}: no exception ok 10422 - exists $vrlex->{$lex}[0]{$lex}: value ok 10423 - delete $vrlex->{$lex}[0]{$lex}: no exception ok 10424 - delete $vrlex->{$lex}[0]{$lex}: value ok 10425 - $vrgbl->{$lex}[0]{$lex}: no exception ok 10426 - $vrgbl->{$lex}[0]{$lex}: value ok 10427 - $vrgbl->{$lex}[0]{$lex} = 123: no exception ok 10428 - $vrgbl->{$lex}[0]{$lex} = 123: value ok 10429 - exists $vrgbl->{$lex}[0]{$lex}: no exception ok 10430 - exists $vrgbl->{$lex}[0]{$lex}: value ok 10431 - delete $vrgbl->{$lex}[0]{$lex}: no exception ok 10432 - delete $vrgbl->{$lex}[0]{$lex}: value ok 10433 - $vlex{$gbl}[0]{$lex}: no exception ok 10434 - $vlex{$gbl}[0]{$lex}: value ok 10435 - $vlex{$gbl}[0]{$lex} = 123: no exception ok 10436 - $vlex{$gbl}[0]{$lex} = 123: value ok 10437 - exists $vlex{$gbl}[0]{$lex}: no exception ok 10438 - exists $vlex{$gbl}[0]{$lex}: value ok 10439 - delete $vlex{$gbl}[0]{$lex}: no exception ok 10440 - delete $vlex{$gbl}[0]{$lex}: value ok 10441 - $vgbl{$gbl}[0]{$lex}: no exception ok 10442 - $vgbl{$gbl}[0]{$lex}: value ok 10443 - $vgbl{$gbl}[0]{$lex} = 123: no exception ok 10444 - $vgbl{$gbl}[0]{$lex} = 123: value ok 10445 - exists $vgbl{$gbl}[0]{$lex}: no exception ok 10446 - exists $vgbl{$gbl}[0]{$lex}: value ok 10447 - delete $vgbl{$gbl}[0]{$lex}: no exception ok 10448 - delete $vgbl{$gbl}[0]{$lex}: value ok 10449 - $vrlex->{$gbl}[0]{$lex}: no exception ok 10450 - $vrlex->{$gbl}[0]{$lex}: value ok 10451 - $vrlex->{$gbl}[0]{$lex} = 123: no exception ok 10452 - $vrlex->{$gbl}[0]{$lex} = 123: value ok 10453 - exists $vrlex->{$gbl}[0]{$lex}: no exception ok 10454 - exists $vrlex->{$gbl}[0]{$lex}: value ok 10455 - delete $vrlex->{$gbl}[0]{$lex}: no exception ok 10456 - delete $vrlex->{$gbl}[0]{$lex}: value ok 10457 - $vrgbl->{$gbl}[0]{$lex}: no exception ok 10458 - $vrgbl->{$gbl}[0]{$lex}: value ok 10459 - $vrgbl->{$gbl}[0]{$lex} = 123: no exception ok 10460 - $vrgbl->{$gbl}[0]{$lex} = 123: value ok 10461 - exists $vrgbl->{$gbl}[0]{$lex}: no exception ok 10462 - exists $vrgbl->{$gbl}[0]{$lex}: value ok 10463 - delete $vrgbl->{$gbl}[0]{$lex}: no exception ok 10464 - delete $vrgbl->{$gbl}[0]{$lex}: value ok 10465 - $vlex{"x$lex"}[0]{$lex}: no exception ok 10466 - $vlex{"x$lex"}[0]{$lex}: value ok 10467 - $vlex{"x$lex"}[0]{$lex} = 123: no exception ok 10468 - $vlex{"x$lex"}[0]{$lex} = 123: value ok 10469 - exists $vlex{"x$lex"}[0]{$lex}: no exception ok 10470 - exists $vlex{"x$lex"}[0]{$lex}: value ok 10471 - delete $vlex{"x$lex"}[0]{$lex}: no exception ok 10472 - delete $vlex{"x$lex"}[0]{$lex}: value ok 10473 - $vgbl{"x$lex"}[0]{$lex}: no exception ok 10474 - $vgbl{"x$lex"}[0]{$lex}: value ok 10475 - $vgbl{"x$lex"}[0]{$lex} = 123: no exception ok 10476 - $vgbl{"x$lex"}[0]{$lex} = 123: value ok 10477 - exists $vgbl{"x$lex"}[0]{$lex}: no exception ok 10478 - exists $vgbl{"x$lex"}[0]{$lex}: value ok 10479 - delete $vgbl{"x$lex"}[0]{$lex}: no exception ok 10480 - delete $vgbl{"x$lex"}[0]{$lex}: value ok 10481 - $vrlex->{"x$lex"}[0]{$lex}: no exception ok 10482 - $vrlex->{"x$lex"}[0]{$lex}: value ok 10483 - $vrlex->{"x$lex"}[0]{$lex} = 123: no exception ok 10484 - $vrlex->{"x$lex"}[0]{$lex} = 123: value ok 10485 - exists $vrlex->{"x$lex"}[0]{$lex}: no exception ok 10486 - exists $vrlex->{"x$lex"}[0]{$lex}: value ok 10487 - delete $vrlex->{"x$lex"}[0]{$lex}: no exception ok 10488 - delete $vrlex->{"x$lex"}[0]{$lex}: value ok 10489 - $vrgbl->{"x$lex"}[0]{$lex}: no exception ok 10490 - $vrgbl->{"x$lex"}[0]{$lex}: value ok 10491 - $vrgbl->{"x$lex"}[0]{$lex} = 123: no exception ok 10492 - $vrgbl->{"x$lex"}[0]{$lex} = 123: value ok 10493 - exists $vrgbl->{"x$lex"}[0]{$lex}: no exception ok 10494 - exists $vrgbl->{"x$lex"}[0]{$lex}: value ok 10495 - delete $vrgbl->{"x$lex"}[0]{$lex}: no exception ok 10496 - delete $vrgbl->{"x$lex"}[0]{$lex}: value ok 10497 - $vlex[0][$lex]{$lex}: no exception ok 10498 - $vlex[0][$lex]{$lex}: value ok 10499 - $vlex[0][$lex]{$lex} = 123: no exception ok 10500 - $vlex[0][$lex]{$lex} = 123: value ok 10501 - exists $vlex[0][$lex]{$lex}: no exception ok 10502 - exists $vlex[0][$lex]{$lex}: value ok 10503 - delete $vlex[0][$lex]{$lex}: no exception ok 10504 - delete $vlex[0][$lex]{$lex}: value ok 10505 - $vgbl[0][$lex]{$lex}: no exception ok 10506 - $vgbl[0][$lex]{$lex}: value ok 10507 - $vgbl[0][$lex]{$lex} = 123: no exception ok 10508 - $vgbl[0][$lex]{$lex} = 123: value ok 10509 - exists $vgbl[0][$lex]{$lex}: no exception ok 10510 - exists $vgbl[0][$lex]{$lex}: value ok 10511 - delete $vgbl[0][$lex]{$lex}: no exception ok 10512 - delete $vgbl[0][$lex]{$lex}: value ok 10513 - $vrlex->[0][$lex]{$lex}: no exception ok 10514 - $vrlex->[0][$lex]{$lex}: value ok 10515 - $vrlex->[0][$lex]{$lex} = 123: no exception ok 10516 - $vrlex->[0][$lex]{$lex} = 123: value ok 10517 - exists $vrlex->[0][$lex]{$lex}: no exception ok 10518 - exists $vrlex->[0][$lex]{$lex}: value ok 10519 - delete $vrlex->[0][$lex]{$lex}: no exception ok 10520 - delete $vrlex->[0][$lex]{$lex}: value ok 10521 - $vrgbl->[0][$lex]{$lex}: no exception ok 10522 - $vrgbl->[0][$lex]{$lex}: value ok 10523 - $vrgbl->[0][$lex]{$lex} = 123: no exception ok 10524 - $vrgbl->[0][$lex]{$lex} = 123: value ok 10525 - exists $vrgbl->[0][$lex]{$lex}: no exception ok 10526 - exists $vrgbl->[0][$lex]{$lex}: value ok 10527 - delete $vrgbl->[0][$lex]{$lex}: no exception ok 10528 - delete $vrgbl->[0][$lex]{$lex}: value ok 10529 - $vlex[$lex][$lex]{$lex}: no exception ok 10530 - $vlex[$lex][$lex]{$lex}: value ok 10531 - $vlex[$lex][$lex]{$lex} = 123: no exception ok 10532 - $vlex[$lex][$lex]{$lex} = 123: value ok 10533 - exists $vlex[$lex][$lex]{$lex}: no exception ok 10534 - exists $vlex[$lex][$lex]{$lex}: value ok 10535 - delete $vlex[$lex][$lex]{$lex}: no exception ok 10536 - delete $vlex[$lex][$lex]{$lex}: value ok 10537 - $vgbl[$lex][$lex]{$lex}: no exception ok 10538 - $vgbl[$lex][$lex]{$lex}: value ok 10539 - $vgbl[$lex][$lex]{$lex} = 123: no exception ok 10540 - $vgbl[$lex][$lex]{$lex} = 123: value ok 10541 - exists $vgbl[$lex][$lex]{$lex}: no exception ok 10542 - exists $vgbl[$lex][$lex]{$lex}: value ok 10543 - delete $vgbl[$lex][$lex]{$lex}: no exception ok 10544 - delete $vgbl[$lex][$lex]{$lex}: value ok 10545 - $vrlex->[$lex][$lex]{$lex}: no exception ok 10546 - $vrlex->[$lex][$lex]{$lex}: value ok 10547 - $vrlex->[$lex][$lex]{$lex} = 123: no exception ok 10548 - $vrlex->[$lex][$lex]{$lex} = 123: value ok 10549 - exists $vrlex->[$lex][$lex]{$lex}: no exception ok 10550 - exists $vrlex->[$lex][$lex]{$lex}: value ok 10551 - delete $vrlex->[$lex][$lex]{$lex}: no exception ok 10552 - delete $vrlex->[$lex][$lex]{$lex}: value ok 10553 - $vrgbl->[$lex][$lex]{$lex}: no exception ok 10554 - $vrgbl->[$lex][$lex]{$lex}: value ok 10555 - $vrgbl->[$lex][$lex]{$lex} = 123: no exception ok 10556 - $vrgbl->[$lex][$lex]{$lex} = 123: value ok 10557 - exists $vrgbl->[$lex][$lex]{$lex}: no exception ok 10558 - exists $vrgbl->[$lex][$lex]{$lex}: value ok 10559 - delete $vrgbl->[$lex][$lex]{$lex}: no exception ok 10560 - delete $vrgbl->[$lex][$lex]{$lex}: value ok 10561 - $vlex[$gbl][$lex]{$lex}: no exception ok 10562 - $vlex[$gbl][$lex]{$lex}: value ok 10563 - $vlex[$gbl][$lex]{$lex} = 123: no exception ok 10564 - $vlex[$gbl][$lex]{$lex} = 123: value ok 10565 - exists $vlex[$gbl][$lex]{$lex}: no exception ok 10566 - exists $vlex[$gbl][$lex]{$lex}: value ok 10567 - delete $vlex[$gbl][$lex]{$lex}: no exception ok 10568 - delete $vlex[$gbl][$lex]{$lex}: value ok 10569 - $vgbl[$gbl][$lex]{$lex}: no exception ok 10570 - $vgbl[$gbl][$lex]{$lex}: value ok 10571 - $vgbl[$gbl][$lex]{$lex} = 123: no exception ok 10572 - $vgbl[$gbl][$lex]{$lex} = 123: value ok 10573 - exists $vgbl[$gbl][$lex]{$lex}: no exception ok 10574 - exists $vgbl[$gbl][$lex]{$lex}: value ok 10575 - delete $vgbl[$gbl][$lex]{$lex}: no exception ok 10576 - delete $vgbl[$gbl][$lex]{$lex}: value ok 10577 - $vrlex->[$gbl][$lex]{$lex}: no exception ok 10578 - $vrlex->[$gbl][$lex]{$lex}: value ok 10579 - $vrlex->[$gbl][$lex]{$lex} = 123: no exception ok 10580 - $vrlex->[$gbl][$lex]{$lex} = 123: value ok 10581 - exists $vrlex->[$gbl][$lex]{$lex}: no exception ok 10582 - exists $vrlex->[$gbl][$lex]{$lex}: value ok 10583 - delete $vrlex->[$gbl][$lex]{$lex}: no exception ok 10584 - delete $vrlex->[$gbl][$lex]{$lex}: value ok 10585 - $vrgbl->[$gbl][$lex]{$lex}: no exception ok 10586 - $vrgbl->[$gbl][$lex]{$lex}: value ok 10587 - $vrgbl->[$gbl][$lex]{$lex} = 123: no exception ok 10588 - $vrgbl->[$gbl][$lex]{$lex} = 123: value ok 10589 - exists $vrgbl->[$gbl][$lex]{$lex}: no exception ok 10590 - exists $vrgbl->[$gbl][$lex]{$lex}: value ok 10591 - delete $vrgbl->[$gbl][$lex]{$lex}: no exception ok 10592 - delete $vrgbl->[$gbl][$lex]{$lex}: value ok 10593 - $vlex[$lex+1][$lex]{$lex}: no exception ok 10594 - $vlex[$lex+1][$lex]{$lex}: value ok 10595 - $vlex[$lex+1][$lex]{$lex} = 123: no exception ok 10596 - $vlex[$lex+1][$lex]{$lex} = 123: value ok 10597 - exists $vlex[$lex+1][$lex]{$lex}: no exception ok 10598 - exists $vlex[$lex+1][$lex]{$lex}: value ok 10599 - delete $vlex[$lex+1][$lex]{$lex}: no exception ok 10600 - delete $vlex[$lex+1][$lex]{$lex}: value ok 10601 - $vgbl[$lex+1][$lex]{$lex}: no exception ok 10602 - $vgbl[$lex+1][$lex]{$lex}: value ok 10603 - $vgbl[$lex+1][$lex]{$lex} = 123: no exception ok 10604 - $vgbl[$lex+1][$lex]{$lex} = 123: value ok 10605 - exists $vgbl[$lex+1][$lex]{$lex}: no exception ok 10606 - exists $vgbl[$lex+1][$lex]{$lex}: value ok 10607 - delete $vgbl[$lex+1][$lex]{$lex}: no exception ok 10608 - delete $vgbl[$lex+1][$lex]{$lex}: value ok 10609 - $vrlex->[$lex+1][$lex]{$lex}: no exception ok 10610 - $vrlex->[$lex+1][$lex]{$lex}: value ok 10611 - $vrlex->[$lex+1][$lex]{$lex} = 123: no exception ok 10612 - $vrlex->[$lex+1][$lex]{$lex} = 123: value ok 10613 - exists $vrlex->[$lex+1][$lex]{$lex}: no exception ok 10614 - exists $vrlex->[$lex+1][$lex]{$lex}: value ok 10615 - delete $vrlex->[$lex+1][$lex]{$lex}: no exception ok 10616 - delete $vrlex->[$lex+1][$lex]{$lex}: value ok 10617 - $vrgbl->[$lex+1][$lex]{$lex}: no exception ok 10618 - $vrgbl->[$lex+1][$lex]{$lex}: value ok 10619 - $vrgbl->[$lex+1][$lex]{$lex} = 123: no exception ok 10620 - $vrgbl->[$lex+1][$lex]{$lex} = 123: value ok 10621 - exists $vrgbl->[$lex+1][$lex]{$lex}: no exception ok 10622 - exists $vrgbl->[$lex+1][$lex]{$lex}: value ok 10623 - delete $vrgbl->[$lex+1][$lex]{$lex}: no exception ok 10624 - delete $vrgbl->[$lex+1][$lex]{$lex}: value ok 10625 - $vlex{foo}[$lex]{$lex}: no exception ok 10626 - $vlex{foo}[$lex]{$lex}: value ok 10627 - $vlex{foo}[$lex]{$lex} = 123: no exception ok 10628 - $vlex{foo}[$lex]{$lex} = 123: value ok 10629 - exists $vlex{foo}[$lex]{$lex}: no exception ok 10630 - exists $vlex{foo}[$lex]{$lex}: value ok 10631 - delete $vlex{foo}[$lex]{$lex}: no exception ok 10632 - delete $vlex{foo}[$lex]{$lex}: value ok 10633 - $vgbl{foo}[$lex]{$lex}: no exception ok 10634 - $vgbl{foo}[$lex]{$lex}: value ok 10635 - $vgbl{foo}[$lex]{$lex} = 123: no exception ok 10636 - $vgbl{foo}[$lex]{$lex} = 123: value ok 10637 - exists $vgbl{foo}[$lex]{$lex}: no exception ok 10638 - exists $vgbl{foo}[$lex]{$lex}: value ok 10639 - delete $vgbl{foo}[$lex]{$lex}: no exception ok 10640 - delete $vgbl{foo}[$lex]{$lex}: value ok 10641 - $vrlex->{foo}[$lex]{$lex}: no exception ok 10642 - $vrlex->{foo}[$lex]{$lex}: value ok 10643 - $vrlex->{foo}[$lex]{$lex} = 123: no exception ok 10644 - $vrlex->{foo}[$lex]{$lex} = 123: value ok 10645 - exists $vrlex->{foo}[$lex]{$lex}: no exception ok 10646 - exists $vrlex->{foo}[$lex]{$lex}: value ok 10647 - delete $vrlex->{foo}[$lex]{$lex}: no exception ok 10648 - delete $vrlex->{foo}[$lex]{$lex}: value ok 10649 - $vrgbl->{foo}[$lex]{$lex}: no exception ok 10650 - $vrgbl->{foo}[$lex]{$lex}: value ok 10651 - $vrgbl->{foo}[$lex]{$lex} = 123: no exception ok 10652 - $vrgbl->{foo}[$lex]{$lex} = 123: value ok 10653 - exists $vrgbl->{foo}[$lex]{$lex}: no exception ok 10654 - exists $vrgbl->{foo}[$lex]{$lex}: value ok 10655 - delete $vrgbl->{foo}[$lex]{$lex}: no exception ok 10656 - delete $vrgbl->{foo}[$lex]{$lex}: value ok 10657 - $vlex{$lex}[$lex]{$lex}: no exception ok 10658 - $vlex{$lex}[$lex]{$lex}: value ok 10659 - $vlex{$lex}[$lex]{$lex} = 123: no exception ok 10660 - $vlex{$lex}[$lex]{$lex} = 123: value ok 10661 - exists $vlex{$lex}[$lex]{$lex}: no exception ok 10662 - exists $vlex{$lex}[$lex]{$lex}: value ok 10663 - delete $vlex{$lex}[$lex]{$lex}: no exception ok 10664 - delete $vlex{$lex}[$lex]{$lex}: value ok 10665 - $vgbl{$lex}[$lex]{$lex}: no exception ok 10666 - $vgbl{$lex}[$lex]{$lex}: value ok 10667 - $vgbl{$lex}[$lex]{$lex} = 123: no exception ok 10668 - $vgbl{$lex}[$lex]{$lex} = 123: value ok 10669 - exists $vgbl{$lex}[$lex]{$lex}: no exception ok 10670 - exists $vgbl{$lex}[$lex]{$lex}: value ok 10671 - delete $vgbl{$lex}[$lex]{$lex}: no exception ok 10672 - delete $vgbl{$lex}[$lex]{$lex}: value ok 10673 - $vrlex->{$lex}[$lex]{$lex}: no exception ok 10674 - $vrlex->{$lex}[$lex]{$lex}: value ok 10675 - $vrlex->{$lex}[$lex]{$lex} = 123: no exception ok 10676 - $vrlex->{$lex}[$lex]{$lex} = 123: value ok 10677 - exists $vrlex->{$lex}[$lex]{$lex}: no exception ok 10678 - exists $vrlex->{$lex}[$lex]{$lex}: value ok 10679 - delete $vrlex->{$lex}[$lex]{$lex}: no exception ok 10680 - delete $vrlex->{$lex}[$lex]{$lex}: value ok 10681 - $vrgbl->{$lex}[$lex]{$lex}: no exception ok 10682 - $vrgbl->{$lex}[$lex]{$lex}: value ok 10683 - $vrgbl->{$lex}[$lex]{$lex} = 123: no exception ok 10684 - $vrgbl->{$lex}[$lex]{$lex} = 123: value ok 10685 - exists $vrgbl->{$lex}[$lex]{$lex}: no exception ok 10686 - exists $vrgbl->{$lex}[$lex]{$lex}: value ok 10687 - delete $vrgbl->{$lex}[$lex]{$lex}: no exception ok 10688 - delete $vrgbl->{$lex}[$lex]{$lex}: value ok 10689 - $vlex{$gbl}[$lex]{$lex}: no exception ok 10690 - $vlex{$gbl}[$lex]{$lex}: value ok 10691 - $vlex{$gbl}[$lex]{$lex} = 123: no exception ok 10692 - $vlex{$gbl}[$lex]{$lex} = 123: value ok 10693 - exists $vlex{$gbl}[$lex]{$lex}: no exception ok 10694 - exists $vlex{$gbl}[$lex]{$lex}: value ok 10695 - delete $vlex{$gbl}[$lex]{$lex}: no exception ok 10696 - delete $vlex{$gbl}[$lex]{$lex}: value ok 10697 - $vgbl{$gbl}[$lex]{$lex}: no exception ok 10698 - $vgbl{$gbl}[$lex]{$lex}: value ok 10699 - $vgbl{$gbl}[$lex]{$lex} = 123: no exception ok 10700 - $vgbl{$gbl}[$lex]{$lex} = 123: value ok 10701 - exists $vgbl{$gbl}[$lex]{$lex}: no exception ok 10702 - exists $vgbl{$gbl}[$lex]{$lex}: value ok 10703 - delete $vgbl{$gbl}[$lex]{$lex}: no exception ok 10704 - delete $vgbl{$gbl}[$lex]{$lex}: value ok 10705 - $vrlex->{$gbl}[$lex]{$lex}: no exception ok 10706 - $vrlex->{$gbl}[$lex]{$lex}: value ok 10707 - $vrlex->{$gbl}[$lex]{$lex} = 123: no exception ok 10708 - $vrlex->{$gbl}[$lex]{$lex} = 123: value ok 10709 - exists $vrlex->{$gbl}[$lex]{$lex}: no exception ok 10710 - exists $vrlex->{$gbl}[$lex]{$lex}: value ok 10711 - delete $vrlex->{$gbl}[$lex]{$lex}: no exception ok 10712 - delete $vrlex->{$gbl}[$lex]{$lex}: value ok 10713 - $vrgbl->{$gbl}[$lex]{$lex}: no exception ok 10714 - $vrgbl->{$gbl}[$lex]{$lex}: value ok 10715 - $vrgbl->{$gbl}[$lex]{$lex} = 123: no exception ok 10716 - $vrgbl->{$gbl}[$lex]{$lex} = 123: value ok 10717 - exists $vrgbl->{$gbl}[$lex]{$lex}: no exception ok 10718 - exists $vrgbl->{$gbl}[$lex]{$lex}: value ok 10719 - delete $vrgbl->{$gbl}[$lex]{$lex}: no exception ok 10720 - delete $vrgbl->{$gbl}[$lex]{$lex}: value ok 10721 - $vlex{"x$lex"}[$lex]{$lex}: no exception ok 10722 - $vlex{"x$lex"}[$lex]{$lex}: value ok 10723 - $vlex{"x$lex"}[$lex]{$lex} = 123: no exception ok 10724 - $vlex{"x$lex"}[$lex]{$lex} = 123: value ok 10725 - exists $vlex{"x$lex"}[$lex]{$lex}: no exception ok 10726 - exists $vlex{"x$lex"}[$lex]{$lex}: value ok 10727 - delete $vlex{"x$lex"}[$lex]{$lex}: no exception ok 10728 - delete $vlex{"x$lex"}[$lex]{$lex}: value ok 10729 - $vgbl{"x$lex"}[$lex]{$lex}: no exception ok 10730 - $vgbl{"x$lex"}[$lex]{$lex}: value ok 10731 - $vgbl{"x$lex"}[$lex]{$lex} = 123: no exception ok 10732 - $vgbl{"x$lex"}[$lex]{$lex} = 123: value ok 10733 - exists $vgbl{"x$lex"}[$lex]{$lex}: no exception ok 10734 - exists $vgbl{"x$lex"}[$lex]{$lex}: value ok 10735 - delete $vgbl{"x$lex"}[$lex]{$lex}: no exception ok 10736 - delete $vgbl{"x$lex"}[$lex]{$lex}: value ok 10737 - $vrlex->{"x$lex"}[$lex]{$lex}: no exception ok 10738 - $vrlex->{"x$lex"}[$lex]{$lex}: value ok 10739 - $vrlex->{"x$lex"}[$lex]{$lex} = 123: no exception ok 10740 - $vrlex->{"x$lex"}[$lex]{$lex} = 123: value ok 10741 - exists $vrlex->{"x$lex"}[$lex]{$lex}: no exception ok 10742 - exists $vrlex->{"x$lex"}[$lex]{$lex}: value ok 10743 - delete $vrlex->{"x$lex"}[$lex]{$lex}: no exception ok 10744 - delete $vrlex->{"x$lex"}[$lex]{$lex}: value ok 10745 - $vrgbl->{"x$lex"}[$lex]{$lex}: no exception ok 10746 - $vrgbl->{"x$lex"}[$lex]{$lex}: value ok 10747 - $vrgbl->{"x$lex"}[$lex]{$lex} = 123: no exception ok 10748 - $vrgbl->{"x$lex"}[$lex]{$lex} = 123: value ok 10749 - exists $vrgbl->{"x$lex"}[$lex]{$lex}: no exception ok 10750 - exists $vrgbl->{"x$lex"}[$lex]{$lex}: value ok 10751 - delete $vrgbl->{"x$lex"}[$lex]{$lex}: no exception ok 10752 - delete $vrgbl->{"x$lex"}[$lex]{$lex}: value ok 10753 - $vlex[0][$gbl]{$lex}: no exception ok 10754 - $vlex[0][$gbl]{$lex}: value ok 10755 - $vlex[0][$gbl]{$lex} = 123: no exception ok 10756 - $vlex[0][$gbl]{$lex} = 123: value ok 10757 - exists $vlex[0][$gbl]{$lex}: no exception ok 10758 - exists $vlex[0][$gbl]{$lex}: value ok 10759 - delete $vlex[0][$gbl]{$lex}: no exception ok 10760 - delete $vlex[0][$gbl]{$lex}: value ok 10761 - $vgbl[0][$gbl]{$lex}: no exception ok 10762 - $vgbl[0][$gbl]{$lex}: value ok 10763 - $vgbl[0][$gbl]{$lex} = 123: no exception ok 10764 - $vgbl[0][$gbl]{$lex} = 123: value ok 10765 - exists $vgbl[0][$gbl]{$lex}: no exception ok 10766 - exists $vgbl[0][$gbl]{$lex}: value ok 10767 - delete $vgbl[0][$gbl]{$lex}: no exception ok 10768 - delete $vgbl[0][$gbl]{$lex}: value ok 10769 - $vrlex->[0][$gbl]{$lex}: no exception ok 10770 - $vrlex->[0][$gbl]{$lex}: value ok 10771 - $vrlex->[0][$gbl]{$lex} = 123: no exception ok 10772 - $vrlex->[0][$gbl]{$lex} = 123: value ok 10773 - exists $vrlex->[0][$gbl]{$lex}: no exception ok 10774 - exists $vrlex->[0][$gbl]{$lex}: value ok 10775 - delete $vrlex->[0][$gbl]{$lex}: no exception ok 10776 - delete $vrlex->[0][$gbl]{$lex}: value ok 10777 - $vrgbl->[0][$gbl]{$lex}: no exception ok 10778 - $vrgbl->[0][$gbl]{$lex}: value ok 10779 - $vrgbl->[0][$gbl]{$lex} = 123: no exception ok 10780 - $vrgbl->[0][$gbl]{$lex} = 123: value ok 10781 - exists $vrgbl->[0][$gbl]{$lex}: no exception ok 10782 - exists $vrgbl->[0][$gbl]{$lex}: value ok 10783 - delete $vrgbl->[0][$gbl]{$lex}: no exception ok 10784 - delete $vrgbl->[0][$gbl]{$lex}: value ok 10785 - $vlex[$lex][$gbl]{$lex}: no exception ok 10786 - $vlex[$lex][$gbl]{$lex}: value ok 10787 - $vlex[$lex][$gbl]{$lex} = 123: no exception ok 10788 - $vlex[$lex][$gbl]{$lex} = 123: value ok 10789 - exists $vlex[$lex][$gbl]{$lex}: no exception ok 10790 - exists $vlex[$lex][$gbl]{$lex}: value ok 10791 - delete $vlex[$lex][$gbl]{$lex}: no exception ok 10792 - delete $vlex[$lex][$gbl]{$lex}: value ok 10793 - $vgbl[$lex][$gbl]{$lex}: no exception ok 10794 - $vgbl[$lex][$gbl]{$lex}: value ok 10795 - $vgbl[$lex][$gbl]{$lex} = 123: no exception ok 10796 - $vgbl[$lex][$gbl]{$lex} = 123: value ok 10797 - exists $vgbl[$lex][$gbl]{$lex}: no exception ok 10798 - exists $vgbl[$lex][$gbl]{$lex}: value ok 10799 - delete $vgbl[$lex][$gbl]{$lex}: no exception ok 10800 - delete $vgbl[$lex][$gbl]{$lex}: value ok 10801 - $vrlex->[$lex][$gbl]{$lex}: no exception ok 10802 - $vrlex->[$lex][$gbl]{$lex}: value ok 10803 - $vrlex->[$lex][$gbl]{$lex} = 123: no exception ok 10804 - $vrlex->[$lex][$gbl]{$lex} = 123: value ok 10805 - exists $vrlex->[$lex][$gbl]{$lex}: no exception ok 10806 - exists $vrlex->[$lex][$gbl]{$lex}: value ok 10807 - delete $vrlex->[$lex][$gbl]{$lex}: no exception ok 10808 - delete $vrlex->[$lex][$gbl]{$lex}: value ok 10809 - $vrgbl->[$lex][$gbl]{$lex}: no exception ok 10810 - $vrgbl->[$lex][$gbl]{$lex}: value ok 10811 - $vrgbl->[$lex][$gbl]{$lex} = 123: no exception ok 10812 - $vrgbl->[$lex][$gbl]{$lex} = 123: value ok 10813 - exists $vrgbl->[$lex][$gbl]{$lex}: no exception ok 10814 - exists $vrgbl->[$lex][$gbl]{$lex}: value ok 10815 - delete $vrgbl->[$lex][$gbl]{$lex}: no exception ok 10816 - delete $vrgbl->[$lex][$gbl]{$lex}: value ok 10817 - $vlex[$gbl][$gbl]{$lex}: no exception ok 10818 - $vlex[$gbl][$gbl]{$lex}: value ok 10819 - $vlex[$gbl][$gbl]{$lex} = 123: no exception ok 10820 - $vlex[$gbl][$gbl]{$lex} = 123: value ok 10821 - exists $vlex[$gbl][$gbl]{$lex}: no exception ok 10822 - exists $vlex[$gbl][$gbl]{$lex}: value ok 10823 - delete $vlex[$gbl][$gbl]{$lex}: no exception ok 10824 - delete $vlex[$gbl][$gbl]{$lex}: value ok 10825 - $vgbl[$gbl][$gbl]{$lex}: no exception ok 10826 - $vgbl[$gbl][$gbl]{$lex}: value ok 10827 - $vgbl[$gbl][$gbl]{$lex} = 123: no exception ok 10828 - $vgbl[$gbl][$gbl]{$lex} = 123: value ok 10829 - exists $vgbl[$gbl][$gbl]{$lex}: no exception ok 10830 - exists $vgbl[$gbl][$gbl]{$lex}: value ok 10831 - delete $vgbl[$gbl][$gbl]{$lex}: no exception ok 10832 - delete $vgbl[$gbl][$gbl]{$lex}: value ok 10833 - $vrlex->[$gbl][$gbl]{$lex}: no exception ok 10834 - $vrlex->[$gbl][$gbl]{$lex}: value ok 10835 - $vrlex->[$gbl][$gbl]{$lex} = 123: no exception ok 10836 - $vrlex->[$gbl][$gbl]{$lex} = 123: value ok 10837 - exists $vrlex->[$gbl][$gbl]{$lex}: no exception ok 10838 - exists $vrlex->[$gbl][$gbl]{$lex}: value ok 10839 - delete $vrlex->[$gbl][$gbl]{$lex}: no exception ok 10840 - delete $vrlex->[$gbl][$gbl]{$lex}: value ok 10841 - $vrgbl->[$gbl][$gbl]{$lex}: no exception ok 10842 - $vrgbl->[$gbl][$gbl]{$lex}: value ok 10843 - $vrgbl->[$gbl][$gbl]{$lex} = 123: no exception ok 10844 - $vrgbl->[$gbl][$gbl]{$lex} = 123: value ok 10845 - exists $vrgbl->[$gbl][$gbl]{$lex}: no exception ok 10846 - exists $vrgbl->[$gbl][$gbl]{$lex}: value ok 10847 - delete $vrgbl->[$gbl][$gbl]{$lex}: no exception ok 10848 - delete $vrgbl->[$gbl][$gbl]{$lex}: value ok 10849 - $vlex[$lex+1][$gbl]{$lex}: no exception ok 10850 - $vlex[$lex+1][$gbl]{$lex}: value ok 10851 - $vlex[$lex+1][$gbl]{$lex} = 123: no exception ok 10852 - $vlex[$lex+1][$gbl]{$lex} = 123: value ok 10853 - exists $vlex[$lex+1][$gbl]{$lex}: no exception ok 10854 - exists $vlex[$lex+1][$gbl]{$lex}: value ok 10855 - delete $vlex[$lex+1][$gbl]{$lex}: no exception ok 10856 - delete $vlex[$lex+1][$gbl]{$lex}: value ok 10857 - $vgbl[$lex+1][$gbl]{$lex}: no exception ok 10858 - $vgbl[$lex+1][$gbl]{$lex}: value ok 10859 - $vgbl[$lex+1][$gbl]{$lex} = 123: no exception ok 10860 - $vgbl[$lex+1][$gbl]{$lex} = 123: value ok 10861 - exists $vgbl[$lex+1][$gbl]{$lex}: no exception ok 10862 - exists $vgbl[$lex+1][$gbl]{$lex}: value ok 10863 - delete $vgbl[$lex+1][$gbl]{$lex}: no exception ok 10864 - delete $vgbl[$lex+1][$gbl]{$lex}: value ok 10865 - $vrlex->[$lex+1][$gbl]{$lex}: no exception ok 10866 - $vrlex->[$lex+1][$gbl]{$lex}: value ok 10867 - $vrlex->[$lex+1][$gbl]{$lex} = 123: no exception ok 10868 - $vrlex->[$lex+1][$gbl]{$lex} = 123: value ok 10869 - exists $vrlex->[$lex+1][$gbl]{$lex}: no exception ok 10870 - exists $vrlex->[$lex+1][$gbl]{$lex}: value ok 10871 - delete $vrlex->[$lex+1][$gbl]{$lex}: no exception ok 10872 - delete $vrlex->[$lex+1][$gbl]{$lex}: value ok 10873 - $vrgbl->[$lex+1][$gbl]{$lex}: no exception ok 10874 - $vrgbl->[$lex+1][$gbl]{$lex}: value ok 10875 - $vrgbl->[$lex+1][$gbl]{$lex} = 123: no exception ok 10876 - $vrgbl->[$lex+1][$gbl]{$lex} = 123: value ok 10877 - exists $vrgbl->[$lex+1][$gbl]{$lex}: no exception ok 10878 - exists $vrgbl->[$lex+1][$gbl]{$lex}: value ok 10879 - delete $vrgbl->[$lex+1][$gbl]{$lex}: no exception ok 10880 - delete $vrgbl->[$lex+1][$gbl]{$lex}: value ok 10881 - $vlex{foo}[$gbl]{$lex}: no exception ok 10882 - $vlex{foo}[$gbl]{$lex}: value ok 10883 - $vlex{foo}[$gbl]{$lex} = 123: no exception ok 10884 - $vlex{foo}[$gbl]{$lex} = 123: value ok 10885 - exists $vlex{foo}[$gbl]{$lex}: no exception ok 10886 - exists $vlex{foo}[$gbl]{$lex}: value ok 10887 - delete $vlex{foo}[$gbl]{$lex}: no exception ok 10888 - delete $vlex{foo}[$gbl]{$lex}: value ok 10889 - $vgbl{foo}[$gbl]{$lex}: no exception ok 10890 - $vgbl{foo}[$gbl]{$lex}: value ok 10891 - $vgbl{foo}[$gbl]{$lex} = 123: no exception ok 10892 - $vgbl{foo}[$gbl]{$lex} = 123: value ok 10893 - exists $vgbl{foo}[$gbl]{$lex}: no exception ok 10894 - exists $vgbl{foo}[$gbl]{$lex}: value ok 10895 - delete $vgbl{foo}[$gbl]{$lex}: no exception ok 10896 - delete $vgbl{foo}[$gbl]{$lex}: value ok 10897 - $vrlex->{foo}[$gbl]{$lex}: no exception ok 10898 - $vrlex->{foo}[$gbl]{$lex}: value ok 10899 - $vrlex->{foo}[$gbl]{$lex} = 123: no exception ok 10900 - $vrlex->{foo}[$gbl]{$lex} = 123: value ok 10901 - exists $vrlex->{foo}[$gbl]{$lex}: no exception ok 10902 - exists $vrlex->{foo}[$gbl]{$lex}: value ok 10903 - delete $vrlex->{foo}[$gbl]{$lex}: no exception ok 10904 - delete $vrlex->{foo}[$gbl]{$lex}: value ok 10905 - $vrgbl->{foo}[$gbl]{$lex}: no exception ok 10906 - $vrgbl->{foo}[$gbl]{$lex}: value ok 10907 - $vrgbl->{foo}[$gbl]{$lex} = 123: no exception ok 10908 - $vrgbl->{foo}[$gbl]{$lex} = 123: value ok 10909 - exists $vrgbl->{foo}[$gbl]{$lex}: no exception ok 10910 - exists $vrgbl->{foo}[$gbl]{$lex}: value ok 10911 - delete $vrgbl->{foo}[$gbl]{$lex}: no exception ok 10912 - delete $vrgbl->{foo}[$gbl]{$lex}: value ok 10913 - $vlex{$lex}[$gbl]{$lex}: no exception ok 10914 - $vlex{$lex}[$gbl]{$lex}: value ok 10915 - $vlex{$lex}[$gbl]{$lex} = 123: no exception ok 10916 - $vlex{$lex}[$gbl]{$lex} = 123: value ok 10917 - exists $vlex{$lex}[$gbl]{$lex}: no exception ok 10918 - exists $vlex{$lex}[$gbl]{$lex}: value ok 10919 - delete $vlex{$lex}[$gbl]{$lex}: no exception ok 10920 - delete $vlex{$lex}[$gbl]{$lex}: value ok 10921 - $vgbl{$lex}[$gbl]{$lex}: no exception ok 10922 - $vgbl{$lex}[$gbl]{$lex}: value ok 10923 - $vgbl{$lex}[$gbl]{$lex} = 123: no exception ok 10924 - $vgbl{$lex}[$gbl]{$lex} = 123: value ok 10925 - exists $vgbl{$lex}[$gbl]{$lex}: no exception ok 10926 - exists $vgbl{$lex}[$gbl]{$lex}: value ok 10927 - delete $vgbl{$lex}[$gbl]{$lex}: no exception ok 10928 - delete $vgbl{$lex}[$gbl]{$lex}: value ok 10929 - $vrlex->{$lex}[$gbl]{$lex}: no exception ok 10930 - $vrlex->{$lex}[$gbl]{$lex}: value ok 10931 - $vrlex->{$lex}[$gbl]{$lex} = 123: no exception ok 10932 - $vrlex->{$lex}[$gbl]{$lex} = 123: value ok 10933 - exists $vrlex->{$lex}[$gbl]{$lex}: no exception ok 10934 - exists $vrlex->{$lex}[$gbl]{$lex}: value ok 10935 - delete $vrlex->{$lex}[$gbl]{$lex}: no exception ok 10936 - delete $vrlex->{$lex}[$gbl]{$lex}: value ok 10937 - $vrgbl->{$lex}[$gbl]{$lex}: no exception ok 10938 - $vrgbl->{$lex}[$gbl]{$lex}: value ok 10939 - $vrgbl->{$lex}[$gbl]{$lex} = 123: no exception ok 10940 - $vrgbl->{$lex}[$gbl]{$lex} = 123: value ok 10941 - exists $vrgbl->{$lex}[$gbl]{$lex}: no exception ok 10942 - exists $vrgbl->{$lex}[$gbl]{$lex}: value ok 10943 - delete $vrgbl->{$lex}[$gbl]{$lex}: no exception ok 10944 - delete $vrgbl->{$lex}[$gbl]{$lex}: value ok 10945 - $vlex{$gbl}[$gbl]{$lex}: no exception ok 10946 - $vlex{$gbl}[$gbl]{$lex}: value ok 10947 - $vlex{$gbl}[$gbl]{$lex} = 123: no exception ok 10948 - $vlex{$gbl}[$gbl]{$lex} = 123: value ok 10949 - exists $vlex{$gbl}[$gbl]{$lex}: no exception ok 10950 - exists $vlex{$gbl}[$gbl]{$lex}: value ok 10951 - delete $vlex{$gbl}[$gbl]{$lex}: no exception ok 10952 - delete $vlex{$gbl}[$gbl]{$lex}: value ok 10953 - $vgbl{$gbl}[$gbl]{$lex}: no exception ok 10954 - $vgbl{$gbl}[$gbl]{$lex}: value ok 10955 - $vgbl{$gbl}[$gbl]{$lex} = 123: no exception ok 10956 - $vgbl{$gbl}[$gbl]{$lex} = 123: value ok 10957 - exists $vgbl{$gbl}[$gbl]{$lex}: no exception ok 10958 - exists $vgbl{$gbl}[$gbl]{$lex}: value ok 10959 - delete $vgbl{$gbl}[$gbl]{$lex}: no exception ok 10960 - delete $vgbl{$gbl}[$gbl]{$lex}: value ok 10961 - $vrlex->{$gbl}[$gbl]{$lex}: no exception ok 10962 - $vrlex->{$gbl}[$gbl]{$lex}: value ok 10963 - $vrlex->{$gbl}[$gbl]{$lex} = 123: no exception ok 10964 - $vrlex->{$gbl}[$gbl]{$lex} = 123: value ok 10965 - exists $vrlex->{$gbl}[$gbl]{$lex}: no exception ok 10966 - exists $vrlex->{$gbl}[$gbl]{$lex}: value ok 10967 - delete $vrlex->{$gbl}[$gbl]{$lex}: no exception ok 10968 - delete $vrlex->{$gbl}[$gbl]{$lex}: value ok 10969 - $vrgbl->{$gbl}[$gbl]{$lex}: no exception ok 10970 - $vrgbl->{$gbl}[$gbl]{$lex}: value ok 10971 - $vrgbl->{$gbl}[$gbl]{$lex} = 123: no exception ok 10972 - $vrgbl->{$gbl}[$gbl]{$lex} = 123: value ok 10973 - exists $vrgbl->{$gbl}[$gbl]{$lex}: no exception ok 10974 - exists $vrgbl->{$gbl}[$gbl]{$lex}: value ok 10975 - delete $vrgbl->{$gbl}[$gbl]{$lex}: no exception ok 10976 - delete $vrgbl->{$gbl}[$gbl]{$lex}: value ok 10977 - $vlex{"x$lex"}[$gbl]{$lex}: no exception ok 10978 - $vlex{"x$lex"}[$gbl]{$lex}: value ok 10979 - $vlex{"x$lex"}[$gbl]{$lex} = 123: no exception ok 10980 - $vlex{"x$lex"}[$gbl]{$lex} = 123: value ok 10981 - exists $vlex{"x$lex"}[$gbl]{$lex}: no exception ok 10982 - exists $vlex{"x$lex"}[$gbl]{$lex}: value ok 10983 - delete $vlex{"x$lex"}[$gbl]{$lex}: no exception ok 10984 - delete $vlex{"x$lex"}[$gbl]{$lex}: value ok 10985 - $vgbl{"x$lex"}[$gbl]{$lex}: no exception ok 10986 - $vgbl{"x$lex"}[$gbl]{$lex}: value ok 10987 - $vgbl{"x$lex"}[$gbl]{$lex} = 123: no exception ok 10988 - $vgbl{"x$lex"}[$gbl]{$lex} = 123: value ok 10989 - exists $vgbl{"x$lex"}[$gbl]{$lex}: no exception ok 10990 - exists $vgbl{"x$lex"}[$gbl]{$lex}: value ok 10991 - delete $vgbl{"x$lex"}[$gbl]{$lex}: no exception ok 10992 - delete $vgbl{"x$lex"}[$gbl]{$lex}: value ok 10993 - $vrlex->{"x$lex"}[$gbl]{$lex}: no exception ok 10994 - $vrlex->{"x$lex"}[$gbl]{$lex}: value ok 10995 - $vrlex->{"x$lex"}[$gbl]{$lex} = 123: no exception ok 10996 - $vrlex->{"x$lex"}[$gbl]{$lex} = 123: value ok 10997 - exists $vrlex->{"x$lex"}[$gbl]{$lex}: no exception ok 10998 - exists $vrlex->{"x$lex"}[$gbl]{$lex}: value ok 10999 - delete $vrlex->{"x$lex"}[$gbl]{$lex}: no exception ok 11000 - delete $vrlex->{"x$lex"}[$gbl]{$lex}: value ok 11001 - $vrgbl->{"x$lex"}[$gbl]{$lex}: no exception ok 11002 - $vrgbl->{"x$lex"}[$gbl]{$lex}: value ok 11003 - $vrgbl->{"x$lex"}[$gbl]{$lex} = 123: no exception ok 11004 - $vrgbl->{"x$lex"}[$gbl]{$lex} = 123: value ok 11005 - exists $vrgbl->{"x$lex"}[$gbl]{$lex}: no exception ok 11006 - exists $vrgbl->{"x$lex"}[$gbl]{$lex}: value ok 11007 - delete $vrgbl->{"x$lex"}[$gbl]{$lex}: no exception ok 11008 - delete $vrgbl->{"x$lex"}[$gbl]{$lex}: value ok 11009 - $vlex[0][$lex+1]{$lex}: no exception ok 11010 - $vlex[0][$lex+1]{$lex}: value ok 11011 - $vlex[0][$lex+1]{$lex} = 123: no exception ok 11012 - $vlex[0][$lex+1]{$lex} = 123: value ok 11013 - exists $vlex[0][$lex+1]{$lex}: no exception ok 11014 - exists $vlex[0][$lex+1]{$lex}: value ok 11015 - delete $vlex[0][$lex+1]{$lex}: no exception ok 11016 - delete $vlex[0][$lex+1]{$lex}: value ok 11017 - $vgbl[0][$lex+1]{$lex}: no exception ok 11018 - $vgbl[0][$lex+1]{$lex}: value ok 11019 - $vgbl[0][$lex+1]{$lex} = 123: no exception ok 11020 - $vgbl[0][$lex+1]{$lex} = 123: value ok 11021 - exists $vgbl[0][$lex+1]{$lex}: no exception ok 11022 - exists $vgbl[0][$lex+1]{$lex}: value ok 11023 - delete $vgbl[0][$lex+1]{$lex}: no exception ok 11024 - delete $vgbl[0][$lex+1]{$lex}: value ok 11025 - $vrlex->[0][$lex+1]{$lex}: no exception ok 11026 - $vrlex->[0][$lex+1]{$lex}: value ok 11027 - $vrlex->[0][$lex+1]{$lex} = 123: no exception ok 11028 - $vrlex->[0][$lex+1]{$lex} = 123: value ok 11029 - exists $vrlex->[0][$lex+1]{$lex}: no exception ok 11030 - exists $vrlex->[0][$lex+1]{$lex}: value ok 11031 - delete $vrlex->[0][$lex+1]{$lex}: no exception ok 11032 - delete $vrlex->[0][$lex+1]{$lex}: value ok 11033 - $vrgbl->[0][$lex+1]{$lex}: no exception ok 11034 - $vrgbl->[0][$lex+1]{$lex}: value ok 11035 - $vrgbl->[0][$lex+1]{$lex} = 123: no exception ok 11036 - $vrgbl->[0][$lex+1]{$lex} = 123: value ok 11037 - exists $vrgbl->[0][$lex+1]{$lex}: no exception ok 11038 - exists $vrgbl->[0][$lex+1]{$lex}: value ok 11039 - delete $vrgbl->[0][$lex+1]{$lex}: no exception ok 11040 - delete $vrgbl->[0][$lex+1]{$lex}: value ok 11041 - $vlex[$lex][$lex+1]{$lex}: no exception ok 11042 - $vlex[$lex][$lex+1]{$lex}: value ok 11043 - $vlex[$lex][$lex+1]{$lex} = 123: no exception ok 11044 - $vlex[$lex][$lex+1]{$lex} = 123: value ok 11045 - exists $vlex[$lex][$lex+1]{$lex}: no exception ok 11046 - exists $vlex[$lex][$lex+1]{$lex}: value ok 11047 - delete $vlex[$lex][$lex+1]{$lex}: no exception ok 11048 - delete $vlex[$lex][$lex+1]{$lex}: value ok 11049 - $vgbl[$lex][$lex+1]{$lex}: no exception ok 11050 - $vgbl[$lex][$lex+1]{$lex}: value ok 11051 - $vgbl[$lex][$lex+1]{$lex} = 123: no exception ok 11052 - $vgbl[$lex][$lex+1]{$lex} = 123: value ok 11053 - exists $vgbl[$lex][$lex+1]{$lex}: no exception ok 11054 - exists $vgbl[$lex][$lex+1]{$lex}: value ok 11055 - delete $vgbl[$lex][$lex+1]{$lex}: no exception ok 11056 - delete $vgbl[$lex][$lex+1]{$lex}: value ok 11057 - $vrlex->[$lex][$lex+1]{$lex}: no exception ok 11058 - $vrlex->[$lex][$lex+1]{$lex}: value ok 11059 - $vrlex->[$lex][$lex+1]{$lex} = 123: no exception ok 11060 - $vrlex->[$lex][$lex+1]{$lex} = 123: value ok 11061 - exists $vrlex->[$lex][$lex+1]{$lex}: no exception ok 11062 - exists $vrlex->[$lex][$lex+1]{$lex}: value ok 11063 - delete $vrlex->[$lex][$lex+1]{$lex}: no exception ok 11064 - delete $vrlex->[$lex][$lex+1]{$lex}: value ok 11065 - $vrgbl->[$lex][$lex+1]{$lex}: no exception ok 11066 - $vrgbl->[$lex][$lex+1]{$lex}: value ok 11067 - $vrgbl->[$lex][$lex+1]{$lex} = 123: no exception ok 11068 - $vrgbl->[$lex][$lex+1]{$lex} = 123: value ok 11069 - exists $vrgbl->[$lex][$lex+1]{$lex}: no exception ok 11070 - exists $vrgbl->[$lex][$lex+1]{$lex}: value ok 11071 - delete $vrgbl->[$lex][$lex+1]{$lex}: no exception ok 11072 - delete $vrgbl->[$lex][$lex+1]{$lex}: value ok 11073 - $vlex[$gbl][$lex+1]{$lex}: no exception ok 11074 - $vlex[$gbl][$lex+1]{$lex}: value ok 11075 - $vlex[$gbl][$lex+1]{$lex} = 123: no exception ok 11076 - $vlex[$gbl][$lex+1]{$lex} = 123: value ok 11077 - exists $vlex[$gbl][$lex+1]{$lex}: no exception ok 11078 - exists $vlex[$gbl][$lex+1]{$lex}: value ok 11079 - delete $vlex[$gbl][$lex+1]{$lex}: no exception ok 11080 - delete $vlex[$gbl][$lex+1]{$lex}: value ok 11081 - $vgbl[$gbl][$lex+1]{$lex}: no exception ok 11082 - $vgbl[$gbl][$lex+1]{$lex}: value ok 11083 - $vgbl[$gbl][$lex+1]{$lex} = 123: no exception ok 11084 - $vgbl[$gbl][$lex+1]{$lex} = 123: value ok 11085 - exists $vgbl[$gbl][$lex+1]{$lex}: no exception ok 11086 - exists $vgbl[$gbl][$lex+1]{$lex}: value ok 11087 - delete $vgbl[$gbl][$lex+1]{$lex}: no exception ok 11088 - delete $vgbl[$gbl][$lex+1]{$lex}: value ok 11089 - $vrlex->[$gbl][$lex+1]{$lex}: no exception ok 11090 - $vrlex->[$gbl][$lex+1]{$lex}: value ok 11091 - $vrlex->[$gbl][$lex+1]{$lex} = 123: no exception ok 11092 - $vrlex->[$gbl][$lex+1]{$lex} = 123: value ok 11093 - exists $vrlex->[$gbl][$lex+1]{$lex}: no exception ok 11094 - exists $vrlex->[$gbl][$lex+1]{$lex}: value ok 11095 - delete $vrlex->[$gbl][$lex+1]{$lex}: no exception ok 11096 - delete $vrlex->[$gbl][$lex+1]{$lex}: value ok 11097 - $vrgbl->[$gbl][$lex+1]{$lex}: no exception ok 11098 - $vrgbl->[$gbl][$lex+1]{$lex}: value ok 11099 - $vrgbl->[$gbl][$lex+1]{$lex} = 123: no exception ok 11100 - $vrgbl->[$gbl][$lex+1]{$lex} = 123: value ok 11101 - exists $vrgbl->[$gbl][$lex+1]{$lex}: no exception ok 11102 - exists $vrgbl->[$gbl][$lex+1]{$lex}: value ok 11103 - delete $vrgbl->[$gbl][$lex+1]{$lex}: no exception ok 11104 - delete $vrgbl->[$gbl][$lex+1]{$lex}: value ok 11105 - $vlex[$lex+1][$lex+1]{$lex}: no exception ok 11106 - $vlex[$lex+1][$lex+1]{$lex}: value ok 11107 - $vlex[$lex+1][$lex+1]{$lex} = 123: no exception ok 11108 - $vlex[$lex+1][$lex+1]{$lex} = 123: value ok 11109 - exists $vlex[$lex+1][$lex+1]{$lex}: no exception ok 11110 - exists $vlex[$lex+1][$lex+1]{$lex}: value ok 11111 - delete $vlex[$lex+1][$lex+1]{$lex}: no exception ok 11112 - delete $vlex[$lex+1][$lex+1]{$lex}: value ok 11113 - $vgbl[$lex+1][$lex+1]{$lex}: no exception ok 11114 - $vgbl[$lex+1][$lex+1]{$lex}: value ok 11115 - $vgbl[$lex+1][$lex+1]{$lex} = 123: no exception ok 11116 - $vgbl[$lex+1][$lex+1]{$lex} = 123: value ok 11117 - exists $vgbl[$lex+1][$lex+1]{$lex}: no exception ok 11118 - exists $vgbl[$lex+1][$lex+1]{$lex}: value ok 11119 - delete $vgbl[$lex+1][$lex+1]{$lex}: no exception ok 11120 - delete $vgbl[$lex+1][$lex+1]{$lex}: value ok 11121 - $vrlex->[$lex+1][$lex+1]{$lex}: no exception ok 11122 - $vrlex->[$lex+1][$lex+1]{$lex}: value ok 11123 - $vrlex->[$lex+1][$lex+1]{$lex} = 123: no exception ok 11124 - $vrlex->[$lex+1][$lex+1]{$lex} = 123: value ok 11125 - exists $vrlex->[$lex+1][$lex+1]{$lex}: no exception ok 11126 - exists $vrlex->[$lex+1][$lex+1]{$lex}: value ok 11127 - delete $vrlex->[$lex+1][$lex+1]{$lex}: no exception ok 11128 - delete $vrlex->[$lex+1][$lex+1]{$lex}: value ok 11129 - $vrgbl->[$lex+1][$lex+1]{$lex}: no exception ok 11130 - $vrgbl->[$lex+1][$lex+1]{$lex}: value ok 11131 - $vrgbl->[$lex+1][$lex+1]{$lex} = 123: no exception ok 11132 - $vrgbl->[$lex+1][$lex+1]{$lex} = 123: value ok 11133 - exists $vrgbl->[$lex+1][$lex+1]{$lex}: no exception ok 11134 - exists $vrgbl->[$lex+1][$lex+1]{$lex}: value ok 11135 - delete $vrgbl->[$lex+1][$lex+1]{$lex}: no exception ok 11136 - delete $vrgbl->[$lex+1][$lex+1]{$lex}: value ok 11137 - $vlex{foo}[$lex+1]{$lex}: no exception ok 11138 - $vlex{foo}[$lex+1]{$lex}: value ok 11139 - $vlex{foo}[$lex+1]{$lex} = 123: no exception ok 11140 - $vlex{foo}[$lex+1]{$lex} = 123: value ok 11141 - exists $vlex{foo}[$lex+1]{$lex}: no exception ok 11142 - exists $vlex{foo}[$lex+1]{$lex}: value ok 11143 - delete $vlex{foo}[$lex+1]{$lex}: no exception ok 11144 - delete $vlex{foo}[$lex+1]{$lex}: value ok 11145 - $vgbl{foo}[$lex+1]{$lex}: no exception ok 11146 - $vgbl{foo}[$lex+1]{$lex}: value ok 11147 - $vgbl{foo}[$lex+1]{$lex} = 123: no exception ok 11148 - $vgbl{foo}[$lex+1]{$lex} = 123: value ok 11149 - exists $vgbl{foo}[$lex+1]{$lex}: no exception ok 11150 - exists $vgbl{foo}[$lex+1]{$lex}: value ok 11151 - delete $vgbl{foo}[$lex+1]{$lex}: no exception ok 11152 - delete $vgbl{foo}[$lex+1]{$lex}: value ok 11153 - $vrlex->{foo}[$lex+1]{$lex}: no exception ok 11154 - $vrlex->{foo}[$lex+1]{$lex}: value ok 11155 - $vrlex->{foo}[$lex+1]{$lex} = 123: no exception ok 11156 - $vrlex->{foo}[$lex+1]{$lex} = 123: value ok 11157 - exists $vrlex->{foo}[$lex+1]{$lex}: no exception ok 11158 - exists $vrlex->{foo}[$lex+1]{$lex}: value ok 11159 - delete $vrlex->{foo}[$lex+1]{$lex}: no exception ok 11160 - delete $vrlex->{foo}[$lex+1]{$lex}: value ok 11161 - $vrgbl->{foo}[$lex+1]{$lex}: no exception ok 11162 - $vrgbl->{foo}[$lex+1]{$lex}: value ok 11163 - $vrgbl->{foo}[$lex+1]{$lex} = 123: no exception ok 11164 - $vrgbl->{foo}[$lex+1]{$lex} = 123: value ok 11165 - exists $vrgbl->{foo}[$lex+1]{$lex}: no exception ok 11166 - exists $vrgbl->{foo}[$lex+1]{$lex}: value ok 11167 - delete $vrgbl->{foo}[$lex+1]{$lex}: no exception ok 11168 - delete $vrgbl->{foo}[$lex+1]{$lex}: value ok 11169 - $vlex{$lex}[$lex+1]{$lex}: no exception ok 11170 - $vlex{$lex}[$lex+1]{$lex}: value ok 11171 - $vlex{$lex}[$lex+1]{$lex} = 123: no exception ok 11172 - $vlex{$lex}[$lex+1]{$lex} = 123: value ok 11173 - exists $vlex{$lex}[$lex+1]{$lex}: no exception ok 11174 - exists $vlex{$lex}[$lex+1]{$lex}: value ok 11175 - delete $vlex{$lex}[$lex+1]{$lex}: no exception ok 11176 - delete $vlex{$lex}[$lex+1]{$lex}: value ok 11177 - $vgbl{$lex}[$lex+1]{$lex}: no exception ok 11178 - $vgbl{$lex}[$lex+1]{$lex}: value ok 11179 - $vgbl{$lex}[$lex+1]{$lex} = 123: no exception ok 11180 - $vgbl{$lex}[$lex+1]{$lex} = 123: value ok 11181 - exists $vgbl{$lex}[$lex+1]{$lex}: no exception ok 11182 - exists $vgbl{$lex}[$lex+1]{$lex}: value ok 11183 - delete $vgbl{$lex}[$lex+1]{$lex}: no exception ok 11184 - delete $vgbl{$lex}[$lex+1]{$lex}: value ok 11185 - $vrlex->{$lex}[$lex+1]{$lex}: no exception ok 11186 - $vrlex->{$lex}[$lex+1]{$lex}: value ok 11187 - $vrlex->{$lex}[$lex+1]{$lex} = 123: no exception ok 11188 - $vrlex->{$lex}[$lex+1]{$lex} = 123: value ok 11189 - exists $vrlex->{$lex}[$lex+1]{$lex}: no exception ok 11190 - exists $vrlex->{$lex}[$lex+1]{$lex}: value ok 11191 - delete $vrlex->{$lex}[$lex+1]{$lex}: no exception ok 11192 - delete $vrlex->{$lex}[$lex+1]{$lex}: value ok 11193 - $vrgbl->{$lex}[$lex+1]{$lex}: no exception ok 11194 - $vrgbl->{$lex}[$lex+1]{$lex}: value ok 11195 - $vrgbl->{$lex}[$lex+1]{$lex} = 123: no exception ok 11196 - $vrgbl->{$lex}[$lex+1]{$lex} = 123: value ok 11197 - exists $vrgbl->{$lex}[$lex+1]{$lex}: no exception ok 11198 - exists $vrgbl->{$lex}[$lex+1]{$lex}: value ok 11199 - delete $vrgbl->{$lex}[$lex+1]{$lex}: no exception ok 11200 - delete $vrgbl->{$lex}[$lex+1]{$lex}: value ok 11201 - $vlex{$gbl}[$lex+1]{$lex}: no exception ok 11202 - $vlex{$gbl}[$lex+1]{$lex}: value ok 11203 - $vlex{$gbl}[$lex+1]{$lex} = 123: no exception ok 11204 - $vlex{$gbl}[$lex+1]{$lex} = 123: value ok 11205 - exists $vlex{$gbl}[$lex+1]{$lex}: no exception ok 11206 - exists $vlex{$gbl}[$lex+1]{$lex}: value ok 11207 - delete $vlex{$gbl}[$lex+1]{$lex}: no exception ok 11208 - delete $vlex{$gbl}[$lex+1]{$lex}: value ok 11209 - $vgbl{$gbl}[$lex+1]{$lex}: no exception ok 11210 - $vgbl{$gbl}[$lex+1]{$lex}: value ok 11211 - $vgbl{$gbl}[$lex+1]{$lex} = 123: no exception ok 11212 - $vgbl{$gbl}[$lex+1]{$lex} = 123: value ok 11213 - exists $vgbl{$gbl}[$lex+1]{$lex}: no exception ok 11214 - exists $vgbl{$gbl}[$lex+1]{$lex}: value ok 11215 - delete $vgbl{$gbl}[$lex+1]{$lex}: no exception ok 11216 - delete $vgbl{$gbl}[$lex+1]{$lex}: value ok 11217 - $vrlex->{$gbl}[$lex+1]{$lex}: no exception ok 11218 - $vrlex->{$gbl}[$lex+1]{$lex}: value ok 11219 - $vrlex->{$gbl}[$lex+1]{$lex} = 123: no exception ok 11220 - $vrlex->{$gbl}[$lex+1]{$lex} = 123: value ok 11221 - exists $vrlex->{$gbl}[$lex+1]{$lex}: no exception ok 11222 - exists $vrlex->{$gbl}[$lex+1]{$lex}: value ok 11223 - delete $vrlex->{$gbl}[$lex+1]{$lex}: no exception ok 11224 - delete $vrlex->{$gbl}[$lex+1]{$lex}: value ok 11225 - $vrgbl->{$gbl}[$lex+1]{$lex}: no exception ok 11226 - $vrgbl->{$gbl}[$lex+1]{$lex}: value ok 11227 - $vrgbl->{$gbl}[$lex+1]{$lex} = 123: no exception ok 11228 - $vrgbl->{$gbl}[$lex+1]{$lex} = 123: value ok 11229 - exists $vrgbl->{$gbl}[$lex+1]{$lex}: no exception ok 11230 - exists $vrgbl->{$gbl}[$lex+1]{$lex}: value ok 11231 - delete $vrgbl->{$gbl}[$lex+1]{$lex}: no exception ok 11232 - delete $vrgbl->{$gbl}[$lex+1]{$lex}: value ok 11233 - $vlex{"x$lex"}[$lex+1]{$lex}: no exception ok 11234 - $vlex{"x$lex"}[$lex+1]{$lex}: value ok 11235 - $vlex{"x$lex"}[$lex+1]{$lex} = 123: no exception ok 11236 - $vlex{"x$lex"}[$lex+1]{$lex} = 123: value ok 11237 - exists $vlex{"x$lex"}[$lex+1]{$lex}: no exception ok 11238 - exists $vlex{"x$lex"}[$lex+1]{$lex}: value ok 11239 - delete $vlex{"x$lex"}[$lex+1]{$lex}: no exception ok 11240 - delete $vlex{"x$lex"}[$lex+1]{$lex}: value ok 11241 - $vgbl{"x$lex"}[$lex+1]{$lex}: no exception ok 11242 - $vgbl{"x$lex"}[$lex+1]{$lex}: value ok 11243 - $vgbl{"x$lex"}[$lex+1]{$lex} = 123: no exception ok 11244 - $vgbl{"x$lex"}[$lex+1]{$lex} = 123: value ok 11245 - exists $vgbl{"x$lex"}[$lex+1]{$lex}: no exception ok 11246 - exists $vgbl{"x$lex"}[$lex+1]{$lex}: value ok 11247 - delete $vgbl{"x$lex"}[$lex+1]{$lex}: no exception ok 11248 - delete $vgbl{"x$lex"}[$lex+1]{$lex}: value ok 11249 - $vrlex->{"x$lex"}[$lex+1]{$lex}: no exception ok 11250 - $vrlex->{"x$lex"}[$lex+1]{$lex}: value ok 11251 - $vrlex->{"x$lex"}[$lex+1]{$lex} = 123: no exception ok 11252 - $vrlex->{"x$lex"}[$lex+1]{$lex} = 123: value ok 11253 - exists $vrlex->{"x$lex"}[$lex+1]{$lex}: no exception ok 11254 - exists $vrlex->{"x$lex"}[$lex+1]{$lex}: value ok 11255 - delete $vrlex->{"x$lex"}[$lex+1]{$lex}: no exception ok 11256 - delete $vrlex->{"x$lex"}[$lex+1]{$lex}: value ok 11257 - $vrgbl->{"x$lex"}[$lex+1]{$lex}: no exception ok 11258 - $vrgbl->{"x$lex"}[$lex+1]{$lex}: value ok 11259 - $vrgbl->{"x$lex"}[$lex+1]{$lex} = 123: no exception ok 11260 - $vrgbl->{"x$lex"}[$lex+1]{$lex} = 123: value ok 11261 - exists $vrgbl->{"x$lex"}[$lex+1]{$lex}: no exception ok 11262 - exists $vrgbl->{"x$lex"}[$lex+1]{$lex}: value ok 11263 - delete $vrgbl->{"x$lex"}[$lex+1]{$lex}: no exception ok 11264 - delete $vrgbl->{"x$lex"}[$lex+1]{$lex}: value ok 11265 - $vlex[0]{foo}{$lex}: no exception ok 11266 - $vlex[0]{foo}{$lex}: value ok 11267 - $vlex[0]{foo}{$lex} = 123: no exception ok 11268 - $vlex[0]{foo}{$lex} = 123: value ok 11269 - exists $vlex[0]{foo}{$lex}: no exception ok 11270 - exists $vlex[0]{foo}{$lex}: value ok 11271 - delete $vlex[0]{foo}{$lex}: no exception ok 11272 - delete $vlex[0]{foo}{$lex}: value ok 11273 - $vgbl[0]{foo}{$lex}: no exception ok 11274 - $vgbl[0]{foo}{$lex}: value ok 11275 - $vgbl[0]{foo}{$lex} = 123: no exception ok 11276 - $vgbl[0]{foo}{$lex} = 123: value ok 11277 - exists $vgbl[0]{foo}{$lex}: no exception ok 11278 - exists $vgbl[0]{foo}{$lex}: value ok 11279 - delete $vgbl[0]{foo}{$lex}: no exception ok 11280 - delete $vgbl[0]{foo}{$lex}: value ok 11281 - $vrlex->[0]{foo}{$lex}: no exception ok 11282 - $vrlex->[0]{foo}{$lex}: value ok 11283 - $vrlex->[0]{foo}{$lex} = 123: no exception ok 11284 - $vrlex->[0]{foo}{$lex} = 123: value ok 11285 - exists $vrlex->[0]{foo}{$lex}: no exception ok 11286 - exists $vrlex->[0]{foo}{$lex}: value ok 11287 - delete $vrlex->[0]{foo}{$lex}: no exception ok 11288 - delete $vrlex->[0]{foo}{$lex}: value ok 11289 - $vrgbl->[0]{foo}{$lex}: no exception ok 11290 - $vrgbl->[0]{foo}{$lex}: value ok 11291 - $vrgbl->[0]{foo}{$lex} = 123: no exception ok 11292 - $vrgbl->[0]{foo}{$lex} = 123: value ok 11293 - exists $vrgbl->[0]{foo}{$lex}: no exception ok 11294 - exists $vrgbl->[0]{foo}{$lex}: value ok 11295 - delete $vrgbl->[0]{foo}{$lex}: no exception ok 11296 - delete $vrgbl->[0]{foo}{$lex}: value ok 11297 - $vlex[$lex]{foo}{$lex}: no exception ok 11298 - $vlex[$lex]{foo}{$lex}: value ok 11299 - $vlex[$lex]{foo}{$lex} = 123: no exception ok 11300 - $vlex[$lex]{foo}{$lex} = 123: value ok 11301 - exists $vlex[$lex]{foo}{$lex}: no exception ok 11302 - exists $vlex[$lex]{foo}{$lex}: value ok 11303 - delete $vlex[$lex]{foo}{$lex}: no exception ok 11304 - delete $vlex[$lex]{foo}{$lex}: value ok 11305 - $vgbl[$lex]{foo}{$lex}: no exception ok 11306 - $vgbl[$lex]{foo}{$lex}: value ok 11307 - $vgbl[$lex]{foo}{$lex} = 123: no exception ok 11308 - $vgbl[$lex]{foo}{$lex} = 123: value ok 11309 - exists $vgbl[$lex]{foo}{$lex}: no exception ok 11310 - exists $vgbl[$lex]{foo}{$lex}: value ok 11311 - delete $vgbl[$lex]{foo}{$lex}: no exception ok 11312 - delete $vgbl[$lex]{foo}{$lex}: value ok 11313 - $vrlex->[$lex]{foo}{$lex}: no exception ok 11314 - $vrlex->[$lex]{foo}{$lex}: value ok 11315 - $vrlex->[$lex]{foo}{$lex} = 123: no exception ok 11316 - $vrlex->[$lex]{foo}{$lex} = 123: value ok 11317 - exists $vrlex->[$lex]{foo}{$lex}: no exception ok 11318 - exists $vrlex->[$lex]{foo}{$lex}: value ok 11319 - delete $vrlex->[$lex]{foo}{$lex}: no exception ok 11320 - delete $vrlex->[$lex]{foo}{$lex}: value ok 11321 - $vrgbl->[$lex]{foo}{$lex}: no exception ok 11322 - $vrgbl->[$lex]{foo}{$lex}: value ok 11323 - $vrgbl->[$lex]{foo}{$lex} = 123: no exception ok 11324 - $vrgbl->[$lex]{foo}{$lex} = 123: value ok 11325 - exists $vrgbl->[$lex]{foo}{$lex}: no exception ok 11326 - exists $vrgbl->[$lex]{foo}{$lex}: value ok 11327 - delete $vrgbl->[$lex]{foo}{$lex}: no exception ok 11328 - delete $vrgbl->[$lex]{foo}{$lex}: value ok 11329 - $vlex[$gbl]{foo}{$lex}: no exception ok 11330 - $vlex[$gbl]{foo}{$lex}: value ok 11331 - $vlex[$gbl]{foo}{$lex} = 123: no exception ok 11332 - $vlex[$gbl]{foo}{$lex} = 123: value ok 11333 - exists $vlex[$gbl]{foo}{$lex}: no exception ok 11334 - exists $vlex[$gbl]{foo}{$lex}: value ok 11335 - delete $vlex[$gbl]{foo}{$lex}: no exception ok 11336 - delete $vlex[$gbl]{foo}{$lex}: value ok 11337 - $vgbl[$gbl]{foo}{$lex}: no exception ok 11338 - $vgbl[$gbl]{foo}{$lex}: value ok 11339 - $vgbl[$gbl]{foo}{$lex} = 123: no exception ok 11340 - $vgbl[$gbl]{foo}{$lex} = 123: value ok 11341 - exists $vgbl[$gbl]{foo}{$lex}: no exception ok 11342 - exists $vgbl[$gbl]{foo}{$lex}: value ok 11343 - delete $vgbl[$gbl]{foo}{$lex}: no exception ok 11344 - delete $vgbl[$gbl]{foo}{$lex}: value ok 11345 - $vrlex->[$gbl]{foo}{$lex}: no exception ok 11346 - $vrlex->[$gbl]{foo}{$lex}: value ok 11347 - $vrlex->[$gbl]{foo}{$lex} = 123: no exception ok 11348 - $vrlex->[$gbl]{foo}{$lex} = 123: value ok 11349 - exists $vrlex->[$gbl]{foo}{$lex}: no exception ok 11350 - exists $vrlex->[$gbl]{foo}{$lex}: value ok 11351 - delete $vrlex->[$gbl]{foo}{$lex}: no exception ok 11352 - delete $vrlex->[$gbl]{foo}{$lex}: value ok 11353 - $vrgbl->[$gbl]{foo}{$lex}: no exception ok 11354 - $vrgbl->[$gbl]{foo}{$lex}: value ok 11355 - $vrgbl->[$gbl]{foo}{$lex} = 123: no exception ok 11356 - $vrgbl->[$gbl]{foo}{$lex} = 123: value ok 11357 - exists $vrgbl->[$gbl]{foo}{$lex}: no exception ok 11358 - exists $vrgbl->[$gbl]{foo}{$lex}: value ok 11359 - delete $vrgbl->[$gbl]{foo}{$lex}: no exception ok 11360 - delete $vrgbl->[$gbl]{foo}{$lex}: value ok 11361 - $vlex[$lex+1]{foo}{$lex}: no exception ok 11362 - $vlex[$lex+1]{foo}{$lex}: value ok 11363 - $vlex[$lex+1]{foo}{$lex} = 123: no exception ok 11364 - $vlex[$lex+1]{foo}{$lex} = 123: value ok 11365 - exists $vlex[$lex+1]{foo}{$lex}: no exception ok 11366 - exists $vlex[$lex+1]{foo}{$lex}: value ok 11367 - delete $vlex[$lex+1]{foo}{$lex}: no exception ok 11368 - delete $vlex[$lex+1]{foo}{$lex}: value ok 11369 - $vgbl[$lex+1]{foo}{$lex}: no exception ok 11370 - $vgbl[$lex+1]{foo}{$lex}: value ok 11371 - $vgbl[$lex+1]{foo}{$lex} = 123: no exception ok 11372 - $vgbl[$lex+1]{foo}{$lex} = 123: value ok 11373 - exists $vgbl[$lex+1]{foo}{$lex}: no exception ok 11374 - exists $vgbl[$lex+1]{foo}{$lex}: value ok 11375 - delete $vgbl[$lex+1]{foo}{$lex}: no exception ok 11376 - delete $vgbl[$lex+1]{foo}{$lex}: value ok 11377 - $vrlex->[$lex+1]{foo}{$lex}: no exception ok 11378 - $vrlex->[$lex+1]{foo}{$lex}: value ok 11379 - $vrlex->[$lex+1]{foo}{$lex} = 123: no exception ok 11380 - $vrlex->[$lex+1]{foo}{$lex} = 123: value ok 11381 - exists $vrlex->[$lex+1]{foo}{$lex}: no exception ok 11382 - exists $vrlex->[$lex+1]{foo}{$lex}: value ok 11383 - delete $vrlex->[$lex+1]{foo}{$lex}: no exception ok 11384 - delete $vrlex->[$lex+1]{foo}{$lex}: value ok 11385 - $vrgbl->[$lex+1]{foo}{$lex}: no exception ok 11386 - $vrgbl->[$lex+1]{foo}{$lex}: value ok 11387 - $vrgbl->[$lex+1]{foo}{$lex} = 123: no exception ok 11388 - $vrgbl->[$lex+1]{foo}{$lex} = 123: value ok 11389 - exists $vrgbl->[$lex+1]{foo}{$lex}: no exception ok 11390 - exists $vrgbl->[$lex+1]{foo}{$lex}: value ok 11391 - delete $vrgbl->[$lex+1]{foo}{$lex}: no exception ok 11392 - delete $vrgbl->[$lex+1]{foo}{$lex}: value ok 11393 - $vlex{foo}{foo}{$lex}: no exception ok 11394 - $vlex{foo}{foo}{$lex}: value ok 11395 - $vlex{foo}{foo}{$lex} = 123: no exception ok 11396 - $vlex{foo}{foo}{$lex} = 123: value ok 11397 - exists $vlex{foo}{foo}{$lex}: no exception ok 11398 - exists $vlex{foo}{foo}{$lex}: value ok 11399 - delete $vlex{foo}{foo}{$lex}: no exception ok 11400 - delete $vlex{foo}{foo}{$lex}: value ok 11401 - $vgbl{foo}{foo}{$lex}: no exception ok 11402 - $vgbl{foo}{foo}{$lex}: value ok 11403 - $vgbl{foo}{foo}{$lex} = 123: no exception ok 11404 - $vgbl{foo}{foo}{$lex} = 123: value ok 11405 - exists $vgbl{foo}{foo}{$lex}: no exception ok 11406 - exists $vgbl{foo}{foo}{$lex}: value ok 11407 - delete $vgbl{foo}{foo}{$lex}: no exception ok 11408 - delete $vgbl{foo}{foo}{$lex}: value ok 11409 - $vrlex->{foo}{foo}{$lex}: no exception ok 11410 - $vrlex->{foo}{foo}{$lex}: value ok 11411 - $vrlex->{foo}{foo}{$lex} = 123: no exception ok 11412 - $vrlex->{foo}{foo}{$lex} = 123: value ok 11413 - exists $vrlex->{foo}{foo}{$lex}: no exception ok 11414 - exists $vrlex->{foo}{foo}{$lex}: value ok 11415 - delete $vrlex->{foo}{foo}{$lex}: no exception ok 11416 - delete $vrlex->{foo}{foo}{$lex}: value ok 11417 - $vrgbl->{foo}{foo}{$lex}: no exception ok 11418 - $vrgbl->{foo}{foo}{$lex}: value ok 11419 - $vrgbl->{foo}{foo}{$lex} = 123: no exception ok 11420 - $vrgbl->{foo}{foo}{$lex} = 123: value ok 11421 - exists $vrgbl->{foo}{foo}{$lex}: no exception ok 11422 - exists $vrgbl->{foo}{foo}{$lex}: value ok 11423 - delete $vrgbl->{foo}{foo}{$lex}: no exception ok 11424 - delete $vrgbl->{foo}{foo}{$lex}: value ok 11425 - $vlex{$lex}{foo}{$lex}: no exception ok 11426 - $vlex{$lex}{foo}{$lex}: value ok 11427 - $vlex{$lex}{foo}{$lex} = 123: no exception ok 11428 - $vlex{$lex}{foo}{$lex} = 123: value ok 11429 - exists $vlex{$lex}{foo}{$lex}: no exception ok 11430 - exists $vlex{$lex}{foo}{$lex}: value ok 11431 - delete $vlex{$lex}{foo}{$lex}: no exception ok 11432 - delete $vlex{$lex}{foo}{$lex}: value ok 11433 - $vgbl{$lex}{foo}{$lex}: no exception ok 11434 - $vgbl{$lex}{foo}{$lex}: value ok 11435 - $vgbl{$lex}{foo}{$lex} = 123: no exception ok 11436 - $vgbl{$lex}{foo}{$lex} = 123: value ok 11437 - exists $vgbl{$lex}{foo}{$lex}: no exception ok 11438 - exists $vgbl{$lex}{foo}{$lex}: value ok 11439 - delete $vgbl{$lex}{foo}{$lex}: no exception ok 11440 - delete $vgbl{$lex}{foo}{$lex}: value ok 11441 - $vrlex->{$lex}{foo}{$lex}: no exception ok 11442 - $vrlex->{$lex}{foo}{$lex}: value ok 11443 - $vrlex->{$lex}{foo}{$lex} = 123: no exception ok 11444 - $vrlex->{$lex}{foo}{$lex} = 123: value ok 11445 - exists $vrlex->{$lex}{foo}{$lex}: no exception ok 11446 - exists $vrlex->{$lex}{foo}{$lex}: value ok 11447 - delete $vrlex->{$lex}{foo}{$lex}: no exception ok 11448 - delete $vrlex->{$lex}{foo}{$lex}: value ok 11449 - $vrgbl->{$lex}{foo}{$lex}: no exception ok 11450 - $vrgbl->{$lex}{foo}{$lex}: value ok 11451 - $vrgbl->{$lex}{foo}{$lex} = 123: no exception ok 11452 - $vrgbl->{$lex}{foo}{$lex} = 123: value ok 11453 - exists $vrgbl->{$lex}{foo}{$lex}: no exception ok 11454 - exists $vrgbl->{$lex}{foo}{$lex}: value ok 11455 - delete $vrgbl->{$lex}{foo}{$lex}: no exception ok 11456 - delete $vrgbl->{$lex}{foo}{$lex}: value ok 11457 - $vlex{$gbl}{foo}{$lex}: no exception ok 11458 - $vlex{$gbl}{foo}{$lex}: value ok 11459 - $vlex{$gbl}{foo}{$lex} = 123: no exception ok 11460 - $vlex{$gbl}{foo}{$lex} = 123: value ok 11461 - exists $vlex{$gbl}{foo}{$lex}: no exception ok 11462 - exists $vlex{$gbl}{foo}{$lex}: value ok 11463 - delete $vlex{$gbl}{foo}{$lex}: no exception ok 11464 - delete $vlex{$gbl}{foo}{$lex}: value ok 11465 - $vgbl{$gbl}{foo}{$lex}: no exception ok 11466 - $vgbl{$gbl}{foo}{$lex}: value ok 11467 - $vgbl{$gbl}{foo}{$lex} = 123: no exception ok 11468 - $vgbl{$gbl}{foo}{$lex} = 123: value ok 11469 - exists $vgbl{$gbl}{foo}{$lex}: no exception ok 11470 - exists $vgbl{$gbl}{foo}{$lex}: value ok 11471 - delete $vgbl{$gbl}{foo}{$lex}: no exception ok 11472 - delete $vgbl{$gbl}{foo}{$lex}: value ok 11473 - $vrlex->{$gbl}{foo}{$lex}: no exception ok 11474 - $vrlex->{$gbl}{foo}{$lex}: value ok 11475 - $vrlex->{$gbl}{foo}{$lex} = 123: no exception ok 11476 - $vrlex->{$gbl}{foo}{$lex} = 123: value ok 11477 - exists $vrlex->{$gbl}{foo}{$lex}: no exception ok 11478 - exists $vrlex->{$gbl}{foo}{$lex}: value ok 11479 - delete $vrlex->{$gbl}{foo}{$lex}: no exception ok 11480 - delete $vrlex->{$gbl}{foo}{$lex}: value ok 11481 - $vrgbl->{$gbl}{foo}{$lex}: no exception ok 11482 - $vrgbl->{$gbl}{foo}{$lex}: value ok 11483 - $vrgbl->{$gbl}{foo}{$lex} = 123: no exception ok 11484 - $vrgbl->{$gbl}{foo}{$lex} = 123: value ok 11485 - exists $vrgbl->{$gbl}{foo}{$lex}: no exception ok 11486 - exists $vrgbl->{$gbl}{foo}{$lex}: value ok 11487 - delete $vrgbl->{$gbl}{foo}{$lex}: no exception ok 11488 - delete $vrgbl->{$gbl}{foo}{$lex}: value ok 11489 - $vlex{"x$lex"}{foo}{$lex}: no exception ok 11490 - $vlex{"x$lex"}{foo}{$lex}: value ok 11491 - $vlex{"x$lex"}{foo}{$lex} = 123: no exception ok 11492 - $vlex{"x$lex"}{foo}{$lex} = 123: value ok 11493 - exists $vlex{"x$lex"}{foo}{$lex}: no exception ok 11494 - exists $vlex{"x$lex"}{foo}{$lex}: value ok 11495 - delete $vlex{"x$lex"}{foo}{$lex}: no exception ok 11496 - delete $vlex{"x$lex"}{foo}{$lex}: value ok 11497 - $vgbl{"x$lex"}{foo}{$lex}: no exception ok 11498 - $vgbl{"x$lex"}{foo}{$lex}: value ok 11499 - $vgbl{"x$lex"}{foo}{$lex} = 123: no exception ok 11500 - $vgbl{"x$lex"}{foo}{$lex} = 123: value ok 11501 - exists $vgbl{"x$lex"}{foo}{$lex}: no exception ok 11502 - exists $vgbl{"x$lex"}{foo}{$lex}: value ok 11503 - delete $vgbl{"x$lex"}{foo}{$lex}: no exception ok 11504 - delete $vgbl{"x$lex"}{foo}{$lex}: value ok 11505 - $vrlex->{"x$lex"}{foo}{$lex}: no exception ok 11506 - $vrlex->{"x$lex"}{foo}{$lex}: value ok 11507 - $vrlex->{"x$lex"}{foo}{$lex} = 123: no exception ok 11508 - $vrlex->{"x$lex"}{foo}{$lex} = 123: value ok 11509 - exists $vrlex->{"x$lex"}{foo}{$lex}: no exception ok 11510 - exists $vrlex->{"x$lex"}{foo}{$lex}: value ok 11511 - delete $vrlex->{"x$lex"}{foo}{$lex}: no exception ok 11512 - delete $vrlex->{"x$lex"}{foo}{$lex}: value ok 11513 - $vrgbl->{"x$lex"}{foo}{$lex}: no exception ok 11514 - $vrgbl->{"x$lex"}{foo}{$lex}: value ok 11515 - $vrgbl->{"x$lex"}{foo}{$lex} = 123: no exception ok 11516 - $vrgbl->{"x$lex"}{foo}{$lex} = 123: value ok 11517 - exists $vrgbl->{"x$lex"}{foo}{$lex}: no exception ok 11518 - exists $vrgbl->{"x$lex"}{foo}{$lex}: value ok 11519 - delete $vrgbl->{"x$lex"}{foo}{$lex}: no exception ok 11520 - delete $vrgbl->{"x$lex"}{foo}{$lex}: value ok 11521 - $vlex[0]{$lex}{$lex}: no exception ok 11522 - $vlex[0]{$lex}{$lex}: value ok 11523 - $vlex[0]{$lex}{$lex} = 123: no exception ok 11524 - $vlex[0]{$lex}{$lex} = 123: value ok 11525 - exists $vlex[0]{$lex}{$lex}: no exception ok 11526 - exists $vlex[0]{$lex}{$lex}: value ok 11527 - delete $vlex[0]{$lex}{$lex}: no exception ok 11528 - delete $vlex[0]{$lex}{$lex}: value ok 11529 - $vgbl[0]{$lex}{$lex}: no exception ok 11530 - $vgbl[0]{$lex}{$lex}: value ok 11531 - $vgbl[0]{$lex}{$lex} = 123: no exception ok 11532 - $vgbl[0]{$lex}{$lex} = 123: value ok 11533 - exists $vgbl[0]{$lex}{$lex}: no exception ok 11534 - exists $vgbl[0]{$lex}{$lex}: value ok 11535 - delete $vgbl[0]{$lex}{$lex}: no exception ok 11536 - delete $vgbl[0]{$lex}{$lex}: value ok 11537 - $vrlex->[0]{$lex}{$lex}: no exception ok 11538 - $vrlex->[0]{$lex}{$lex}: value ok 11539 - $vrlex->[0]{$lex}{$lex} = 123: no exception ok 11540 - $vrlex->[0]{$lex}{$lex} = 123: value ok 11541 - exists $vrlex->[0]{$lex}{$lex}: no exception ok 11542 - exists $vrlex->[0]{$lex}{$lex}: value ok 11543 - delete $vrlex->[0]{$lex}{$lex}: no exception ok 11544 - delete $vrlex->[0]{$lex}{$lex}: value ok 11545 - $vrgbl->[0]{$lex}{$lex}: no exception ok 11546 - $vrgbl->[0]{$lex}{$lex}: value ok 11547 - $vrgbl->[0]{$lex}{$lex} = 123: no exception ok 11548 - $vrgbl->[0]{$lex}{$lex} = 123: value ok 11549 - exists $vrgbl->[0]{$lex}{$lex}: no exception ok 11550 - exists $vrgbl->[0]{$lex}{$lex}: value ok 11551 - delete $vrgbl->[0]{$lex}{$lex}: no exception ok 11552 - delete $vrgbl->[0]{$lex}{$lex}: value ok 11553 - $vlex[$lex]{$lex}{$lex}: no exception ok 11554 - $vlex[$lex]{$lex}{$lex}: value ok 11555 - $vlex[$lex]{$lex}{$lex} = 123: no exception ok 11556 - $vlex[$lex]{$lex}{$lex} = 123: value ok 11557 - exists $vlex[$lex]{$lex}{$lex}: no exception ok 11558 - exists $vlex[$lex]{$lex}{$lex}: value ok 11559 - delete $vlex[$lex]{$lex}{$lex}: no exception ok 11560 - delete $vlex[$lex]{$lex}{$lex}: value ok 11561 - $vgbl[$lex]{$lex}{$lex}: no exception ok 11562 - $vgbl[$lex]{$lex}{$lex}: value ok 11563 - $vgbl[$lex]{$lex}{$lex} = 123: no exception ok 11564 - $vgbl[$lex]{$lex}{$lex} = 123: value ok 11565 - exists $vgbl[$lex]{$lex}{$lex}: no exception ok 11566 - exists $vgbl[$lex]{$lex}{$lex}: value ok 11567 - delete $vgbl[$lex]{$lex}{$lex}: no exception ok 11568 - delete $vgbl[$lex]{$lex}{$lex}: value ok 11569 - $vrlex->[$lex]{$lex}{$lex}: no exception ok 11570 - $vrlex->[$lex]{$lex}{$lex}: value ok 11571 - $vrlex->[$lex]{$lex}{$lex} = 123: no exception ok 11572 - $vrlex->[$lex]{$lex}{$lex} = 123: value ok 11573 - exists $vrlex->[$lex]{$lex}{$lex}: no exception ok 11574 - exists $vrlex->[$lex]{$lex}{$lex}: value ok 11575 - delete $vrlex->[$lex]{$lex}{$lex}: no exception ok 11576 - delete $vrlex->[$lex]{$lex}{$lex}: value ok 11577 - $vrgbl->[$lex]{$lex}{$lex}: no exception ok 11578 - $vrgbl->[$lex]{$lex}{$lex}: value ok 11579 - $vrgbl->[$lex]{$lex}{$lex} = 123: no exception ok 11580 - $vrgbl->[$lex]{$lex}{$lex} = 123: value ok 11581 - exists $vrgbl->[$lex]{$lex}{$lex}: no exception ok 11582 - exists $vrgbl->[$lex]{$lex}{$lex}: value ok 11583 - delete $vrgbl->[$lex]{$lex}{$lex}: no exception ok 11584 - delete $vrgbl->[$lex]{$lex}{$lex}: value ok 11585 - $vlex[$gbl]{$lex}{$lex}: no exception ok 11586 - $vlex[$gbl]{$lex}{$lex}: value ok 11587 - $vlex[$gbl]{$lex}{$lex} = 123: no exception ok 11588 - $vlex[$gbl]{$lex}{$lex} = 123: value ok 11589 - exists $vlex[$gbl]{$lex}{$lex}: no exception ok 11590 - exists $vlex[$gbl]{$lex}{$lex}: value ok 11591 - delete $vlex[$gbl]{$lex}{$lex}: no exception ok 11592 - delete $vlex[$gbl]{$lex}{$lex}: value ok 11593 - $vgbl[$gbl]{$lex}{$lex}: no exception ok 11594 - $vgbl[$gbl]{$lex}{$lex}: value ok 11595 - $vgbl[$gbl]{$lex}{$lex} = 123: no exception ok 11596 - $vgbl[$gbl]{$lex}{$lex} = 123: value ok 11597 - exists $vgbl[$gbl]{$lex}{$lex}: no exception ok 11598 - exists $vgbl[$gbl]{$lex}{$lex}: value ok 11599 - delete $vgbl[$gbl]{$lex}{$lex}: no exception ok 11600 - delete $vgbl[$gbl]{$lex}{$lex}: value ok 11601 - $vrlex->[$gbl]{$lex}{$lex}: no exception ok 11602 - $vrlex->[$gbl]{$lex}{$lex}: value ok 11603 - $vrlex->[$gbl]{$lex}{$lex} = 123: no exception ok 11604 - $vrlex->[$gbl]{$lex}{$lex} = 123: value ok 11605 - exists $vrlex->[$gbl]{$lex}{$lex}: no exception ok 11606 - exists $vrlex->[$gbl]{$lex}{$lex}: value ok 11607 - delete $vrlex->[$gbl]{$lex}{$lex}: no exception ok 11608 - delete $vrlex->[$gbl]{$lex}{$lex}: value ok 11609 - $vrgbl->[$gbl]{$lex}{$lex}: no exception ok 11610 - $vrgbl->[$gbl]{$lex}{$lex}: value ok 11611 - $vrgbl->[$gbl]{$lex}{$lex} = 123: no exception ok 11612 - $vrgbl->[$gbl]{$lex}{$lex} = 123: value ok 11613 - exists $vrgbl->[$gbl]{$lex}{$lex}: no exception ok 11614 - exists $vrgbl->[$gbl]{$lex}{$lex}: value ok 11615 - delete $vrgbl->[$gbl]{$lex}{$lex}: no exception ok 11616 - delete $vrgbl->[$gbl]{$lex}{$lex}: value ok 11617 - $vlex[$lex+1]{$lex}{$lex}: no exception ok 11618 - $vlex[$lex+1]{$lex}{$lex}: value ok 11619 - $vlex[$lex+1]{$lex}{$lex} = 123: no exception ok 11620 - $vlex[$lex+1]{$lex}{$lex} = 123: value ok 11621 - exists $vlex[$lex+1]{$lex}{$lex}: no exception ok 11622 - exists $vlex[$lex+1]{$lex}{$lex}: value ok 11623 - delete $vlex[$lex+1]{$lex}{$lex}: no exception ok 11624 - delete $vlex[$lex+1]{$lex}{$lex}: value ok 11625 - $vgbl[$lex+1]{$lex}{$lex}: no exception ok 11626 - $vgbl[$lex+1]{$lex}{$lex}: value ok 11627 - $vgbl[$lex+1]{$lex}{$lex} = 123: no exception ok 11628 - $vgbl[$lex+1]{$lex}{$lex} = 123: value ok 11629 - exists $vgbl[$lex+1]{$lex}{$lex}: no exception ok 11630 - exists $vgbl[$lex+1]{$lex}{$lex}: value ok 11631 - delete $vgbl[$lex+1]{$lex}{$lex}: no exception ok 11632 - delete $vgbl[$lex+1]{$lex}{$lex}: value ok 11633 - $vrlex->[$lex+1]{$lex}{$lex}: no exception ok 11634 - $vrlex->[$lex+1]{$lex}{$lex}: value ok 11635 - $vrlex->[$lex+1]{$lex}{$lex} = 123: no exception ok 11636 - $vrlex->[$lex+1]{$lex}{$lex} = 123: value ok 11637 - exists $vrlex->[$lex+1]{$lex}{$lex}: no exception ok 11638 - exists $vrlex->[$lex+1]{$lex}{$lex}: value ok 11639 - delete $vrlex->[$lex+1]{$lex}{$lex}: no exception ok 11640 - delete $vrlex->[$lex+1]{$lex}{$lex}: value ok 11641 - $vrgbl->[$lex+1]{$lex}{$lex}: no exception ok 11642 - $vrgbl->[$lex+1]{$lex}{$lex}: value ok 11643 - $vrgbl->[$lex+1]{$lex}{$lex} = 123: no exception ok 11644 - $vrgbl->[$lex+1]{$lex}{$lex} = 123: value ok 11645 - exists $vrgbl->[$lex+1]{$lex}{$lex}: no exception ok 11646 - exists $vrgbl->[$lex+1]{$lex}{$lex}: value ok 11647 - delete $vrgbl->[$lex+1]{$lex}{$lex}: no exception ok 11648 - delete $vrgbl->[$lex+1]{$lex}{$lex}: value ok 11649 - $vlex{foo}{$lex}{$lex}: no exception ok 11650 - $vlex{foo}{$lex}{$lex}: value ok 11651 - $vlex{foo}{$lex}{$lex} = 123: no exception ok 11652 - $vlex{foo}{$lex}{$lex} = 123: value ok 11653 - exists $vlex{foo}{$lex}{$lex}: no exception ok 11654 - exists $vlex{foo}{$lex}{$lex}: value ok 11655 - delete $vlex{foo}{$lex}{$lex}: no exception ok 11656 - delete $vlex{foo}{$lex}{$lex}: value ok 11657 - $vgbl{foo}{$lex}{$lex}: no exception ok 11658 - $vgbl{foo}{$lex}{$lex}: value ok 11659 - $vgbl{foo}{$lex}{$lex} = 123: no exception ok 11660 - $vgbl{foo}{$lex}{$lex} = 123: value ok 11661 - exists $vgbl{foo}{$lex}{$lex}: no exception ok 11662 - exists $vgbl{foo}{$lex}{$lex}: value ok 11663 - delete $vgbl{foo}{$lex}{$lex}: no exception ok 11664 - delete $vgbl{foo}{$lex}{$lex}: value ok 11665 - $vrlex->{foo}{$lex}{$lex}: no exception ok 11666 - $vrlex->{foo}{$lex}{$lex}: value ok 11667 - $vrlex->{foo}{$lex}{$lex} = 123: no exception ok 11668 - $vrlex->{foo}{$lex}{$lex} = 123: value ok 11669 - exists $vrlex->{foo}{$lex}{$lex}: no exception ok 11670 - exists $vrlex->{foo}{$lex}{$lex}: value ok 11671 - delete $vrlex->{foo}{$lex}{$lex}: no exception ok 11672 - delete $vrlex->{foo}{$lex}{$lex}: value ok 11673 - $vrgbl->{foo}{$lex}{$lex}: no exception ok 11674 - $vrgbl->{foo}{$lex}{$lex}: value ok 11675 - $vrgbl->{foo}{$lex}{$lex} = 123: no exception ok 11676 - $vrgbl->{foo}{$lex}{$lex} = 123: value ok 11677 - exists $vrgbl->{foo}{$lex}{$lex}: no exception ok 11678 - exists $vrgbl->{foo}{$lex}{$lex}: value ok 11679 - delete $vrgbl->{foo}{$lex}{$lex}: no exception ok 11680 - delete $vrgbl->{foo}{$lex}{$lex}: value ok 11681 - $vlex{$lex}{$lex}{$lex}: no exception ok 11682 - $vlex{$lex}{$lex}{$lex}: value ok 11683 - $vlex{$lex}{$lex}{$lex} = 123: no exception ok 11684 - $vlex{$lex}{$lex}{$lex} = 123: value ok 11685 - exists $vlex{$lex}{$lex}{$lex}: no exception ok 11686 - exists $vlex{$lex}{$lex}{$lex}: value ok 11687 - delete $vlex{$lex}{$lex}{$lex}: no exception ok 11688 - delete $vlex{$lex}{$lex}{$lex}: value ok 11689 - $vgbl{$lex}{$lex}{$lex}: no exception ok 11690 - $vgbl{$lex}{$lex}{$lex}: value ok 11691 - $vgbl{$lex}{$lex}{$lex} = 123: no exception ok 11692 - $vgbl{$lex}{$lex}{$lex} = 123: value ok 11693 - exists $vgbl{$lex}{$lex}{$lex}: no exception ok 11694 - exists $vgbl{$lex}{$lex}{$lex}: value ok 11695 - delete $vgbl{$lex}{$lex}{$lex}: no exception ok 11696 - delete $vgbl{$lex}{$lex}{$lex}: value ok 11697 - $vrlex->{$lex}{$lex}{$lex}: no exception ok 11698 - $vrlex->{$lex}{$lex}{$lex}: value ok 11699 - $vrlex->{$lex}{$lex}{$lex} = 123: no exception ok 11700 - $vrlex->{$lex}{$lex}{$lex} = 123: value ok 11701 - exists $vrlex->{$lex}{$lex}{$lex}: no exception ok 11702 - exists $vrlex->{$lex}{$lex}{$lex}: value ok 11703 - delete $vrlex->{$lex}{$lex}{$lex}: no exception ok 11704 - delete $vrlex->{$lex}{$lex}{$lex}: value ok 11705 - $vrgbl->{$lex}{$lex}{$lex}: no exception ok 11706 - $vrgbl->{$lex}{$lex}{$lex}: value ok 11707 - $vrgbl->{$lex}{$lex}{$lex} = 123: no exception ok 11708 - $vrgbl->{$lex}{$lex}{$lex} = 123: value ok 11709 - exists $vrgbl->{$lex}{$lex}{$lex}: no exception ok 11710 - exists $vrgbl->{$lex}{$lex}{$lex}: value ok 11711 - delete $vrgbl->{$lex}{$lex}{$lex}: no exception ok 11712 - delete $vrgbl->{$lex}{$lex}{$lex}: value ok 11713 - $vlex{$gbl}{$lex}{$lex}: no exception ok 11714 - $vlex{$gbl}{$lex}{$lex}: value ok 11715 - $vlex{$gbl}{$lex}{$lex} = 123: no exception ok 11716 - $vlex{$gbl}{$lex}{$lex} = 123: value ok 11717 - exists $vlex{$gbl}{$lex}{$lex}: no exception ok 11718 - exists $vlex{$gbl}{$lex}{$lex}: value ok 11719 - delete $vlex{$gbl}{$lex}{$lex}: no exception ok 11720 - delete $vlex{$gbl}{$lex}{$lex}: value ok 11721 - $vgbl{$gbl}{$lex}{$lex}: no exception ok 11722 - $vgbl{$gbl}{$lex}{$lex}: value ok 11723 - $vgbl{$gbl}{$lex}{$lex} = 123: no exception ok 11724 - $vgbl{$gbl}{$lex}{$lex} = 123: value ok 11725 - exists $vgbl{$gbl}{$lex}{$lex}: no exception ok 11726 - exists $vgbl{$gbl}{$lex}{$lex}: value ok 11727 - delete $vgbl{$gbl}{$lex}{$lex}: no exception ok 11728 - delete $vgbl{$gbl}{$lex}{$lex}: value ok 11729 - $vrlex->{$gbl}{$lex}{$lex}: no exception ok 11730 - $vrlex->{$gbl}{$lex}{$lex}: value ok 11731 - $vrlex->{$gbl}{$lex}{$lex} = 123: no exception ok 11732 - $vrlex->{$gbl}{$lex}{$lex} = 123: value ok 11733 - exists $vrlex->{$gbl}{$lex}{$lex}: no exception ok 11734 - exists $vrlex->{$gbl}{$lex}{$lex}: value ok 11735 - delete $vrlex->{$gbl}{$lex}{$lex}: no exception ok 11736 - delete $vrlex->{$gbl}{$lex}{$lex}: value ok 11737 - $vrgbl->{$gbl}{$lex}{$lex}: no exception ok 11738 - $vrgbl->{$gbl}{$lex}{$lex}: value ok 11739 - $vrgbl->{$gbl}{$lex}{$lex} = 123: no exception ok 11740 - $vrgbl->{$gbl}{$lex}{$lex} = 123: value ok 11741 - exists $vrgbl->{$gbl}{$lex}{$lex}: no exception ok 11742 - exists $vrgbl->{$gbl}{$lex}{$lex}: value ok 11743 - delete $vrgbl->{$gbl}{$lex}{$lex}: no exception ok 11744 - delete $vrgbl->{$gbl}{$lex}{$lex}: value ok 11745 - $vlex{"x$lex"}{$lex}{$lex}: no exception ok 11746 - $vlex{"x$lex"}{$lex}{$lex}: value ok 11747 - $vlex{"x$lex"}{$lex}{$lex} = 123: no exception ok 11748 - $vlex{"x$lex"}{$lex}{$lex} = 123: value ok 11749 - exists $vlex{"x$lex"}{$lex}{$lex}: no exception ok 11750 - exists $vlex{"x$lex"}{$lex}{$lex}: value ok 11751 - delete $vlex{"x$lex"}{$lex}{$lex}: no exception ok 11752 - delete $vlex{"x$lex"}{$lex}{$lex}: value ok 11753 - $vgbl{"x$lex"}{$lex}{$lex}: no exception ok 11754 - $vgbl{"x$lex"}{$lex}{$lex}: value ok 11755 - $vgbl{"x$lex"}{$lex}{$lex} = 123: no exception ok 11756 - $vgbl{"x$lex"}{$lex}{$lex} = 123: value ok 11757 - exists $vgbl{"x$lex"}{$lex}{$lex}: no exception ok 11758 - exists $vgbl{"x$lex"}{$lex}{$lex}: value ok 11759 - delete $vgbl{"x$lex"}{$lex}{$lex}: no exception ok 11760 - delete $vgbl{"x$lex"}{$lex}{$lex}: value ok 11761 - $vrlex->{"x$lex"}{$lex}{$lex}: no exception ok 11762 - $vrlex->{"x$lex"}{$lex}{$lex}: value ok 11763 - $vrlex->{"x$lex"}{$lex}{$lex} = 123: no exception ok 11764 - $vrlex->{"x$lex"}{$lex}{$lex} = 123: value ok 11765 - exists $vrlex->{"x$lex"}{$lex}{$lex}: no exception ok 11766 - exists $vrlex->{"x$lex"}{$lex}{$lex}: value ok 11767 - delete $vrlex->{"x$lex"}{$lex}{$lex}: no exception ok 11768 - delete $vrlex->{"x$lex"}{$lex}{$lex}: value ok 11769 - $vrgbl->{"x$lex"}{$lex}{$lex}: no exception ok 11770 - $vrgbl->{"x$lex"}{$lex}{$lex}: value ok 11771 - $vrgbl->{"x$lex"}{$lex}{$lex} = 123: no exception ok 11772 - $vrgbl->{"x$lex"}{$lex}{$lex} = 123: value ok 11773 - exists $vrgbl->{"x$lex"}{$lex}{$lex}: no exception ok 11774 - exists $vrgbl->{"x$lex"}{$lex}{$lex}: value ok 11775 - delete $vrgbl->{"x$lex"}{$lex}{$lex}: no exception ok 11776 - delete $vrgbl->{"x$lex"}{$lex}{$lex}: value ok 11777 - $vlex[0]{$gbl}{$lex}: no exception ok 11778 - $vlex[0]{$gbl}{$lex}: value ok 11779 - $vlex[0]{$gbl}{$lex} = 123: no exception ok 11780 - $vlex[0]{$gbl}{$lex} = 123: value ok 11781 - exists $vlex[0]{$gbl}{$lex}: no exception ok 11782 - exists $vlex[0]{$gbl}{$lex}: value ok 11783 - delete $vlex[0]{$gbl}{$lex}: no exception ok 11784 - delete $vlex[0]{$gbl}{$lex}: value ok 11785 - $vgbl[0]{$gbl}{$lex}: no exception ok 11786 - $vgbl[0]{$gbl}{$lex}: value ok 11787 - $vgbl[0]{$gbl}{$lex} = 123: no exception ok 11788 - $vgbl[0]{$gbl}{$lex} = 123: value ok 11789 - exists $vgbl[0]{$gbl}{$lex}: no exception ok 11790 - exists $vgbl[0]{$gbl}{$lex}: value ok 11791 - delete $vgbl[0]{$gbl}{$lex}: no exception ok 11792 - delete $vgbl[0]{$gbl}{$lex}: value ok 11793 - $vrlex->[0]{$gbl}{$lex}: no exception ok 11794 - $vrlex->[0]{$gbl}{$lex}: value ok 11795 - $vrlex->[0]{$gbl}{$lex} = 123: no exception ok 11796 - $vrlex->[0]{$gbl}{$lex} = 123: value ok 11797 - exists $vrlex->[0]{$gbl}{$lex}: no exception ok 11798 - exists $vrlex->[0]{$gbl}{$lex}: value ok 11799 - delete $vrlex->[0]{$gbl}{$lex}: no exception ok 11800 - delete $vrlex->[0]{$gbl}{$lex}: value ok 11801 - $vrgbl->[0]{$gbl}{$lex}: no exception ok 11802 - $vrgbl->[0]{$gbl}{$lex}: value ok 11803 - $vrgbl->[0]{$gbl}{$lex} = 123: no exception ok 11804 - $vrgbl->[0]{$gbl}{$lex} = 123: value ok 11805 - exists $vrgbl->[0]{$gbl}{$lex}: no exception ok 11806 - exists $vrgbl->[0]{$gbl}{$lex}: value ok 11807 - delete $vrgbl->[0]{$gbl}{$lex}: no exception ok 11808 - delete $vrgbl->[0]{$gbl}{$lex}: value ok 11809 - $vlex[$lex]{$gbl}{$lex}: no exception ok 11810 - $vlex[$lex]{$gbl}{$lex}: value ok 11811 - $vlex[$lex]{$gbl}{$lex} = 123: no exception ok 11812 - $vlex[$lex]{$gbl}{$lex} = 123: value ok 11813 - exists $vlex[$lex]{$gbl}{$lex}: no exception ok 11814 - exists $vlex[$lex]{$gbl}{$lex}: value ok 11815 - delete $vlex[$lex]{$gbl}{$lex}: no exception ok 11816 - delete $vlex[$lex]{$gbl}{$lex}: value ok 11817 - $vgbl[$lex]{$gbl}{$lex}: no exception ok 11818 - $vgbl[$lex]{$gbl}{$lex}: value ok 11819 - $vgbl[$lex]{$gbl}{$lex} = 123: no exception ok 11820 - $vgbl[$lex]{$gbl}{$lex} = 123: value ok 11821 - exists $vgbl[$lex]{$gbl}{$lex}: no exception ok 11822 - exists $vgbl[$lex]{$gbl}{$lex}: value ok 11823 - delete $vgbl[$lex]{$gbl}{$lex}: no exception ok 11824 - delete $vgbl[$lex]{$gbl}{$lex}: value ok 11825 - $vrlex->[$lex]{$gbl}{$lex}: no exception ok 11826 - $vrlex->[$lex]{$gbl}{$lex}: value ok 11827 - $vrlex->[$lex]{$gbl}{$lex} = 123: no exception ok 11828 - $vrlex->[$lex]{$gbl}{$lex} = 123: value ok 11829 - exists $vrlex->[$lex]{$gbl}{$lex}: no exception ok 11830 - exists $vrlex->[$lex]{$gbl}{$lex}: value ok 11831 - delete $vrlex->[$lex]{$gbl}{$lex}: no exception ok 11832 - delete $vrlex->[$lex]{$gbl}{$lex}: value ok 11833 - $vrgbl->[$lex]{$gbl}{$lex}: no exception ok 11834 - $vrgbl->[$lex]{$gbl}{$lex}: value ok 11835 - $vrgbl->[$lex]{$gbl}{$lex} = 123: no exception ok 11836 - $vrgbl->[$lex]{$gbl}{$lex} = 123: value ok 11837 - exists $vrgbl->[$lex]{$gbl}{$lex}: no exception ok 11838 - exists $vrgbl->[$lex]{$gbl}{$lex}: value ok 11839 - delete $vrgbl->[$lex]{$gbl}{$lex}: no exception ok 11840 - delete $vrgbl->[$lex]{$gbl}{$lex}: value ok 11841 - $vlex[$gbl]{$gbl}{$lex}: no exception ok 11842 - $vlex[$gbl]{$gbl}{$lex}: value ok 11843 - $vlex[$gbl]{$gbl}{$lex} = 123: no exception ok 11844 - $vlex[$gbl]{$gbl}{$lex} = 123: value ok 11845 - exists $vlex[$gbl]{$gbl}{$lex}: no exception ok 11846 - exists $vlex[$gbl]{$gbl}{$lex}: value ok 11847 - delete $vlex[$gbl]{$gbl}{$lex}: no exception ok 11848 - delete $vlex[$gbl]{$gbl}{$lex}: value ok 11849 - $vgbl[$gbl]{$gbl}{$lex}: no exception ok 11850 - $vgbl[$gbl]{$gbl}{$lex}: value ok 11851 - $vgbl[$gbl]{$gbl}{$lex} = 123: no exception ok 11852 - $vgbl[$gbl]{$gbl}{$lex} = 123: value ok 11853 - exists $vgbl[$gbl]{$gbl}{$lex}: no exception ok 11854 - exists $vgbl[$gbl]{$gbl}{$lex}: value ok 11855 - delete $vgbl[$gbl]{$gbl}{$lex}: no exception ok 11856 - delete $vgbl[$gbl]{$gbl}{$lex}: value ok 11857 - $vrlex->[$gbl]{$gbl}{$lex}: no exception ok 11858 - $vrlex->[$gbl]{$gbl}{$lex}: value ok 11859 - $vrlex->[$gbl]{$gbl}{$lex} = 123: no exception ok 11860 - $vrlex->[$gbl]{$gbl}{$lex} = 123: value ok 11861 - exists $vrlex->[$gbl]{$gbl}{$lex}: no exception ok 11862 - exists $vrlex->[$gbl]{$gbl}{$lex}: value ok 11863 - delete $vrlex->[$gbl]{$gbl}{$lex}: no exception ok 11864 - delete $vrlex->[$gbl]{$gbl}{$lex}: value ok 11865 - $vrgbl->[$gbl]{$gbl}{$lex}: no exception ok 11866 - $vrgbl->[$gbl]{$gbl}{$lex}: value ok 11867 - $vrgbl->[$gbl]{$gbl}{$lex} = 123: no exception ok 11868 - $vrgbl->[$gbl]{$gbl}{$lex} = 123: value ok 11869 - exists $vrgbl->[$gbl]{$gbl}{$lex}: no exception ok 11870 - exists $vrgbl->[$gbl]{$gbl}{$lex}: value ok 11871 - delete $vrgbl->[$gbl]{$gbl}{$lex}: no exception ok 11872 - delete $vrgbl->[$gbl]{$gbl}{$lex}: value ok 11873 - $vlex[$lex+1]{$gbl}{$lex}: no exception ok 11874 - $vlex[$lex+1]{$gbl}{$lex}: value ok 11875 - $vlex[$lex+1]{$gbl}{$lex} = 123: no exception ok 11876 - $vlex[$lex+1]{$gbl}{$lex} = 123: value ok 11877 - exists $vlex[$lex+1]{$gbl}{$lex}: no exception ok 11878 - exists $vlex[$lex+1]{$gbl}{$lex}: value ok 11879 - delete $vlex[$lex+1]{$gbl}{$lex}: no exception ok 11880 - delete $vlex[$lex+1]{$gbl}{$lex}: value ok 11881 - $vgbl[$lex+1]{$gbl}{$lex}: no exception ok 11882 - $vgbl[$lex+1]{$gbl}{$lex}: value ok 11883 - $vgbl[$lex+1]{$gbl}{$lex} = 123: no exception ok 11884 - $vgbl[$lex+1]{$gbl}{$lex} = 123: value ok 11885 - exists $vgbl[$lex+1]{$gbl}{$lex}: no exception ok 11886 - exists $vgbl[$lex+1]{$gbl}{$lex}: value ok 11887 - delete $vgbl[$lex+1]{$gbl}{$lex}: no exception ok 11888 - delete $vgbl[$lex+1]{$gbl}{$lex}: value ok 11889 - $vrlex->[$lex+1]{$gbl}{$lex}: no exception ok 11890 - $vrlex->[$lex+1]{$gbl}{$lex}: value ok 11891 - $vrlex->[$lex+1]{$gbl}{$lex} = 123: no exception ok 11892 - $vrlex->[$lex+1]{$gbl}{$lex} = 123: value ok 11893 - exists $vrlex->[$lex+1]{$gbl}{$lex}: no exception ok 11894 - exists $vrlex->[$lex+1]{$gbl}{$lex}: value ok 11895 - delete $vrlex->[$lex+1]{$gbl}{$lex}: no exception ok 11896 - delete $vrlex->[$lex+1]{$gbl}{$lex}: value ok 11897 - $vrgbl->[$lex+1]{$gbl}{$lex}: no exception ok 11898 - $vrgbl->[$lex+1]{$gbl}{$lex}: value ok 11899 - $vrgbl->[$lex+1]{$gbl}{$lex} = 123: no exception ok 11900 - $vrgbl->[$lex+1]{$gbl}{$lex} = 123: value ok 11901 - exists $vrgbl->[$lex+1]{$gbl}{$lex}: no exception ok 11902 - exists $vrgbl->[$lex+1]{$gbl}{$lex}: value ok 11903 - delete $vrgbl->[$lex+1]{$gbl}{$lex}: no exception ok 11904 - delete $vrgbl->[$lex+1]{$gbl}{$lex}: value ok 11905 - $vlex{foo}{$gbl}{$lex}: no exception ok 11906 - $vlex{foo}{$gbl}{$lex}: value ok 11907 - $vlex{foo}{$gbl}{$lex} = 123: no exception ok 11908 - $vlex{foo}{$gbl}{$lex} = 123: value ok 11909 - exists $vlex{foo}{$gbl}{$lex}: no exception ok 11910 - exists $vlex{foo}{$gbl}{$lex}: value ok 11911 - delete $vlex{foo}{$gbl}{$lex}: no exception ok 11912 - delete $vlex{foo}{$gbl}{$lex}: value ok 11913 - $vgbl{foo}{$gbl}{$lex}: no exception ok 11914 - $vgbl{foo}{$gbl}{$lex}: value ok 11915 - $vgbl{foo}{$gbl}{$lex} = 123: no exception ok 11916 - $vgbl{foo}{$gbl}{$lex} = 123: value ok 11917 - exists $vgbl{foo}{$gbl}{$lex}: no exception ok 11918 - exists $vgbl{foo}{$gbl}{$lex}: value ok 11919 - delete $vgbl{foo}{$gbl}{$lex}: no exception ok 11920 - delete $vgbl{foo}{$gbl}{$lex}: value ok 11921 - $vrlex->{foo}{$gbl}{$lex}: no exception ok 11922 - $vrlex->{foo}{$gbl}{$lex}: value ok 11923 - $vrlex->{foo}{$gbl}{$lex} = 123: no exception ok 11924 - $vrlex->{foo}{$gbl}{$lex} = 123: value ok 11925 - exists $vrlex->{foo}{$gbl}{$lex}: no exception ok 11926 - exists $vrlex->{foo}{$gbl}{$lex}: value ok 11927 - delete $vrlex->{foo}{$gbl}{$lex}: no exception ok 11928 - delete $vrlex->{foo}{$gbl}{$lex}: value ok 11929 - $vrgbl->{foo}{$gbl}{$lex}: no exception ok 11930 - $vrgbl->{foo}{$gbl}{$lex}: value ok 11931 - $vrgbl->{foo}{$gbl}{$lex} = 123: no exception ok 11932 - $vrgbl->{foo}{$gbl}{$lex} = 123: value ok 11933 - exists $vrgbl->{foo}{$gbl}{$lex}: no exception ok 11934 - exists $vrgbl->{foo}{$gbl}{$lex}: value ok 11935 - delete $vrgbl->{foo}{$gbl}{$lex}: no exception ok 11936 - delete $vrgbl->{foo}{$gbl}{$lex}: value ok 11937 - $vlex{$lex}{$gbl}{$lex}: no exception ok 11938 - $vlex{$lex}{$gbl}{$lex}: value ok 11939 - $vlex{$lex}{$gbl}{$lex} = 123: no exception ok 11940 - $vlex{$lex}{$gbl}{$lex} = 123: value ok 11941 - exists $vlex{$lex}{$gbl}{$lex}: no exception ok 11942 - exists $vlex{$lex}{$gbl}{$lex}: value ok 11943 - delete $vlex{$lex}{$gbl}{$lex}: no exception ok 11944 - delete $vlex{$lex}{$gbl}{$lex}: value ok 11945 - $vgbl{$lex}{$gbl}{$lex}: no exception ok 11946 - $vgbl{$lex}{$gbl}{$lex}: value ok 11947 - $vgbl{$lex}{$gbl}{$lex} = 123: no exception ok 11948 - $vgbl{$lex}{$gbl}{$lex} = 123: value ok 11949 - exists $vgbl{$lex}{$gbl}{$lex}: no exception ok 11950 - exists $vgbl{$lex}{$gbl}{$lex}: value ok 11951 - delete $vgbl{$lex}{$gbl}{$lex}: no exception ok 11952 - delete $vgbl{$lex}{$gbl}{$lex}: value ok 11953 - $vrlex->{$lex}{$gbl}{$lex}: no exception ok 11954 - $vrlex->{$lex}{$gbl}{$lex}: value ok 11955 - $vrlex->{$lex}{$gbl}{$lex} = 123: no exception ok 11956 - $vrlex->{$lex}{$gbl}{$lex} = 123: value ok 11957 - exists $vrlex->{$lex}{$gbl}{$lex}: no exception ok 11958 - exists $vrlex->{$lex}{$gbl}{$lex}: value ok 11959 - delete $vrlex->{$lex}{$gbl}{$lex}: no exception ok 11960 - delete $vrlex->{$lex}{$gbl}{$lex}: value ok 11961 - $vrgbl->{$lex}{$gbl}{$lex}: no exception ok 11962 - $vrgbl->{$lex}{$gbl}{$lex}: value ok 11963 - $vrgbl->{$lex}{$gbl}{$lex} = 123: no exception ok 11964 - $vrgbl->{$lex}{$gbl}{$lex} = 123: value ok 11965 - exists $vrgbl->{$lex}{$gbl}{$lex}: no exception ok 11966 - exists $vrgbl->{$lex}{$gbl}{$lex}: value ok 11967 - delete $vrgbl->{$lex}{$gbl}{$lex}: no exception ok 11968 - delete $vrgbl->{$lex}{$gbl}{$lex}: value ok 11969 - $vlex{$gbl}{$gbl}{$lex}: no exception ok 11970 - $vlex{$gbl}{$gbl}{$lex}: value ok 11971 - $vlex{$gbl}{$gbl}{$lex} = 123: no exception ok 11972 - $vlex{$gbl}{$gbl}{$lex} = 123: value ok 11973 - exists $vlex{$gbl}{$gbl}{$lex}: no exception ok 11974 - exists $vlex{$gbl}{$gbl}{$lex}: value ok 11975 - delete $vlex{$gbl}{$gbl}{$lex}: no exception ok 11976 - delete $vlex{$gbl}{$gbl}{$lex}: value ok 11977 - $vgbl{$gbl}{$gbl}{$lex}: no exception ok 11978 - $vgbl{$gbl}{$gbl}{$lex}: value ok 11979 - $vgbl{$gbl}{$gbl}{$lex} = 123: no exception ok 11980 - $vgbl{$gbl}{$gbl}{$lex} = 123: value ok 11981 - exists $vgbl{$gbl}{$gbl}{$lex}: no exception ok 11982 - exists $vgbl{$gbl}{$gbl}{$lex}: value ok 11983 - delete $vgbl{$gbl}{$gbl}{$lex}: no exception ok 11984 - delete $vgbl{$gbl}{$gbl}{$lex}: value ok 11985 - $vrlex->{$gbl}{$gbl}{$lex}: no exception ok 11986 - $vrlex->{$gbl}{$gbl}{$lex}: value ok 11987 - $vrlex->{$gbl}{$gbl}{$lex} = 123: no exception ok 11988 - $vrlex->{$gbl}{$gbl}{$lex} = 123: value ok 11989 - exists $vrlex->{$gbl}{$gbl}{$lex}: no exception ok 11990 - exists $vrlex->{$gbl}{$gbl}{$lex}: value ok 11991 - delete $vrlex->{$gbl}{$gbl}{$lex}: no exception ok 11992 - delete $vrlex->{$gbl}{$gbl}{$lex}: value ok 11993 - $vrgbl->{$gbl}{$gbl}{$lex}: no exception ok 11994 - $vrgbl->{$gbl}{$gbl}{$lex}: value ok 11995 - $vrgbl->{$gbl}{$gbl}{$lex} = 123: no exception ok 11996 - $vrgbl->{$gbl}{$gbl}{$lex} = 123: value ok 11997 - exists $vrgbl->{$gbl}{$gbl}{$lex}: no exception ok 11998 - exists $vrgbl->{$gbl}{$gbl}{$lex}: value ok 11999 - delete $vrgbl->{$gbl}{$gbl}{$lex}: no exception ok 12000 - delete $vrgbl->{$gbl}{$gbl}{$lex}: value ok 12001 - $vlex{"x$lex"}{$gbl}{$lex}: no exception ok 12002 - $vlex{"x$lex"}{$gbl}{$lex}: value ok 12003 - $vlex{"x$lex"}{$gbl}{$lex} = 123: no exception ok 12004 - $vlex{"x$lex"}{$gbl}{$lex} = 123: value ok 12005 - exists $vlex{"x$lex"}{$gbl}{$lex}: no exception ok 12006 - exists $vlex{"x$lex"}{$gbl}{$lex}: value ok 12007 - delete $vlex{"x$lex"}{$gbl}{$lex}: no exception ok 12008 - delete $vlex{"x$lex"}{$gbl}{$lex}: value ok 12009 - $vgbl{"x$lex"}{$gbl}{$lex}: no exception ok 12010 - $vgbl{"x$lex"}{$gbl}{$lex}: value ok 12011 - $vgbl{"x$lex"}{$gbl}{$lex} = 123: no exception ok 12012 - $vgbl{"x$lex"}{$gbl}{$lex} = 123: value ok 12013 - exists $vgbl{"x$lex"}{$gbl}{$lex}: no exception ok 12014 - exists $vgbl{"x$lex"}{$gbl}{$lex}: value ok 12015 - delete $vgbl{"x$lex"}{$gbl}{$lex}: no exception ok 12016 - delete $vgbl{"x$lex"}{$gbl}{$lex}: value ok 12017 - $vrlex->{"x$lex"}{$gbl}{$lex}: no exception ok 12018 - $vrlex->{"x$lex"}{$gbl}{$lex}: value ok 12019 - $vrlex->{"x$lex"}{$gbl}{$lex} = 123: no exception ok 12020 - $vrlex->{"x$lex"}{$gbl}{$lex} = 123: value ok 12021 - exists $vrlex->{"x$lex"}{$gbl}{$lex}: no exception ok 12022 - exists $vrlex->{"x$lex"}{$gbl}{$lex}: value ok 12023 - delete $vrlex->{"x$lex"}{$gbl}{$lex}: no exception ok 12024 - delete $vrlex->{"x$lex"}{$gbl}{$lex}: value ok 12025 - $vrgbl->{"x$lex"}{$gbl}{$lex}: no exception ok 12026 - $vrgbl->{"x$lex"}{$gbl}{$lex}: value ok 12027 - $vrgbl->{"x$lex"}{$gbl}{$lex} = 123: no exception ok 12028 - $vrgbl->{"x$lex"}{$gbl}{$lex} = 123: value ok 12029 - exists $vrgbl->{"x$lex"}{$gbl}{$lex}: no exception ok 12030 - exists $vrgbl->{"x$lex"}{$gbl}{$lex}: value ok 12031 - delete $vrgbl->{"x$lex"}{$gbl}{$lex}: no exception ok 12032 - delete $vrgbl->{"x$lex"}{$gbl}{$lex}: value ok 12033 - $vlex[0]{"x$lex"}{$lex}: no exception ok 12034 - $vlex[0]{"x$lex"}{$lex}: value ok 12035 - $vlex[0]{"x$lex"}{$lex} = 123: no exception ok 12036 - $vlex[0]{"x$lex"}{$lex} = 123: value ok 12037 - exists $vlex[0]{"x$lex"}{$lex}: no exception ok 12038 - exists $vlex[0]{"x$lex"}{$lex}: value ok 12039 - delete $vlex[0]{"x$lex"}{$lex}: no exception ok 12040 - delete $vlex[0]{"x$lex"}{$lex}: value ok 12041 - $vgbl[0]{"x$lex"}{$lex}: no exception ok 12042 - $vgbl[0]{"x$lex"}{$lex}: value ok 12043 - $vgbl[0]{"x$lex"}{$lex} = 123: no exception ok 12044 - $vgbl[0]{"x$lex"}{$lex} = 123: value ok 12045 - exists $vgbl[0]{"x$lex"}{$lex}: no exception ok 12046 - exists $vgbl[0]{"x$lex"}{$lex}: value ok 12047 - delete $vgbl[0]{"x$lex"}{$lex}: no exception ok 12048 - delete $vgbl[0]{"x$lex"}{$lex}: value ok 12049 - $vrlex->[0]{"x$lex"}{$lex}: no exception ok 12050 - $vrlex->[0]{"x$lex"}{$lex}: value ok 12051 - $vrlex->[0]{"x$lex"}{$lex} = 123: no exception ok 12052 - $vrlex->[0]{"x$lex"}{$lex} = 123: value ok 12053 - exists $vrlex->[0]{"x$lex"}{$lex}: no exception ok 12054 - exists $vrlex->[0]{"x$lex"}{$lex}: value ok 12055 - delete $vrlex->[0]{"x$lex"}{$lex}: no exception ok 12056 - delete $vrlex->[0]{"x$lex"}{$lex}: value ok 12057 - $vrgbl->[0]{"x$lex"}{$lex}: no exception ok 12058 - $vrgbl->[0]{"x$lex"}{$lex}: value ok 12059 - $vrgbl->[0]{"x$lex"}{$lex} = 123: no exception ok 12060 - $vrgbl->[0]{"x$lex"}{$lex} = 123: value ok 12061 - exists $vrgbl->[0]{"x$lex"}{$lex}: no exception ok 12062 - exists $vrgbl->[0]{"x$lex"}{$lex}: value ok 12063 - delete $vrgbl->[0]{"x$lex"}{$lex}: no exception ok 12064 - delete $vrgbl->[0]{"x$lex"}{$lex}: value ok 12065 - $vlex[$lex]{"x$lex"}{$lex}: no exception ok 12066 - $vlex[$lex]{"x$lex"}{$lex}: value ok 12067 - $vlex[$lex]{"x$lex"}{$lex} = 123: no exception ok 12068 - $vlex[$lex]{"x$lex"}{$lex} = 123: value ok 12069 - exists $vlex[$lex]{"x$lex"}{$lex}: no exception ok 12070 - exists $vlex[$lex]{"x$lex"}{$lex}: value ok 12071 - delete $vlex[$lex]{"x$lex"}{$lex}: no exception ok 12072 - delete $vlex[$lex]{"x$lex"}{$lex}: value ok 12073 - $vgbl[$lex]{"x$lex"}{$lex}: no exception ok 12074 - $vgbl[$lex]{"x$lex"}{$lex}: value ok 12075 - $vgbl[$lex]{"x$lex"}{$lex} = 123: no exception ok 12076 - $vgbl[$lex]{"x$lex"}{$lex} = 123: value ok 12077 - exists $vgbl[$lex]{"x$lex"}{$lex}: no exception ok 12078 - exists $vgbl[$lex]{"x$lex"}{$lex}: value ok 12079 - delete $vgbl[$lex]{"x$lex"}{$lex}: no exception ok 12080 - delete $vgbl[$lex]{"x$lex"}{$lex}: value ok 12081 - $vrlex->[$lex]{"x$lex"}{$lex}: no exception ok 12082 - $vrlex->[$lex]{"x$lex"}{$lex}: value ok 12083 - $vrlex->[$lex]{"x$lex"}{$lex} = 123: no exception ok 12084 - $vrlex->[$lex]{"x$lex"}{$lex} = 123: value ok 12085 - exists $vrlex->[$lex]{"x$lex"}{$lex}: no exception ok 12086 - exists $vrlex->[$lex]{"x$lex"}{$lex}: value ok 12087 - delete $vrlex->[$lex]{"x$lex"}{$lex}: no exception ok 12088 - delete $vrlex->[$lex]{"x$lex"}{$lex}: value ok 12089 - $vrgbl->[$lex]{"x$lex"}{$lex}: no exception ok 12090 - $vrgbl->[$lex]{"x$lex"}{$lex}: value ok 12091 - $vrgbl->[$lex]{"x$lex"}{$lex} = 123: no exception ok 12092 - $vrgbl->[$lex]{"x$lex"}{$lex} = 123: value ok 12093 - exists $vrgbl->[$lex]{"x$lex"}{$lex}: no exception ok 12094 - exists $vrgbl->[$lex]{"x$lex"}{$lex}: value ok 12095 - delete $vrgbl->[$lex]{"x$lex"}{$lex}: no exception ok 12096 - delete $vrgbl->[$lex]{"x$lex"}{$lex}: value ok 12097 - $vlex[$gbl]{"x$lex"}{$lex}: no exception ok 12098 - $vlex[$gbl]{"x$lex"}{$lex}: value ok 12099 - $vlex[$gbl]{"x$lex"}{$lex} = 123: no exception ok 12100 - $vlex[$gbl]{"x$lex"}{$lex} = 123: value ok 12101 - exists $vlex[$gbl]{"x$lex"}{$lex}: no exception ok 12102 - exists $vlex[$gbl]{"x$lex"}{$lex}: value ok 12103 - delete $vlex[$gbl]{"x$lex"}{$lex}: no exception ok 12104 - delete $vlex[$gbl]{"x$lex"}{$lex}: value ok 12105 - $vgbl[$gbl]{"x$lex"}{$lex}: no exception ok 12106 - $vgbl[$gbl]{"x$lex"}{$lex}: value ok 12107 - $vgbl[$gbl]{"x$lex"}{$lex} = 123: no exception ok 12108 - $vgbl[$gbl]{"x$lex"}{$lex} = 123: value ok 12109 - exists $vgbl[$gbl]{"x$lex"}{$lex}: no exception ok 12110 - exists $vgbl[$gbl]{"x$lex"}{$lex}: value ok 12111 - delete $vgbl[$gbl]{"x$lex"}{$lex}: no exception ok 12112 - delete $vgbl[$gbl]{"x$lex"}{$lex}: value ok 12113 - $vrlex->[$gbl]{"x$lex"}{$lex}: no exception ok 12114 - $vrlex->[$gbl]{"x$lex"}{$lex}: value ok 12115 - $vrlex->[$gbl]{"x$lex"}{$lex} = 123: no exception ok 12116 - $vrlex->[$gbl]{"x$lex"}{$lex} = 123: value ok 12117 - exists $vrlex->[$gbl]{"x$lex"}{$lex}: no exception ok 12118 - exists $vrlex->[$gbl]{"x$lex"}{$lex}: value ok 12119 - delete $vrlex->[$gbl]{"x$lex"}{$lex}: no exception ok 12120 - delete $vrlex->[$gbl]{"x$lex"}{$lex}: value ok 12121 - $vrgbl->[$gbl]{"x$lex"}{$lex}: no exception ok 12122 - $vrgbl->[$gbl]{"x$lex"}{$lex}: value ok 12123 - $vrgbl->[$gbl]{"x$lex"}{$lex} = 123: no exception ok 12124 - $vrgbl->[$gbl]{"x$lex"}{$lex} = 123: value ok 12125 - exists $vrgbl->[$gbl]{"x$lex"}{$lex}: no exception ok 12126 - exists $vrgbl->[$gbl]{"x$lex"}{$lex}: value ok 12127 - delete $vrgbl->[$gbl]{"x$lex"}{$lex}: no exception ok 12128 - delete $vrgbl->[$gbl]{"x$lex"}{$lex}: value ok 12129 - $vlex[$lex+1]{"x$lex"}{$lex}: no exception ok 12130 - $vlex[$lex+1]{"x$lex"}{$lex}: value ok 12131 - $vlex[$lex+1]{"x$lex"}{$lex} = 123: no exception ok 12132 - $vlex[$lex+1]{"x$lex"}{$lex} = 123: value ok 12133 - exists $vlex[$lex+1]{"x$lex"}{$lex}: no exception ok 12134 - exists $vlex[$lex+1]{"x$lex"}{$lex}: value ok 12135 - delete $vlex[$lex+1]{"x$lex"}{$lex}: no exception ok 12136 - delete $vlex[$lex+1]{"x$lex"}{$lex}: value ok 12137 - $vgbl[$lex+1]{"x$lex"}{$lex}: no exception ok 12138 - $vgbl[$lex+1]{"x$lex"}{$lex}: value ok 12139 - $vgbl[$lex+1]{"x$lex"}{$lex} = 123: no exception ok 12140 - $vgbl[$lex+1]{"x$lex"}{$lex} = 123: value ok 12141 - exists $vgbl[$lex+1]{"x$lex"}{$lex}: no exception ok 12142 - exists $vgbl[$lex+1]{"x$lex"}{$lex}: value ok 12143 - delete $vgbl[$lex+1]{"x$lex"}{$lex}: no exception ok 12144 - delete $vgbl[$lex+1]{"x$lex"}{$lex}: value ok 12145 - $vrlex->[$lex+1]{"x$lex"}{$lex}: no exception ok 12146 - $vrlex->[$lex+1]{"x$lex"}{$lex}: value ok 12147 - $vrlex->[$lex+1]{"x$lex"}{$lex} = 123: no exception ok 12148 - $vrlex->[$lex+1]{"x$lex"}{$lex} = 123: value ok 12149 - exists $vrlex->[$lex+1]{"x$lex"}{$lex}: no exception ok 12150 - exists $vrlex->[$lex+1]{"x$lex"}{$lex}: value ok 12151 - delete $vrlex->[$lex+1]{"x$lex"}{$lex}: no exception ok 12152 - delete $vrlex->[$lex+1]{"x$lex"}{$lex}: value ok 12153 - $vrgbl->[$lex+1]{"x$lex"}{$lex}: no exception ok 12154 - $vrgbl->[$lex+1]{"x$lex"}{$lex}: value ok 12155 - $vrgbl->[$lex+1]{"x$lex"}{$lex} = 123: no exception ok 12156 - $vrgbl->[$lex+1]{"x$lex"}{$lex} = 123: value ok 12157 - exists $vrgbl->[$lex+1]{"x$lex"}{$lex}: no exception ok 12158 - exists $vrgbl->[$lex+1]{"x$lex"}{$lex}: value ok 12159 - delete $vrgbl->[$lex+1]{"x$lex"}{$lex}: no exception ok 12160 - delete $vrgbl->[$lex+1]{"x$lex"}{$lex}: value ok 12161 - $vlex{foo}{"x$lex"}{$lex}: no exception ok 12162 - $vlex{foo}{"x$lex"}{$lex}: value ok 12163 - $vlex{foo}{"x$lex"}{$lex} = 123: no exception ok 12164 - $vlex{foo}{"x$lex"}{$lex} = 123: value ok 12165 - exists $vlex{foo}{"x$lex"}{$lex}: no exception ok 12166 - exists $vlex{foo}{"x$lex"}{$lex}: value ok 12167 - delete $vlex{foo}{"x$lex"}{$lex}: no exception ok 12168 - delete $vlex{foo}{"x$lex"}{$lex}: value ok 12169 - $vgbl{foo}{"x$lex"}{$lex}: no exception ok 12170 - $vgbl{foo}{"x$lex"}{$lex}: value ok 12171 - $vgbl{foo}{"x$lex"}{$lex} = 123: no exception ok 12172 - $vgbl{foo}{"x$lex"}{$lex} = 123: value ok 12173 - exists $vgbl{foo}{"x$lex"}{$lex}: no exception ok 12174 - exists $vgbl{foo}{"x$lex"}{$lex}: value ok 12175 - delete $vgbl{foo}{"x$lex"}{$lex}: no exception ok 12176 - delete $vgbl{foo}{"x$lex"}{$lex}: value ok 12177 - $vrlex->{foo}{"x$lex"}{$lex}: no exception ok 12178 - $vrlex->{foo}{"x$lex"}{$lex}: value ok 12179 - $vrlex->{foo}{"x$lex"}{$lex} = 123: no exception ok 12180 - $vrlex->{foo}{"x$lex"}{$lex} = 123: value ok 12181 - exists $vrlex->{foo}{"x$lex"}{$lex}: no exception ok 12182 - exists $vrlex->{foo}{"x$lex"}{$lex}: value ok 12183 - delete $vrlex->{foo}{"x$lex"}{$lex}: no exception ok 12184 - delete $vrlex->{foo}{"x$lex"}{$lex}: value ok 12185 - $vrgbl->{foo}{"x$lex"}{$lex}: no exception ok 12186 - $vrgbl->{foo}{"x$lex"}{$lex}: value ok 12187 - $vrgbl->{foo}{"x$lex"}{$lex} = 123: no exception ok 12188 - $vrgbl->{foo}{"x$lex"}{$lex} = 123: value ok 12189 - exists $vrgbl->{foo}{"x$lex"}{$lex}: no exception ok 12190 - exists $vrgbl->{foo}{"x$lex"}{$lex}: value ok 12191 - delete $vrgbl->{foo}{"x$lex"}{$lex}: no exception ok 12192 - delete $vrgbl->{foo}{"x$lex"}{$lex}: value ok 12193 - $vlex{$lex}{"x$lex"}{$lex}: no exception ok 12194 - $vlex{$lex}{"x$lex"}{$lex}: value ok 12195 - $vlex{$lex}{"x$lex"}{$lex} = 123: no exception ok 12196 - $vlex{$lex}{"x$lex"}{$lex} = 123: value ok 12197 - exists $vlex{$lex}{"x$lex"}{$lex}: no exception ok 12198 - exists $vlex{$lex}{"x$lex"}{$lex}: value ok 12199 - delete $vlex{$lex}{"x$lex"}{$lex}: no exception ok 12200 - delete $vlex{$lex}{"x$lex"}{$lex}: value ok 12201 - $vgbl{$lex}{"x$lex"}{$lex}: no exception ok 12202 - $vgbl{$lex}{"x$lex"}{$lex}: value ok 12203 - $vgbl{$lex}{"x$lex"}{$lex} = 123: no exception ok 12204 - $vgbl{$lex}{"x$lex"}{$lex} = 123: value ok 12205 - exists $vgbl{$lex}{"x$lex"}{$lex}: no exception ok 12206 - exists $vgbl{$lex}{"x$lex"}{$lex}: value ok 12207 - delete $vgbl{$lex}{"x$lex"}{$lex}: no exception ok 12208 - delete $vgbl{$lex}{"x$lex"}{$lex}: value ok 12209 - $vrlex->{$lex}{"x$lex"}{$lex}: no exception ok 12210 - $vrlex->{$lex}{"x$lex"}{$lex}: value ok 12211 - $vrlex->{$lex}{"x$lex"}{$lex} = 123: no exception ok 12212 - $vrlex->{$lex}{"x$lex"}{$lex} = 123: value ok 12213 - exists $vrlex->{$lex}{"x$lex"}{$lex}: no exception ok 12214 - exists $vrlex->{$lex}{"x$lex"}{$lex}: value ok 12215 - delete $vrlex->{$lex}{"x$lex"}{$lex}: no exception ok 12216 - delete $vrlex->{$lex}{"x$lex"}{$lex}: value ok 12217 - $vrgbl->{$lex}{"x$lex"}{$lex}: no exception ok 12218 - $vrgbl->{$lex}{"x$lex"}{$lex}: value ok 12219 - $vrgbl->{$lex}{"x$lex"}{$lex} = 123: no exception ok 12220 - $vrgbl->{$lex}{"x$lex"}{$lex} = 123: value ok 12221 - exists $vrgbl->{$lex}{"x$lex"}{$lex}: no exception ok 12222 - exists $vrgbl->{$lex}{"x$lex"}{$lex}: value ok 12223 - delete $vrgbl->{$lex}{"x$lex"}{$lex}: no exception ok 12224 - delete $vrgbl->{$lex}{"x$lex"}{$lex}: value ok 12225 - $vlex{$gbl}{"x$lex"}{$lex}: no exception ok 12226 - $vlex{$gbl}{"x$lex"}{$lex}: value ok 12227 - $vlex{$gbl}{"x$lex"}{$lex} = 123: no exception ok 12228 - $vlex{$gbl}{"x$lex"}{$lex} = 123: value ok 12229 - exists $vlex{$gbl}{"x$lex"}{$lex}: no exception ok 12230 - exists $vlex{$gbl}{"x$lex"}{$lex}: value ok 12231 - delete $vlex{$gbl}{"x$lex"}{$lex}: no exception ok 12232 - delete $vlex{$gbl}{"x$lex"}{$lex}: value ok 12233 - $vgbl{$gbl}{"x$lex"}{$lex}: no exception ok 12234 - $vgbl{$gbl}{"x$lex"}{$lex}: value ok 12235 - $vgbl{$gbl}{"x$lex"}{$lex} = 123: no exception ok 12236 - $vgbl{$gbl}{"x$lex"}{$lex} = 123: value ok 12237 - exists $vgbl{$gbl}{"x$lex"}{$lex}: no exception ok 12238 - exists $vgbl{$gbl}{"x$lex"}{$lex}: value ok 12239 - delete $vgbl{$gbl}{"x$lex"}{$lex}: no exception ok 12240 - delete $vgbl{$gbl}{"x$lex"}{$lex}: value ok 12241 - $vrlex->{$gbl}{"x$lex"}{$lex}: no exception ok 12242 - $vrlex->{$gbl}{"x$lex"}{$lex}: value ok 12243 - $vrlex->{$gbl}{"x$lex"}{$lex} = 123: no exception ok 12244 - $vrlex->{$gbl}{"x$lex"}{$lex} = 123: value ok 12245 - exists $vrlex->{$gbl}{"x$lex"}{$lex}: no exception ok 12246 - exists $vrlex->{$gbl}{"x$lex"}{$lex}: value ok 12247 - delete $vrlex->{$gbl}{"x$lex"}{$lex}: no exception ok 12248 - delete $vrlex->{$gbl}{"x$lex"}{$lex}: value ok 12249 - $vrgbl->{$gbl}{"x$lex"}{$lex}: no exception ok 12250 - $vrgbl->{$gbl}{"x$lex"}{$lex}: value ok 12251 - $vrgbl->{$gbl}{"x$lex"}{$lex} = 123: no exception ok 12252 - $vrgbl->{$gbl}{"x$lex"}{$lex} = 123: value ok 12253 - exists $vrgbl->{$gbl}{"x$lex"}{$lex}: no exception ok 12254 - exists $vrgbl->{$gbl}{"x$lex"}{$lex}: value ok 12255 - delete $vrgbl->{$gbl}{"x$lex"}{$lex}: no exception ok 12256 - delete $vrgbl->{$gbl}{"x$lex"}{$lex}: value ok 12257 - $vlex{"x$lex"}{"x$lex"}{$lex}: no exception ok 12258 - $vlex{"x$lex"}{"x$lex"}{$lex}: value ok 12259 - $vlex{"x$lex"}{"x$lex"}{$lex} = 123: no exception ok 12260 - $vlex{"x$lex"}{"x$lex"}{$lex} = 123: value ok 12261 - exists $vlex{"x$lex"}{"x$lex"}{$lex}: no exception ok 12262 - exists $vlex{"x$lex"}{"x$lex"}{$lex}: value ok 12263 - delete $vlex{"x$lex"}{"x$lex"}{$lex}: no exception ok 12264 - delete $vlex{"x$lex"}{"x$lex"}{$lex}: value ok 12265 - $vgbl{"x$lex"}{"x$lex"}{$lex}: no exception ok 12266 - $vgbl{"x$lex"}{"x$lex"}{$lex}: value ok 12267 - $vgbl{"x$lex"}{"x$lex"}{$lex} = 123: no exception ok 12268 - $vgbl{"x$lex"}{"x$lex"}{$lex} = 123: value ok 12269 - exists $vgbl{"x$lex"}{"x$lex"}{$lex}: no exception ok 12270 - exists $vgbl{"x$lex"}{"x$lex"}{$lex}: value ok 12271 - delete $vgbl{"x$lex"}{"x$lex"}{$lex}: no exception ok 12272 - delete $vgbl{"x$lex"}{"x$lex"}{$lex}: value ok 12273 - $vrlex->{"x$lex"}{"x$lex"}{$lex}: no exception ok 12274 - $vrlex->{"x$lex"}{"x$lex"}{$lex}: value ok 12275 - $vrlex->{"x$lex"}{"x$lex"}{$lex} = 123: no exception ok 12276 - $vrlex->{"x$lex"}{"x$lex"}{$lex} = 123: value ok 12277 - exists $vrlex->{"x$lex"}{"x$lex"}{$lex}: no exception ok 12278 - exists $vrlex->{"x$lex"}{"x$lex"}{$lex}: value ok 12279 - delete $vrlex->{"x$lex"}{"x$lex"}{$lex}: no exception ok 12280 - delete $vrlex->{"x$lex"}{"x$lex"}{$lex}: value ok 12281 - $vrgbl->{"x$lex"}{"x$lex"}{$lex}: no exception ok 12282 - $vrgbl->{"x$lex"}{"x$lex"}{$lex}: value ok 12283 - $vrgbl->{"x$lex"}{"x$lex"}{$lex} = 123: no exception ok 12284 - $vrgbl->{"x$lex"}{"x$lex"}{$lex} = 123: value ok 12285 - exists $vrgbl->{"x$lex"}{"x$lex"}{$lex}: no exception ok 12286 - exists $vrgbl->{"x$lex"}{"x$lex"}{$lex}: value ok 12287 - delete $vrgbl->{"x$lex"}{"x$lex"}{$lex}: no exception ok 12288 - delete $vrgbl->{"x$lex"}{"x$lex"}{$lex}: value ok 12289 - $vlex[0][0]{$gbl}: no exception ok 12290 - $vlex[0][0]{$gbl}: value ok 12291 - $vlex[0][0]{$gbl} = 123: no exception ok 12292 - $vlex[0][0]{$gbl} = 123: value ok 12293 - exists $vlex[0][0]{$gbl}: no exception ok 12294 - exists $vlex[0][0]{$gbl}: value ok 12295 - delete $vlex[0][0]{$gbl}: no exception ok 12296 - delete $vlex[0][0]{$gbl}: value ok 12297 - $vgbl[0][0]{$gbl}: no exception ok 12298 - $vgbl[0][0]{$gbl}: value ok 12299 - $vgbl[0][0]{$gbl} = 123: no exception ok 12300 - $vgbl[0][0]{$gbl} = 123: value ok 12301 - exists $vgbl[0][0]{$gbl}: no exception ok 12302 - exists $vgbl[0][0]{$gbl}: value ok 12303 - delete $vgbl[0][0]{$gbl}: no exception ok 12304 - delete $vgbl[0][0]{$gbl}: value ok 12305 - $vrlex->[0][0]{$gbl}: no exception ok 12306 - $vrlex->[0][0]{$gbl}: value ok 12307 - $vrlex->[0][0]{$gbl} = 123: no exception ok 12308 - $vrlex->[0][0]{$gbl} = 123: value ok 12309 - exists $vrlex->[0][0]{$gbl}: no exception ok 12310 - exists $vrlex->[0][0]{$gbl}: value ok 12311 - delete $vrlex->[0][0]{$gbl}: no exception ok 12312 - delete $vrlex->[0][0]{$gbl}: value ok 12313 - $vrgbl->[0][0]{$gbl}: no exception ok 12314 - $vrgbl->[0][0]{$gbl}: value ok 12315 - $vrgbl->[0][0]{$gbl} = 123: no exception ok 12316 - $vrgbl->[0][0]{$gbl} = 123: value ok 12317 - exists $vrgbl->[0][0]{$gbl}: no exception ok 12318 - exists $vrgbl->[0][0]{$gbl}: value ok 12319 - delete $vrgbl->[0][0]{$gbl}: no exception ok 12320 - delete $vrgbl->[0][0]{$gbl}: value ok 12321 - $vlex[$lex][0]{$gbl}: no exception ok 12322 - $vlex[$lex][0]{$gbl}: value ok 12323 - $vlex[$lex][0]{$gbl} = 123: no exception ok 12324 - $vlex[$lex][0]{$gbl} = 123: value ok 12325 - exists $vlex[$lex][0]{$gbl}: no exception ok 12326 - exists $vlex[$lex][0]{$gbl}: value ok 12327 - delete $vlex[$lex][0]{$gbl}: no exception ok 12328 - delete $vlex[$lex][0]{$gbl}: value ok 12329 - $vgbl[$lex][0]{$gbl}: no exception ok 12330 - $vgbl[$lex][0]{$gbl}: value ok 12331 - $vgbl[$lex][0]{$gbl} = 123: no exception ok 12332 - $vgbl[$lex][0]{$gbl} = 123: value ok 12333 - exists $vgbl[$lex][0]{$gbl}: no exception ok 12334 - exists $vgbl[$lex][0]{$gbl}: value ok 12335 - delete $vgbl[$lex][0]{$gbl}: no exception ok 12336 - delete $vgbl[$lex][0]{$gbl}: value ok 12337 - $vrlex->[$lex][0]{$gbl}: no exception ok 12338 - $vrlex->[$lex][0]{$gbl}: value ok 12339 - $vrlex->[$lex][0]{$gbl} = 123: no exception ok 12340 - $vrlex->[$lex][0]{$gbl} = 123: value ok 12341 - exists $vrlex->[$lex][0]{$gbl}: no exception ok 12342 - exists $vrlex->[$lex][0]{$gbl}: value ok 12343 - delete $vrlex->[$lex][0]{$gbl}: no exception ok 12344 - delete $vrlex->[$lex][0]{$gbl}: value ok 12345 - $vrgbl->[$lex][0]{$gbl}: no exception ok 12346 - $vrgbl->[$lex][0]{$gbl}: value ok 12347 - $vrgbl->[$lex][0]{$gbl} = 123: no exception ok 12348 - $vrgbl->[$lex][0]{$gbl} = 123: value ok 12349 - exists $vrgbl->[$lex][0]{$gbl}: no exception ok 12350 - exists $vrgbl->[$lex][0]{$gbl}: value ok 12351 - delete $vrgbl->[$lex][0]{$gbl}: no exception ok 12352 - delete $vrgbl->[$lex][0]{$gbl}: value ok 12353 - $vlex[$gbl][0]{$gbl}: no exception ok 12354 - $vlex[$gbl][0]{$gbl}: value ok 12355 - $vlex[$gbl][0]{$gbl} = 123: no exception ok 12356 - $vlex[$gbl][0]{$gbl} = 123: value ok 12357 - exists $vlex[$gbl][0]{$gbl}: no exception ok 12358 - exists $vlex[$gbl][0]{$gbl}: value ok 12359 - delete $vlex[$gbl][0]{$gbl}: no exception ok 12360 - delete $vlex[$gbl][0]{$gbl}: value ok 12361 - $vgbl[$gbl][0]{$gbl}: no exception ok 12362 - $vgbl[$gbl][0]{$gbl}: value ok 12363 - $vgbl[$gbl][0]{$gbl} = 123: no exception ok 12364 - $vgbl[$gbl][0]{$gbl} = 123: value ok 12365 - exists $vgbl[$gbl][0]{$gbl}: no exception ok 12366 - exists $vgbl[$gbl][0]{$gbl}: value ok 12367 - delete $vgbl[$gbl][0]{$gbl}: no exception ok 12368 - delete $vgbl[$gbl][0]{$gbl}: value ok 12369 - $vrlex->[$gbl][0]{$gbl}: no exception ok 12370 - $vrlex->[$gbl][0]{$gbl}: value ok 12371 - $vrlex->[$gbl][0]{$gbl} = 123: no exception ok 12372 - $vrlex->[$gbl][0]{$gbl} = 123: value ok 12373 - exists $vrlex->[$gbl][0]{$gbl}: no exception ok 12374 - exists $vrlex->[$gbl][0]{$gbl}: value ok 12375 - delete $vrlex->[$gbl][0]{$gbl}: no exception ok 12376 - delete $vrlex->[$gbl][0]{$gbl}: value ok 12377 - $vrgbl->[$gbl][0]{$gbl}: no exception ok 12378 - $vrgbl->[$gbl][0]{$gbl}: value ok 12379 - $vrgbl->[$gbl][0]{$gbl} = 123: no exception ok 12380 - $vrgbl->[$gbl][0]{$gbl} = 123: value ok 12381 - exists $vrgbl->[$gbl][0]{$gbl}: no exception ok 12382 - exists $vrgbl->[$gbl][0]{$gbl}: value ok 12383 - delete $vrgbl->[$gbl][0]{$gbl}: no exception ok 12384 - delete $vrgbl->[$gbl][0]{$gbl}: value ok 12385 - $vlex[$lex+1][0]{$gbl}: no exception ok 12386 - $vlex[$lex+1][0]{$gbl}: value ok 12387 - $vlex[$lex+1][0]{$gbl} = 123: no exception ok 12388 - $vlex[$lex+1][0]{$gbl} = 123: value ok 12389 - exists $vlex[$lex+1][0]{$gbl}: no exception ok 12390 - exists $vlex[$lex+1][0]{$gbl}: value ok 12391 - delete $vlex[$lex+1][0]{$gbl}: no exception ok 12392 - delete $vlex[$lex+1][0]{$gbl}: value ok 12393 - $vgbl[$lex+1][0]{$gbl}: no exception ok 12394 - $vgbl[$lex+1][0]{$gbl}: value ok 12395 - $vgbl[$lex+1][0]{$gbl} = 123: no exception ok 12396 - $vgbl[$lex+1][0]{$gbl} = 123: value ok 12397 - exists $vgbl[$lex+1][0]{$gbl}: no exception ok 12398 - exists $vgbl[$lex+1][0]{$gbl}: value ok 12399 - delete $vgbl[$lex+1][0]{$gbl}: no exception ok 12400 - delete $vgbl[$lex+1][0]{$gbl}: value ok 12401 - $vrlex->[$lex+1][0]{$gbl}: no exception ok 12402 - $vrlex->[$lex+1][0]{$gbl}: value ok 12403 - $vrlex->[$lex+1][0]{$gbl} = 123: no exception ok 12404 - $vrlex->[$lex+1][0]{$gbl} = 123: value ok 12405 - exists $vrlex->[$lex+1][0]{$gbl}: no exception ok 12406 - exists $vrlex->[$lex+1][0]{$gbl}: value ok 12407 - delete $vrlex->[$lex+1][0]{$gbl}: no exception ok 12408 - delete $vrlex->[$lex+1][0]{$gbl}: value ok 12409 - $vrgbl->[$lex+1][0]{$gbl}: no exception ok 12410 - $vrgbl->[$lex+1][0]{$gbl}: value ok 12411 - $vrgbl->[$lex+1][0]{$gbl} = 123: no exception ok 12412 - $vrgbl->[$lex+1][0]{$gbl} = 123: value ok 12413 - exists $vrgbl->[$lex+1][0]{$gbl}: no exception ok 12414 - exists $vrgbl->[$lex+1][0]{$gbl}: value ok 12415 - delete $vrgbl->[$lex+1][0]{$gbl}: no exception ok 12416 - delete $vrgbl->[$lex+1][0]{$gbl}: value ok 12417 - $vlex{foo}[0]{$gbl}: no exception ok 12418 - $vlex{foo}[0]{$gbl}: value ok 12419 - $vlex{foo}[0]{$gbl} = 123: no exception ok 12420 - $vlex{foo}[0]{$gbl} = 123: value ok 12421 - exists $vlex{foo}[0]{$gbl}: no exception ok 12422 - exists $vlex{foo}[0]{$gbl}: value ok 12423 - delete $vlex{foo}[0]{$gbl}: no exception ok 12424 - delete $vlex{foo}[0]{$gbl}: value ok 12425 - $vgbl{foo}[0]{$gbl}: no exception ok 12426 - $vgbl{foo}[0]{$gbl}: value ok 12427 - $vgbl{foo}[0]{$gbl} = 123: no exception ok 12428 - $vgbl{foo}[0]{$gbl} = 123: value ok 12429 - exists $vgbl{foo}[0]{$gbl}: no exception ok 12430 - exists $vgbl{foo}[0]{$gbl}: value ok 12431 - delete $vgbl{foo}[0]{$gbl}: no exception ok 12432 - delete $vgbl{foo}[0]{$gbl}: value ok 12433 - $vrlex->{foo}[0]{$gbl}: no exception ok 12434 - $vrlex->{foo}[0]{$gbl}: value ok 12435 - $vrlex->{foo}[0]{$gbl} = 123: no exception ok 12436 - $vrlex->{foo}[0]{$gbl} = 123: value ok 12437 - exists $vrlex->{foo}[0]{$gbl}: no exception ok 12438 - exists $vrlex->{foo}[0]{$gbl}: value ok 12439 - delete $vrlex->{foo}[0]{$gbl}: no exception ok 12440 - delete $vrlex->{foo}[0]{$gbl}: value ok 12441 - $vrgbl->{foo}[0]{$gbl}: no exception ok 12442 - $vrgbl->{foo}[0]{$gbl}: value ok 12443 - $vrgbl->{foo}[0]{$gbl} = 123: no exception ok 12444 - $vrgbl->{foo}[0]{$gbl} = 123: value ok 12445 - exists $vrgbl->{foo}[0]{$gbl}: no exception ok 12446 - exists $vrgbl->{foo}[0]{$gbl}: value ok 12447 - delete $vrgbl->{foo}[0]{$gbl}: no exception ok 12448 - delete $vrgbl->{foo}[0]{$gbl}: value ok 12449 - $vlex{$lex}[0]{$gbl}: no exception ok 12450 - $vlex{$lex}[0]{$gbl}: value ok 12451 - $vlex{$lex}[0]{$gbl} = 123: no exception ok 12452 - $vlex{$lex}[0]{$gbl} = 123: value ok 12453 - exists $vlex{$lex}[0]{$gbl}: no exception ok 12454 - exists $vlex{$lex}[0]{$gbl}: value ok 12455 - delete $vlex{$lex}[0]{$gbl}: no exception ok 12456 - delete $vlex{$lex}[0]{$gbl}: value ok 12457 - $vgbl{$lex}[0]{$gbl}: no exception ok 12458 - $vgbl{$lex}[0]{$gbl}: value ok 12459 - $vgbl{$lex}[0]{$gbl} = 123: no exception ok 12460 - $vgbl{$lex}[0]{$gbl} = 123: value ok 12461 - exists $vgbl{$lex}[0]{$gbl}: no exception ok 12462 - exists $vgbl{$lex}[0]{$gbl}: value ok 12463 - delete $vgbl{$lex}[0]{$gbl}: no exception ok 12464 - delete $vgbl{$lex}[0]{$gbl}: value ok 12465 - $vrlex->{$lex}[0]{$gbl}: no exception ok 12466 - $vrlex->{$lex}[0]{$gbl}: value ok 12467 - $vrlex->{$lex}[0]{$gbl} = 123: no exception ok 12468 - $vrlex->{$lex}[0]{$gbl} = 123: value ok 12469 - exists $vrlex->{$lex}[0]{$gbl}: no exception ok 12470 - exists $vrlex->{$lex}[0]{$gbl}: value ok 12471 - delete $vrlex->{$lex}[0]{$gbl}: no exception ok 12472 - delete $vrlex->{$lex}[0]{$gbl}: value ok 12473 - $vrgbl->{$lex}[0]{$gbl}: no exception ok 12474 - $vrgbl->{$lex}[0]{$gbl}: value ok 12475 - $vrgbl->{$lex}[0]{$gbl} = 123: no exception ok 12476 - $vrgbl->{$lex}[0]{$gbl} = 123: value ok 12477 - exists $vrgbl->{$lex}[0]{$gbl}: no exception ok 12478 - exists $vrgbl->{$lex}[0]{$gbl}: value ok 12479 - delete $vrgbl->{$lex}[0]{$gbl}: no exception ok 12480 - delete $vrgbl->{$lex}[0]{$gbl}: value ok 12481 - $vlex{$gbl}[0]{$gbl}: no exception ok 12482 - $vlex{$gbl}[0]{$gbl}: value ok 12483 - $vlex{$gbl}[0]{$gbl} = 123: no exception ok 12484 - $vlex{$gbl}[0]{$gbl} = 123: value ok 12485 - exists $vlex{$gbl}[0]{$gbl}: no exception ok 12486 - exists $vlex{$gbl}[0]{$gbl}: value ok 12487 - delete $vlex{$gbl}[0]{$gbl}: no exception ok 12488 - delete $vlex{$gbl}[0]{$gbl}: value ok 12489 - $vgbl{$gbl}[0]{$gbl}: no exception ok 12490 - $vgbl{$gbl}[0]{$gbl}: value ok 12491 - $vgbl{$gbl}[0]{$gbl} = 123: no exception ok 12492 - $vgbl{$gbl}[0]{$gbl} = 123: value ok 12493 - exists $vgbl{$gbl}[0]{$gbl}: no exception ok 12494 - exists $vgbl{$gbl}[0]{$gbl}: value ok 12495 - delete $vgbl{$gbl}[0]{$gbl}: no exception ok 12496 - delete $vgbl{$gbl}[0]{$gbl}: value ok 12497 - $vrlex->{$gbl}[0]{$gbl}: no exception ok 12498 - $vrlex->{$gbl}[0]{$gbl}: value ok 12499 - $vrlex->{$gbl}[0]{$gbl} = 123: no exception ok 12500 - $vrlex->{$gbl}[0]{$gbl} = 123: value ok 12501 - exists $vrlex->{$gbl}[0]{$gbl}: no exception ok 12502 - exists $vrlex->{$gbl}[0]{$gbl}: value ok 12503 - delete $vrlex->{$gbl}[0]{$gbl}: no exception ok 12504 - delete $vrlex->{$gbl}[0]{$gbl}: value ok 12505 - $vrgbl->{$gbl}[0]{$gbl}: no exception ok 12506 - $vrgbl->{$gbl}[0]{$gbl}: value ok 12507 - $vrgbl->{$gbl}[0]{$gbl} = 123: no exception ok 12508 - $vrgbl->{$gbl}[0]{$gbl} = 123: value ok 12509 - exists $vrgbl->{$gbl}[0]{$gbl}: no exception ok 12510 - exists $vrgbl->{$gbl}[0]{$gbl}: value ok 12511 - delete $vrgbl->{$gbl}[0]{$gbl}: no exception ok 12512 - delete $vrgbl->{$gbl}[0]{$gbl}: value ok 12513 - $vlex{"x$lex"}[0]{$gbl}: no exception ok 12514 - $vlex{"x$lex"}[0]{$gbl}: value ok 12515 - $vlex{"x$lex"}[0]{$gbl} = 123: no exception ok 12516 - $vlex{"x$lex"}[0]{$gbl} = 123: value ok 12517 - exists $vlex{"x$lex"}[0]{$gbl}: no exception ok 12518 - exists $vlex{"x$lex"}[0]{$gbl}: value ok 12519 - delete $vlex{"x$lex"}[0]{$gbl}: no exception ok 12520 - delete $vlex{"x$lex"}[0]{$gbl}: value ok 12521 - $vgbl{"x$lex"}[0]{$gbl}: no exception ok 12522 - $vgbl{"x$lex"}[0]{$gbl}: value ok 12523 - $vgbl{"x$lex"}[0]{$gbl} = 123: no exception ok 12524 - $vgbl{"x$lex"}[0]{$gbl} = 123: value ok 12525 - exists $vgbl{"x$lex"}[0]{$gbl}: no exception ok 12526 - exists $vgbl{"x$lex"}[0]{$gbl}: value ok 12527 - delete $vgbl{"x$lex"}[0]{$gbl}: no exception ok 12528 - delete $vgbl{"x$lex"}[0]{$gbl}: value ok 12529 - $vrlex->{"x$lex"}[0]{$gbl}: no exception ok 12530 - $vrlex->{"x$lex"}[0]{$gbl}: value ok 12531 - $vrlex->{"x$lex"}[0]{$gbl} = 123: no exception ok 12532 - $vrlex->{"x$lex"}[0]{$gbl} = 123: value ok 12533 - exists $vrlex->{"x$lex"}[0]{$gbl}: no exception ok 12534 - exists $vrlex->{"x$lex"}[0]{$gbl}: value ok 12535 - delete $vrlex->{"x$lex"}[0]{$gbl}: no exception ok 12536 - delete $vrlex->{"x$lex"}[0]{$gbl}: value ok 12537 - $vrgbl->{"x$lex"}[0]{$gbl}: no exception ok 12538 - $vrgbl->{"x$lex"}[0]{$gbl}: value ok 12539 - $vrgbl->{"x$lex"}[0]{$gbl} = 123: no exception ok 12540 - $vrgbl->{"x$lex"}[0]{$gbl} = 123: value ok 12541 - exists $vrgbl->{"x$lex"}[0]{$gbl}: no exception ok 12542 - exists $vrgbl->{"x$lex"}[0]{$gbl}: value ok 12543 - delete $vrgbl->{"x$lex"}[0]{$gbl}: no exception ok 12544 - delete $vrgbl->{"x$lex"}[0]{$gbl}: value ok 12545 - $vlex[0][$lex]{$gbl}: no exception ok 12546 - $vlex[0][$lex]{$gbl}: value ok 12547 - $vlex[0][$lex]{$gbl} = 123: no exception ok 12548 - $vlex[0][$lex]{$gbl} = 123: value ok 12549 - exists $vlex[0][$lex]{$gbl}: no exception ok 12550 - exists $vlex[0][$lex]{$gbl}: value ok 12551 - delete $vlex[0][$lex]{$gbl}: no exception ok 12552 - delete $vlex[0][$lex]{$gbl}: value ok 12553 - $vgbl[0][$lex]{$gbl}: no exception ok 12554 - $vgbl[0][$lex]{$gbl}: value ok 12555 - $vgbl[0][$lex]{$gbl} = 123: no exception ok 12556 - $vgbl[0][$lex]{$gbl} = 123: value ok 12557 - exists $vgbl[0][$lex]{$gbl}: no exception ok 12558 - exists $vgbl[0][$lex]{$gbl}: value ok 12559 - delete $vgbl[0][$lex]{$gbl}: no exception ok 12560 - delete $vgbl[0][$lex]{$gbl}: value ok 12561 - $vrlex->[0][$lex]{$gbl}: no exception ok 12562 - $vrlex->[0][$lex]{$gbl}: value ok 12563 - $vrlex->[0][$lex]{$gbl} = 123: no exception ok 12564 - $vrlex->[0][$lex]{$gbl} = 123: value ok 12565 - exists $vrlex->[0][$lex]{$gbl}: no exception ok 12566 - exists $vrlex->[0][$lex]{$gbl}: value ok 12567 - delete $vrlex->[0][$lex]{$gbl}: no exception ok 12568 - delete $vrlex->[0][$lex]{$gbl}: value ok 12569 - $vrgbl->[0][$lex]{$gbl}: no exception ok 12570 - $vrgbl->[0][$lex]{$gbl}: value ok 12571 - $vrgbl->[0][$lex]{$gbl} = 123: no exception ok 12572 - $vrgbl->[0][$lex]{$gbl} = 123: value ok 12573 - exists $vrgbl->[0][$lex]{$gbl}: no exception ok 12574 - exists $vrgbl->[0][$lex]{$gbl}: value ok 12575 - delete $vrgbl->[0][$lex]{$gbl}: no exception ok 12576 - delete $vrgbl->[0][$lex]{$gbl}: value ok 12577 - $vlex[$lex][$lex]{$gbl}: no exception ok 12578 - $vlex[$lex][$lex]{$gbl}: value ok 12579 - $vlex[$lex][$lex]{$gbl} = 123: no exception ok 12580 - $vlex[$lex][$lex]{$gbl} = 123: value ok 12581 - exists $vlex[$lex][$lex]{$gbl}: no exception ok 12582 - exists $vlex[$lex][$lex]{$gbl}: value ok 12583 - delete $vlex[$lex][$lex]{$gbl}: no exception ok 12584 - delete $vlex[$lex][$lex]{$gbl}: value ok 12585 - $vgbl[$lex][$lex]{$gbl}: no exception ok 12586 - $vgbl[$lex][$lex]{$gbl}: value ok 12587 - $vgbl[$lex][$lex]{$gbl} = 123: no exception ok 12588 - $vgbl[$lex][$lex]{$gbl} = 123: value ok 12589 - exists $vgbl[$lex][$lex]{$gbl}: no exception ok 12590 - exists $vgbl[$lex][$lex]{$gbl}: value ok 12591 - delete $vgbl[$lex][$lex]{$gbl}: no exception ok 12592 - delete $vgbl[$lex][$lex]{$gbl}: value ok 12593 - $vrlex->[$lex][$lex]{$gbl}: no exception ok 12594 - $vrlex->[$lex][$lex]{$gbl}: value ok 12595 - $vrlex->[$lex][$lex]{$gbl} = 123: no exception ok 12596 - $vrlex->[$lex][$lex]{$gbl} = 123: value ok 12597 - exists $vrlex->[$lex][$lex]{$gbl}: no exception ok 12598 - exists $vrlex->[$lex][$lex]{$gbl}: value ok 12599 - delete $vrlex->[$lex][$lex]{$gbl}: no exception ok 12600 - delete $vrlex->[$lex][$lex]{$gbl}: value ok 12601 - $vrgbl->[$lex][$lex]{$gbl}: no exception ok 12602 - $vrgbl->[$lex][$lex]{$gbl}: value ok 12603 - $vrgbl->[$lex][$lex]{$gbl} = 123: no exception ok 12604 - $vrgbl->[$lex][$lex]{$gbl} = 123: value ok 12605 - exists $vrgbl->[$lex][$lex]{$gbl}: no exception ok 12606 - exists $vrgbl->[$lex][$lex]{$gbl}: value ok 12607 - delete $vrgbl->[$lex][$lex]{$gbl}: no exception ok 12608 - delete $vrgbl->[$lex][$lex]{$gbl}: value ok 12609 - $vlex[$gbl][$lex]{$gbl}: no exception ok 12610 - $vlex[$gbl][$lex]{$gbl}: value ok 12611 - $vlex[$gbl][$lex]{$gbl} = 123: no exception ok 12612 - $vlex[$gbl][$lex]{$gbl} = 123: value ok 12613 - exists $vlex[$gbl][$lex]{$gbl}: no exception ok 12614 - exists $vlex[$gbl][$lex]{$gbl}: value ok 12615 - delete $vlex[$gbl][$lex]{$gbl}: no exception ok 12616 - delete $vlex[$gbl][$lex]{$gbl}: value ok 12617 - $vgbl[$gbl][$lex]{$gbl}: no exception ok 12618 - $vgbl[$gbl][$lex]{$gbl}: value ok 12619 - $vgbl[$gbl][$lex]{$gbl} = 123: no exception ok 12620 - $vgbl[$gbl][$lex]{$gbl} = 123: value ok 12621 - exists $vgbl[$gbl][$lex]{$gbl}: no exception ok 12622 - exists $vgbl[$gbl][$lex]{$gbl}: value ok 12623 - delete $vgbl[$gbl][$lex]{$gbl}: no exception ok 12624 - delete $vgbl[$gbl][$lex]{$gbl}: value ok 12625 - $vrlex->[$gbl][$lex]{$gbl}: no exception ok 12626 - $vrlex->[$gbl][$lex]{$gbl}: value ok 12627 - $vrlex->[$gbl][$lex]{$gbl} = 123: no exception ok 12628 - $vrlex->[$gbl][$lex]{$gbl} = 123: value ok 12629 - exists $vrlex->[$gbl][$lex]{$gbl}: no exception ok 12630 - exists $vrlex->[$gbl][$lex]{$gbl}: value ok 12631 - delete $vrlex->[$gbl][$lex]{$gbl}: no exception ok 12632 - delete $vrlex->[$gbl][$lex]{$gbl}: value ok 12633 - $vrgbl->[$gbl][$lex]{$gbl}: no exception ok 12634 - $vrgbl->[$gbl][$lex]{$gbl}: value ok 12635 - $vrgbl->[$gbl][$lex]{$gbl} = 123: no exception ok 12636 - $vrgbl->[$gbl][$lex]{$gbl} = 123: value ok 12637 - exists $vrgbl->[$gbl][$lex]{$gbl}: no exception ok 12638 - exists $vrgbl->[$gbl][$lex]{$gbl}: value ok 12639 - delete $vrgbl->[$gbl][$lex]{$gbl}: no exception ok 12640 - delete $vrgbl->[$gbl][$lex]{$gbl}: value ok 12641 - $vlex[$lex+1][$lex]{$gbl}: no exception ok 12642 - $vlex[$lex+1][$lex]{$gbl}: value ok 12643 - $vlex[$lex+1][$lex]{$gbl} = 123: no exception ok 12644 - $vlex[$lex+1][$lex]{$gbl} = 123: value ok 12645 - exists $vlex[$lex+1][$lex]{$gbl}: no exception ok 12646 - exists $vlex[$lex+1][$lex]{$gbl}: value ok 12647 - delete $vlex[$lex+1][$lex]{$gbl}: no exception ok 12648 - delete $vlex[$lex+1][$lex]{$gbl}: value ok 12649 - $vgbl[$lex+1][$lex]{$gbl}: no exception ok 12650 - $vgbl[$lex+1][$lex]{$gbl}: value ok 12651 - $vgbl[$lex+1][$lex]{$gbl} = 123: no exception ok 12652 - $vgbl[$lex+1][$lex]{$gbl} = 123: value ok 12653 - exists $vgbl[$lex+1][$lex]{$gbl}: no exception ok 12654 - exists $vgbl[$lex+1][$lex]{$gbl}: value ok 12655 - delete $vgbl[$lex+1][$lex]{$gbl}: no exception ok 12656 - delete $vgbl[$lex+1][$lex]{$gbl}: value ok 12657 - $vrlex->[$lex+1][$lex]{$gbl}: no exception ok 12658 - $vrlex->[$lex+1][$lex]{$gbl}: value ok 12659 - $vrlex->[$lex+1][$lex]{$gbl} = 123: no exception ok 12660 - $vrlex->[$lex+1][$lex]{$gbl} = 123: value ok 12661 - exists $vrlex->[$lex+1][$lex]{$gbl}: no exception ok 12662 - exists $vrlex->[$lex+1][$lex]{$gbl}: value ok 12663 - delete $vrlex->[$lex+1][$lex]{$gbl}: no exception ok 12664 - delete $vrlex->[$lex+1][$lex]{$gbl}: value ok 12665 - $vrgbl->[$lex+1][$lex]{$gbl}: no exception ok 12666 - $vrgbl->[$lex+1][$lex]{$gbl}: value ok 12667 - $vrgbl->[$lex+1][$lex]{$gbl} = 123: no exception ok 12668 - $vrgbl->[$lex+1][$lex]{$gbl} = 123: value ok 12669 - exists $vrgbl->[$lex+1][$lex]{$gbl}: no exception ok 12670 - exists $vrgbl->[$lex+1][$lex]{$gbl}: value ok 12671 - delete $vrgbl->[$lex+1][$lex]{$gbl}: no exception ok 12672 - delete $vrgbl->[$lex+1][$lex]{$gbl}: value ok 12673 - $vlex{foo}[$lex]{$gbl}: no exception ok 12674 - $vlex{foo}[$lex]{$gbl}: value ok 12675 - $vlex{foo}[$lex]{$gbl} = 123: no exception ok 12676 - $vlex{foo}[$lex]{$gbl} = 123: value ok 12677 - exists $vlex{foo}[$lex]{$gbl}: no exception ok 12678 - exists $vlex{foo}[$lex]{$gbl}: value ok 12679 - delete $vlex{foo}[$lex]{$gbl}: no exception ok 12680 - delete $vlex{foo}[$lex]{$gbl}: value ok 12681 - $vgbl{foo}[$lex]{$gbl}: no exception ok 12682 - $vgbl{foo}[$lex]{$gbl}: value ok 12683 - $vgbl{foo}[$lex]{$gbl} = 123: no exception ok 12684 - $vgbl{foo}[$lex]{$gbl} = 123: value ok 12685 - exists $vgbl{foo}[$lex]{$gbl}: no exception ok 12686 - exists $vgbl{foo}[$lex]{$gbl}: value ok 12687 - delete $vgbl{foo}[$lex]{$gbl}: no exception ok 12688 - delete $vgbl{foo}[$lex]{$gbl}: value ok 12689 - $vrlex->{foo}[$lex]{$gbl}: no exception ok 12690 - $vrlex->{foo}[$lex]{$gbl}: value ok 12691 - $vrlex->{foo}[$lex]{$gbl} = 123: no exception ok 12692 - $vrlex->{foo}[$lex]{$gbl} = 123: value ok 12693 - exists $vrlex->{foo}[$lex]{$gbl}: no exception ok 12694 - exists $vrlex->{foo}[$lex]{$gbl}: value ok 12695 - delete $vrlex->{foo}[$lex]{$gbl}: no exception ok 12696 - delete $vrlex->{foo}[$lex]{$gbl}: value ok 12697 - $vrgbl->{foo}[$lex]{$gbl}: no exception ok 12698 - $vrgbl->{foo}[$lex]{$gbl}: value ok 12699 - $vrgbl->{foo}[$lex]{$gbl} = 123: no exception ok 12700 - $vrgbl->{foo}[$lex]{$gbl} = 123: value ok 12701 - exists $vrgbl->{foo}[$lex]{$gbl}: no exception ok 12702 - exists $vrgbl->{foo}[$lex]{$gbl}: value ok 12703 - delete $vrgbl->{foo}[$lex]{$gbl}: no exception ok 12704 - delete $vrgbl->{foo}[$lex]{$gbl}: value ok 12705 - $vlex{$lex}[$lex]{$gbl}: no exception ok 12706 - $vlex{$lex}[$lex]{$gbl}: value ok 12707 - $vlex{$lex}[$lex]{$gbl} = 123: no exception ok 12708 - $vlex{$lex}[$lex]{$gbl} = 123: value ok 12709 - exists $vlex{$lex}[$lex]{$gbl}: no exception ok 12710 - exists $vlex{$lex}[$lex]{$gbl}: value ok 12711 - delete $vlex{$lex}[$lex]{$gbl}: no exception ok 12712 - delete $vlex{$lex}[$lex]{$gbl}: value ok 12713 - $vgbl{$lex}[$lex]{$gbl}: no exception ok 12714 - $vgbl{$lex}[$lex]{$gbl}: value ok 12715 - $vgbl{$lex}[$lex]{$gbl} = 123: no exception ok 12716 - $vgbl{$lex}[$lex]{$gbl} = 123: value ok 12717 - exists $vgbl{$lex}[$lex]{$gbl}: no exception ok 12718 - exists $vgbl{$lex}[$lex]{$gbl}: value ok 12719 - delete $vgbl{$lex}[$lex]{$gbl}: no exception ok 12720 - delete $vgbl{$lex}[$lex]{$gbl}: value ok 12721 - $vrlex->{$lex}[$lex]{$gbl}: no exception ok 12722 - $vrlex->{$lex}[$lex]{$gbl}: value ok 12723 - $vrlex->{$lex}[$lex]{$gbl} = 123: no exception ok 12724 - $vrlex->{$lex}[$lex]{$gbl} = 123: value ok 12725 - exists $vrlex->{$lex}[$lex]{$gbl}: no exception ok 12726 - exists $vrlex->{$lex}[$lex]{$gbl}: value ok 12727 - delete $vrlex->{$lex}[$lex]{$gbl}: no exception ok 12728 - delete $vrlex->{$lex}[$lex]{$gbl}: value ok 12729 - $vrgbl->{$lex}[$lex]{$gbl}: no exception ok 12730 - $vrgbl->{$lex}[$lex]{$gbl}: value ok 12731 - $vrgbl->{$lex}[$lex]{$gbl} = 123: no exception ok 12732 - $vrgbl->{$lex}[$lex]{$gbl} = 123: value ok 12733 - exists $vrgbl->{$lex}[$lex]{$gbl}: no exception ok 12734 - exists $vrgbl->{$lex}[$lex]{$gbl}: value ok 12735 - delete $vrgbl->{$lex}[$lex]{$gbl}: no exception ok 12736 - delete $vrgbl->{$lex}[$lex]{$gbl}: value ok 12737 - $vlex{$gbl}[$lex]{$gbl}: no exception ok 12738 - $vlex{$gbl}[$lex]{$gbl}: value ok 12739 - $vlex{$gbl}[$lex]{$gbl} = 123: no exception ok 12740 - $vlex{$gbl}[$lex]{$gbl} = 123: value ok 12741 - exists $vlex{$gbl}[$lex]{$gbl}: no exception ok 12742 - exists $vlex{$gbl}[$lex]{$gbl}: value ok 12743 - delete $vlex{$gbl}[$lex]{$gbl}: no exception ok 12744 - delete $vlex{$gbl}[$lex]{$gbl}: value ok 12745 - $vgbl{$gbl}[$lex]{$gbl}: no exception ok 12746 - $vgbl{$gbl}[$lex]{$gbl}: value ok 12747 - $vgbl{$gbl}[$lex]{$gbl} = 123: no exception ok 12748 - $vgbl{$gbl}[$lex]{$gbl} = 123: value ok 12749 - exists $vgbl{$gbl}[$lex]{$gbl}: no exception ok 12750 - exists $vgbl{$gbl}[$lex]{$gbl}: value ok 12751 - delete $vgbl{$gbl}[$lex]{$gbl}: no exception ok 12752 - delete $vgbl{$gbl}[$lex]{$gbl}: value ok 12753 - $vrlex->{$gbl}[$lex]{$gbl}: no exception ok 12754 - $vrlex->{$gbl}[$lex]{$gbl}: value ok 12755 - $vrlex->{$gbl}[$lex]{$gbl} = 123: no exception ok 12756 - $vrlex->{$gbl}[$lex]{$gbl} = 123: value ok 12757 - exists $vrlex->{$gbl}[$lex]{$gbl}: no exception ok 12758 - exists $vrlex->{$gbl}[$lex]{$gbl}: value ok 12759 - delete $vrlex->{$gbl}[$lex]{$gbl}: no exception ok 12760 - delete $vrlex->{$gbl}[$lex]{$gbl}: value ok 12761 - $vrgbl->{$gbl}[$lex]{$gbl}: no exception ok 12762 - $vrgbl->{$gbl}[$lex]{$gbl}: value ok 12763 - $vrgbl->{$gbl}[$lex]{$gbl} = 123: no exception ok 12764 - $vrgbl->{$gbl}[$lex]{$gbl} = 123: value ok 12765 - exists $vrgbl->{$gbl}[$lex]{$gbl}: no exception ok 12766 - exists $vrgbl->{$gbl}[$lex]{$gbl}: value ok 12767 - delete $vrgbl->{$gbl}[$lex]{$gbl}: no exception ok 12768 - delete $vrgbl->{$gbl}[$lex]{$gbl}: value ok 12769 - $vlex{"x$lex"}[$lex]{$gbl}: no exception ok 12770 - $vlex{"x$lex"}[$lex]{$gbl}: value ok 12771 - $vlex{"x$lex"}[$lex]{$gbl} = 123: no exception ok 12772 - $vlex{"x$lex"}[$lex]{$gbl} = 123: value ok 12773 - exists $vlex{"x$lex"}[$lex]{$gbl}: no exception ok 12774 - exists $vlex{"x$lex"}[$lex]{$gbl}: value ok 12775 - delete $vlex{"x$lex"}[$lex]{$gbl}: no exception ok 12776 - delete $vlex{"x$lex"}[$lex]{$gbl}: value ok 12777 - $vgbl{"x$lex"}[$lex]{$gbl}: no exception ok 12778 - $vgbl{"x$lex"}[$lex]{$gbl}: value ok 12779 - $vgbl{"x$lex"}[$lex]{$gbl} = 123: no exception ok 12780 - $vgbl{"x$lex"}[$lex]{$gbl} = 123: value ok 12781 - exists $vgbl{"x$lex"}[$lex]{$gbl}: no exception ok 12782 - exists $vgbl{"x$lex"}[$lex]{$gbl}: value ok 12783 - delete $vgbl{"x$lex"}[$lex]{$gbl}: no exception ok 12784 - delete $vgbl{"x$lex"}[$lex]{$gbl}: value ok 12785 - $vrlex->{"x$lex"}[$lex]{$gbl}: no exception ok 12786 - $vrlex->{"x$lex"}[$lex]{$gbl}: value ok 12787 - $vrlex->{"x$lex"}[$lex]{$gbl} = 123: no exception ok 12788 - $vrlex->{"x$lex"}[$lex]{$gbl} = 123: value ok 12789 - exists $vrlex->{"x$lex"}[$lex]{$gbl}: no exception ok 12790 - exists $vrlex->{"x$lex"}[$lex]{$gbl}: value ok 12791 - delete $vrlex->{"x$lex"}[$lex]{$gbl}: no exception ok 12792 - delete $vrlex->{"x$lex"}[$lex]{$gbl}: value ok 12793 - $vrgbl->{"x$lex"}[$lex]{$gbl}: no exception ok 12794 - $vrgbl->{"x$lex"}[$lex]{$gbl}: value ok 12795 - $vrgbl->{"x$lex"}[$lex]{$gbl} = 123: no exception ok 12796 - $vrgbl->{"x$lex"}[$lex]{$gbl} = 123: value ok 12797 - exists $vrgbl->{"x$lex"}[$lex]{$gbl}: no exception ok 12798 - exists $vrgbl->{"x$lex"}[$lex]{$gbl}: value ok 12799 - delete $vrgbl->{"x$lex"}[$lex]{$gbl}: no exception ok 12800 - delete $vrgbl->{"x$lex"}[$lex]{$gbl}: value ok 12801 - $vlex[0][$gbl]{$gbl}: no exception ok 12802 - $vlex[0][$gbl]{$gbl}: value ok 12803 - $vlex[0][$gbl]{$gbl} = 123: no exception ok 12804 - $vlex[0][$gbl]{$gbl} = 123: value ok 12805 - exists $vlex[0][$gbl]{$gbl}: no exception ok 12806 - exists $vlex[0][$gbl]{$gbl}: value ok 12807 - delete $vlex[0][$gbl]{$gbl}: no exception ok 12808 - delete $vlex[0][$gbl]{$gbl}: value ok 12809 - $vgbl[0][$gbl]{$gbl}: no exception ok 12810 - $vgbl[0][$gbl]{$gbl}: value ok 12811 - $vgbl[0][$gbl]{$gbl} = 123: no exception ok 12812 - $vgbl[0][$gbl]{$gbl} = 123: value ok 12813 - exists $vgbl[0][$gbl]{$gbl}: no exception ok 12814 - exists $vgbl[0][$gbl]{$gbl}: value ok 12815 - delete $vgbl[0][$gbl]{$gbl}: no exception ok 12816 - delete $vgbl[0][$gbl]{$gbl}: value ok 12817 - $vrlex->[0][$gbl]{$gbl}: no exception ok 12818 - $vrlex->[0][$gbl]{$gbl}: value ok 12819 - $vrlex->[0][$gbl]{$gbl} = 123: no exception ok 12820 - $vrlex->[0][$gbl]{$gbl} = 123: value ok 12821 - exists $vrlex->[0][$gbl]{$gbl}: no exception ok 12822 - exists $vrlex->[0][$gbl]{$gbl}: value ok 12823 - delete $vrlex->[0][$gbl]{$gbl}: no exception ok 12824 - delete $vrlex->[0][$gbl]{$gbl}: value ok 12825 - $vrgbl->[0][$gbl]{$gbl}: no exception ok 12826 - $vrgbl->[0][$gbl]{$gbl}: value ok 12827 - $vrgbl->[0][$gbl]{$gbl} = 123: no exception ok 12828 - $vrgbl->[0][$gbl]{$gbl} = 123: value ok 12829 - exists $vrgbl->[0][$gbl]{$gbl}: no exception ok 12830 - exists $vrgbl->[0][$gbl]{$gbl}: value ok 12831 - delete $vrgbl->[0][$gbl]{$gbl}: no exception ok 12832 - delete $vrgbl->[0][$gbl]{$gbl}: value ok 12833 - $vlex[$lex][$gbl]{$gbl}: no exception ok 12834 - $vlex[$lex][$gbl]{$gbl}: value ok 12835 - $vlex[$lex][$gbl]{$gbl} = 123: no exception ok 12836 - $vlex[$lex][$gbl]{$gbl} = 123: value ok 12837 - exists $vlex[$lex][$gbl]{$gbl}: no exception ok 12838 - exists $vlex[$lex][$gbl]{$gbl}: value ok 12839 - delete $vlex[$lex][$gbl]{$gbl}: no exception ok 12840 - delete $vlex[$lex][$gbl]{$gbl}: value ok 12841 - $vgbl[$lex][$gbl]{$gbl}: no exception ok 12842 - $vgbl[$lex][$gbl]{$gbl}: value ok 12843 - $vgbl[$lex][$gbl]{$gbl} = 123: no exception ok 12844 - $vgbl[$lex][$gbl]{$gbl} = 123: value ok 12845 - exists $vgbl[$lex][$gbl]{$gbl}: no exception ok 12846 - exists $vgbl[$lex][$gbl]{$gbl}: value ok 12847 - delete $vgbl[$lex][$gbl]{$gbl}: no exception ok 12848 - delete $vgbl[$lex][$gbl]{$gbl}: value ok 12849 - $vrlex->[$lex][$gbl]{$gbl}: no exception ok 12850 - $vrlex->[$lex][$gbl]{$gbl}: value ok 12851 - $vrlex->[$lex][$gbl]{$gbl} = 123: no exception ok 12852 - $vrlex->[$lex][$gbl]{$gbl} = 123: value ok 12853 - exists $vrlex->[$lex][$gbl]{$gbl}: no exception ok 12854 - exists $vrlex->[$lex][$gbl]{$gbl}: value ok 12855 - delete $vrlex->[$lex][$gbl]{$gbl}: no exception ok 12856 - delete $vrlex->[$lex][$gbl]{$gbl}: value ok 12857 - $vrgbl->[$lex][$gbl]{$gbl}: no exception ok 12858 - $vrgbl->[$lex][$gbl]{$gbl}: value ok 12859 - $vrgbl->[$lex][$gbl]{$gbl} = 123: no exception ok 12860 - $vrgbl->[$lex][$gbl]{$gbl} = 123: value ok 12861 - exists $vrgbl->[$lex][$gbl]{$gbl}: no exception ok 12862 - exists $vrgbl->[$lex][$gbl]{$gbl}: value ok 12863 - delete $vrgbl->[$lex][$gbl]{$gbl}: no exception ok 12864 - delete $vrgbl->[$lex][$gbl]{$gbl}: value ok 12865 - $vlex[$gbl][$gbl]{$gbl}: no exception ok 12866 - $vlex[$gbl][$gbl]{$gbl}: value ok 12867 - $vlex[$gbl][$gbl]{$gbl} = 123: no exception ok 12868 - $vlex[$gbl][$gbl]{$gbl} = 123: value ok 12869 - exists $vlex[$gbl][$gbl]{$gbl}: no exception ok 12870 - exists $vlex[$gbl][$gbl]{$gbl}: value ok 12871 - delete $vlex[$gbl][$gbl]{$gbl}: no exception ok 12872 - delete $vlex[$gbl][$gbl]{$gbl}: value ok 12873 - $vgbl[$gbl][$gbl]{$gbl}: no exception ok 12874 - $vgbl[$gbl][$gbl]{$gbl}: value ok 12875 - $vgbl[$gbl][$gbl]{$gbl} = 123: no exception ok 12876 - $vgbl[$gbl][$gbl]{$gbl} = 123: value ok 12877 - exists $vgbl[$gbl][$gbl]{$gbl}: no exception ok 12878 - exists $vgbl[$gbl][$gbl]{$gbl}: value ok 12879 - delete $vgbl[$gbl][$gbl]{$gbl}: no exception ok 12880 - delete $vgbl[$gbl][$gbl]{$gbl}: value ok 12881 - $vrlex->[$gbl][$gbl]{$gbl}: no exception ok 12882 - $vrlex->[$gbl][$gbl]{$gbl}: value ok 12883 - $vrlex->[$gbl][$gbl]{$gbl} = 123: no exception ok 12884 - $vrlex->[$gbl][$gbl]{$gbl} = 123: value ok 12885 - exists $vrlex->[$gbl][$gbl]{$gbl}: no exception ok 12886 - exists $vrlex->[$gbl][$gbl]{$gbl}: value ok 12887 - delete $vrlex->[$gbl][$gbl]{$gbl}: no exception ok 12888 - delete $vrlex->[$gbl][$gbl]{$gbl}: value ok 12889 - $vrgbl->[$gbl][$gbl]{$gbl}: no exception ok 12890 - $vrgbl->[$gbl][$gbl]{$gbl}: value ok 12891 - $vrgbl->[$gbl][$gbl]{$gbl} = 123: no exception ok 12892 - $vrgbl->[$gbl][$gbl]{$gbl} = 123: value ok 12893 - exists $vrgbl->[$gbl][$gbl]{$gbl}: no exception ok 12894 - exists $vrgbl->[$gbl][$gbl]{$gbl}: value ok 12895 - delete $vrgbl->[$gbl][$gbl]{$gbl}: no exception ok 12896 - delete $vrgbl->[$gbl][$gbl]{$gbl}: value ok 12897 - $vlex[$lex+1][$gbl]{$gbl}: no exception ok 12898 - $vlex[$lex+1][$gbl]{$gbl}: value ok 12899 - $vlex[$lex+1][$gbl]{$gbl} = 123: no exception ok 12900 - $vlex[$lex+1][$gbl]{$gbl} = 123: value ok 12901 - exists $vlex[$lex+1][$gbl]{$gbl}: no exception ok 12902 - exists $vlex[$lex+1][$gbl]{$gbl}: value ok 12903 - delete $vlex[$lex+1][$gbl]{$gbl}: no exception ok 12904 - delete $vlex[$lex+1][$gbl]{$gbl}: value ok 12905 - $vgbl[$lex+1][$gbl]{$gbl}: no exception ok 12906 - $vgbl[$lex+1][$gbl]{$gbl}: value ok 12907 - $vgbl[$lex+1][$gbl]{$gbl} = 123: no exception ok 12908 - $vgbl[$lex+1][$gbl]{$gbl} = 123: value ok 12909 - exists $vgbl[$lex+1][$gbl]{$gbl}: no exception ok 12910 - exists $vgbl[$lex+1][$gbl]{$gbl}: value ok 12911 - delete $vgbl[$lex+1][$gbl]{$gbl}: no exception ok 12912 - delete $vgbl[$lex+1][$gbl]{$gbl}: value ok 12913 - $vrlex->[$lex+1][$gbl]{$gbl}: no exception ok 12914 - $vrlex->[$lex+1][$gbl]{$gbl}: value ok 12915 - $vrlex->[$lex+1][$gbl]{$gbl} = 123: no exception ok 12916 - $vrlex->[$lex+1][$gbl]{$gbl} = 123: value ok 12917 - exists $vrlex->[$lex+1][$gbl]{$gbl}: no exception ok 12918 - exists $vrlex->[$lex+1][$gbl]{$gbl}: value ok 12919 - delete $vrlex->[$lex+1][$gbl]{$gbl}: no exception ok 12920 - delete $vrlex->[$lex+1][$gbl]{$gbl}: value ok 12921 - $vrgbl->[$lex+1][$gbl]{$gbl}: no exception ok 12922 - $vrgbl->[$lex+1][$gbl]{$gbl}: value ok 12923 - $vrgbl->[$lex+1][$gbl]{$gbl} = 123: no exception ok 12924 - $vrgbl->[$lex+1][$gbl]{$gbl} = 123: value ok 12925 - exists $vrgbl->[$lex+1][$gbl]{$gbl}: no exception ok 12926 - exists $vrgbl->[$lex+1][$gbl]{$gbl}: value ok 12927 - delete $vrgbl->[$lex+1][$gbl]{$gbl}: no exception ok 12928 - delete $vrgbl->[$lex+1][$gbl]{$gbl}: value ok 12929 - $vlex{foo}[$gbl]{$gbl}: no exception ok 12930 - $vlex{foo}[$gbl]{$gbl}: value ok 12931 - $vlex{foo}[$gbl]{$gbl} = 123: no exception ok 12932 - $vlex{foo}[$gbl]{$gbl} = 123: value ok 12933 - exists $vlex{foo}[$gbl]{$gbl}: no exception ok 12934 - exists $vlex{foo}[$gbl]{$gbl}: value ok 12935 - delete $vlex{foo}[$gbl]{$gbl}: no exception ok 12936 - delete $vlex{foo}[$gbl]{$gbl}: value ok 12937 - $vgbl{foo}[$gbl]{$gbl}: no exception ok 12938 - $vgbl{foo}[$gbl]{$gbl}: value ok 12939 - $vgbl{foo}[$gbl]{$gbl} = 123: no exception ok 12940 - $vgbl{foo}[$gbl]{$gbl} = 123: value ok 12941 - exists $vgbl{foo}[$gbl]{$gbl}: no exception ok 12942 - exists $vgbl{foo}[$gbl]{$gbl}: value ok 12943 - delete $vgbl{foo}[$gbl]{$gbl}: no exception ok 12944 - delete $vgbl{foo}[$gbl]{$gbl}: value ok 12945 - $vrlex->{foo}[$gbl]{$gbl}: no exception ok 12946 - $vrlex->{foo}[$gbl]{$gbl}: value ok 12947 - $vrlex->{foo}[$gbl]{$gbl} = 123: no exception ok 12948 - $vrlex->{foo}[$gbl]{$gbl} = 123: value ok 12949 - exists $vrlex->{foo}[$gbl]{$gbl}: no exception ok 12950 - exists $vrlex->{foo}[$gbl]{$gbl}: value ok 12951 - delete $vrlex->{foo}[$gbl]{$gbl}: no exception ok 12952 - delete $vrlex->{foo}[$gbl]{$gbl}: value ok 12953 - $vrgbl->{foo}[$gbl]{$gbl}: no exception ok 12954 - $vrgbl->{foo}[$gbl]{$gbl}: value ok 12955 - $vrgbl->{foo}[$gbl]{$gbl} = 123: no exception ok 12956 - $vrgbl->{foo}[$gbl]{$gbl} = 123: value ok 12957 - exists $vrgbl->{foo}[$gbl]{$gbl}: no exception ok 12958 - exists $vrgbl->{foo}[$gbl]{$gbl}: value ok 12959 - delete $vrgbl->{foo}[$gbl]{$gbl}: no exception ok 12960 - delete $vrgbl->{foo}[$gbl]{$gbl}: value ok 12961 - $vlex{$lex}[$gbl]{$gbl}: no exception ok 12962 - $vlex{$lex}[$gbl]{$gbl}: value ok 12963 - $vlex{$lex}[$gbl]{$gbl} = 123: no exception ok 12964 - $vlex{$lex}[$gbl]{$gbl} = 123: value ok 12965 - exists $vlex{$lex}[$gbl]{$gbl}: no exception ok 12966 - exists $vlex{$lex}[$gbl]{$gbl}: value ok 12967 - delete $vlex{$lex}[$gbl]{$gbl}: no exception ok 12968 - delete $vlex{$lex}[$gbl]{$gbl}: value ok 12969 - $vgbl{$lex}[$gbl]{$gbl}: no exception ok 12970 - $vgbl{$lex}[$gbl]{$gbl}: value ok 12971 - $vgbl{$lex}[$gbl]{$gbl} = 123: no exception ok 12972 - $vgbl{$lex}[$gbl]{$gbl} = 123: value ok 12973 - exists $vgbl{$lex}[$gbl]{$gbl}: no exception ok 12974 - exists $vgbl{$lex}[$gbl]{$gbl}: value ok 12975 - delete $vgbl{$lex}[$gbl]{$gbl}: no exception ok 12976 - delete $vgbl{$lex}[$gbl]{$gbl}: value ok 12977 - $vrlex->{$lex}[$gbl]{$gbl}: no exception ok 12978 - $vrlex->{$lex}[$gbl]{$gbl}: value ok 12979 - $vrlex->{$lex}[$gbl]{$gbl} = 123: no exception ok 12980 - $vrlex->{$lex}[$gbl]{$gbl} = 123: value ok 12981 - exists $vrlex->{$lex}[$gbl]{$gbl}: no exception ok 12982 - exists $vrlex->{$lex}[$gbl]{$gbl}: value ok 12983 - delete $vrlex->{$lex}[$gbl]{$gbl}: no exception ok 12984 - delete $vrlex->{$lex}[$gbl]{$gbl}: value ok 12985 - $vrgbl->{$lex}[$gbl]{$gbl}: no exception ok 12986 - $vrgbl->{$lex}[$gbl]{$gbl}: value ok 12987 - $vrgbl->{$lex}[$gbl]{$gbl} = 123: no exception ok 12988 - $vrgbl->{$lex}[$gbl]{$gbl} = 123: value ok 12989 - exists $vrgbl->{$lex}[$gbl]{$gbl}: no exception ok 12990 - exists $vrgbl->{$lex}[$gbl]{$gbl}: value ok 12991 - delete $vrgbl->{$lex}[$gbl]{$gbl}: no exception ok 12992 - delete $vrgbl->{$lex}[$gbl]{$gbl}: value ok 12993 - $vlex{$gbl}[$gbl]{$gbl}: no exception ok 12994 - $vlex{$gbl}[$gbl]{$gbl}: value ok 12995 - $vlex{$gbl}[$gbl]{$gbl} = 123: no exception ok 12996 - $vlex{$gbl}[$gbl]{$gbl} = 123: value ok 12997 - exists $vlex{$gbl}[$gbl]{$gbl}: no exception ok 12998 - exists $vlex{$gbl}[$gbl]{$gbl}: value ok 12999 - delete $vlex{$gbl}[$gbl]{$gbl}: no exception ok 13000 - delete $vlex{$gbl}[$gbl]{$gbl}: value ok 13001 - $vgbl{$gbl}[$gbl]{$gbl}: no exception ok 13002 - $vgbl{$gbl}[$gbl]{$gbl}: value ok 13003 - $vgbl{$gbl}[$gbl]{$gbl} = 123: no exception ok 13004 - $vgbl{$gbl}[$gbl]{$gbl} = 123: value ok 13005 - exists $vgbl{$gbl}[$gbl]{$gbl}: no exception ok 13006 - exists $vgbl{$gbl}[$gbl]{$gbl}: value ok 13007 - delete $vgbl{$gbl}[$gbl]{$gbl}: no exception ok 13008 - delete $vgbl{$gbl}[$gbl]{$gbl}: value ok 13009 - $vrlex->{$gbl}[$gbl]{$gbl}: no exception ok 13010 - $vrlex->{$gbl}[$gbl]{$gbl}: value ok 13011 - $vrlex->{$gbl}[$gbl]{$gbl} = 123: no exception ok 13012 - $vrlex->{$gbl}[$gbl]{$gbl} = 123: value ok 13013 - exists $vrlex->{$gbl}[$gbl]{$gbl}: no exception ok 13014 - exists $vrlex->{$gbl}[$gbl]{$gbl}: value ok 13015 - delete $vrlex->{$gbl}[$gbl]{$gbl}: no exception ok 13016 - delete $vrlex->{$gbl}[$gbl]{$gbl}: value ok 13017 - $vrgbl->{$gbl}[$gbl]{$gbl}: no exception ok 13018 - $vrgbl->{$gbl}[$gbl]{$gbl}: value ok 13019 - $vrgbl->{$gbl}[$gbl]{$gbl} = 123: no exception ok 13020 - $vrgbl->{$gbl}[$gbl]{$gbl} = 123: value ok 13021 - exists $vrgbl->{$gbl}[$gbl]{$gbl}: no exception ok 13022 - exists $vrgbl->{$gbl}[$gbl]{$gbl}: value ok 13023 - delete $vrgbl->{$gbl}[$gbl]{$gbl}: no exception ok 13024 - delete $vrgbl->{$gbl}[$gbl]{$gbl}: value ok 13025 - $vlex{"x$lex"}[$gbl]{$gbl}: no exception ok 13026 - $vlex{"x$lex"}[$gbl]{$gbl}: value ok 13027 - $vlex{"x$lex"}[$gbl]{$gbl} = 123: no exception ok 13028 - $vlex{"x$lex"}[$gbl]{$gbl} = 123: value ok 13029 - exists $vlex{"x$lex"}[$gbl]{$gbl}: no exception ok 13030 - exists $vlex{"x$lex"}[$gbl]{$gbl}: value ok 13031 - delete $vlex{"x$lex"}[$gbl]{$gbl}: no exception ok 13032 - delete $vlex{"x$lex"}[$gbl]{$gbl}: value ok 13033 - $vgbl{"x$lex"}[$gbl]{$gbl}: no exception ok 13034 - $vgbl{"x$lex"}[$gbl]{$gbl}: value ok 13035 - $vgbl{"x$lex"}[$gbl]{$gbl} = 123: no exception ok 13036 - $vgbl{"x$lex"}[$gbl]{$gbl} = 123: value ok 13037 - exists $vgbl{"x$lex"}[$gbl]{$gbl}: no exception ok 13038 - exists $vgbl{"x$lex"}[$gbl]{$gbl}: value ok 13039 - delete $vgbl{"x$lex"}[$gbl]{$gbl}: no exception ok 13040 - delete $vgbl{"x$lex"}[$gbl]{$gbl}: value ok 13041 - $vrlex->{"x$lex"}[$gbl]{$gbl}: no exception ok 13042 - $vrlex->{"x$lex"}[$gbl]{$gbl}: value ok 13043 - $vrlex->{"x$lex"}[$gbl]{$gbl} = 123: no exception ok 13044 - $vrlex->{"x$lex"}[$gbl]{$gbl} = 123: value ok 13045 - exists $vrlex->{"x$lex"}[$gbl]{$gbl}: no exception ok 13046 - exists $vrlex->{"x$lex"}[$gbl]{$gbl}: value ok 13047 - delete $vrlex->{"x$lex"}[$gbl]{$gbl}: no exception ok 13048 - delete $vrlex->{"x$lex"}[$gbl]{$gbl}: value ok 13049 - $vrgbl->{"x$lex"}[$gbl]{$gbl}: no exception ok 13050 - $vrgbl->{"x$lex"}[$gbl]{$gbl}: value ok 13051 - $vrgbl->{"x$lex"}[$gbl]{$gbl} = 123: no exception ok 13052 - $vrgbl->{"x$lex"}[$gbl]{$gbl} = 123: value ok 13053 - exists $vrgbl->{"x$lex"}[$gbl]{$gbl}: no exception ok 13054 - exists $vrgbl->{"x$lex"}[$gbl]{$gbl}: value ok 13055 - delete $vrgbl->{"x$lex"}[$gbl]{$gbl}: no exception ok 13056 - delete $vrgbl->{"x$lex"}[$gbl]{$gbl}: value ok 13057 - $vlex[0][$lex+1]{$gbl}: no exception ok 13058 - $vlex[0][$lex+1]{$gbl}: value ok 13059 - $vlex[0][$lex+1]{$gbl} = 123: no exception ok 13060 - $vlex[0][$lex+1]{$gbl} = 123: value ok 13061 - exists $vlex[0][$lex+1]{$gbl}: no exception ok 13062 - exists $vlex[0][$lex+1]{$gbl}: value ok 13063 - delete $vlex[0][$lex+1]{$gbl}: no exception ok 13064 - delete $vlex[0][$lex+1]{$gbl}: value ok 13065 - $vgbl[0][$lex+1]{$gbl}: no exception ok 13066 - $vgbl[0][$lex+1]{$gbl}: value ok 13067 - $vgbl[0][$lex+1]{$gbl} = 123: no exception ok 13068 - $vgbl[0][$lex+1]{$gbl} = 123: value ok 13069 - exists $vgbl[0][$lex+1]{$gbl}: no exception ok 13070 - exists $vgbl[0][$lex+1]{$gbl}: value ok 13071 - delete $vgbl[0][$lex+1]{$gbl}: no exception ok 13072 - delete $vgbl[0][$lex+1]{$gbl}: value ok 13073 - $vrlex->[0][$lex+1]{$gbl}: no exception ok 13074 - $vrlex->[0][$lex+1]{$gbl}: value ok 13075 - $vrlex->[0][$lex+1]{$gbl} = 123: no exception ok 13076 - $vrlex->[0][$lex+1]{$gbl} = 123: value ok 13077 - exists $vrlex->[0][$lex+1]{$gbl}: no exception ok 13078 - exists $vrlex->[0][$lex+1]{$gbl}: value ok 13079 - delete $vrlex->[0][$lex+1]{$gbl}: no exception ok 13080 - delete $vrlex->[0][$lex+1]{$gbl}: value ok 13081 - $vrgbl->[0][$lex+1]{$gbl}: no exception ok 13082 - $vrgbl->[0][$lex+1]{$gbl}: value ok 13083 - $vrgbl->[0][$lex+1]{$gbl} = 123: no exception ok 13084 - $vrgbl->[0][$lex+1]{$gbl} = 123: value ok 13085 - exists $vrgbl->[0][$lex+1]{$gbl}: no exception ok 13086 - exists $vrgbl->[0][$lex+1]{$gbl}: value ok 13087 - delete $vrgbl->[0][$lex+1]{$gbl}: no exception ok 13088 - delete $vrgbl->[0][$lex+1]{$gbl}: value ok 13089 - $vlex[$lex][$lex+1]{$gbl}: no exception ok 13090 - $vlex[$lex][$lex+1]{$gbl}: value ok 13091 - $vlex[$lex][$lex+1]{$gbl} = 123: no exception ok 13092 - $vlex[$lex][$lex+1]{$gbl} = 123: value ok 13093 - exists $vlex[$lex][$lex+1]{$gbl}: no exception ok 13094 - exists $vlex[$lex][$lex+1]{$gbl}: value ok 13095 - delete $vlex[$lex][$lex+1]{$gbl}: no exception ok 13096 - delete $vlex[$lex][$lex+1]{$gbl}: value ok 13097 - $vgbl[$lex][$lex+1]{$gbl}: no exception ok 13098 - $vgbl[$lex][$lex+1]{$gbl}: value ok 13099 - $vgbl[$lex][$lex+1]{$gbl} = 123: no exception ok 13100 - $vgbl[$lex][$lex+1]{$gbl} = 123: value ok 13101 - exists $vgbl[$lex][$lex+1]{$gbl}: no exception ok 13102 - exists $vgbl[$lex][$lex+1]{$gbl}: value ok 13103 - delete $vgbl[$lex][$lex+1]{$gbl}: no exception ok 13104 - delete $vgbl[$lex][$lex+1]{$gbl}: value ok 13105 - $vrlex->[$lex][$lex+1]{$gbl}: no exception ok 13106 - $vrlex->[$lex][$lex+1]{$gbl}: value ok 13107 - $vrlex->[$lex][$lex+1]{$gbl} = 123: no exception ok 13108 - $vrlex->[$lex][$lex+1]{$gbl} = 123: value ok 13109 - exists $vrlex->[$lex][$lex+1]{$gbl}: no exception ok 13110 - exists $vrlex->[$lex][$lex+1]{$gbl}: value ok 13111 - delete $vrlex->[$lex][$lex+1]{$gbl}: no exception ok 13112 - delete $vrlex->[$lex][$lex+1]{$gbl}: value ok 13113 - $vrgbl->[$lex][$lex+1]{$gbl}: no exception ok 13114 - $vrgbl->[$lex][$lex+1]{$gbl}: value ok 13115 - $vrgbl->[$lex][$lex+1]{$gbl} = 123: no exception ok 13116 - $vrgbl->[$lex][$lex+1]{$gbl} = 123: value ok 13117 - exists $vrgbl->[$lex][$lex+1]{$gbl}: no exception ok 13118 - exists $vrgbl->[$lex][$lex+1]{$gbl}: value ok 13119 - delete $vrgbl->[$lex][$lex+1]{$gbl}: no exception ok 13120 - delete $vrgbl->[$lex][$lex+1]{$gbl}: value ok 13121 - $vlex[$gbl][$lex+1]{$gbl}: no exception ok 13122 - $vlex[$gbl][$lex+1]{$gbl}: value ok 13123 - $vlex[$gbl][$lex+1]{$gbl} = 123: no exception ok 13124 - $vlex[$gbl][$lex+1]{$gbl} = 123: value ok 13125 - exists $vlex[$gbl][$lex+1]{$gbl}: no exception ok 13126 - exists $vlex[$gbl][$lex+1]{$gbl}: value ok 13127 - delete $vlex[$gbl][$lex+1]{$gbl}: no exception ok 13128 - delete $vlex[$gbl][$lex+1]{$gbl}: value ok 13129 - $vgbl[$gbl][$lex+1]{$gbl}: no exception ok 13130 - $vgbl[$gbl][$lex+1]{$gbl}: value ok 13131 - $vgbl[$gbl][$lex+1]{$gbl} = 123: no exception ok 13132 - $vgbl[$gbl][$lex+1]{$gbl} = 123: value ok 13133 - exists $vgbl[$gbl][$lex+1]{$gbl}: no exception ok 13134 - exists $vgbl[$gbl][$lex+1]{$gbl}: value ok 13135 - delete $vgbl[$gbl][$lex+1]{$gbl}: no exception ok 13136 - delete $vgbl[$gbl][$lex+1]{$gbl}: value ok 13137 - $vrlex->[$gbl][$lex+1]{$gbl}: no exception ok 13138 - $vrlex->[$gbl][$lex+1]{$gbl}: value ok 13139 - $vrlex->[$gbl][$lex+1]{$gbl} = 123: no exception ok 13140 - $vrlex->[$gbl][$lex+1]{$gbl} = 123: value ok 13141 - exists $vrlex->[$gbl][$lex+1]{$gbl}: no exception ok 13142 - exists $vrlex->[$gbl][$lex+1]{$gbl}: value ok 13143 - delete $vrlex->[$gbl][$lex+1]{$gbl}: no exception ok 13144 - delete $vrlex->[$gbl][$lex+1]{$gbl}: value ok 13145 - $vrgbl->[$gbl][$lex+1]{$gbl}: no exception ok 13146 - $vrgbl->[$gbl][$lex+1]{$gbl}: value ok 13147 - $vrgbl->[$gbl][$lex+1]{$gbl} = 123: no exception ok 13148 - $vrgbl->[$gbl][$lex+1]{$gbl} = 123: value ok 13149 - exists $vrgbl->[$gbl][$lex+1]{$gbl}: no exception ok 13150 - exists $vrgbl->[$gbl][$lex+1]{$gbl}: value ok 13151 - delete $vrgbl->[$gbl][$lex+1]{$gbl}: no exception ok 13152 - delete $vrgbl->[$gbl][$lex+1]{$gbl}: value ok 13153 - $vlex[$lex+1][$lex+1]{$gbl}: no exception ok 13154 - $vlex[$lex+1][$lex+1]{$gbl}: value ok 13155 - $vlex[$lex+1][$lex+1]{$gbl} = 123: no exception ok 13156 - $vlex[$lex+1][$lex+1]{$gbl} = 123: value ok 13157 - exists $vlex[$lex+1][$lex+1]{$gbl}: no exception ok 13158 - exists $vlex[$lex+1][$lex+1]{$gbl}: value ok 13159 - delete $vlex[$lex+1][$lex+1]{$gbl}: no exception ok 13160 - delete $vlex[$lex+1][$lex+1]{$gbl}: value ok 13161 - $vgbl[$lex+1][$lex+1]{$gbl}: no exception ok 13162 - $vgbl[$lex+1][$lex+1]{$gbl}: value ok 13163 - $vgbl[$lex+1][$lex+1]{$gbl} = 123: no exception ok 13164 - $vgbl[$lex+1][$lex+1]{$gbl} = 123: value ok 13165 - exists $vgbl[$lex+1][$lex+1]{$gbl}: no exception ok 13166 - exists $vgbl[$lex+1][$lex+1]{$gbl}: value ok 13167 - delete $vgbl[$lex+1][$lex+1]{$gbl}: no exception ok 13168 - delete $vgbl[$lex+1][$lex+1]{$gbl}: value ok 13169 - $vrlex->[$lex+1][$lex+1]{$gbl}: no exception ok 13170 - $vrlex->[$lex+1][$lex+1]{$gbl}: value ok 13171 - $vrlex->[$lex+1][$lex+1]{$gbl} = 123: no exception ok 13172 - $vrlex->[$lex+1][$lex+1]{$gbl} = 123: value ok 13173 - exists $vrlex->[$lex+1][$lex+1]{$gbl}: no exception ok 13174 - exists $vrlex->[$lex+1][$lex+1]{$gbl}: value ok 13175 - delete $vrlex->[$lex+1][$lex+1]{$gbl}: no exception ok 13176 - delete $vrlex->[$lex+1][$lex+1]{$gbl}: value ok 13177 - $vrgbl->[$lex+1][$lex+1]{$gbl}: no exception ok 13178 - $vrgbl->[$lex+1][$lex+1]{$gbl}: value ok 13179 - $vrgbl->[$lex+1][$lex+1]{$gbl} = 123: no exception ok 13180 - $vrgbl->[$lex+1][$lex+1]{$gbl} = 123: value ok 13181 - exists $vrgbl->[$lex+1][$lex+1]{$gbl}: no exception ok 13182 - exists $vrgbl->[$lex+1][$lex+1]{$gbl}: value ok 13183 - delete $vrgbl->[$lex+1][$lex+1]{$gbl}: no exception ok 13184 - delete $vrgbl->[$lex+1][$lex+1]{$gbl}: value ok 13185 - $vlex{foo}[$lex+1]{$gbl}: no exception ok 13186 - $vlex{foo}[$lex+1]{$gbl}: value ok 13187 - $vlex{foo}[$lex+1]{$gbl} = 123: no exception ok 13188 - $vlex{foo}[$lex+1]{$gbl} = 123: value ok 13189 - exists $vlex{foo}[$lex+1]{$gbl}: no exception ok 13190 - exists $vlex{foo}[$lex+1]{$gbl}: value ok 13191 - delete $vlex{foo}[$lex+1]{$gbl}: no exception ok 13192 - delete $vlex{foo}[$lex+1]{$gbl}: value ok 13193 - $vgbl{foo}[$lex+1]{$gbl}: no exception ok 13194 - $vgbl{foo}[$lex+1]{$gbl}: value ok 13195 - $vgbl{foo}[$lex+1]{$gbl} = 123: no exception ok 13196 - $vgbl{foo}[$lex+1]{$gbl} = 123: value ok 13197 - exists $vgbl{foo}[$lex+1]{$gbl}: no exception ok 13198 - exists $vgbl{foo}[$lex+1]{$gbl}: value ok 13199 - delete $vgbl{foo}[$lex+1]{$gbl}: no exception ok 13200 - delete $vgbl{foo}[$lex+1]{$gbl}: value ok 13201 - $vrlex->{foo}[$lex+1]{$gbl}: no exception ok 13202 - $vrlex->{foo}[$lex+1]{$gbl}: value ok 13203 - $vrlex->{foo}[$lex+1]{$gbl} = 123: no exception ok 13204 - $vrlex->{foo}[$lex+1]{$gbl} = 123: value ok 13205 - exists $vrlex->{foo}[$lex+1]{$gbl}: no exception ok 13206 - exists $vrlex->{foo}[$lex+1]{$gbl}: value ok 13207 - delete $vrlex->{foo}[$lex+1]{$gbl}: no exception ok 13208 - delete $vrlex->{foo}[$lex+1]{$gbl}: value ok 13209 - $vrgbl->{foo}[$lex+1]{$gbl}: no exception ok 13210 - $vrgbl->{foo}[$lex+1]{$gbl}: value ok 13211 - $vrgbl->{foo}[$lex+1]{$gbl} = 123: no exception ok 13212 - $vrgbl->{foo}[$lex+1]{$gbl} = 123: value ok 13213 - exists $vrgbl->{foo}[$lex+1]{$gbl}: no exception ok 13214 - exists $vrgbl->{foo}[$lex+1]{$gbl}: value ok 13215 - delete $vrgbl->{foo}[$lex+1]{$gbl}: no exception ok 13216 - delete $vrgbl->{foo}[$lex+1]{$gbl}: value ok 13217 - $vlex{$lex}[$lex+1]{$gbl}: no exception ok 13218 - $vlex{$lex}[$lex+1]{$gbl}: value ok 13219 - $vlex{$lex}[$lex+1]{$gbl} = 123: no exception ok 13220 - $vlex{$lex}[$lex+1]{$gbl} = 123: value ok 13221 - exists $vlex{$lex}[$lex+1]{$gbl}: no exception ok 13222 - exists $vlex{$lex}[$lex+1]{$gbl}: value ok 13223 - delete $vlex{$lex}[$lex+1]{$gbl}: no exception ok 13224 - delete $vlex{$lex}[$lex+1]{$gbl}: value ok 13225 - $vgbl{$lex}[$lex+1]{$gbl}: no exception ok 13226 - $vgbl{$lex}[$lex+1]{$gbl}: value ok 13227 - $vgbl{$lex}[$lex+1]{$gbl} = 123: no exception ok 13228 - $vgbl{$lex}[$lex+1]{$gbl} = 123: value ok 13229 - exists $vgbl{$lex}[$lex+1]{$gbl}: no exception ok 13230 - exists $vgbl{$lex}[$lex+1]{$gbl}: value ok 13231 - delete $vgbl{$lex}[$lex+1]{$gbl}: no exception ok 13232 - delete $vgbl{$lex}[$lex+1]{$gbl}: value ok 13233 - $vrlex->{$lex}[$lex+1]{$gbl}: no exception ok 13234 - $vrlex->{$lex}[$lex+1]{$gbl}: value ok 13235 - $vrlex->{$lex}[$lex+1]{$gbl} = 123: no exception ok 13236 - $vrlex->{$lex}[$lex+1]{$gbl} = 123: value ok 13237 - exists $vrlex->{$lex}[$lex+1]{$gbl}: no exception ok 13238 - exists $vrlex->{$lex}[$lex+1]{$gbl}: value ok 13239 - delete $vrlex->{$lex}[$lex+1]{$gbl}: no exception ok 13240 - delete $vrlex->{$lex}[$lex+1]{$gbl}: value ok 13241 - $vrgbl->{$lex}[$lex+1]{$gbl}: no exception ok 13242 - $vrgbl->{$lex}[$lex+1]{$gbl}: value ok 13243 - $vrgbl->{$lex}[$lex+1]{$gbl} = 123: no exception ok 13244 - $vrgbl->{$lex}[$lex+1]{$gbl} = 123: value ok 13245 - exists $vrgbl->{$lex}[$lex+1]{$gbl}: no exception ok 13246 - exists $vrgbl->{$lex}[$lex+1]{$gbl}: value ok 13247 - delete $vrgbl->{$lex}[$lex+1]{$gbl}: no exception ok 13248 - delete $vrgbl->{$lex}[$lex+1]{$gbl}: value ok 13249 - $vlex{$gbl}[$lex+1]{$gbl}: no exception ok 13250 - $vlex{$gbl}[$lex+1]{$gbl}: value ok 13251 - $vlex{$gbl}[$lex+1]{$gbl} = 123: no exception ok 13252 - $vlex{$gbl}[$lex+1]{$gbl} = 123: value ok 13253 - exists $vlex{$gbl}[$lex+1]{$gbl}: no exception ok 13254 - exists $vlex{$gbl}[$lex+1]{$gbl}: value ok 13255 - delete $vlex{$gbl}[$lex+1]{$gbl}: no exception ok 13256 - delete $vlex{$gbl}[$lex+1]{$gbl}: value ok 13257 - $vgbl{$gbl}[$lex+1]{$gbl}: no exception ok 13258 - $vgbl{$gbl}[$lex+1]{$gbl}: value ok 13259 - $vgbl{$gbl}[$lex+1]{$gbl} = 123: no exception ok 13260 - $vgbl{$gbl}[$lex+1]{$gbl} = 123: value ok 13261 - exists $vgbl{$gbl}[$lex+1]{$gbl}: no exception ok 13262 - exists $vgbl{$gbl}[$lex+1]{$gbl}: value ok 13263 - delete $vgbl{$gbl}[$lex+1]{$gbl}: no exception ok 13264 - delete $vgbl{$gbl}[$lex+1]{$gbl}: value ok 13265 - $vrlex->{$gbl}[$lex+1]{$gbl}: no exception ok 13266 - $vrlex->{$gbl}[$lex+1]{$gbl}: value ok 13267 - $vrlex->{$gbl}[$lex+1]{$gbl} = 123: no exception ok 13268 - $vrlex->{$gbl}[$lex+1]{$gbl} = 123: value ok 13269 - exists $vrlex->{$gbl}[$lex+1]{$gbl}: no exception ok 13270 - exists $vrlex->{$gbl}[$lex+1]{$gbl}: value ok 13271 - delete $vrlex->{$gbl}[$lex+1]{$gbl}: no exception ok 13272 - delete $vrlex->{$gbl}[$lex+1]{$gbl}: value ok 13273 - $vrgbl->{$gbl}[$lex+1]{$gbl}: no exception ok 13274 - $vrgbl->{$gbl}[$lex+1]{$gbl}: value ok 13275 - $vrgbl->{$gbl}[$lex+1]{$gbl} = 123: no exception ok 13276 - $vrgbl->{$gbl}[$lex+1]{$gbl} = 123: value ok 13277 - exists $vrgbl->{$gbl}[$lex+1]{$gbl}: no exception ok 13278 - exists $vrgbl->{$gbl}[$lex+1]{$gbl}: value ok 13279 - delete $vrgbl->{$gbl}[$lex+1]{$gbl}: no exception ok 13280 - delete $vrgbl->{$gbl}[$lex+1]{$gbl}: value ok 13281 - $vlex{"x$lex"}[$lex+1]{$gbl}: no exception ok 13282 - $vlex{"x$lex"}[$lex+1]{$gbl}: value ok 13283 - $vlex{"x$lex"}[$lex+1]{$gbl} = 123: no exception ok 13284 - $vlex{"x$lex"}[$lex+1]{$gbl} = 123: value ok 13285 - exists $vlex{"x$lex"}[$lex+1]{$gbl}: no exception ok 13286 - exists $vlex{"x$lex"}[$lex+1]{$gbl}: value ok 13287 - delete $vlex{"x$lex"}[$lex+1]{$gbl}: no exception ok 13288 - delete $vlex{"x$lex"}[$lex+1]{$gbl}: value ok 13289 - $vgbl{"x$lex"}[$lex+1]{$gbl}: no exception ok 13290 - $vgbl{"x$lex"}[$lex+1]{$gbl}: value ok 13291 - $vgbl{"x$lex"}[$lex+1]{$gbl} = 123: no exception ok 13292 - $vgbl{"x$lex"}[$lex+1]{$gbl} = 123: value ok 13293 - exists $vgbl{"x$lex"}[$lex+1]{$gbl}: no exception ok 13294 - exists $vgbl{"x$lex"}[$lex+1]{$gbl}: value ok 13295 - delete $vgbl{"x$lex"}[$lex+1]{$gbl}: no exception ok 13296 - delete $vgbl{"x$lex"}[$lex+1]{$gbl}: value ok 13297 - $vrlex->{"x$lex"}[$lex+1]{$gbl}: no exception ok 13298 - $vrlex->{"x$lex"}[$lex+1]{$gbl}: value ok 13299 - $vrlex->{"x$lex"}[$lex+1]{$gbl} = 123: no exception ok 13300 - $vrlex->{"x$lex"}[$lex+1]{$gbl} = 123: value ok 13301 - exists $vrlex->{"x$lex"}[$lex+1]{$gbl}: no exception ok 13302 - exists $vrlex->{"x$lex"}[$lex+1]{$gbl}: value ok 13303 - delete $vrlex->{"x$lex"}[$lex+1]{$gbl}: no exception ok 13304 - delete $vrlex->{"x$lex"}[$lex+1]{$gbl}: value ok 13305 - $vrgbl->{"x$lex"}[$lex+1]{$gbl}: no exception ok 13306 - $vrgbl->{"x$lex"}[$lex+1]{$gbl}: value ok 13307 - $vrgbl->{"x$lex"}[$lex+1]{$gbl} = 123: no exception ok 13308 - $vrgbl->{"x$lex"}[$lex+1]{$gbl} = 123: value ok 13309 - exists $vrgbl->{"x$lex"}[$lex+1]{$gbl}: no exception ok 13310 - exists $vrgbl->{"x$lex"}[$lex+1]{$gbl}: value ok 13311 - delete $vrgbl->{"x$lex"}[$lex+1]{$gbl}: no exception ok 13312 - delete $vrgbl->{"x$lex"}[$lex+1]{$gbl}: value ok 13313 - $vlex[0]{foo}{$gbl}: no exception ok 13314 - $vlex[0]{foo}{$gbl}: value ok 13315 - $vlex[0]{foo}{$gbl} = 123: no exception ok 13316 - $vlex[0]{foo}{$gbl} = 123: value ok 13317 - exists $vlex[0]{foo}{$gbl}: no exception ok 13318 - exists $vlex[0]{foo}{$gbl}: value ok 13319 - delete $vlex[0]{foo}{$gbl}: no exception ok 13320 - delete $vlex[0]{foo}{$gbl}: value ok 13321 - $vgbl[0]{foo}{$gbl}: no exception ok 13322 - $vgbl[0]{foo}{$gbl}: value ok 13323 - $vgbl[0]{foo}{$gbl} = 123: no exception ok 13324 - $vgbl[0]{foo}{$gbl} = 123: value ok 13325 - exists $vgbl[0]{foo}{$gbl}: no exception ok 13326 - exists $vgbl[0]{foo}{$gbl}: value ok 13327 - delete $vgbl[0]{foo}{$gbl}: no exception ok 13328 - delete $vgbl[0]{foo}{$gbl}: value ok 13329 - $vrlex->[0]{foo}{$gbl}: no exception ok 13330 - $vrlex->[0]{foo}{$gbl}: value ok 13331 - $vrlex->[0]{foo}{$gbl} = 123: no exception ok 13332 - $vrlex->[0]{foo}{$gbl} = 123: value ok 13333 - exists $vrlex->[0]{foo}{$gbl}: no exception ok 13334 - exists $vrlex->[0]{foo}{$gbl}: value ok 13335 - delete $vrlex->[0]{foo}{$gbl}: no exception ok 13336 - delete $vrlex->[0]{foo}{$gbl}: value ok 13337 - $vrgbl->[0]{foo}{$gbl}: no exception ok 13338 - $vrgbl->[0]{foo}{$gbl}: value ok 13339 - $vrgbl->[0]{foo}{$gbl} = 123: no exception ok 13340 - $vrgbl->[0]{foo}{$gbl} = 123: value ok 13341 - exists $vrgbl->[0]{foo}{$gbl}: no exception ok 13342 - exists $vrgbl->[0]{foo}{$gbl}: value ok 13343 - delete $vrgbl->[0]{foo}{$gbl}: no exception ok 13344 - delete $vrgbl->[0]{foo}{$gbl}: value ok 13345 - $vlex[$lex]{foo}{$gbl}: no exception ok 13346 - $vlex[$lex]{foo}{$gbl}: value ok 13347 - $vlex[$lex]{foo}{$gbl} = 123: no exception ok 13348 - $vlex[$lex]{foo}{$gbl} = 123: value ok 13349 - exists $vlex[$lex]{foo}{$gbl}: no exception ok 13350 - exists $vlex[$lex]{foo}{$gbl}: value ok 13351 - delete $vlex[$lex]{foo}{$gbl}: no exception ok 13352 - delete $vlex[$lex]{foo}{$gbl}: value ok 13353 - $vgbl[$lex]{foo}{$gbl}: no exception ok 13354 - $vgbl[$lex]{foo}{$gbl}: value ok 13355 - $vgbl[$lex]{foo}{$gbl} = 123: no exception ok 13356 - $vgbl[$lex]{foo}{$gbl} = 123: value ok 13357 - exists $vgbl[$lex]{foo}{$gbl}: no exception ok 13358 - exists $vgbl[$lex]{foo}{$gbl}: value ok 13359 - delete $vgbl[$lex]{foo}{$gbl}: no exception ok 13360 - delete $vgbl[$lex]{foo}{$gbl}: value ok 13361 - $vrlex->[$lex]{foo}{$gbl}: no exception ok 13362 - $vrlex->[$lex]{foo}{$gbl}: value ok 13363 - $vrlex->[$lex]{foo}{$gbl} = 123: no exception ok 13364 - $vrlex->[$lex]{foo}{$gbl} = 123: value ok 13365 - exists $vrlex->[$lex]{foo}{$gbl}: no exception ok 13366 - exists $vrlex->[$lex]{foo}{$gbl}: value ok 13367 - delete $vrlex->[$lex]{foo}{$gbl}: no exception ok 13368 - delete $vrlex->[$lex]{foo}{$gbl}: value ok 13369 - $vrgbl->[$lex]{foo}{$gbl}: no exception ok 13370 - $vrgbl->[$lex]{foo}{$gbl}: value ok 13371 - $vrgbl->[$lex]{foo}{$gbl} = 123: no exception ok 13372 - $vrgbl->[$lex]{foo}{$gbl} = 123: value ok 13373 - exists $vrgbl->[$lex]{foo}{$gbl}: no exception ok 13374 - exists $vrgbl->[$lex]{foo}{$gbl}: value ok 13375 - delete $vrgbl->[$lex]{foo}{$gbl}: no exception ok 13376 - delete $vrgbl->[$lex]{foo}{$gbl}: value ok 13377 - $vlex[$gbl]{foo}{$gbl}: no exception ok 13378 - $vlex[$gbl]{foo}{$gbl}: value ok 13379 - $vlex[$gbl]{foo}{$gbl} = 123: no exception ok 13380 - $vlex[$gbl]{foo}{$gbl} = 123: value ok 13381 - exists $vlex[$gbl]{foo}{$gbl}: no exception ok 13382 - exists $vlex[$gbl]{foo}{$gbl}: value ok 13383 - delete $vlex[$gbl]{foo}{$gbl}: no exception ok 13384 - delete $vlex[$gbl]{foo}{$gbl}: value ok 13385 - $vgbl[$gbl]{foo}{$gbl}: no exception ok 13386 - $vgbl[$gbl]{foo}{$gbl}: value ok 13387 - $vgbl[$gbl]{foo}{$gbl} = 123: no exception ok 13388 - $vgbl[$gbl]{foo}{$gbl} = 123: value ok 13389 - exists $vgbl[$gbl]{foo}{$gbl}: no exception ok 13390 - exists $vgbl[$gbl]{foo}{$gbl}: value ok 13391 - delete $vgbl[$gbl]{foo}{$gbl}: no exception ok 13392 - delete $vgbl[$gbl]{foo}{$gbl}: value ok 13393 - $vrlex->[$gbl]{foo}{$gbl}: no exception ok 13394 - $vrlex->[$gbl]{foo}{$gbl}: value ok 13395 - $vrlex->[$gbl]{foo}{$gbl} = 123: no exception ok 13396 - $vrlex->[$gbl]{foo}{$gbl} = 123: value ok 13397 - exists $vrlex->[$gbl]{foo}{$gbl}: no exception ok 13398 - exists $vrlex->[$gbl]{foo}{$gbl}: value ok 13399 - delete $vrlex->[$gbl]{foo}{$gbl}: no exception ok 13400 - delete $vrlex->[$gbl]{foo}{$gbl}: value ok 13401 - $vrgbl->[$gbl]{foo}{$gbl}: no exception ok 13402 - $vrgbl->[$gbl]{foo}{$gbl}: value ok 13403 - $vrgbl->[$gbl]{foo}{$gbl} = 123: no exception ok 13404 - $vrgbl->[$gbl]{foo}{$gbl} = 123: value ok 13405 - exists $vrgbl->[$gbl]{foo}{$gbl}: no exception ok 13406 - exists $vrgbl->[$gbl]{foo}{$gbl}: value ok 13407 - delete $vrgbl->[$gbl]{foo}{$gbl}: no exception ok 13408 - delete $vrgbl->[$gbl]{foo}{$gbl}: value ok 13409 - $vlex[$lex+1]{foo}{$gbl}: no exception ok 13410 - $vlex[$lex+1]{foo}{$gbl}: value ok 13411 - $vlex[$lex+1]{foo}{$gbl} = 123: no exception ok 13412 - $vlex[$lex+1]{foo}{$gbl} = 123: value ok 13413 - exists $vlex[$lex+1]{foo}{$gbl}: no exception ok 13414 - exists $vlex[$lex+1]{foo}{$gbl}: value ok 13415 - delete $vlex[$lex+1]{foo}{$gbl}: no exception ok 13416 - delete $vlex[$lex+1]{foo}{$gbl}: value ok 13417 - $vgbl[$lex+1]{foo}{$gbl}: no exception ok 13418 - $vgbl[$lex+1]{foo}{$gbl}: value ok 13419 - $vgbl[$lex+1]{foo}{$gbl} = 123: no exception ok 13420 - $vgbl[$lex+1]{foo}{$gbl} = 123: value ok 13421 - exists $vgbl[$lex+1]{foo}{$gbl}: no exception ok 13422 - exists $vgbl[$lex+1]{foo}{$gbl}: value ok 13423 - delete $vgbl[$lex+1]{foo}{$gbl}: no exception ok 13424 - delete $vgbl[$lex+1]{foo}{$gbl}: value ok 13425 - $vrlex->[$lex+1]{foo}{$gbl}: no exception ok 13426 - $vrlex->[$lex+1]{foo}{$gbl}: value ok 13427 - $vrlex->[$lex+1]{foo}{$gbl} = 123: no exception ok 13428 - $vrlex->[$lex+1]{foo}{$gbl} = 123: value ok 13429 - exists $vrlex->[$lex+1]{foo}{$gbl}: no exception ok 13430 - exists $vrlex->[$lex+1]{foo}{$gbl}: value ok 13431 - delete $vrlex->[$lex+1]{foo}{$gbl}: no exception ok 13432 - delete $vrlex->[$lex+1]{foo}{$gbl}: value ok 13433 - $vrgbl->[$lex+1]{foo}{$gbl}: no exception ok 13434 - $vrgbl->[$lex+1]{foo}{$gbl}: value ok 13435 - $vrgbl->[$lex+1]{foo}{$gbl} = 123: no exception ok 13436 - $vrgbl->[$lex+1]{foo}{$gbl} = 123: value ok 13437 - exists $vrgbl->[$lex+1]{foo}{$gbl}: no exception ok 13438 - exists $vrgbl->[$lex+1]{foo}{$gbl}: value ok 13439 - delete $vrgbl->[$lex+1]{foo}{$gbl}: no exception ok 13440 - delete $vrgbl->[$lex+1]{foo}{$gbl}: value ok 13441 - $vlex{foo}{foo}{$gbl}: no exception ok 13442 - $vlex{foo}{foo}{$gbl}: value ok 13443 - $vlex{foo}{foo}{$gbl} = 123: no exception ok 13444 - $vlex{foo}{foo}{$gbl} = 123: value ok 13445 - exists $vlex{foo}{foo}{$gbl}: no exception ok 13446 - exists $vlex{foo}{foo}{$gbl}: value ok 13447 - delete $vlex{foo}{foo}{$gbl}: no exception ok 13448 - delete $vlex{foo}{foo}{$gbl}: value ok 13449 - $vgbl{foo}{foo}{$gbl}: no exception ok 13450 - $vgbl{foo}{foo}{$gbl}: value ok 13451 - $vgbl{foo}{foo}{$gbl} = 123: no exception ok 13452 - $vgbl{foo}{foo}{$gbl} = 123: value ok 13453 - exists $vgbl{foo}{foo}{$gbl}: no exception ok 13454 - exists $vgbl{foo}{foo}{$gbl}: value ok 13455 - delete $vgbl{foo}{foo}{$gbl}: no exception ok 13456 - delete $vgbl{foo}{foo}{$gbl}: value ok 13457 - $vrlex->{foo}{foo}{$gbl}: no exception ok 13458 - $vrlex->{foo}{foo}{$gbl}: value ok 13459 - $vrlex->{foo}{foo}{$gbl} = 123: no exception ok 13460 - $vrlex->{foo}{foo}{$gbl} = 123: value ok 13461 - exists $vrlex->{foo}{foo}{$gbl}: no exception ok 13462 - exists $vrlex->{foo}{foo}{$gbl}: value ok 13463 - delete $vrlex->{foo}{foo}{$gbl}: no exception ok 13464 - delete $vrlex->{foo}{foo}{$gbl}: value ok 13465 - $vrgbl->{foo}{foo}{$gbl}: no exception ok 13466 - $vrgbl->{foo}{foo}{$gbl}: value ok 13467 - $vrgbl->{foo}{foo}{$gbl} = 123: no exception ok 13468 - $vrgbl->{foo}{foo}{$gbl} = 123: value ok 13469 - exists $vrgbl->{foo}{foo}{$gbl}: no exception ok 13470 - exists $vrgbl->{foo}{foo}{$gbl}: value ok 13471 - delete $vrgbl->{foo}{foo}{$gbl}: no exception ok 13472 - delete $vrgbl->{foo}{foo}{$gbl}: value ok 13473 - $vlex{$lex}{foo}{$gbl}: no exception ok 13474 - $vlex{$lex}{foo}{$gbl}: value ok 13475 - $vlex{$lex}{foo}{$gbl} = 123: no exception ok 13476 - $vlex{$lex}{foo}{$gbl} = 123: value ok 13477 - exists $vlex{$lex}{foo}{$gbl}: no exception ok 13478 - exists $vlex{$lex}{foo}{$gbl}: value ok 13479 - delete $vlex{$lex}{foo}{$gbl}: no exception ok 13480 - delete $vlex{$lex}{foo}{$gbl}: value ok 13481 - $vgbl{$lex}{foo}{$gbl}: no exception ok 13482 - $vgbl{$lex}{foo}{$gbl}: value ok 13483 - $vgbl{$lex}{foo}{$gbl} = 123: no exception ok 13484 - $vgbl{$lex}{foo}{$gbl} = 123: value ok 13485 - exists $vgbl{$lex}{foo}{$gbl}: no exception ok 13486 - exists $vgbl{$lex}{foo}{$gbl}: value ok 13487 - delete $vgbl{$lex}{foo}{$gbl}: no exception ok 13488 - delete $vgbl{$lex}{foo}{$gbl}: value ok 13489 - $vrlex->{$lex}{foo}{$gbl}: no exception ok 13490 - $vrlex->{$lex}{foo}{$gbl}: value ok 13491 - $vrlex->{$lex}{foo}{$gbl} = 123: no exception ok 13492 - $vrlex->{$lex}{foo}{$gbl} = 123: value ok 13493 - exists $vrlex->{$lex}{foo}{$gbl}: no exception ok 13494 - exists $vrlex->{$lex}{foo}{$gbl}: value ok 13495 - delete $vrlex->{$lex}{foo}{$gbl}: no exception ok 13496 - delete $vrlex->{$lex}{foo}{$gbl}: value ok 13497 - $vrgbl->{$lex}{foo}{$gbl}: no exception ok 13498 - $vrgbl->{$lex}{foo}{$gbl}: value ok 13499 - $vrgbl->{$lex}{foo}{$gbl} = 123: no exception ok 13500 - $vrgbl->{$lex}{foo}{$gbl} = 123: value ok 13501 - exists $vrgbl->{$lex}{foo}{$gbl}: no exception ok 13502 - exists $vrgbl->{$lex}{foo}{$gbl}: value ok 13503 - delete $vrgbl->{$lex}{foo}{$gbl}: no exception ok 13504 - delete $vrgbl->{$lex}{foo}{$gbl}: value ok 13505 - $vlex{$gbl}{foo}{$gbl}: no exception ok 13506 - $vlex{$gbl}{foo}{$gbl}: value ok 13507 - $vlex{$gbl}{foo}{$gbl} = 123: no exception ok 13508 - $vlex{$gbl}{foo}{$gbl} = 123: value ok 13509 - exists $vlex{$gbl}{foo}{$gbl}: no exception ok 13510 - exists $vlex{$gbl}{foo}{$gbl}: value ok 13511 - delete $vlex{$gbl}{foo}{$gbl}: no exception ok 13512 - delete $vlex{$gbl}{foo}{$gbl}: value ok 13513 - $vgbl{$gbl}{foo}{$gbl}: no exception ok 13514 - $vgbl{$gbl}{foo}{$gbl}: value ok 13515 - $vgbl{$gbl}{foo}{$gbl} = 123: no exception ok 13516 - $vgbl{$gbl}{foo}{$gbl} = 123: value ok 13517 - exists $vgbl{$gbl}{foo}{$gbl}: no exception ok 13518 - exists $vgbl{$gbl}{foo}{$gbl}: value ok 13519 - delete $vgbl{$gbl}{foo}{$gbl}: no exception ok 13520 - delete $vgbl{$gbl}{foo}{$gbl}: value ok 13521 - $vrlex->{$gbl}{foo}{$gbl}: no exception ok 13522 - $vrlex->{$gbl}{foo}{$gbl}: value ok 13523 - $vrlex->{$gbl}{foo}{$gbl} = 123: no exception ok 13524 - $vrlex->{$gbl}{foo}{$gbl} = 123: value ok 13525 - exists $vrlex->{$gbl}{foo}{$gbl}: no exception ok 13526 - exists $vrlex->{$gbl}{foo}{$gbl}: value ok 13527 - delete $vrlex->{$gbl}{foo}{$gbl}: no exception ok 13528 - delete $vrlex->{$gbl}{foo}{$gbl}: value ok 13529 - $vrgbl->{$gbl}{foo}{$gbl}: no exception ok 13530 - $vrgbl->{$gbl}{foo}{$gbl}: value ok 13531 - $vrgbl->{$gbl}{foo}{$gbl} = 123: no exception ok 13532 - $vrgbl->{$gbl}{foo}{$gbl} = 123: value ok 13533 - exists $vrgbl->{$gbl}{foo}{$gbl}: no exception ok 13534 - exists $vrgbl->{$gbl}{foo}{$gbl}: value ok 13535 - delete $vrgbl->{$gbl}{foo}{$gbl}: no exception ok 13536 - delete $vrgbl->{$gbl}{foo}{$gbl}: value ok 13537 - $vlex{"x$lex"}{foo}{$gbl}: no exception ok 13538 - $vlex{"x$lex"}{foo}{$gbl}: value ok 13539 - $vlex{"x$lex"}{foo}{$gbl} = 123: no exception ok 13540 - $vlex{"x$lex"}{foo}{$gbl} = 123: value ok 13541 - exists $vlex{"x$lex"}{foo}{$gbl}: no exception ok 13542 - exists $vlex{"x$lex"}{foo}{$gbl}: value ok 13543 - delete $vlex{"x$lex"}{foo}{$gbl}: no exception ok 13544 - delete $vlex{"x$lex"}{foo}{$gbl}: value ok 13545 - $vgbl{"x$lex"}{foo}{$gbl}: no exception ok 13546 - $vgbl{"x$lex"}{foo}{$gbl}: value ok 13547 - $vgbl{"x$lex"}{foo}{$gbl} = 123: no exception ok 13548 - $vgbl{"x$lex"}{foo}{$gbl} = 123: value ok 13549 - exists $vgbl{"x$lex"}{foo}{$gbl}: no exception ok 13550 - exists $vgbl{"x$lex"}{foo}{$gbl}: value ok 13551 - delete $vgbl{"x$lex"}{foo}{$gbl}: no exception ok 13552 - delete $vgbl{"x$lex"}{foo}{$gbl}: value ok 13553 - $vrlex->{"x$lex"}{foo}{$gbl}: no exception ok 13554 - $vrlex->{"x$lex"}{foo}{$gbl}: value ok 13555 - $vrlex->{"x$lex"}{foo}{$gbl} = 123: no exception ok 13556 - $vrlex->{"x$lex"}{foo}{$gbl} = 123: value ok 13557 - exists $vrlex->{"x$lex"}{foo}{$gbl}: no exception ok 13558 - exists $vrlex->{"x$lex"}{foo}{$gbl}: value ok 13559 - delete $vrlex->{"x$lex"}{foo}{$gbl}: no exception ok 13560 - delete $vrlex->{"x$lex"}{foo}{$gbl}: value ok 13561 - $vrgbl->{"x$lex"}{foo}{$gbl}: no exception ok 13562 - $vrgbl->{"x$lex"}{foo}{$gbl}: value ok 13563 - $vrgbl->{"x$lex"}{foo}{$gbl} = 123: no exception ok 13564 - $vrgbl->{"x$lex"}{foo}{$gbl} = 123: value ok 13565 - exists $vrgbl->{"x$lex"}{foo}{$gbl}: no exception ok 13566 - exists $vrgbl->{"x$lex"}{foo}{$gbl}: value ok 13567 - delete $vrgbl->{"x$lex"}{foo}{$gbl}: no exception ok 13568 - delete $vrgbl->{"x$lex"}{foo}{$gbl}: value ok 13569 - $vlex[0]{$lex}{$gbl}: no exception ok 13570 - $vlex[0]{$lex}{$gbl}: value ok 13571 - $vlex[0]{$lex}{$gbl} = 123: no exception ok 13572 - $vlex[0]{$lex}{$gbl} = 123: value ok 13573 - exists $vlex[0]{$lex}{$gbl}: no exception ok 13574 - exists $vlex[0]{$lex}{$gbl}: value ok 13575 - delete $vlex[0]{$lex}{$gbl}: no exception ok 13576 - delete $vlex[0]{$lex}{$gbl}: value ok 13577 - $vgbl[0]{$lex}{$gbl}: no exception ok 13578 - $vgbl[0]{$lex}{$gbl}: value ok 13579 - $vgbl[0]{$lex}{$gbl} = 123: no exception ok 13580 - $vgbl[0]{$lex}{$gbl} = 123: value ok 13581 - exists $vgbl[0]{$lex}{$gbl}: no exception ok 13582 - exists $vgbl[0]{$lex}{$gbl}: value ok 13583 - delete $vgbl[0]{$lex}{$gbl}: no exception ok 13584 - delete $vgbl[0]{$lex}{$gbl}: value ok 13585 - $vrlex->[0]{$lex}{$gbl}: no exception ok 13586 - $vrlex->[0]{$lex}{$gbl}: value ok 13587 - $vrlex->[0]{$lex}{$gbl} = 123: no exception ok 13588 - $vrlex->[0]{$lex}{$gbl} = 123: value ok 13589 - exists $vrlex->[0]{$lex}{$gbl}: no exception ok 13590 - exists $vrlex->[0]{$lex}{$gbl}: value ok 13591 - delete $vrlex->[0]{$lex}{$gbl}: no exception ok 13592 - delete $vrlex->[0]{$lex}{$gbl}: value ok 13593 - $vrgbl->[0]{$lex}{$gbl}: no exception ok 13594 - $vrgbl->[0]{$lex}{$gbl}: value ok 13595 - $vrgbl->[0]{$lex}{$gbl} = 123: no exception ok 13596 - $vrgbl->[0]{$lex}{$gbl} = 123: value ok 13597 - exists $vrgbl->[0]{$lex}{$gbl}: no exception ok 13598 - exists $vrgbl->[0]{$lex}{$gbl}: value ok 13599 - delete $vrgbl->[0]{$lex}{$gbl}: no exception ok 13600 - delete $vrgbl->[0]{$lex}{$gbl}: value ok 13601 - $vlex[$lex]{$lex}{$gbl}: no exception ok 13602 - $vlex[$lex]{$lex}{$gbl}: value ok 13603 - $vlex[$lex]{$lex}{$gbl} = 123: no exception ok 13604 - $vlex[$lex]{$lex}{$gbl} = 123: value ok 13605 - exists $vlex[$lex]{$lex}{$gbl}: no exception ok 13606 - exists $vlex[$lex]{$lex}{$gbl}: value ok 13607 - delete $vlex[$lex]{$lex}{$gbl}: no exception ok 13608 - delete $vlex[$lex]{$lex}{$gbl}: value ok 13609 - $vgbl[$lex]{$lex}{$gbl}: no exception ok 13610 - $vgbl[$lex]{$lex}{$gbl}: value ok 13611 - $vgbl[$lex]{$lex}{$gbl} = 123: no exception ok 13612 - $vgbl[$lex]{$lex}{$gbl} = 123: value ok 13613 - exists $vgbl[$lex]{$lex}{$gbl}: no exception ok 13614 - exists $vgbl[$lex]{$lex}{$gbl}: value ok 13615 - delete $vgbl[$lex]{$lex}{$gbl}: no exception ok 13616 - delete $vgbl[$lex]{$lex}{$gbl}: value ok 13617 - $vrlex->[$lex]{$lex}{$gbl}: no exception ok 13618 - $vrlex->[$lex]{$lex}{$gbl}: value ok 13619 - $vrlex->[$lex]{$lex}{$gbl} = 123: no exception ok 13620 - $vrlex->[$lex]{$lex}{$gbl} = 123: value ok 13621 - exists $vrlex->[$lex]{$lex}{$gbl}: no exception ok 13622 - exists $vrlex->[$lex]{$lex}{$gbl}: value ok 13623 - delete $vrlex->[$lex]{$lex}{$gbl}: no exception ok 13624 - delete $vrlex->[$lex]{$lex}{$gbl}: value ok 13625 - $vrgbl->[$lex]{$lex}{$gbl}: no exception ok 13626 - $vrgbl->[$lex]{$lex}{$gbl}: value ok 13627 - $vrgbl->[$lex]{$lex}{$gbl} = 123: no exception ok 13628 - $vrgbl->[$lex]{$lex}{$gbl} = 123: value ok 13629 - exists $vrgbl->[$lex]{$lex}{$gbl}: no exception ok 13630 - exists $vrgbl->[$lex]{$lex}{$gbl}: value ok 13631 - delete $vrgbl->[$lex]{$lex}{$gbl}: no exception ok 13632 - delete $vrgbl->[$lex]{$lex}{$gbl}: value ok 13633 - $vlex[$gbl]{$lex}{$gbl}: no exception ok 13634 - $vlex[$gbl]{$lex}{$gbl}: value ok 13635 - $vlex[$gbl]{$lex}{$gbl} = 123: no exception ok 13636 - $vlex[$gbl]{$lex}{$gbl} = 123: value ok 13637 - exists $vlex[$gbl]{$lex}{$gbl}: no exception ok 13638 - exists $vlex[$gbl]{$lex}{$gbl}: value ok 13639 - delete $vlex[$gbl]{$lex}{$gbl}: no exception ok 13640 - delete $vlex[$gbl]{$lex}{$gbl}: value ok 13641 - $vgbl[$gbl]{$lex}{$gbl}: no exception ok 13642 - $vgbl[$gbl]{$lex}{$gbl}: value ok 13643 - $vgbl[$gbl]{$lex}{$gbl} = 123: no exception ok 13644 - $vgbl[$gbl]{$lex}{$gbl} = 123: value ok 13645 - exists $vgbl[$gbl]{$lex}{$gbl}: no exception ok 13646 - exists $vgbl[$gbl]{$lex}{$gbl}: value ok 13647 - delete $vgbl[$gbl]{$lex}{$gbl}: no exception ok 13648 - delete $vgbl[$gbl]{$lex}{$gbl}: value ok 13649 - $vrlex->[$gbl]{$lex}{$gbl}: no exception ok 13650 - $vrlex->[$gbl]{$lex}{$gbl}: value ok 13651 - $vrlex->[$gbl]{$lex}{$gbl} = 123: no exception ok 13652 - $vrlex->[$gbl]{$lex}{$gbl} = 123: value ok 13653 - exists $vrlex->[$gbl]{$lex}{$gbl}: no exception ok 13654 - exists $vrlex->[$gbl]{$lex}{$gbl}: value ok 13655 - delete $vrlex->[$gbl]{$lex}{$gbl}: no exception ok 13656 - delete $vrlex->[$gbl]{$lex}{$gbl}: value ok 13657 - $vrgbl->[$gbl]{$lex}{$gbl}: no exception ok 13658 - $vrgbl->[$gbl]{$lex}{$gbl}: value ok 13659 - $vrgbl->[$gbl]{$lex}{$gbl} = 123: no exception ok 13660 - $vrgbl->[$gbl]{$lex}{$gbl} = 123: value ok 13661 - exists $vrgbl->[$gbl]{$lex}{$gbl}: no exception ok 13662 - exists $vrgbl->[$gbl]{$lex}{$gbl}: value ok 13663 - delete $vrgbl->[$gbl]{$lex}{$gbl}: no exception ok 13664 - delete $vrgbl->[$gbl]{$lex}{$gbl}: value ok 13665 - $vlex[$lex+1]{$lex}{$gbl}: no exception ok 13666 - $vlex[$lex+1]{$lex}{$gbl}: value ok 13667 - $vlex[$lex+1]{$lex}{$gbl} = 123: no exception ok 13668 - $vlex[$lex+1]{$lex}{$gbl} = 123: value ok 13669 - exists $vlex[$lex+1]{$lex}{$gbl}: no exception ok 13670 - exists $vlex[$lex+1]{$lex}{$gbl}: value ok 13671 - delete $vlex[$lex+1]{$lex}{$gbl}: no exception ok 13672 - delete $vlex[$lex+1]{$lex}{$gbl}: value ok 13673 - $vgbl[$lex+1]{$lex}{$gbl}: no exception ok 13674 - $vgbl[$lex+1]{$lex}{$gbl}: value ok 13675 - $vgbl[$lex+1]{$lex}{$gbl} = 123: no exception ok 13676 - $vgbl[$lex+1]{$lex}{$gbl} = 123: value ok 13677 - exists $vgbl[$lex+1]{$lex}{$gbl}: no exception ok 13678 - exists $vgbl[$lex+1]{$lex}{$gbl}: value ok 13679 - delete $vgbl[$lex+1]{$lex}{$gbl}: no exception ok 13680 - delete $vgbl[$lex+1]{$lex}{$gbl}: value ok 13681 - $vrlex->[$lex+1]{$lex}{$gbl}: no exception ok 13682 - $vrlex->[$lex+1]{$lex}{$gbl}: value ok 13683 - $vrlex->[$lex+1]{$lex}{$gbl} = 123: no exception ok 13684 - $vrlex->[$lex+1]{$lex}{$gbl} = 123: value ok 13685 - exists $vrlex->[$lex+1]{$lex}{$gbl}: no exception ok 13686 - exists $vrlex->[$lex+1]{$lex}{$gbl}: value ok 13687 - delete $vrlex->[$lex+1]{$lex}{$gbl}: no exception ok 13688 - delete $vrlex->[$lex+1]{$lex}{$gbl}: value ok 13689 - $vrgbl->[$lex+1]{$lex}{$gbl}: no exception ok 13690 - $vrgbl->[$lex+1]{$lex}{$gbl}: value ok 13691 - $vrgbl->[$lex+1]{$lex}{$gbl} = 123: no exception ok 13692 - $vrgbl->[$lex+1]{$lex}{$gbl} = 123: value ok 13693 - exists $vrgbl->[$lex+1]{$lex}{$gbl}: no exception ok 13694 - exists $vrgbl->[$lex+1]{$lex}{$gbl}: value ok 13695 - delete $vrgbl->[$lex+1]{$lex}{$gbl}: no exception ok 13696 - delete $vrgbl->[$lex+1]{$lex}{$gbl}: value ok 13697 - $vlex{foo}{$lex}{$gbl}: no exception ok 13698 - $vlex{foo}{$lex}{$gbl}: value ok 13699 - $vlex{foo}{$lex}{$gbl} = 123: no exception ok 13700 - $vlex{foo}{$lex}{$gbl} = 123: value ok 13701 - exists $vlex{foo}{$lex}{$gbl}: no exception ok 13702 - exists $vlex{foo}{$lex}{$gbl}: value ok 13703 - delete $vlex{foo}{$lex}{$gbl}: no exception ok 13704 - delete $vlex{foo}{$lex}{$gbl}: value ok 13705 - $vgbl{foo}{$lex}{$gbl}: no exception ok 13706 - $vgbl{foo}{$lex}{$gbl}: value ok 13707 - $vgbl{foo}{$lex}{$gbl} = 123: no exception ok 13708 - $vgbl{foo}{$lex}{$gbl} = 123: value ok 13709 - exists $vgbl{foo}{$lex}{$gbl}: no exception ok 13710 - exists $vgbl{foo}{$lex}{$gbl}: value ok 13711 - delete $vgbl{foo}{$lex}{$gbl}: no exception ok 13712 - delete $vgbl{foo}{$lex}{$gbl}: value ok 13713 - $vrlex->{foo}{$lex}{$gbl}: no exception ok 13714 - $vrlex->{foo}{$lex}{$gbl}: value ok 13715 - $vrlex->{foo}{$lex}{$gbl} = 123: no exception ok 13716 - $vrlex->{foo}{$lex}{$gbl} = 123: value ok 13717 - exists $vrlex->{foo}{$lex}{$gbl}: no exception ok 13718 - exists $vrlex->{foo}{$lex}{$gbl}: value ok 13719 - delete $vrlex->{foo}{$lex}{$gbl}: no exception ok 13720 - delete $vrlex->{foo}{$lex}{$gbl}: value ok 13721 - $vrgbl->{foo}{$lex}{$gbl}: no exception ok 13722 - $vrgbl->{foo}{$lex}{$gbl}: value ok 13723 - $vrgbl->{foo}{$lex}{$gbl} = 123: no exception ok 13724 - $vrgbl->{foo}{$lex}{$gbl} = 123: value ok 13725 - exists $vrgbl->{foo}{$lex}{$gbl}: no exception ok 13726 - exists $vrgbl->{foo}{$lex}{$gbl}: value ok 13727 - delete $vrgbl->{foo}{$lex}{$gbl}: no exception ok 13728 - delete $vrgbl->{foo}{$lex}{$gbl}: value ok 13729 - $vlex{$lex}{$lex}{$gbl}: no exception ok 13730 - $vlex{$lex}{$lex}{$gbl}: value ok 13731 - $vlex{$lex}{$lex}{$gbl} = 123: no exception ok 13732 - $vlex{$lex}{$lex}{$gbl} = 123: value ok 13733 - exists $vlex{$lex}{$lex}{$gbl}: no exception ok 13734 - exists $vlex{$lex}{$lex}{$gbl}: value ok 13735 - delete $vlex{$lex}{$lex}{$gbl}: no exception ok 13736 - delete $vlex{$lex}{$lex}{$gbl}: value ok 13737 - $vgbl{$lex}{$lex}{$gbl}: no exception ok 13738 - $vgbl{$lex}{$lex}{$gbl}: value ok 13739 - $vgbl{$lex}{$lex}{$gbl} = 123: no exception ok 13740 - $vgbl{$lex}{$lex}{$gbl} = 123: value ok 13741 - exists $vgbl{$lex}{$lex}{$gbl}: no exception ok 13742 - exists $vgbl{$lex}{$lex}{$gbl}: value ok 13743 - delete $vgbl{$lex}{$lex}{$gbl}: no exception ok 13744 - delete $vgbl{$lex}{$lex}{$gbl}: value ok 13745 - $vrlex->{$lex}{$lex}{$gbl}: no exception ok 13746 - $vrlex->{$lex}{$lex}{$gbl}: value ok 13747 - $vrlex->{$lex}{$lex}{$gbl} = 123: no exception ok 13748 - $vrlex->{$lex}{$lex}{$gbl} = 123: value ok 13749 - exists $vrlex->{$lex}{$lex}{$gbl}: no exception ok 13750 - exists $vrlex->{$lex}{$lex}{$gbl}: value ok 13751 - delete $vrlex->{$lex}{$lex}{$gbl}: no exception ok 13752 - delete $vrlex->{$lex}{$lex}{$gbl}: value ok 13753 - $vrgbl->{$lex}{$lex}{$gbl}: no exception ok 13754 - $vrgbl->{$lex}{$lex}{$gbl}: value ok 13755 - $vrgbl->{$lex}{$lex}{$gbl} = 123: no exception ok 13756 - $vrgbl->{$lex}{$lex}{$gbl} = 123: value ok 13757 - exists $vrgbl->{$lex}{$lex}{$gbl}: no exception ok 13758 - exists $vrgbl->{$lex}{$lex}{$gbl}: value ok 13759 - delete $vrgbl->{$lex}{$lex}{$gbl}: no exception ok 13760 - delete $vrgbl->{$lex}{$lex}{$gbl}: value ok 13761 - $vlex{$gbl}{$lex}{$gbl}: no exception ok 13762 - $vlex{$gbl}{$lex}{$gbl}: value ok 13763 - $vlex{$gbl}{$lex}{$gbl} = 123: no exception ok 13764 - $vlex{$gbl}{$lex}{$gbl} = 123: value ok 13765 - exists $vlex{$gbl}{$lex}{$gbl}: no exception ok 13766 - exists $vlex{$gbl}{$lex}{$gbl}: value ok 13767 - delete $vlex{$gbl}{$lex}{$gbl}: no exception ok 13768 - delete $vlex{$gbl}{$lex}{$gbl}: value ok 13769 - $vgbl{$gbl}{$lex}{$gbl}: no exception ok 13770 - $vgbl{$gbl}{$lex}{$gbl}: value ok 13771 - $vgbl{$gbl}{$lex}{$gbl} = 123: no exception ok 13772 - $vgbl{$gbl}{$lex}{$gbl} = 123: value ok 13773 - exists $vgbl{$gbl}{$lex}{$gbl}: no exception ok 13774 - exists $vgbl{$gbl}{$lex}{$gbl}: value ok 13775 - delete $vgbl{$gbl}{$lex}{$gbl}: no exception ok 13776 - delete $vgbl{$gbl}{$lex}{$gbl}: value ok 13777 - $vrlex->{$gbl}{$lex}{$gbl}: no exception ok 13778 - $vrlex->{$gbl}{$lex}{$gbl}: value ok 13779 - $vrlex->{$gbl}{$lex}{$gbl} = 123: no exception ok 13780 - $vrlex->{$gbl}{$lex}{$gbl} = 123: value ok 13781 - exists $vrlex->{$gbl}{$lex}{$gbl}: no exception ok 13782 - exists $vrlex->{$gbl}{$lex}{$gbl}: value ok 13783 - delete $vrlex->{$gbl}{$lex}{$gbl}: no exception ok 13784 - delete $vrlex->{$gbl}{$lex}{$gbl}: value ok 13785 - $vrgbl->{$gbl}{$lex}{$gbl}: no exception ok 13786 - $vrgbl->{$gbl}{$lex}{$gbl}: value ok 13787 - $vrgbl->{$gbl}{$lex}{$gbl} = 123: no exception ok 13788 - $vrgbl->{$gbl}{$lex}{$gbl} = 123: value ok 13789 - exists $vrgbl->{$gbl}{$lex}{$gbl}: no exception ok 13790 - exists $vrgbl->{$gbl}{$lex}{$gbl}: value ok 13791 - delete $vrgbl->{$gbl}{$lex}{$gbl}: no exception ok 13792 - delete $vrgbl->{$gbl}{$lex}{$gbl}: value ok 13793 - $vlex{"x$lex"}{$lex}{$gbl}: no exception ok 13794 - $vlex{"x$lex"}{$lex}{$gbl}: value ok 13795 - $vlex{"x$lex"}{$lex}{$gbl} = 123: no exception ok 13796 - $vlex{"x$lex"}{$lex}{$gbl} = 123: value ok 13797 - exists $vlex{"x$lex"}{$lex}{$gbl}: no exception ok 13798 - exists $vlex{"x$lex"}{$lex}{$gbl}: value ok 13799 - delete $vlex{"x$lex"}{$lex}{$gbl}: no exception ok 13800 - delete $vlex{"x$lex"}{$lex}{$gbl}: value ok 13801 - $vgbl{"x$lex"}{$lex}{$gbl}: no exception ok 13802 - $vgbl{"x$lex"}{$lex}{$gbl}: value ok 13803 - $vgbl{"x$lex"}{$lex}{$gbl} = 123: no exception ok 13804 - $vgbl{"x$lex"}{$lex}{$gbl} = 123: value ok 13805 - exists $vgbl{"x$lex"}{$lex}{$gbl}: no exception ok 13806 - exists $vgbl{"x$lex"}{$lex}{$gbl}: value ok 13807 - delete $vgbl{"x$lex"}{$lex}{$gbl}: no exception ok 13808 - delete $vgbl{"x$lex"}{$lex}{$gbl}: value ok 13809 - $vrlex->{"x$lex"}{$lex}{$gbl}: no exception ok 13810 - $vrlex->{"x$lex"}{$lex}{$gbl}: value ok 13811 - $vrlex->{"x$lex"}{$lex}{$gbl} = 123: no exception ok 13812 - $vrlex->{"x$lex"}{$lex}{$gbl} = 123: value ok 13813 - exists $vrlex->{"x$lex"}{$lex}{$gbl}: no exception ok 13814 - exists $vrlex->{"x$lex"}{$lex}{$gbl}: value ok 13815 - delete $vrlex->{"x$lex"}{$lex}{$gbl}: no exception ok 13816 - delete $vrlex->{"x$lex"}{$lex}{$gbl}: value ok 13817 - $vrgbl->{"x$lex"}{$lex}{$gbl}: no exception ok 13818 - $vrgbl->{"x$lex"}{$lex}{$gbl}: value ok 13819 - $vrgbl->{"x$lex"}{$lex}{$gbl} = 123: no exception ok 13820 - $vrgbl->{"x$lex"}{$lex}{$gbl} = 123: value ok 13821 - exists $vrgbl->{"x$lex"}{$lex}{$gbl}: no exception ok 13822 - exists $vrgbl->{"x$lex"}{$lex}{$gbl}: value ok 13823 - delete $vrgbl->{"x$lex"}{$lex}{$gbl}: no exception ok 13824 - delete $vrgbl->{"x$lex"}{$lex}{$gbl}: value ok 13825 - $vlex[0]{$gbl}{$gbl}: no exception ok 13826 - $vlex[0]{$gbl}{$gbl}: value ok 13827 - $vlex[0]{$gbl}{$gbl} = 123: no exception ok 13828 - $vlex[0]{$gbl}{$gbl} = 123: value ok 13829 - exists $vlex[0]{$gbl}{$gbl}: no exception ok 13830 - exists $vlex[0]{$gbl}{$gbl}: value ok 13831 - delete $vlex[0]{$gbl}{$gbl}: no exception ok 13832 - delete $vlex[0]{$gbl}{$gbl}: value ok 13833 - $vgbl[0]{$gbl}{$gbl}: no exception ok 13834 - $vgbl[0]{$gbl}{$gbl}: value ok 13835 - $vgbl[0]{$gbl}{$gbl} = 123: no exception ok 13836 - $vgbl[0]{$gbl}{$gbl} = 123: value ok 13837 - exists $vgbl[0]{$gbl}{$gbl}: no exception ok 13838 - exists $vgbl[0]{$gbl}{$gbl}: value ok 13839 - delete $vgbl[0]{$gbl}{$gbl}: no exception ok 13840 - delete $vgbl[0]{$gbl}{$gbl}: value ok 13841 - $vrlex->[0]{$gbl}{$gbl}: no exception ok 13842 - $vrlex->[0]{$gbl}{$gbl}: value ok 13843 - $vrlex->[0]{$gbl}{$gbl} = 123: no exception ok 13844 - $vrlex->[0]{$gbl}{$gbl} = 123: value ok 13845 - exists $vrlex->[0]{$gbl}{$gbl}: no exception ok 13846 - exists $vrlex->[0]{$gbl}{$gbl}: value ok 13847 - delete $vrlex->[0]{$gbl}{$gbl}: no exception ok 13848 - delete $vrlex->[0]{$gbl}{$gbl}: value ok 13849 - $vrgbl->[0]{$gbl}{$gbl}: no exception ok 13850 - $vrgbl->[0]{$gbl}{$gbl}: value ok 13851 - $vrgbl->[0]{$gbl}{$gbl} = 123: no exception ok 13852 - $vrgbl->[0]{$gbl}{$gbl} = 123: value ok 13853 - exists $vrgbl->[0]{$gbl}{$gbl}: no exception ok 13854 - exists $vrgbl->[0]{$gbl}{$gbl}: value ok 13855 - delete $vrgbl->[0]{$gbl}{$gbl}: no exception ok 13856 - delete $vrgbl->[0]{$gbl}{$gbl}: value ok 13857 - $vlex[$lex]{$gbl}{$gbl}: no exception ok 13858 - $vlex[$lex]{$gbl}{$gbl}: value ok 13859 - $vlex[$lex]{$gbl}{$gbl} = 123: no exception ok 13860 - $vlex[$lex]{$gbl}{$gbl} = 123: value ok 13861 - exists $vlex[$lex]{$gbl}{$gbl}: no exception ok 13862 - exists $vlex[$lex]{$gbl}{$gbl}: value ok 13863 - delete $vlex[$lex]{$gbl}{$gbl}: no exception ok 13864 - delete $vlex[$lex]{$gbl}{$gbl}: value ok 13865 - $vgbl[$lex]{$gbl}{$gbl}: no exception ok 13866 - $vgbl[$lex]{$gbl}{$gbl}: value ok 13867 - $vgbl[$lex]{$gbl}{$gbl} = 123: no exception ok 13868 - $vgbl[$lex]{$gbl}{$gbl} = 123: value ok 13869 - exists $vgbl[$lex]{$gbl}{$gbl}: no exception ok 13870 - exists $vgbl[$lex]{$gbl}{$gbl}: value ok 13871 - delete $vgbl[$lex]{$gbl}{$gbl}: no exception ok 13872 - delete $vgbl[$lex]{$gbl}{$gbl}: value ok 13873 - $vrlex->[$lex]{$gbl}{$gbl}: no exception ok 13874 - $vrlex->[$lex]{$gbl}{$gbl}: value ok 13875 - $vrlex->[$lex]{$gbl}{$gbl} = 123: no exception ok 13876 - $vrlex->[$lex]{$gbl}{$gbl} = 123: value ok 13877 - exists $vrlex->[$lex]{$gbl}{$gbl}: no exception ok 13878 - exists $vrlex->[$lex]{$gbl}{$gbl}: value ok 13879 - delete $vrlex->[$lex]{$gbl}{$gbl}: no exception ok 13880 - delete $vrlex->[$lex]{$gbl}{$gbl}: value ok 13881 - $vrgbl->[$lex]{$gbl}{$gbl}: no exception ok 13882 - $vrgbl->[$lex]{$gbl}{$gbl}: value ok 13883 - $vrgbl->[$lex]{$gbl}{$gbl} = 123: no exception ok 13884 - $vrgbl->[$lex]{$gbl}{$gbl} = 123: value ok 13885 - exists $vrgbl->[$lex]{$gbl}{$gbl}: no exception ok 13886 - exists $vrgbl->[$lex]{$gbl}{$gbl}: value ok 13887 - delete $vrgbl->[$lex]{$gbl}{$gbl}: no exception ok 13888 - delete $vrgbl->[$lex]{$gbl}{$gbl}: value ok 13889 - $vlex[$gbl]{$gbl}{$gbl}: no exception ok 13890 - $vlex[$gbl]{$gbl}{$gbl}: value ok 13891 - $vlex[$gbl]{$gbl}{$gbl} = 123: no exception ok 13892 - $vlex[$gbl]{$gbl}{$gbl} = 123: value ok 13893 - exists $vlex[$gbl]{$gbl}{$gbl}: no exception ok 13894 - exists $vlex[$gbl]{$gbl}{$gbl}: value ok 13895 - delete $vlex[$gbl]{$gbl}{$gbl}: no exception ok 13896 - delete $vlex[$gbl]{$gbl}{$gbl}: value ok 13897 - $vgbl[$gbl]{$gbl}{$gbl}: no exception ok 13898 - $vgbl[$gbl]{$gbl}{$gbl}: value ok 13899 - $vgbl[$gbl]{$gbl}{$gbl} = 123: no exception ok 13900 - $vgbl[$gbl]{$gbl}{$gbl} = 123: value ok 13901 - exists $vgbl[$gbl]{$gbl}{$gbl}: no exception ok 13902 - exists $vgbl[$gbl]{$gbl}{$gbl}: value ok 13903 - delete $vgbl[$gbl]{$gbl}{$gbl}: no exception ok 13904 - delete $vgbl[$gbl]{$gbl}{$gbl}: value ok 13905 - $vrlex->[$gbl]{$gbl}{$gbl}: no exception ok 13906 - $vrlex->[$gbl]{$gbl}{$gbl}: value ok 13907 - $vrlex->[$gbl]{$gbl}{$gbl} = 123: no exception ok 13908 - $vrlex->[$gbl]{$gbl}{$gbl} = 123: value ok 13909 - exists $vrlex->[$gbl]{$gbl}{$gbl}: no exception ok 13910 - exists $vrlex->[$gbl]{$gbl}{$gbl}: value ok 13911 - delete $vrlex->[$gbl]{$gbl}{$gbl}: no exception ok 13912 - delete $vrlex->[$gbl]{$gbl}{$gbl}: value ok 13913 - $vrgbl->[$gbl]{$gbl}{$gbl}: no exception ok 13914 - $vrgbl->[$gbl]{$gbl}{$gbl}: value ok 13915 - $vrgbl->[$gbl]{$gbl}{$gbl} = 123: no exception ok 13916 - $vrgbl->[$gbl]{$gbl}{$gbl} = 123: value ok 13917 - exists $vrgbl->[$gbl]{$gbl}{$gbl}: no exception ok 13918 - exists $vrgbl->[$gbl]{$gbl}{$gbl}: value ok 13919 - delete $vrgbl->[$gbl]{$gbl}{$gbl}: no exception ok 13920 - delete $vrgbl->[$gbl]{$gbl}{$gbl}: value ok 13921 - $vlex[$lex+1]{$gbl}{$gbl}: no exception ok 13922 - $vlex[$lex+1]{$gbl}{$gbl}: value ok 13923 - $vlex[$lex+1]{$gbl}{$gbl} = 123: no exception ok 13924 - $vlex[$lex+1]{$gbl}{$gbl} = 123: value ok 13925 - exists $vlex[$lex+1]{$gbl}{$gbl}: no exception ok 13926 - exists $vlex[$lex+1]{$gbl}{$gbl}: value ok 13927 - delete $vlex[$lex+1]{$gbl}{$gbl}: no exception ok 13928 - delete $vlex[$lex+1]{$gbl}{$gbl}: value ok 13929 - $vgbl[$lex+1]{$gbl}{$gbl}: no exception ok 13930 - $vgbl[$lex+1]{$gbl}{$gbl}: value ok 13931 - $vgbl[$lex+1]{$gbl}{$gbl} = 123: no exception ok 13932 - $vgbl[$lex+1]{$gbl}{$gbl} = 123: value ok 13933 - exists $vgbl[$lex+1]{$gbl}{$gbl}: no exception ok 13934 - exists $vgbl[$lex+1]{$gbl}{$gbl}: value ok 13935 - delete $vgbl[$lex+1]{$gbl}{$gbl}: no exception ok 13936 - delete $vgbl[$lex+1]{$gbl}{$gbl}: value ok 13937 - $vrlex->[$lex+1]{$gbl}{$gbl}: no exception ok 13938 - $vrlex->[$lex+1]{$gbl}{$gbl}: value ok 13939 - $vrlex->[$lex+1]{$gbl}{$gbl} = 123: no exception ok 13940 - $vrlex->[$lex+1]{$gbl}{$gbl} = 123: value ok 13941 - exists $vrlex->[$lex+1]{$gbl}{$gbl}: no exception ok 13942 - exists $vrlex->[$lex+1]{$gbl}{$gbl}: value ok 13943 - delete $vrlex->[$lex+1]{$gbl}{$gbl}: no exception ok 13944 - delete $vrlex->[$lex+1]{$gbl}{$gbl}: value ok 13945 - $vrgbl->[$lex+1]{$gbl}{$gbl}: no exception ok 13946 - $vrgbl->[$lex+1]{$gbl}{$gbl}: value ok 13947 - $vrgbl->[$lex+1]{$gbl}{$gbl} = 123: no exception ok 13948 - $vrgbl->[$lex+1]{$gbl}{$gbl} = 123: value ok 13949 - exists $vrgbl->[$lex+1]{$gbl}{$gbl}: no exception ok 13950 - exists $vrgbl->[$lex+1]{$gbl}{$gbl}: value ok 13951 - delete $vrgbl->[$lex+1]{$gbl}{$gbl}: no exception ok 13952 - delete $vrgbl->[$lex+1]{$gbl}{$gbl}: value ok 13953 - $vlex{foo}{$gbl}{$gbl}: no exception ok 13954 - $vlex{foo}{$gbl}{$gbl}: value ok 13955 - $vlex{foo}{$gbl}{$gbl} = 123: no exception ok 13956 - $vlex{foo}{$gbl}{$gbl} = 123: value ok 13957 - exists $vlex{foo}{$gbl}{$gbl}: no exception ok 13958 - exists $vlex{foo}{$gbl}{$gbl}: value ok 13959 - delete $vlex{foo}{$gbl}{$gbl}: no exception ok 13960 - delete $vlex{foo}{$gbl}{$gbl}: value ok 13961 - $vgbl{foo}{$gbl}{$gbl}: no exception ok 13962 - $vgbl{foo}{$gbl}{$gbl}: value ok 13963 - $vgbl{foo}{$gbl}{$gbl} = 123: no exception ok 13964 - $vgbl{foo}{$gbl}{$gbl} = 123: value ok 13965 - exists $vgbl{foo}{$gbl}{$gbl}: no exception ok 13966 - exists $vgbl{foo}{$gbl}{$gbl}: value ok 13967 - delete $vgbl{foo}{$gbl}{$gbl}: no exception ok 13968 - delete $vgbl{foo}{$gbl}{$gbl}: value ok 13969 - $vrlex->{foo}{$gbl}{$gbl}: no exception ok 13970 - $vrlex->{foo}{$gbl}{$gbl}: value ok 13971 - $vrlex->{foo}{$gbl}{$gbl} = 123: no exception ok 13972 - $vrlex->{foo}{$gbl}{$gbl} = 123: value ok 13973 - exists $vrlex->{foo}{$gbl}{$gbl}: no exception ok 13974 - exists $vrlex->{foo}{$gbl}{$gbl}: value ok 13975 - delete $vrlex->{foo}{$gbl}{$gbl}: no exception ok 13976 - delete $vrlex->{foo}{$gbl}{$gbl}: value ok 13977 - $vrgbl->{foo}{$gbl}{$gbl}: no exception ok 13978 - $vrgbl->{foo}{$gbl}{$gbl}: value ok 13979 - $vrgbl->{foo}{$gbl}{$gbl} = 123: no exception ok 13980 - $vrgbl->{foo}{$gbl}{$gbl} = 123: value ok 13981 - exists $vrgbl->{foo}{$gbl}{$gbl}: no exception ok 13982 - exists $vrgbl->{foo}{$gbl}{$gbl}: value ok 13983 - delete $vrgbl->{foo}{$gbl}{$gbl}: no exception ok 13984 - delete $vrgbl->{foo}{$gbl}{$gbl}: value ok 13985 - $vlex{$lex}{$gbl}{$gbl}: no exception ok 13986 - $vlex{$lex}{$gbl}{$gbl}: value ok 13987 - $vlex{$lex}{$gbl}{$gbl} = 123: no exception ok 13988 - $vlex{$lex}{$gbl}{$gbl} = 123: value ok 13989 - exists $vlex{$lex}{$gbl}{$gbl}: no exception ok 13990 - exists $vlex{$lex}{$gbl}{$gbl}: value ok 13991 - delete $vlex{$lex}{$gbl}{$gbl}: no exception ok 13992 - delete $vlex{$lex}{$gbl}{$gbl}: value ok 13993 - $vgbl{$lex}{$gbl}{$gbl}: no exception ok 13994 - $vgbl{$lex}{$gbl}{$gbl}: value ok 13995 - $vgbl{$lex}{$gbl}{$gbl} = 123: no exception ok 13996 - $vgbl{$lex}{$gbl}{$gbl} = 123: value ok 13997 - exists $vgbl{$lex}{$gbl}{$gbl}: no exception ok 13998 - exists $vgbl{$lex}{$gbl}{$gbl}: value ok 13999 - delete $vgbl{$lex}{$gbl}{$gbl}: no exception ok 14000 - delete $vgbl{$lex}{$gbl}{$gbl}: value ok 14001 - $vrlex->{$lex}{$gbl}{$gbl}: no exception ok 14002 - $vrlex->{$lex}{$gbl}{$gbl}: value ok 14003 - $vrlex->{$lex}{$gbl}{$gbl} = 123: no exception ok 14004 - $vrlex->{$lex}{$gbl}{$gbl} = 123: value ok 14005 - exists $vrlex->{$lex}{$gbl}{$gbl}: no exception ok 14006 - exists $vrlex->{$lex}{$gbl}{$gbl}: value ok 14007 - delete $vrlex->{$lex}{$gbl}{$gbl}: no exception ok 14008 - delete $vrlex->{$lex}{$gbl}{$gbl}: value ok 14009 - $vrgbl->{$lex}{$gbl}{$gbl}: no exception ok 14010 - $vrgbl->{$lex}{$gbl}{$gbl}: value ok 14011 - $vrgbl->{$lex}{$gbl}{$gbl} = 123: no exception ok 14012 - $vrgbl->{$lex}{$gbl}{$gbl} = 123: value ok 14013 - exists $vrgbl->{$lex}{$gbl}{$gbl}: no exception ok 14014 - exists $vrgbl->{$lex}{$gbl}{$gbl}: value ok 14015 - delete $vrgbl->{$lex}{$gbl}{$gbl}: no exception ok 14016 - delete $vrgbl->{$lex}{$gbl}{$gbl}: value ok 14017 - $vlex{$gbl}{$gbl}{$gbl}: no exception ok 14018 - $vlex{$gbl}{$gbl}{$gbl}: value ok 14019 - $vlex{$gbl}{$gbl}{$gbl} = 123: no exception ok 14020 - $vlex{$gbl}{$gbl}{$gbl} = 123: value ok 14021 - exists $vlex{$gbl}{$gbl}{$gbl}: no exception ok 14022 - exists $vlex{$gbl}{$gbl}{$gbl}: value ok 14023 - delete $vlex{$gbl}{$gbl}{$gbl}: no exception ok 14024 - delete $vlex{$gbl}{$gbl}{$gbl}: value ok 14025 - $vgbl{$gbl}{$gbl}{$gbl}: no exception ok 14026 - $vgbl{$gbl}{$gbl}{$gbl}: value ok 14027 - $vgbl{$gbl}{$gbl}{$gbl} = 123: no exception ok 14028 - $vgbl{$gbl}{$gbl}{$gbl} = 123: value ok 14029 - exists $vgbl{$gbl}{$gbl}{$gbl}: no exception ok 14030 - exists $vgbl{$gbl}{$gbl}{$gbl}: value ok 14031 - delete $vgbl{$gbl}{$gbl}{$gbl}: no exception ok 14032 - delete $vgbl{$gbl}{$gbl}{$gbl}: value ok 14033 - $vrlex->{$gbl}{$gbl}{$gbl}: no exception ok 14034 - $vrlex->{$gbl}{$gbl}{$gbl}: value ok 14035 - $vrlex->{$gbl}{$gbl}{$gbl} = 123: no exception ok 14036 - $vrlex->{$gbl}{$gbl}{$gbl} = 123: value ok 14037 - exists $vrlex->{$gbl}{$gbl}{$gbl}: no exception ok 14038 - exists $vrlex->{$gbl}{$gbl}{$gbl}: value ok 14039 - delete $vrlex->{$gbl}{$gbl}{$gbl}: no exception ok 14040 - delete $vrlex->{$gbl}{$gbl}{$gbl}: value ok 14041 - $vrgbl->{$gbl}{$gbl}{$gbl}: no exception ok 14042 - $vrgbl->{$gbl}{$gbl}{$gbl}: value ok 14043 - $vrgbl->{$gbl}{$gbl}{$gbl} = 123: no exception ok 14044 - $vrgbl->{$gbl}{$gbl}{$gbl} = 123: value ok 14045 - exists $vrgbl->{$gbl}{$gbl}{$gbl}: no exception ok 14046 - exists $vrgbl->{$gbl}{$gbl}{$gbl}: value ok 14047 - delete $vrgbl->{$gbl}{$gbl}{$gbl}: no exception ok 14048 - delete $vrgbl->{$gbl}{$gbl}{$gbl}: value ok 14049 - $vlex{"x$lex"}{$gbl}{$gbl}: no exception ok 14050 - $vlex{"x$lex"}{$gbl}{$gbl}: value ok 14051 - $vlex{"x$lex"}{$gbl}{$gbl} = 123: no exception ok 14052 - $vlex{"x$lex"}{$gbl}{$gbl} = 123: value ok 14053 - exists $vlex{"x$lex"}{$gbl}{$gbl}: no exception ok 14054 - exists $vlex{"x$lex"}{$gbl}{$gbl}: value ok 14055 - delete $vlex{"x$lex"}{$gbl}{$gbl}: no exception ok 14056 - delete $vlex{"x$lex"}{$gbl}{$gbl}: value ok 14057 - $vgbl{"x$lex"}{$gbl}{$gbl}: no exception ok 14058 - $vgbl{"x$lex"}{$gbl}{$gbl}: value ok 14059 - $vgbl{"x$lex"}{$gbl}{$gbl} = 123: no exception ok 14060 - $vgbl{"x$lex"}{$gbl}{$gbl} = 123: value ok 14061 - exists $vgbl{"x$lex"}{$gbl}{$gbl}: no exception ok 14062 - exists $vgbl{"x$lex"}{$gbl}{$gbl}: value ok 14063 - delete $vgbl{"x$lex"}{$gbl}{$gbl}: no exception ok 14064 - delete $vgbl{"x$lex"}{$gbl}{$gbl}: value ok 14065 - $vrlex->{"x$lex"}{$gbl}{$gbl}: no exception ok 14066 - $vrlex->{"x$lex"}{$gbl}{$gbl}: value ok 14067 - $vrlex->{"x$lex"}{$gbl}{$gbl} = 123: no exception ok 14068 - $vrlex->{"x$lex"}{$gbl}{$gbl} = 123: value ok 14069 - exists $vrlex->{"x$lex"}{$gbl}{$gbl}: no exception ok 14070 - exists $vrlex->{"x$lex"}{$gbl}{$gbl}: value ok 14071 - delete $vrlex->{"x$lex"}{$gbl}{$gbl}: no exception ok 14072 - delete $vrlex->{"x$lex"}{$gbl}{$gbl}: value ok 14073 - $vrgbl->{"x$lex"}{$gbl}{$gbl}: no exception ok 14074 - $vrgbl->{"x$lex"}{$gbl}{$gbl}: value ok 14075 - $vrgbl->{"x$lex"}{$gbl}{$gbl} = 123: no exception ok 14076 - $vrgbl->{"x$lex"}{$gbl}{$gbl} = 123: value ok 14077 - exists $vrgbl->{"x$lex"}{$gbl}{$gbl}: no exception ok 14078 - exists $vrgbl->{"x$lex"}{$gbl}{$gbl}: value ok 14079 - delete $vrgbl->{"x$lex"}{$gbl}{$gbl}: no exception ok 14080 - delete $vrgbl->{"x$lex"}{$gbl}{$gbl}: value ok 14081 - $vlex[0]{"x$lex"}{$gbl}: no exception ok 14082 - $vlex[0]{"x$lex"}{$gbl}: value ok 14083 - $vlex[0]{"x$lex"}{$gbl} = 123: no exception ok 14084 - $vlex[0]{"x$lex"}{$gbl} = 123: value ok 14085 - exists $vlex[0]{"x$lex"}{$gbl}: no exception ok 14086 - exists $vlex[0]{"x$lex"}{$gbl}: value ok 14087 - delete $vlex[0]{"x$lex"}{$gbl}: no exception ok 14088 - delete $vlex[0]{"x$lex"}{$gbl}: value ok 14089 - $vgbl[0]{"x$lex"}{$gbl}: no exception ok 14090 - $vgbl[0]{"x$lex"}{$gbl}: value ok 14091 - $vgbl[0]{"x$lex"}{$gbl} = 123: no exception ok 14092 - $vgbl[0]{"x$lex"}{$gbl} = 123: value ok 14093 - exists $vgbl[0]{"x$lex"}{$gbl}: no exception ok 14094 - exists $vgbl[0]{"x$lex"}{$gbl}: value ok 14095 - delete $vgbl[0]{"x$lex"}{$gbl}: no exception ok 14096 - delete $vgbl[0]{"x$lex"}{$gbl}: value ok 14097 - $vrlex->[0]{"x$lex"}{$gbl}: no exception ok 14098 - $vrlex->[0]{"x$lex"}{$gbl}: value ok 14099 - $vrlex->[0]{"x$lex"}{$gbl} = 123: no exception ok 14100 - $vrlex->[0]{"x$lex"}{$gbl} = 123: value ok 14101 - exists $vrlex->[0]{"x$lex"}{$gbl}: no exception ok 14102 - exists $vrlex->[0]{"x$lex"}{$gbl}: value ok 14103 - delete $vrlex->[0]{"x$lex"}{$gbl}: no exception ok 14104 - delete $vrlex->[0]{"x$lex"}{$gbl}: value ok 14105 - $vrgbl->[0]{"x$lex"}{$gbl}: no exception ok 14106 - $vrgbl->[0]{"x$lex"}{$gbl}: value ok 14107 - $vrgbl->[0]{"x$lex"}{$gbl} = 123: no exception ok 14108 - $vrgbl->[0]{"x$lex"}{$gbl} = 123: value ok 14109 - exists $vrgbl->[0]{"x$lex"}{$gbl}: no exception ok 14110 - exists $vrgbl->[0]{"x$lex"}{$gbl}: value ok 14111 - delete $vrgbl->[0]{"x$lex"}{$gbl}: no exception ok 14112 - delete $vrgbl->[0]{"x$lex"}{$gbl}: value ok 14113 - $vlex[$lex]{"x$lex"}{$gbl}: no exception ok 14114 - $vlex[$lex]{"x$lex"}{$gbl}: value ok 14115 - $vlex[$lex]{"x$lex"}{$gbl} = 123: no exception ok 14116 - $vlex[$lex]{"x$lex"}{$gbl} = 123: value ok 14117 - exists $vlex[$lex]{"x$lex"}{$gbl}: no exception ok 14118 - exists $vlex[$lex]{"x$lex"}{$gbl}: value ok 14119 - delete $vlex[$lex]{"x$lex"}{$gbl}: no exception ok 14120 - delete $vlex[$lex]{"x$lex"}{$gbl}: value ok 14121 - $vgbl[$lex]{"x$lex"}{$gbl}: no exception ok 14122 - $vgbl[$lex]{"x$lex"}{$gbl}: value ok 14123 - $vgbl[$lex]{"x$lex"}{$gbl} = 123: no exception ok 14124 - $vgbl[$lex]{"x$lex"}{$gbl} = 123: value ok 14125 - exists $vgbl[$lex]{"x$lex"}{$gbl}: no exception ok 14126 - exists $vgbl[$lex]{"x$lex"}{$gbl}: value ok 14127 - delete $vgbl[$lex]{"x$lex"}{$gbl}: no exception ok 14128 - delete $vgbl[$lex]{"x$lex"}{$gbl}: value ok 14129 - $vrlex->[$lex]{"x$lex"}{$gbl}: no exception ok 14130 - $vrlex->[$lex]{"x$lex"}{$gbl}: value ok 14131 - $vrlex->[$lex]{"x$lex"}{$gbl} = 123: no exception ok 14132 - $vrlex->[$lex]{"x$lex"}{$gbl} = 123: value ok 14133 - exists $vrlex->[$lex]{"x$lex"}{$gbl}: no exception ok 14134 - exists $vrlex->[$lex]{"x$lex"}{$gbl}: value ok 14135 - delete $vrlex->[$lex]{"x$lex"}{$gbl}: no exception ok 14136 - delete $vrlex->[$lex]{"x$lex"}{$gbl}: value ok 14137 - $vrgbl->[$lex]{"x$lex"}{$gbl}: no exception ok 14138 - $vrgbl->[$lex]{"x$lex"}{$gbl}: value ok 14139 - $vrgbl->[$lex]{"x$lex"}{$gbl} = 123: no exception ok 14140 - $vrgbl->[$lex]{"x$lex"}{$gbl} = 123: value ok 14141 - exists $vrgbl->[$lex]{"x$lex"}{$gbl}: no exception ok 14142 - exists $vrgbl->[$lex]{"x$lex"}{$gbl}: value ok 14143 - delete $vrgbl->[$lex]{"x$lex"}{$gbl}: no exception ok 14144 - delete $vrgbl->[$lex]{"x$lex"}{$gbl}: value ok 14145 - $vlex[$gbl]{"x$lex"}{$gbl}: no exception ok 14146 - $vlex[$gbl]{"x$lex"}{$gbl}: value ok 14147 - $vlex[$gbl]{"x$lex"}{$gbl} = 123: no exception ok 14148 - $vlex[$gbl]{"x$lex"}{$gbl} = 123: value ok 14149 - exists $vlex[$gbl]{"x$lex"}{$gbl}: no exception ok 14150 - exists $vlex[$gbl]{"x$lex"}{$gbl}: value ok 14151 - delete $vlex[$gbl]{"x$lex"}{$gbl}: no exception ok 14152 - delete $vlex[$gbl]{"x$lex"}{$gbl}: value ok 14153 - $vgbl[$gbl]{"x$lex"}{$gbl}: no exception ok 14154 - $vgbl[$gbl]{"x$lex"}{$gbl}: value ok 14155 - $vgbl[$gbl]{"x$lex"}{$gbl} = 123: no exception ok 14156 - $vgbl[$gbl]{"x$lex"}{$gbl} = 123: value ok 14157 - exists $vgbl[$gbl]{"x$lex"}{$gbl}: no exception ok 14158 - exists $vgbl[$gbl]{"x$lex"}{$gbl}: value ok 14159 - delete $vgbl[$gbl]{"x$lex"}{$gbl}: no exception ok 14160 - delete $vgbl[$gbl]{"x$lex"}{$gbl}: value ok 14161 - $vrlex->[$gbl]{"x$lex"}{$gbl}: no exception ok 14162 - $vrlex->[$gbl]{"x$lex"}{$gbl}: value ok 14163 - $vrlex->[$gbl]{"x$lex"}{$gbl} = 123: no exception ok 14164 - $vrlex->[$gbl]{"x$lex"}{$gbl} = 123: value ok 14165 - exists $vrlex->[$gbl]{"x$lex"}{$gbl}: no exception ok 14166 - exists $vrlex->[$gbl]{"x$lex"}{$gbl}: value ok 14167 - delete $vrlex->[$gbl]{"x$lex"}{$gbl}: no exception ok 14168 - delete $vrlex->[$gbl]{"x$lex"}{$gbl}: value ok 14169 - $vrgbl->[$gbl]{"x$lex"}{$gbl}: no exception ok 14170 - $vrgbl->[$gbl]{"x$lex"}{$gbl}: value ok 14171 - $vrgbl->[$gbl]{"x$lex"}{$gbl} = 123: no exception ok 14172 - $vrgbl->[$gbl]{"x$lex"}{$gbl} = 123: value ok 14173 - exists $vrgbl->[$gbl]{"x$lex"}{$gbl}: no exception ok 14174 - exists $vrgbl->[$gbl]{"x$lex"}{$gbl}: value ok 14175 - delete $vrgbl->[$gbl]{"x$lex"}{$gbl}: no exception ok 14176 - delete $vrgbl->[$gbl]{"x$lex"}{$gbl}: value ok 14177 - $vlex[$lex+1]{"x$lex"}{$gbl}: no exception ok 14178 - $vlex[$lex+1]{"x$lex"}{$gbl}: value ok 14179 - $vlex[$lex+1]{"x$lex"}{$gbl} = 123: no exception ok 14180 - $vlex[$lex+1]{"x$lex"}{$gbl} = 123: value ok 14181 - exists $vlex[$lex+1]{"x$lex"}{$gbl}: no exception ok 14182 - exists $vlex[$lex+1]{"x$lex"}{$gbl}: value ok 14183 - delete $vlex[$lex+1]{"x$lex"}{$gbl}: no exception ok 14184 - delete $vlex[$lex+1]{"x$lex"}{$gbl}: value ok 14185 - $vgbl[$lex+1]{"x$lex"}{$gbl}: no exception ok 14186 - $vgbl[$lex+1]{"x$lex"}{$gbl}: value ok 14187 - $vgbl[$lex+1]{"x$lex"}{$gbl} = 123: no exception ok 14188 - $vgbl[$lex+1]{"x$lex"}{$gbl} = 123: value ok 14189 - exists $vgbl[$lex+1]{"x$lex"}{$gbl}: no exception ok 14190 - exists $vgbl[$lex+1]{"x$lex"}{$gbl}: value ok 14191 - delete $vgbl[$lex+1]{"x$lex"}{$gbl}: no exception ok 14192 - delete $vgbl[$lex+1]{"x$lex"}{$gbl}: value ok 14193 - $vrlex->[$lex+1]{"x$lex"}{$gbl}: no exception ok 14194 - $vrlex->[$lex+1]{"x$lex"}{$gbl}: value ok 14195 - $vrlex->[$lex+1]{"x$lex"}{$gbl} = 123: no exception ok 14196 - $vrlex->[$lex+1]{"x$lex"}{$gbl} = 123: value ok 14197 - exists $vrlex->[$lex+1]{"x$lex"}{$gbl}: no exception ok 14198 - exists $vrlex->[$lex+1]{"x$lex"}{$gbl}: value ok 14199 - delete $vrlex->[$lex+1]{"x$lex"}{$gbl}: no exception ok 14200 - delete $vrlex->[$lex+1]{"x$lex"}{$gbl}: value ok 14201 - $vrgbl->[$lex+1]{"x$lex"}{$gbl}: no exception ok 14202 - $vrgbl->[$lex+1]{"x$lex"}{$gbl}: value ok 14203 - $vrgbl->[$lex+1]{"x$lex"}{$gbl} = 123: no exception ok 14204 - $vrgbl->[$lex+1]{"x$lex"}{$gbl} = 123: value ok 14205 - exists $vrgbl->[$lex+1]{"x$lex"}{$gbl}: no exception ok 14206 - exists $vrgbl->[$lex+1]{"x$lex"}{$gbl}: value ok 14207 - delete $vrgbl->[$lex+1]{"x$lex"}{$gbl}: no exception ok 14208 - delete $vrgbl->[$lex+1]{"x$lex"}{$gbl}: value ok 14209 - $vlex{foo}{"x$lex"}{$gbl}: no exception ok 14210 - $vlex{foo}{"x$lex"}{$gbl}: value ok 14211 - $vlex{foo}{"x$lex"}{$gbl} = 123: no exception ok 14212 - $vlex{foo}{"x$lex"}{$gbl} = 123: value ok 14213 - exists $vlex{foo}{"x$lex"}{$gbl}: no exception ok 14214 - exists $vlex{foo}{"x$lex"}{$gbl}: value ok 14215 - delete $vlex{foo}{"x$lex"}{$gbl}: no exception ok 14216 - delete $vlex{foo}{"x$lex"}{$gbl}: value ok 14217 - $vgbl{foo}{"x$lex"}{$gbl}: no exception ok 14218 - $vgbl{foo}{"x$lex"}{$gbl}: value ok 14219 - $vgbl{foo}{"x$lex"}{$gbl} = 123: no exception ok 14220 - $vgbl{foo}{"x$lex"}{$gbl} = 123: value ok 14221 - exists $vgbl{foo}{"x$lex"}{$gbl}: no exception ok 14222 - exists $vgbl{foo}{"x$lex"}{$gbl}: value ok 14223 - delete $vgbl{foo}{"x$lex"}{$gbl}: no exception ok 14224 - delete $vgbl{foo}{"x$lex"}{$gbl}: value ok 14225 - $vrlex->{foo}{"x$lex"}{$gbl}: no exception ok 14226 - $vrlex->{foo}{"x$lex"}{$gbl}: value ok 14227 - $vrlex->{foo}{"x$lex"}{$gbl} = 123: no exception ok 14228 - $vrlex->{foo}{"x$lex"}{$gbl} = 123: value ok 14229 - exists $vrlex->{foo}{"x$lex"}{$gbl}: no exception ok 14230 - exists $vrlex->{foo}{"x$lex"}{$gbl}: value ok 14231 - delete $vrlex->{foo}{"x$lex"}{$gbl}: no exception ok 14232 - delete $vrlex->{foo}{"x$lex"}{$gbl}: value ok 14233 - $vrgbl->{foo}{"x$lex"}{$gbl}: no exception ok 14234 - $vrgbl->{foo}{"x$lex"}{$gbl}: value ok 14235 - $vrgbl->{foo}{"x$lex"}{$gbl} = 123: no exception ok 14236 - $vrgbl->{foo}{"x$lex"}{$gbl} = 123: value ok 14237 - exists $vrgbl->{foo}{"x$lex"}{$gbl}: no exception ok 14238 - exists $vrgbl->{foo}{"x$lex"}{$gbl}: value ok 14239 - delete $vrgbl->{foo}{"x$lex"}{$gbl}: no exception ok 14240 - delete $vrgbl->{foo}{"x$lex"}{$gbl}: value ok 14241 - $vlex{$lex}{"x$lex"}{$gbl}: no exception ok 14242 - $vlex{$lex}{"x$lex"}{$gbl}: value ok 14243 - $vlex{$lex}{"x$lex"}{$gbl} = 123: no exception ok 14244 - $vlex{$lex}{"x$lex"}{$gbl} = 123: value ok 14245 - exists $vlex{$lex}{"x$lex"}{$gbl}: no exception ok 14246 - exists $vlex{$lex}{"x$lex"}{$gbl}: value ok 14247 - delete $vlex{$lex}{"x$lex"}{$gbl}: no exception ok 14248 - delete $vlex{$lex}{"x$lex"}{$gbl}: value ok 14249 - $vgbl{$lex}{"x$lex"}{$gbl}: no exception ok 14250 - $vgbl{$lex}{"x$lex"}{$gbl}: value ok 14251 - $vgbl{$lex}{"x$lex"}{$gbl} = 123: no exception ok 14252 - $vgbl{$lex}{"x$lex"}{$gbl} = 123: value ok 14253 - exists $vgbl{$lex}{"x$lex"}{$gbl}: no exception ok 14254 - exists $vgbl{$lex}{"x$lex"}{$gbl}: value ok 14255 - delete $vgbl{$lex}{"x$lex"}{$gbl}: no exception ok 14256 - delete $vgbl{$lex}{"x$lex"}{$gbl}: value ok 14257 - $vrlex->{$lex}{"x$lex"}{$gbl}: no exception ok 14258 - $vrlex->{$lex}{"x$lex"}{$gbl}: value ok 14259 - $vrlex->{$lex}{"x$lex"}{$gbl} = 123: no exception ok 14260 - $vrlex->{$lex}{"x$lex"}{$gbl} = 123: value ok 14261 - exists $vrlex->{$lex}{"x$lex"}{$gbl}: no exception ok 14262 - exists $vrlex->{$lex}{"x$lex"}{$gbl}: value ok 14263 - delete $vrlex->{$lex}{"x$lex"}{$gbl}: no exception ok 14264 - delete $vrlex->{$lex}{"x$lex"}{$gbl}: value ok 14265 - $vrgbl->{$lex}{"x$lex"}{$gbl}: no exception ok 14266 - $vrgbl->{$lex}{"x$lex"}{$gbl}: value ok 14267 - $vrgbl->{$lex}{"x$lex"}{$gbl} = 123: no exception ok 14268 - $vrgbl->{$lex}{"x$lex"}{$gbl} = 123: value ok 14269 - exists $vrgbl->{$lex}{"x$lex"}{$gbl}: no exception ok 14270 - exists $vrgbl->{$lex}{"x$lex"}{$gbl}: value ok 14271 - delete $vrgbl->{$lex}{"x$lex"}{$gbl}: no exception ok 14272 - delete $vrgbl->{$lex}{"x$lex"}{$gbl}: value ok 14273 - $vlex{$gbl}{"x$lex"}{$gbl}: no exception ok 14274 - $vlex{$gbl}{"x$lex"}{$gbl}: value ok 14275 - $vlex{$gbl}{"x$lex"}{$gbl} = 123: no exception ok 14276 - $vlex{$gbl}{"x$lex"}{$gbl} = 123: value ok 14277 - exists $vlex{$gbl}{"x$lex"}{$gbl}: no exception ok 14278 - exists $vlex{$gbl}{"x$lex"}{$gbl}: value ok 14279 - delete $vlex{$gbl}{"x$lex"}{$gbl}: no exception ok 14280 - delete $vlex{$gbl}{"x$lex"}{$gbl}: value ok 14281 - $vgbl{$gbl}{"x$lex"}{$gbl}: no exception ok 14282 - $vgbl{$gbl}{"x$lex"}{$gbl}: value ok 14283 - $vgbl{$gbl}{"x$lex"}{$gbl} = 123: no exception ok 14284 - $vgbl{$gbl}{"x$lex"}{$gbl} = 123: value ok 14285 - exists $vgbl{$gbl}{"x$lex"}{$gbl}: no exception ok 14286 - exists $vgbl{$gbl}{"x$lex"}{$gbl}: value ok 14287 - delete $vgbl{$gbl}{"x$lex"}{$gbl}: no exception ok 14288 - delete $vgbl{$gbl}{"x$lex"}{$gbl}: value ok 14289 - $vrlex->{$gbl}{"x$lex"}{$gbl}: no exception ok 14290 - $vrlex->{$gbl}{"x$lex"}{$gbl}: value ok 14291 - $vrlex->{$gbl}{"x$lex"}{$gbl} = 123: no exception ok 14292 - $vrlex->{$gbl}{"x$lex"}{$gbl} = 123: value ok 14293 - exists $vrlex->{$gbl}{"x$lex"}{$gbl}: no exception ok 14294 - exists $vrlex->{$gbl}{"x$lex"}{$gbl}: value ok 14295 - delete $vrlex->{$gbl}{"x$lex"}{$gbl}: no exception ok 14296 - delete $vrlex->{$gbl}{"x$lex"}{$gbl}: value ok 14297 - $vrgbl->{$gbl}{"x$lex"}{$gbl}: no exception ok 14298 - $vrgbl->{$gbl}{"x$lex"}{$gbl}: value ok 14299 - $vrgbl->{$gbl}{"x$lex"}{$gbl} = 123: no exception ok 14300 - $vrgbl->{$gbl}{"x$lex"}{$gbl} = 123: value ok 14301 - exists $vrgbl->{$gbl}{"x$lex"}{$gbl}: no exception ok 14302 - exists $vrgbl->{$gbl}{"x$lex"}{$gbl}: value ok 14303 - delete $vrgbl->{$gbl}{"x$lex"}{$gbl}: no exception ok 14304 - delete $vrgbl->{$gbl}{"x$lex"}{$gbl}: value ok 14305 - $vlex{"x$lex"}{"x$lex"}{$gbl}: no exception ok 14306 - $vlex{"x$lex"}{"x$lex"}{$gbl}: value ok 14307 - $vlex{"x$lex"}{"x$lex"}{$gbl} = 123: no exception ok 14308 - $vlex{"x$lex"}{"x$lex"}{$gbl} = 123: value ok 14309 - exists $vlex{"x$lex"}{"x$lex"}{$gbl}: no exception ok 14310 - exists $vlex{"x$lex"}{"x$lex"}{$gbl}: value ok 14311 - delete $vlex{"x$lex"}{"x$lex"}{$gbl}: no exception ok 14312 - delete $vlex{"x$lex"}{"x$lex"}{$gbl}: value ok 14313 - $vgbl{"x$lex"}{"x$lex"}{$gbl}: no exception ok 14314 - $vgbl{"x$lex"}{"x$lex"}{$gbl}: value ok 14315 - $vgbl{"x$lex"}{"x$lex"}{$gbl} = 123: no exception ok 14316 - $vgbl{"x$lex"}{"x$lex"}{$gbl} = 123: value ok 14317 - exists $vgbl{"x$lex"}{"x$lex"}{$gbl}: no exception ok 14318 - exists $vgbl{"x$lex"}{"x$lex"}{$gbl}: value ok 14319 - delete $vgbl{"x$lex"}{"x$lex"}{$gbl}: no exception ok 14320 - delete $vgbl{"x$lex"}{"x$lex"}{$gbl}: value ok 14321 - $vrlex->{"x$lex"}{"x$lex"}{$gbl}: no exception ok 14322 - $vrlex->{"x$lex"}{"x$lex"}{$gbl}: value ok 14323 - $vrlex->{"x$lex"}{"x$lex"}{$gbl} = 123: no exception ok 14324 - $vrlex->{"x$lex"}{"x$lex"}{$gbl} = 123: value ok 14325 - exists $vrlex->{"x$lex"}{"x$lex"}{$gbl}: no exception ok 14326 - exists $vrlex->{"x$lex"}{"x$lex"}{$gbl}: value ok 14327 - delete $vrlex->{"x$lex"}{"x$lex"}{$gbl}: no exception ok 14328 - delete $vrlex->{"x$lex"}{"x$lex"}{$gbl}: value ok 14329 - $vrgbl->{"x$lex"}{"x$lex"}{$gbl}: no exception ok 14330 - $vrgbl->{"x$lex"}{"x$lex"}{$gbl}: value ok 14331 - $vrgbl->{"x$lex"}{"x$lex"}{$gbl} = 123: no exception ok 14332 - $vrgbl->{"x$lex"}{"x$lex"}{$gbl} = 123: value ok 14333 - exists $vrgbl->{"x$lex"}{"x$lex"}{$gbl}: no exception ok 14334 - exists $vrgbl->{"x$lex"}{"x$lex"}{$gbl}: value ok 14335 - delete $vrgbl->{"x$lex"}{"x$lex"}{$gbl}: no exception ok 14336 - delete $vrgbl->{"x$lex"}{"x$lex"}{$gbl}: value ok 14337 - $vlex[0][0]{"x$lex"}: no exception ok 14338 - $vlex[0][0]{"x$lex"}: value ok 14339 - $vlex[0][0]{"x$lex"} = 123: no exception ok 14340 - $vlex[0][0]{"x$lex"} = 123: value ok 14341 - exists $vlex[0][0]{"x$lex"}: no exception ok 14342 - exists $vlex[0][0]{"x$lex"}: value ok 14343 - delete $vlex[0][0]{"x$lex"}: no exception ok 14344 - delete $vlex[0][0]{"x$lex"}: value ok 14345 - $vgbl[0][0]{"x$lex"}: no exception ok 14346 - $vgbl[0][0]{"x$lex"}: value ok 14347 - $vgbl[0][0]{"x$lex"} = 123: no exception ok 14348 - $vgbl[0][0]{"x$lex"} = 123: value ok 14349 - exists $vgbl[0][0]{"x$lex"}: no exception ok 14350 - exists $vgbl[0][0]{"x$lex"}: value ok 14351 - delete $vgbl[0][0]{"x$lex"}: no exception ok 14352 - delete $vgbl[0][0]{"x$lex"}: value ok 14353 - $vrlex->[0][0]{"x$lex"}: no exception ok 14354 - $vrlex->[0][0]{"x$lex"}: value ok 14355 - $vrlex->[0][0]{"x$lex"} = 123: no exception ok 14356 - $vrlex->[0][0]{"x$lex"} = 123: value ok 14357 - exists $vrlex->[0][0]{"x$lex"}: no exception ok 14358 - exists $vrlex->[0][0]{"x$lex"}: value ok 14359 - delete $vrlex->[0][0]{"x$lex"}: no exception ok 14360 - delete $vrlex->[0][0]{"x$lex"}: value ok 14361 - $vrgbl->[0][0]{"x$lex"}: no exception ok 14362 - $vrgbl->[0][0]{"x$lex"}: value ok 14363 - $vrgbl->[0][0]{"x$lex"} = 123: no exception ok 14364 - $vrgbl->[0][0]{"x$lex"} = 123: value ok 14365 - exists $vrgbl->[0][0]{"x$lex"}: no exception ok 14366 - exists $vrgbl->[0][0]{"x$lex"}: value ok 14367 - delete $vrgbl->[0][0]{"x$lex"}: no exception ok 14368 - delete $vrgbl->[0][0]{"x$lex"}: value ok 14369 - $vlex[$lex][0]{"x$lex"}: no exception ok 14370 - $vlex[$lex][0]{"x$lex"}: value ok 14371 - $vlex[$lex][0]{"x$lex"} = 123: no exception ok 14372 - $vlex[$lex][0]{"x$lex"} = 123: value ok 14373 - exists $vlex[$lex][0]{"x$lex"}: no exception ok 14374 - exists $vlex[$lex][0]{"x$lex"}: value ok 14375 - delete $vlex[$lex][0]{"x$lex"}: no exception ok 14376 - delete $vlex[$lex][0]{"x$lex"}: value ok 14377 - $vgbl[$lex][0]{"x$lex"}: no exception ok 14378 - $vgbl[$lex][0]{"x$lex"}: value ok 14379 - $vgbl[$lex][0]{"x$lex"} = 123: no exception ok 14380 - $vgbl[$lex][0]{"x$lex"} = 123: value ok 14381 - exists $vgbl[$lex][0]{"x$lex"}: no exception ok 14382 - exists $vgbl[$lex][0]{"x$lex"}: value ok 14383 - delete $vgbl[$lex][0]{"x$lex"}: no exception ok 14384 - delete $vgbl[$lex][0]{"x$lex"}: value ok 14385 - $vrlex->[$lex][0]{"x$lex"}: no exception ok 14386 - $vrlex->[$lex][0]{"x$lex"}: value ok 14387 - $vrlex->[$lex][0]{"x$lex"} = 123: no exception ok 14388 - $vrlex->[$lex][0]{"x$lex"} = 123: value ok 14389 - exists $vrlex->[$lex][0]{"x$lex"}: no exception ok 14390 - exists $vrlex->[$lex][0]{"x$lex"}: value ok 14391 - delete $vrlex->[$lex][0]{"x$lex"}: no exception ok 14392 - delete $vrlex->[$lex][0]{"x$lex"}: value ok 14393 - $vrgbl->[$lex][0]{"x$lex"}: no exception ok 14394 - $vrgbl->[$lex][0]{"x$lex"}: value ok 14395 - $vrgbl->[$lex][0]{"x$lex"} = 123: no exception ok 14396 - $vrgbl->[$lex][0]{"x$lex"} = 123: value ok 14397 - exists $vrgbl->[$lex][0]{"x$lex"}: no exception ok 14398 - exists $vrgbl->[$lex][0]{"x$lex"}: value ok 14399 - delete $vrgbl->[$lex][0]{"x$lex"}: no exception ok 14400 - delete $vrgbl->[$lex][0]{"x$lex"}: value ok 14401 - $vlex[$gbl][0]{"x$lex"}: no exception ok 14402 - $vlex[$gbl][0]{"x$lex"}: value ok 14403 - $vlex[$gbl][0]{"x$lex"} = 123: no exception ok 14404 - $vlex[$gbl][0]{"x$lex"} = 123: value ok 14405 - exists $vlex[$gbl][0]{"x$lex"}: no exception ok 14406 - exists $vlex[$gbl][0]{"x$lex"}: value ok 14407 - delete $vlex[$gbl][0]{"x$lex"}: no exception ok 14408 - delete $vlex[$gbl][0]{"x$lex"}: value ok 14409 - $vgbl[$gbl][0]{"x$lex"}: no exception ok 14410 - $vgbl[$gbl][0]{"x$lex"}: value ok 14411 - $vgbl[$gbl][0]{"x$lex"} = 123: no exception ok 14412 - $vgbl[$gbl][0]{"x$lex"} = 123: value ok 14413 - exists $vgbl[$gbl][0]{"x$lex"}: no exception ok 14414 - exists $vgbl[$gbl][0]{"x$lex"}: value ok 14415 - delete $vgbl[$gbl][0]{"x$lex"}: no exception ok 14416 - delete $vgbl[$gbl][0]{"x$lex"}: value ok 14417 - $vrlex->[$gbl][0]{"x$lex"}: no exception ok 14418 - $vrlex->[$gbl][0]{"x$lex"}: value ok 14419 - $vrlex->[$gbl][0]{"x$lex"} = 123: no exception ok 14420 - $vrlex->[$gbl][0]{"x$lex"} = 123: value ok 14421 - exists $vrlex->[$gbl][0]{"x$lex"}: no exception ok 14422 - exists $vrlex->[$gbl][0]{"x$lex"}: value ok 14423 - delete $vrlex->[$gbl][0]{"x$lex"}: no exception ok 14424 - delete $vrlex->[$gbl][0]{"x$lex"}: value ok 14425 - $vrgbl->[$gbl][0]{"x$lex"}: no exception ok 14426 - $vrgbl->[$gbl][0]{"x$lex"}: value ok 14427 - $vrgbl->[$gbl][0]{"x$lex"} = 123: no exception ok 14428 - $vrgbl->[$gbl][0]{"x$lex"} = 123: value ok 14429 - exists $vrgbl->[$gbl][0]{"x$lex"}: no exception ok 14430 - exists $vrgbl->[$gbl][0]{"x$lex"}: value ok 14431 - delete $vrgbl->[$gbl][0]{"x$lex"}: no exception ok 14432 - delete $vrgbl->[$gbl][0]{"x$lex"}: value ok 14433 - $vlex[$lex+1][0]{"x$lex"}: no exception ok 14434 - $vlex[$lex+1][0]{"x$lex"}: value ok 14435 - $vlex[$lex+1][0]{"x$lex"} = 123: no exception ok 14436 - $vlex[$lex+1][0]{"x$lex"} = 123: value ok 14437 - exists $vlex[$lex+1][0]{"x$lex"}: no exception ok 14438 - exists $vlex[$lex+1][0]{"x$lex"}: value ok 14439 - delete $vlex[$lex+1][0]{"x$lex"}: no exception ok 14440 - delete $vlex[$lex+1][0]{"x$lex"}: value ok 14441 - $vgbl[$lex+1][0]{"x$lex"}: no exception ok 14442 - $vgbl[$lex+1][0]{"x$lex"}: value ok 14443 - $vgbl[$lex+1][0]{"x$lex"} = 123: no exception ok 14444 - $vgbl[$lex+1][0]{"x$lex"} = 123: value ok 14445 - exists $vgbl[$lex+1][0]{"x$lex"}: no exception ok 14446 - exists $vgbl[$lex+1][0]{"x$lex"}: value ok 14447 - delete $vgbl[$lex+1][0]{"x$lex"}: no exception ok 14448 - delete $vgbl[$lex+1][0]{"x$lex"}: value ok 14449 - $vrlex->[$lex+1][0]{"x$lex"}: no exception ok 14450 - $vrlex->[$lex+1][0]{"x$lex"}: value ok 14451 - $vrlex->[$lex+1][0]{"x$lex"} = 123: no exception ok 14452 - $vrlex->[$lex+1][0]{"x$lex"} = 123: value ok 14453 - exists $vrlex->[$lex+1][0]{"x$lex"}: no exception ok 14454 - exists $vrlex->[$lex+1][0]{"x$lex"}: value ok 14455 - delete $vrlex->[$lex+1][0]{"x$lex"}: no exception ok 14456 - delete $vrlex->[$lex+1][0]{"x$lex"}: value ok 14457 - $vrgbl->[$lex+1][0]{"x$lex"}: no exception ok 14458 - $vrgbl->[$lex+1][0]{"x$lex"}: value ok 14459 - $vrgbl->[$lex+1][0]{"x$lex"} = 123: no exception ok 14460 - $vrgbl->[$lex+1][0]{"x$lex"} = 123: value ok 14461 - exists $vrgbl->[$lex+1][0]{"x$lex"}: no exception ok 14462 - exists $vrgbl->[$lex+1][0]{"x$lex"}: value ok 14463 - delete $vrgbl->[$lex+1][0]{"x$lex"}: no exception ok 14464 - delete $vrgbl->[$lex+1][0]{"x$lex"}: value ok 14465 - $vlex{foo}[0]{"x$lex"}: no exception ok 14466 - $vlex{foo}[0]{"x$lex"}: value ok 14467 - $vlex{foo}[0]{"x$lex"} = 123: no exception ok 14468 - $vlex{foo}[0]{"x$lex"} = 123: value ok 14469 - exists $vlex{foo}[0]{"x$lex"}: no exception ok 14470 - exists $vlex{foo}[0]{"x$lex"}: value ok 14471 - delete $vlex{foo}[0]{"x$lex"}: no exception ok 14472 - delete $vlex{foo}[0]{"x$lex"}: value ok 14473 - $vgbl{foo}[0]{"x$lex"}: no exception ok 14474 - $vgbl{foo}[0]{"x$lex"}: value ok 14475 - $vgbl{foo}[0]{"x$lex"} = 123: no exception ok 14476 - $vgbl{foo}[0]{"x$lex"} = 123: value ok 14477 - exists $vgbl{foo}[0]{"x$lex"}: no exception ok 14478 - exists $vgbl{foo}[0]{"x$lex"}: value ok 14479 - delete $vgbl{foo}[0]{"x$lex"}: no exception ok 14480 - delete $vgbl{foo}[0]{"x$lex"}: value ok 14481 - $vrlex->{foo}[0]{"x$lex"}: no exception ok 14482 - $vrlex->{foo}[0]{"x$lex"}: value ok 14483 - $vrlex->{foo}[0]{"x$lex"} = 123: no exception ok 14484 - $vrlex->{foo}[0]{"x$lex"} = 123: value ok 14485 - exists $vrlex->{foo}[0]{"x$lex"}: no exception ok 14486 - exists $vrlex->{foo}[0]{"x$lex"}: value ok 14487 - delete $vrlex->{foo}[0]{"x$lex"}: no exception ok 14488 - delete $vrlex->{foo}[0]{"x$lex"}: value ok 14489 - $vrgbl->{foo}[0]{"x$lex"}: no exception ok 14490 - $vrgbl->{foo}[0]{"x$lex"}: value ok 14491 - $vrgbl->{foo}[0]{"x$lex"} = 123: no exception ok 14492 - $vrgbl->{foo}[0]{"x$lex"} = 123: value ok 14493 - exists $vrgbl->{foo}[0]{"x$lex"}: no exception ok 14494 - exists $vrgbl->{foo}[0]{"x$lex"}: value ok 14495 - delete $vrgbl->{foo}[0]{"x$lex"}: no exception ok 14496 - delete $vrgbl->{foo}[0]{"x$lex"}: value ok 14497 - $vlex{$lex}[0]{"x$lex"}: no exception ok 14498 - $vlex{$lex}[0]{"x$lex"}: value ok 14499 - $vlex{$lex}[0]{"x$lex"} = 123: no exception ok 14500 - $vlex{$lex}[0]{"x$lex"} = 123: value ok 14501 - exists $vlex{$lex}[0]{"x$lex"}: no exception ok 14502 - exists $vlex{$lex}[0]{"x$lex"}: value ok 14503 - delete $vlex{$lex}[0]{"x$lex"}: no exception ok 14504 - delete $vlex{$lex}[0]{"x$lex"}: value ok 14505 - $vgbl{$lex}[0]{"x$lex"}: no exception ok 14506 - $vgbl{$lex}[0]{"x$lex"}: value ok 14507 - $vgbl{$lex}[0]{"x$lex"} = 123: no exception ok 14508 - $vgbl{$lex}[0]{"x$lex"} = 123: value ok 14509 - exists $vgbl{$lex}[0]{"x$lex"}: no exception ok 14510 - exists $vgbl{$lex}[0]{"x$lex"}: value ok 14511 - delete $vgbl{$lex}[0]{"x$lex"}: no exception ok 14512 - delete $vgbl{$lex}[0]{"x$lex"}: value ok 14513 - $vrlex->{$lex}[0]{"x$lex"}: no exception ok 14514 - $vrlex->{$lex}[0]{"x$lex"}: value ok 14515 - $vrlex->{$lex}[0]{"x$lex"} = 123: no exception ok 14516 - $vrlex->{$lex}[0]{"x$lex"} = 123: value ok 14517 - exists $vrlex->{$lex}[0]{"x$lex"}: no exception ok 14518 - exists $vrlex->{$lex}[0]{"x$lex"}: value ok 14519 - delete $vrlex->{$lex}[0]{"x$lex"}: no exception ok 14520 - delete $vrlex->{$lex}[0]{"x$lex"}: value ok 14521 - $vrgbl->{$lex}[0]{"x$lex"}: no exception ok 14522 - $vrgbl->{$lex}[0]{"x$lex"}: value ok 14523 - $vrgbl->{$lex}[0]{"x$lex"} = 123: no exception ok 14524 - $vrgbl->{$lex}[0]{"x$lex"} = 123: value ok 14525 - exists $vrgbl->{$lex}[0]{"x$lex"}: no exception ok 14526 - exists $vrgbl->{$lex}[0]{"x$lex"}: value ok 14527 - delete $vrgbl->{$lex}[0]{"x$lex"}: no exception ok 14528 - delete $vrgbl->{$lex}[0]{"x$lex"}: value ok 14529 - $vlex{$gbl}[0]{"x$lex"}: no exception ok 14530 - $vlex{$gbl}[0]{"x$lex"}: value ok 14531 - $vlex{$gbl}[0]{"x$lex"} = 123: no exception ok 14532 - $vlex{$gbl}[0]{"x$lex"} = 123: value ok 14533 - exists $vlex{$gbl}[0]{"x$lex"}: no exception ok 14534 - exists $vlex{$gbl}[0]{"x$lex"}: value ok 14535 - delete $vlex{$gbl}[0]{"x$lex"}: no exception ok 14536 - delete $vlex{$gbl}[0]{"x$lex"}: value ok 14537 - $vgbl{$gbl}[0]{"x$lex"}: no exception ok 14538 - $vgbl{$gbl}[0]{"x$lex"}: value ok 14539 - $vgbl{$gbl}[0]{"x$lex"} = 123: no exception ok 14540 - $vgbl{$gbl}[0]{"x$lex"} = 123: value ok 14541 - exists $vgbl{$gbl}[0]{"x$lex"}: no exception ok 14542 - exists $vgbl{$gbl}[0]{"x$lex"}: value ok 14543 - delete $vgbl{$gbl}[0]{"x$lex"}: no exception ok 14544 - delete $vgbl{$gbl}[0]{"x$lex"}: value ok 14545 - $vrlex->{$gbl}[0]{"x$lex"}: no exception ok 14546 - $vrlex->{$gbl}[0]{"x$lex"}: value ok 14547 - $vrlex->{$gbl}[0]{"x$lex"} = 123: no exception ok 14548 - $vrlex->{$gbl}[0]{"x$lex"} = 123: value ok 14549 - exists $vrlex->{$gbl}[0]{"x$lex"}: no exception ok 14550 - exists $vrlex->{$gbl}[0]{"x$lex"}: value ok 14551 - delete $vrlex->{$gbl}[0]{"x$lex"}: no exception ok 14552 - delete $vrlex->{$gbl}[0]{"x$lex"}: value ok 14553 - $vrgbl->{$gbl}[0]{"x$lex"}: no exception ok 14554 - $vrgbl->{$gbl}[0]{"x$lex"}: value ok 14555 - $vrgbl->{$gbl}[0]{"x$lex"} = 123: no exception ok 14556 - $vrgbl->{$gbl}[0]{"x$lex"} = 123: value ok 14557 - exists $vrgbl->{$gbl}[0]{"x$lex"}: no exception ok 14558 - exists $vrgbl->{$gbl}[0]{"x$lex"}: value ok 14559 - delete $vrgbl->{$gbl}[0]{"x$lex"}: no exception ok 14560 - delete $vrgbl->{$gbl}[0]{"x$lex"}: value ok 14561 - $vlex{"x$lex"}[0]{"x$lex"}: no exception ok 14562 - $vlex{"x$lex"}[0]{"x$lex"}: value ok 14563 - $vlex{"x$lex"}[0]{"x$lex"} = 123: no exception ok 14564 - $vlex{"x$lex"}[0]{"x$lex"} = 123: value ok 14565 - exists $vlex{"x$lex"}[0]{"x$lex"}: no exception ok 14566 - exists $vlex{"x$lex"}[0]{"x$lex"}: value ok 14567 - delete $vlex{"x$lex"}[0]{"x$lex"}: no exception ok 14568 - delete $vlex{"x$lex"}[0]{"x$lex"}: value ok 14569 - $vgbl{"x$lex"}[0]{"x$lex"}: no exception ok 14570 - $vgbl{"x$lex"}[0]{"x$lex"}: value ok 14571 - $vgbl{"x$lex"}[0]{"x$lex"} = 123: no exception ok 14572 - $vgbl{"x$lex"}[0]{"x$lex"} = 123: value ok 14573 - exists $vgbl{"x$lex"}[0]{"x$lex"}: no exception ok 14574 - exists $vgbl{"x$lex"}[0]{"x$lex"}: value ok 14575 - delete $vgbl{"x$lex"}[0]{"x$lex"}: no exception ok 14576 - delete $vgbl{"x$lex"}[0]{"x$lex"}: value ok 14577 - $vrlex->{"x$lex"}[0]{"x$lex"}: no exception ok 14578 - $vrlex->{"x$lex"}[0]{"x$lex"}: value ok 14579 - $vrlex->{"x$lex"}[0]{"x$lex"} = 123: no exception ok 14580 - $vrlex->{"x$lex"}[0]{"x$lex"} = 123: value ok 14581 - exists $vrlex->{"x$lex"}[0]{"x$lex"}: no exception ok 14582 - exists $vrlex->{"x$lex"}[0]{"x$lex"}: value ok 14583 - delete $vrlex->{"x$lex"}[0]{"x$lex"}: no exception ok 14584 - delete $vrlex->{"x$lex"}[0]{"x$lex"}: value ok 14585 - $vrgbl->{"x$lex"}[0]{"x$lex"}: no exception ok 14586 - $vrgbl->{"x$lex"}[0]{"x$lex"}: value ok 14587 - $vrgbl->{"x$lex"}[0]{"x$lex"} = 123: no exception ok 14588 - $vrgbl->{"x$lex"}[0]{"x$lex"} = 123: value ok 14589 - exists $vrgbl->{"x$lex"}[0]{"x$lex"}: no exception ok 14590 - exists $vrgbl->{"x$lex"}[0]{"x$lex"}: value ok 14591 - delete $vrgbl->{"x$lex"}[0]{"x$lex"}: no exception ok 14592 - delete $vrgbl->{"x$lex"}[0]{"x$lex"}: value ok 14593 - $vlex[0][$lex]{"x$lex"}: no exception ok 14594 - $vlex[0][$lex]{"x$lex"}: value ok 14595 - $vlex[0][$lex]{"x$lex"} = 123: no exception ok 14596 - $vlex[0][$lex]{"x$lex"} = 123: value ok 14597 - exists $vlex[0][$lex]{"x$lex"}: no exception ok 14598 - exists $vlex[0][$lex]{"x$lex"}: value ok 14599 - delete $vlex[0][$lex]{"x$lex"}: no exception ok 14600 - delete $vlex[0][$lex]{"x$lex"}: value ok 14601 - $vgbl[0][$lex]{"x$lex"}: no exception ok 14602 - $vgbl[0][$lex]{"x$lex"}: value ok 14603 - $vgbl[0][$lex]{"x$lex"} = 123: no exception ok 14604 - $vgbl[0][$lex]{"x$lex"} = 123: value ok 14605 - exists $vgbl[0][$lex]{"x$lex"}: no exception ok 14606 - exists $vgbl[0][$lex]{"x$lex"}: value ok 14607 - delete $vgbl[0][$lex]{"x$lex"}: no exception ok 14608 - delete $vgbl[0][$lex]{"x$lex"}: value ok 14609 - $vrlex->[0][$lex]{"x$lex"}: no exception ok 14610 - $vrlex->[0][$lex]{"x$lex"}: value ok 14611 - $vrlex->[0][$lex]{"x$lex"} = 123: no exception ok 14612 - $vrlex->[0][$lex]{"x$lex"} = 123: value ok 14613 - exists $vrlex->[0][$lex]{"x$lex"}: no exception ok 14614 - exists $vrlex->[0][$lex]{"x$lex"}: value ok 14615 - delete $vrlex->[0][$lex]{"x$lex"}: no exception ok 14616 - delete $vrlex->[0][$lex]{"x$lex"}: value ok 14617 - $vrgbl->[0][$lex]{"x$lex"}: no exception ok 14618 - $vrgbl->[0][$lex]{"x$lex"}: value ok 14619 - $vrgbl->[0][$lex]{"x$lex"} = 123: no exception ok 14620 - $vrgbl->[0][$lex]{"x$lex"} = 123: value ok 14621 - exists $vrgbl->[0][$lex]{"x$lex"}: no exception ok 14622 - exists $vrgbl->[0][$lex]{"x$lex"}: value ok 14623 - delete $vrgbl->[0][$lex]{"x$lex"}: no exception ok 14624 - delete $vrgbl->[0][$lex]{"x$lex"}: value ok 14625 - $vlex[$lex][$lex]{"x$lex"}: no exception ok 14626 - $vlex[$lex][$lex]{"x$lex"}: value ok 14627 - $vlex[$lex][$lex]{"x$lex"} = 123: no exception ok 14628 - $vlex[$lex][$lex]{"x$lex"} = 123: value ok 14629 - exists $vlex[$lex][$lex]{"x$lex"}: no exception ok 14630 - exists $vlex[$lex][$lex]{"x$lex"}: value ok 14631 - delete $vlex[$lex][$lex]{"x$lex"}: no exception ok 14632 - delete $vlex[$lex][$lex]{"x$lex"}: value ok 14633 - $vgbl[$lex][$lex]{"x$lex"}: no exception ok 14634 - $vgbl[$lex][$lex]{"x$lex"}: value ok 14635 - $vgbl[$lex][$lex]{"x$lex"} = 123: no exception ok 14636 - $vgbl[$lex][$lex]{"x$lex"} = 123: value ok 14637 - exists $vgbl[$lex][$lex]{"x$lex"}: no exception ok 14638 - exists $vgbl[$lex][$lex]{"x$lex"}: value ok 14639 - delete $vgbl[$lex][$lex]{"x$lex"}: no exception ok 14640 - delete $vgbl[$lex][$lex]{"x$lex"}: value ok 14641 - $vrlex->[$lex][$lex]{"x$lex"}: no exception ok 14642 - $vrlex->[$lex][$lex]{"x$lex"}: value ok 14643 - $vrlex->[$lex][$lex]{"x$lex"} = 123: no exception ok 14644 - $vrlex->[$lex][$lex]{"x$lex"} = 123: value ok 14645 - exists $vrlex->[$lex][$lex]{"x$lex"}: no exception ok 14646 - exists $vrlex->[$lex][$lex]{"x$lex"}: value ok 14647 - delete $vrlex->[$lex][$lex]{"x$lex"}: no exception ok 14648 - delete $vrlex->[$lex][$lex]{"x$lex"}: value ok 14649 - $vrgbl->[$lex][$lex]{"x$lex"}: no exception ok 14650 - $vrgbl->[$lex][$lex]{"x$lex"}: value ok 14651 - $vrgbl->[$lex][$lex]{"x$lex"} = 123: no exception ok 14652 - $vrgbl->[$lex][$lex]{"x$lex"} = 123: value ok 14653 - exists $vrgbl->[$lex][$lex]{"x$lex"}: no exception ok 14654 - exists $vrgbl->[$lex][$lex]{"x$lex"}: value ok 14655 - delete $vrgbl->[$lex][$lex]{"x$lex"}: no exception ok 14656 - delete $vrgbl->[$lex][$lex]{"x$lex"}: value ok 14657 - $vlex[$gbl][$lex]{"x$lex"}: no exception ok 14658 - $vlex[$gbl][$lex]{"x$lex"}: value ok 14659 - $vlex[$gbl][$lex]{"x$lex"} = 123: no exception ok 14660 - $vlex[$gbl][$lex]{"x$lex"} = 123: value ok 14661 - exists $vlex[$gbl][$lex]{"x$lex"}: no exception ok 14662 - exists $vlex[$gbl][$lex]{"x$lex"}: value ok 14663 - delete $vlex[$gbl][$lex]{"x$lex"}: no exception ok 14664 - delete $vlex[$gbl][$lex]{"x$lex"}: value ok 14665 - $vgbl[$gbl][$lex]{"x$lex"}: no exception ok 14666 - $vgbl[$gbl][$lex]{"x$lex"}: value ok 14667 - $vgbl[$gbl][$lex]{"x$lex"} = 123: no exception ok 14668 - $vgbl[$gbl][$lex]{"x$lex"} = 123: value ok 14669 - exists $vgbl[$gbl][$lex]{"x$lex"}: no exception ok 14670 - exists $vgbl[$gbl][$lex]{"x$lex"}: value ok 14671 - delete $vgbl[$gbl][$lex]{"x$lex"}: no exception ok 14672 - delete $vgbl[$gbl][$lex]{"x$lex"}: value ok 14673 - $vrlex->[$gbl][$lex]{"x$lex"}: no exception ok 14674 - $vrlex->[$gbl][$lex]{"x$lex"}: value ok 14675 - $vrlex->[$gbl][$lex]{"x$lex"} = 123: no exception ok 14676 - $vrlex->[$gbl][$lex]{"x$lex"} = 123: value ok 14677 - exists $vrlex->[$gbl][$lex]{"x$lex"}: no exception ok 14678 - exists $vrlex->[$gbl][$lex]{"x$lex"}: value ok 14679 - delete $vrlex->[$gbl][$lex]{"x$lex"}: no exception ok 14680 - delete $vrlex->[$gbl][$lex]{"x$lex"}: value ok 14681 - $vrgbl->[$gbl][$lex]{"x$lex"}: no exception ok 14682 - $vrgbl->[$gbl][$lex]{"x$lex"}: value ok 14683 - $vrgbl->[$gbl][$lex]{"x$lex"} = 123: no exception ok 14684 - $vrgbl->[$gbl][$lex]{"x$lex"} = 123: value ok 14685 - exists $vrgbl->[$gbl][$lex]{"x$lex"}: no exception ok 14686 - exists $vrgbl->[$gbl][$lex]{"x$lex"}: value ok 14687 - delete $vrgbl->[$gbl][$lex]{"x$lex"}: no exception ok 14688 - delete $vrgbl->[$gbl][$lex]{"x$lex"}: value ok 14689 - $vlex[$lex+1][$lex]{"x$lex"}: no exception ok 14690 - $vlex[$lex+1][$lex]{"x$lex"}: value ok 14691 - $vlex[$lex+1][$lex]{"x$lex"} = 123: no exception ok 14692 - $vlex[$lex+1][$lex]{"x$lex"} = 123: value ok 14693 - exists $vlex[$lex+1][$lex]{"x$lex"}: no exception ok 14694 - exists $vlex[$lex+1][$lex]{"x$lex"}: value ok 14695 - delete $vlex[$lex+1][$lex]{"x$lex"}: no exception ok 14696 - delete $vlex[$lex+1][$lex]{"x$lex"}: value ok 14697 - $vgbl[$lex+1][$lex]{"x$lex"}: no exception ok 14698 - $vgbl[$lex+1][$lex]{"x$lex"}: value ok 14699 - $vgbl[$lex+1][$lex]{"x$lex"} = 123: no exception ok 14700 - $vgbl[$lex+1][$lex]{"x$lex"} = 123: value ok 14701 - exists $vgbl[$lex+1][$lex]{"x$lex"}: no exception ok 14702 - exists $vgbl[$lex+1][$lex]{"x$lex"}: value ok 14703 - delete $vgbl[$lex+1][$lex]{"x$lex"}: no exception ok 14704 - delete $vgbl[$lex+1][$lex]{"x$lex"}: value ok 14705 - $vrlex->[$lex+1][$lex]{"x$lex"}: no exception ok 14706 - $vrlex->[$lex+1][$lex]{"x$lex"}: value ok 14707 - $vrlex->[$lex+1][$lex]{"x$lex"} = 123: no exception ok 14708 - $vrlex->[$lex+1][$lex]{"x$lex"} = 123: value ok 14709 - exists $vrlex->[$lex+1][$lex]{"x$lex"}: no exception ok 14710 - exists $vrlex->[$lex+1][$lex]{"x$lex"}: value ok 14711 - delete $vrlex->[$lex+1][$lex]{"x$lex"}: no exception ok 14712 - delete $vrlex->[$lex+1][$lex]{"x$lex"}: value ok 14713 - $vrgbl->[$lex+1][$lex]{"x$lex"}: no exception ok 14714 - $vrgbl->[$lex+1][$lex]{"x$lex"}: value ok 14715 - $vrgbl->[$lex+1][$lex]{"x$lex"} = 123: no exception ok 14716 - $vrgbl->[$lex+1][$lex]{"x$lex"} = 123: value ok 14717 - exists $vrgbl->[$lex+1][$lex]{"x$lex"}: no exception ok 14718 - exists $vrgbl->[$lex+1][$lex]{"x$lex"}: value ok 14719 - delete $vrgbl->[$lex+1][$lex]{"x$lex"}: no exception ok 14720 - delete $vrgbl->[$lex+1][$lex]{"x$lex"}: value ok 14721 - $vlex{foo}[$lex]{"x$lex"}: no exception ok 14722 - $vlex{foo}[$lex]{"x$lex"}: value ok 14723 - $vlex{foo}[$lex]{"x$lex"} = 123: no exception ok 14724 - $vlex{foo}[$lex]{"x$lex"} = 123: value ok 14725 - exists $vlex{foo}[$lex]{"x$lex"}: no exception ok 14726 - exists $vlex{foo}[$lex]{"x$lex"}: value ok 14727 - delete $vlex{foo}[$lex]{"x$lex"}: no exception ok 14728 - delete $vlex{foo}[$lex]{"x$lex"}: value ok 14729 - $vgbl{foo}[$lex]{"x$lex"}: no exception ok 14730 - $vgbl{foo}[$lex]{"x$lex"}: value ok 14731 - $vgbl{foo}[$lex]{"x$lex"} = 123: no exception ok 14732 - $vgbl{foo}[$lex]{"x$lex"} = 123: value ok 14733 - exists $vgbl{foo}[$lex]{"x$lex"}: no exception ok 14734 - exists $vgbl{foo}[$lex]{"x$lex"}: value ok 14735 - delete $vgbl{foo}[$lex]{"x$lex"}: no exception ok 14736 - delete $vgbl{foo}[$lex]{"x$lex"}: value ok 14737 - $vrlex->{foo}[$lex]{"x$lex"}: no exception ok 14738 - $vrlex->{foo}[$lex]{"x$lex"}: value ok 14739 - $vrlex->{foo}[$lex]{"x$lex"} = 123: no exception ok 14740 - $vrlex->{foo}[$lex]{"x$lex"} = 123: value ok 14741 - exists $vrlex->{foo}[$lex]{"x$lex"}: no exception ok 14742 - exists $vrlex->{foo}[$lex]{"x$lex"}: value ok 14743 - delete $vrlex->{foo}[$lex]{"x$lex"}: no exception ok 14744 - delete $vrlex->{foo}[$lex]{"x$lex"}: value ok 14745 - $vrgbl->{foo}[$lex]{"x$lex"}: no exception ok 14746 - $vrgbl->{foo}[$lex]{"x$lex"}: value ok 14747 - $vrgbl->{foo}[$lex]{"x$lex"} = 123: no exception ok 14748 - $vrgbl->{foo}[$lex]{"x$lex"} = 123: value ok 14749 - exists $vrgbl->{foo}[$lex]{"x$lex"}: no exception ok 14750 - exists $vrgbl->{foo}[$lex]{"x$lex"}: value ok 14751 - delete $vrgbl->{foo}[$lex]{"x$lex"}: no exception ok 14752 - delete $vrgbl->{foo}[$lex]{"x$lex"}: value ok 14753 - $vlex{$lex}[$lex]{"x$lex"}: no exception ok 14754 - $vlex{$lex}[$lex]{"x$lex"}: value ok 14755 - $vlex{$lex}[$lex]{"x$lex"} = 123: no exception ok 14756 - $vlex{$lex}[$lex]{"x$lex"} = 123: value ok 14757 - exists $vlex{$lex}[$lex]{"x$lex"}: no exception ok 14758 - exists $vlex{$lex}[$lex]{"x$lex"}: value ok 14759 - delete $vlex{$lex}[$lex]{"x$lex"}: no exception ok 14760 - delete $vlex{$lex}[$lex]{"x$lex"}: value ok 14761 - $vgbl{$lex}[$lex]{"x$lex"}: no exception ok 14762 - $vgbl{$lex}[$lex]{"x$lex"}: value ok 14763 - $vgbl{$lex}[$lex]{"x$lex"} = 123: no exception ok 14764 - $vgbl{$lex}[$lex]{"x$lex"} = 123: value ok 14765 - exists $vgbl{$lex}[$lex]{"x$lex"}: no exception ok 14766 - exists $vgbl{$lex}[$lex]{"x$lex"}: value ok 14767 - delete $vgbl{$lex}[$lex]{"x$lex"}: no exception ok 14768 - delete $vgbl{$lex}[$lex]{"x$lex"}: value ok 14769 - $vrlex->{$lex}[$lex]{"x$lex"}: no exception ok 14770 - $vrlex->{$lex}[$lex]{"x$lex"}: value ok 14771 - $vrlex->{$lex}[$lex]{"x$lex"} = 123: no exception ok 14772 - $vrlex->{$lex}[$lex]{"x$lex"} = 123: value ok 14773 - exists $vrlex->{$lex}[$lex]{"x$lex"}: no exception ok 14774 - exists $vrlex->{$lex}[$lex]{"x$lex"}: value ok 14775 - delete $vrlex->{$lex}[$lex]{"x$lex"}: no exception ok 14776 - delete $vrlex->{$lex}[$lex]{"x$lex"}: value ok 14777 - $vrgbl->{$lex}[$lex]{"x$lex"}: no exception ok 14778 - $vrgbl->{$lex}[$lex]{"x$lex"}: value ok 14779 - $vrgbl->{$lex}[$lex]{"x$lex"} = 123: no exception ok 14780 - $vrgbl->{$lex}[$lex]{"x$lex"} = 123: value ok 14781 - exists $vrgbl->{$lex}[$lex]{"x$lex"}: no exception ok 14782 - exists $vrgbl->{$lex}[$lex]{"x$lex"}: value ok 14783 - delete $vrgbl->{$lex}[$lex]{"x$lex"}: no exception ok 14784 - delete $vrgbl->{$lex}[$lex]{"x$lex"}: value ok 14785 - $vlex{$gbl}[$lex]{"x$lex"}: no exception ok 14786 - $vlex{$gbl}[$lex]{"x$lex"}: value ok 14787 - $vlex{$gbl}[$lex]{"x$lex"} = 123: no exception ok 14788 - $vlex{$gbl}[$lex]{"x$lex"} = 123: value ok 14789 - exists $vlex{$gbl}[$lex]{"x$lex"}: no exception ok 14790 - exists $vlex{$gbl}[$lex]{"x$lex"}: value ok 14791 - delete $vlex{$gbl}[$lex]{"x$lex"}: no exception ok 14792 - delete $vlex{$gbl}[$lex]{"x$lex"}: value ok 14793 - $vgbl{$gbl}[$lex]{"x$lex"}: no exception ok 14794 - $vgbl{$gbl}[$lex]{"x$lex"}: value ok 14795 - $vgbl{$gbl}[$lex]{"x$lex"} = 123: no exception ok 14796 - $vgbl{$gbl}[$lex]{"x$lex"} = 123: value ok 14797 - exists $vgbl{$gbl}[$lex]{"x$lex"}: no exception ok 14798 - exists $vgbl{$gbl}[$lex]{"x$lex"}: value ok 14799 - delete $vgbl{$gbl}[$lex]{"x$lex"}: no exception ok 14800 - delete $vgbl{$gbl}[$lex]{"x$lex"}: value ok 14801 - $vrlex->{$gbl}[$lex]{"x$lex"}: no exception ok 14802 - $vrlex->{$gbl}[$lex]{"x$lex"}: value ok 14803 - $vrlex->{$gbl}[$lex]{"x$lex"} = 123: no exception ok 14804 - $vrlex->{$gbl}[$lex]{"x$lex"} = 123: value ok 14805 - exists $vrlex->{$gbl}[$lex]{"x$lex"}: no exception ok 14806 - exists $vrlex->{$gbl}[$lex]{"x$lex"}: value ok 14807 - delete $vrlex->{$gbl}[$lex]{"x$lex"}: no exception ok 14808 - delete $vrlex->{$gbl}[$lex]{"x$lex"}: value ok 14809 - $vrgbl->{$gbl}[$lex]{"x$lex"}: no exception ok 14810 - $vrgbl->{$gbl}[$lex]{"x$lex"}: value ok 14811 - $vrgbl->{$gbl}[$lex]{"x$lex"} = 123: no exception ok 14812 - $vrgbl->{$gbl}[$lex]{"x$lex"} = 123: value ok 14813 - exists $vrgbl->{$gbl}[$lex]{"x$lex"}: no exception ok 14814 - exists $vrgbl->{$gbl}[$lex]{"x$lex"}: value ok 14815 - delete $vrgbl->{$gbl}[$lex]{"x$lex"}: no exception ok 14816 - delete $vrgbl->{$gbl}[$lex]{"x$lex"}: value ok 14817 - $vlex{"x$lex"}[$lex]{"x$lex"}: no exception ok 14818 - $vlex{"x$lex"}[$lex]{"x$lex"}: value ok 14819 - $vlex{"x$lex"}[$lex]{"x$lex"} = 123: no exception ok 14820 - $vlex{"x$lex"}[$lex]{"x$lex"} = 123: value ok 14821 - exists $vlex{"x$lex"}[$lex]{"x$lex"}: no exception ok 14822 - exists $vlex{"x$lex"}[$lex]{"x$lex"}: value ok 14823 - delete $vlex{"x$lex"}[$lex]{"x$lex"}: no exception ok 14824 - delete $vlex{"x$lex"}[$lex]{"x$lex"}: value ok 14825 - $vgbl{"x$lex"}[$lex]{"x$lex"}: no exception ok 14826 - $vgbl{"x$lex"}[$lex]{"x$lex"}: value ok 14827 - $vgbl{"x$lex"}[$lex]{"x$lex"} = 123: no exception ok 14828 - $vgbl{"x$lex"}[$lex]{"x$lex"} = 123: value ok 14829 - exists $vgbl{"x$lex"}[$lex]{"x$lex"}: no exception ok 14830 - exists $vgbl{"x$lex"}[$lex]{"x$lex"}: value ok 14831 - delete $vgbl{"x$lex"}[$lex]{"x$lex"}: no exception ok 14832 - delete $vgbl{"x$lex"}[$lex]{"x$lex"}: value ok 14833 - $vrlex->{"x$lex"}[$lex]{"x$lex"}: no exception ok 14834 - $vrlex->{"x$lex"}[$lex]{"x$lex"}: value ok 14835 - $vrlex->{"x$lex"}[$lex]{"x$lex"} = 123: no exception ok 14836 - $vrlex->{"x$lex"}[$lex]{"x$lex"} = 123: value ok 14837 - exists $vrlex->{"x$lex"}[$lex]{"x$lex"}: no exception ok 14838 - exists $vrlex->{"x$lex"}[$lex]{"x$lex"}: value ok 14839 - delete $vrlex->{"x$lex"}[$lex]{"x$lex"}: no exception ok 14840 - delete $vrlex->{"x$lex"}[$lex]{"x$lex"}: value ok 14841 - $vrgbl->{"x$lex"}[$lex]{"x$lex"}: no exception ok 14842 - $vrgbl->{"x$lex"}[$lex]{"x$lex"}: value ok 14843 - $vrgbl->{"x$lex"}[$lex]{"x$lex"} = 123: no exception ok 14844 - $vrgbl->{"x$lex"}[$lex]{"x$lex"} = 123: value ok 14845 - exists $vrgbl->{"x$lex"}[$lex]{"x$lex"}: no exception ok 14846 - exists $vrgbl->{"x$lex"}[$lex]{"x$lex"}: value ok 14847 - delete $vrgbl->{"x$lex"}[$lex]{"x$lex"}: no exception ok 14848 - delete $vrgbl->{"x$lex"}[$lex]{"x$lex"}: value ok 14849 - $vlex[0][$gbl]{"x$lex"}: no exception ok 14850 - $vlex[0][$gbl]{"x$lex"}: value ok 14851 - $vlex[0][$gbl]{"x$lex"} = 123: no exception ok 14852 - $vlex[0][$gbl]{"x$lex"} = 123: value ok 14853 - exists $vlex[0][$gbl]{"x$lex"}: no exception ok 14854 - exists $vlex[0][$gbl]{"x$lex"}: value ok 14855 - delete $vlex[0][$gbl]{"x$lex"}: no exception ok 14856 - delete $vlex[0][$gbl]{"x$lex"}: value ok 14857 - $vgbl[0][$gbl]{"x$lex"}: no exception ok 14858 - $vgbl[0][$gbl]{"x$lex"}: value ok 14859 - $vgbl[0][$gbl]{"x$lex"} = 123: no exception ok 14860 - $vgbl[0][$gbl]{"x$lex"} = 123: value ok 14861 - exists $vgbl[0][$gbl]{"x$lex"}: no exception ok 14862 - exists $vgbl[0][$gbl]{"x$lex"}: value ok 14863 - delete $vgbl[0][$gbl]{"x$lex"}: no exception ok 14864 - delete $vgbl[0][$gbl]{"x$lex"}: value ok 14865 - $vrlex->[0][$gbl]{"x$lex"}: no exception ok 14866 - $vrlex->[0][$gbl]{"x$lex"}: value ok 14867 - $vrlex->[0][$gbl]{"x$lex"} = 123: no exception ok 14868 - $vrlex->[0][$gbl]{"x$lex"} = 123: value ok 14869 - exists $vrlex->[0][$gbl]{"x$lex"}: no exception ok 14870 - exists $vrlex->[0][$gbl]{"x$lex"}: value ok 14871 - delete $vrlex->[0][$gbl]{"x$lex"}: no exception ok 14872 - delete $vrlex->[0][$gbl]{"x$lex"}: value ok 14873 - $vrgbl->[0][$gbl]{"x$lex"}: no exception ok 14874 - $vrgbl->[0][$gbl]{"x$lex"}: value ok 14875 - $vrgbl->[0][$gbl]{"x$lex"} = 123: no exception ok 14876 - $vrgbl->[0][$gbl]{"x$lex"} = 123: value ok 14877 - exists $vrgbl->[0][$gbl]{"x$lex"}: no exception ok 14878 - exists $vrgbl->[0][$gbl]{"x$lex"}: value ok 14879 - delete $vrgbl->[0][$gbl]{"x$lex"}: no exception ok 14880 - delete $vrgbl->[0][$gbl]{"x$lex"}: value ok 14881 - $vlex[$lex][$gbl]{"x$lex"}: no exception ok 14882 - $vlex[$lex][$gbl]{"x$lex"}: value ok 14883 - $vlex[$lex][$gbl]{"x$lex"} = 123: no exception ok 14884 - $vlex[$lex][$gbl]{"x$lex"} = 123: value ok 14885 - exists $vlex[$lex][$gbl]{"x$lex"}: no exception ok 14886 - exists $vlex[$lex][$gbl]{"x$lex"}: value ok 14887 - delete $vlex[$lex][$gbl]{"x$lex"}: no exception ok 14888 - delete $vlex[$lex][$gbl]{"x$lex"}: value ok 14889 - $vgbl[$lex][$gbl]{"x$lex"}: no exception ok 14890 - $vgbl[$lex][$gbl]{"x$lex"}: value ok 14891 - $vgbl[$lex][$gbl]{"x$lex"} = 123: no exception ok 14892 - $vgbl[$lex][$gbl]{"x$lex"} = 123: value ok 14893 - exists $vgbl[$lex][$gbl]{"x$lex"}: no exception ok 14894 - exists $vgbl[$lex][$gbl]{"x$lex"}: value ok 14895 - delete $vgbl[$lex][$gbl]{"x$lex"}: no exception ok 14896 - delete $vgbl[$lex][$gbl]{"x$lex"}: value ok 14897 - $vrlex->[$lex][$gbl]{"x$lex"}: no exception ok 14898 - $vrlex->[$lex][$gbl]{"x$lex"}: value ok 14899 - $vrlex->[$lex][$gbl]{"x$lex"} = 123: no exception ok 14900 - $vrlex->[$lex][$gbl]{"x$lex"} = 123: value ok 14901 - exists $vrlex->[$lex][$gbl]{"x$lex"}: no exception ok 14902 - exists $vrlex->[$lex][$gbl]{"x$lex"}: value ok 14903 - delete $vrlex->[$lex][$gbl]{"x$lex"}: no exception ok 14904 - delete $vrlex->[$lex][$gbl]{"x$lex"}: value ok 14905 - $vrgbl->[$lex][$gbl]{"x$lex"}: no exception ok 14906 - $vrgbl->[$lex][$gbl]{"x$lex"}: value ok 14907 - $vrgbl->[$lex][$gbl]{"x$lex"} = 123: no exception ok 14908 - $vrgbl->[$lex][$gbl]{"x$lex"} = 123: value ok 14909 - exists $vrgbl->[$lex][$gbl]{"x$lex"}: no exception ok 14910 - exists $vrgbl->[$lex][$gbl]{"x$lex"}: value ok 14911 - delete $vrgbl->[$lex][$gbl]{"x$lex"}: no exception ok 14912 - delete $vrgbl->[$lex][$gbl]{"x$lex"}: value ok 14913 - $vlex[$gbl][$gbl]{"x$lex"}: no exception ok 14914 - $vlex[$gbl][$gbl]{"x$lex"}: value ok 14915 - $vlex[$gbl][$gbl]{"x$lex"} = 123: no exception ok 14916 - $vlex[$gbl][$gbl]{"x$lex"} = 123: value ok 14917 - exists $vlex[$gbl][$gbl]{"x$lex"}: no exception ok 14918 - exists $vlex[$gbl][$gbl]{"x$lex"}: value ok 14919 - delete $vlex[$gbl][$gbl]{"x$lex"}: no exception ok 14920 - delete $vlex[$gbl][$gbl]{"x$lex"}: value ok 14921 - $vgbl[$gbl][$gbl]{"x$lex"}: no exception ok 14922 - $vgbl[$gbl][$gbl]{"x$lex"}: value ok 14923 - $vgbl[$gbl][$gbl]{"x$lex"} = 123: no exception ok 14924 - $vgbl[$gbl][$gbl]{"x$lex"} = 123: value ok 14925 - exists $vgbl[$gbl][$gbl]{"x$lex"}: no exception ok 14926 - exists $vgbl[$gbl][$gbl]{"x$lex"}: value ok 14927 - delete $vgbl[$gbl][$gbl]{"x$lex"}: no exception ok 14928 - delete $vgbl[$gbl][$gbl]{"x$lex"}: value ok 14929 - $vrlex->[$gbl][$gbl]{"x$lex"}: no exception ok 14930 - $vrlex->[$gbl][$gbl]{"x$lex"}: value ok 14931 - $vrlex->[$gbl][$gbl]{"x$lex"} = 123: no exception ok 14932 - $vrlex->[$gbl][$gbl]{"x$lex"} = 123: value ok 14933 - exists $vrlex->[$gbl][$gbl]{"x$lex"}: no exception ok 14934 - exists $vrlex->[$gbl][$gbl]{"x$lex"}: value ok 14935 - delete $vrlex->[$gbl][$gbl]{"x$lex"}: no exception ok 14936 - delete $vrlex->[$gbl][$gbl]{"x$lex"}: value ok 14937 - $vrgbl->[$gbl][$gbl]{"x$lex"}: no exception ok 14938 - $vrgbl->[$gbl][$gbl]{"x$lex"}: value ok 14939 - $vrgbl->[$gbl][$gbl]{"x$lex"} = 123: no exception ok 14940 - $vrgbl->[$gbl][$gbl]{"x$lex"} = 123: value ok 14941 - exists $vrgbl->[$gbl][$gbl]{"x$lex"}: no exception ok 14942 - exists $vrgbl->[$gbl][$gbl]{"x$lex"}: value ok 14943 - delete $vrgbl->[$gbl][$gbl]{"x$lex"}: no exception ok 14944 - delete $vrgbl->[$gbl][$gbl]{"x$lex"}: value ok 14945 - $vlex[$lex+1][$gbl]{"x$lex"}: no exception ok 14946 - $vlex[$lex+1][$gbl]{"x$lex"}: value ok 14947 - $vlex[$lex+1][$gbl]{"x$lex"} = 123: no exception ok 14948 - $vlex[$lex+1][$gbl]{"x$lex"} = 123: value ok 14949 - exists $vlex[$lex+1][$gbl]{"x$lex"}: no exception ok 14950 - exists $vlex[$lex+1][$gbl]{"x$lex"}: value ok 14951 - delete $vlex[$lex+1][$gbl]{"x$lex"}: no exception ok 14952 - delete $vlex[$lex+1][$gbl]{"x$lex"}: value ok 14953 - $vgbl[$lex+1][$gbl]{"x$lex"}: no exception ok 14954 - $vgbl[$lex+1][$gbl]{"x$lex"}: value ok 14955 - $vgbl[$lex+1][$gbl]{"x$lex"} = 123: no exception ok 14956 - $vgbl[$lex+1][$gbl]{"x$lex"} = 123: value ok 14957 - exists $vgbl[$lex+1][$gbl]{"x$lex"}: no exception ok 14958 - exists $vgbl[$lex+1][$gbl]{"x$lex"}: value ok 14959 - delete $vgbl[$lex+1][$gbl]{"x$lex"}: no exception ok 14960 - delete $vgbl[$lex+1][$gbl]{"x$lex"}: value ok 14961 - $vrlex->[$lex+1][$gbl]{"x$lex"}: no exception ok 14962 - $vrlex->[$lex+1][$gbl]{"x$lex"}: value ok 14963 - $vrlex->[$lex+1][$gbl]{"x$lex"} = 123: no exception ok 14964 - $vrlex->[$lex+1][$gbl]{"x$lex"} = 123: value ok 14965 - exists $vrlex->[$lex+1][$gbl]{"x$lex"}: no exception ok 14966 - exists $vrlex->[$lex+1][$gbl]{"x$lex"}: value ok 14967 - delete $vrlex->[$lex+1][$gbl]{"x$lex"}: no exception ok 14968 - delete $vrlex->[$lex+1][$gbl]{"x$lex"}: value ok 14969 - $vrgbl->[$lex+1][$gbl]{"x$lex"}: no exception ok 14970 - $vrgbl->[$lex+1][$gbl]{"x$lex"}: value ok 14971 - $vrgbl->[$lex+1][$gbl]{"x$lex"} = 123: no exception ok 14972 - $vrgbl->[$lex+1][$gbl]{"x$lex"} = 123: value ok 14973 - exists $vrgbl->[$lex+1][$gbl]{"x$lex"}: no exception ok 14974 - exists $vrgbl->[$lex+1][$gbl]{"x$lex"}: value ok 14975 - delete $vrgbl->[$lex+1][$gbl]{"x$lex"}: no exception ok 14976 - delete $vrgbl->[$lex+1][$gbl]{"x$lex"}: value ok 14977 - $vlex{foo}[$gbl]{"x$lex"}: no exception ok 14978 - $vlex{foo}[$gbl]{"x$lex"}: value ok 14979 - $vlex{foo}[$gbl]{"x$lex"} = 123: no exception ok 14980 - $vlex{foo}[$gbl]{"x$lex"} = 123: value ok 14981 - exists $vlex{foo}[$gbl]{"x$lex"}: no exception ok 14982 - exists $vlex{foo}[$gbl]{"x$lex"}: value ok 14983 - delete $vlex{foo}[$gbl]{"x$lex"}: no exception ok 14984 - delete $vlex{foo}[$gbl]{"x$lex"}: value ok 14985 - $vgbl{foo}[$gbl]{"x$lex"}: no exception ok 14986 - $vgbl{foo}[$gbl]{"x$lex"}: value ok 14987 - $vgbl{foo}[$gbl]{"x$lex"} = 123: no exception ok 14988 - $vgbl{foo}[$gbl]{"x$lex"} = 123: value ok 14989 - exists $vgbl{foo}[$gbl]{"x$lex"}: no exception ok 14990 - exists $vgbl{foo}[$gbl]{"x$lex"}: value ok 14991 - delete $vgbl{foo}[$gbl]{"x$lex"}: no exception ok 14992 - delete $vgbl{foo}[$gbl]{"x$lex"}: value ok 14993 - $vrlex->{foo}[$gbl]{"x$lex"}: no exception ok 14994 - $vrlex->{foo}[$gbl]{"x$lex"}: value ok 14995 - $vrlex->{foo}[$gbl]{"x$lex"} = 123: no exception ok 14996 - $vrlex->{foo}[$gbl]{"x$lex"} = 123: value ok 14997 - exists $vrlex->{foo}[$gbl]{"x$lex"}: no exception ok 14998 - exists $vrlex->{foo}[$gbl]{"x$lex"}: value ok 14999 - delete $vrlex->{foo}[$gbl]{"x$lex"}: no exception ok 15000 - delete $vrlex->{foo}[$gbl]{"x$lex"}: value ok 15001 - $vrgbl->{foo}[$gbl]{"x$lex"}: no exception ok 15002 - $vrgbl->{foo}[$gbl]{"x$lex"}: value ok 15003 - $vrgbl->{foo}[$gbl]{"x$lex"} = 123: no exception ok 15004 - $vrgbl->{foo}[$gbl]{"x$lex"} = 123: value ok 15005 - exists $vrgbl->{foo}[$gbl]{"x$lex"}: no exception ok 15006 - exists $vrgbl->{foo}[$gbl]{"x$lex"}: value ok 15007 - delete $vrgbl->{foo}[$gbl]{"x$lex"}: no exception ok 15008 - delete $vrgbl->{foo}[$gbl]{"x$lex"}: value ok 15009 - $vlex{$lex}[$gbl]{"x$lex"}: no exception ok 15010 - $vlex{$lex}[$gbl]{"x$lex"}: value ok 15011 - $vlex{$lex}[$gbl]{"x$lex"} = 123: no exception ok 15012 - $vlex{$lex}[$gbl]{"x$lex"} = 123: value ok 15013 - exists $vlex{$lex}[$gbl]{"x$lex"}: no exception ok 15014 - exists $vlex{$lex}[$gbl]{"x$lex"}: value ok 15015 - delete $vlex{$lex}[$gbl]{"x$lex"}: no exception ok 15016 - delete $vlex{$lex}[$gbl]{"x$lex"}: value ok 15017 - $vgbl{$lex}[$gbl]{"x$lex"}: no exception ok 15018 - $vgbl{$lex}[$gbl]{"x$lex"}: value ok 15019 - $vgbl{$lex}[$gbl]{"x$lex"} = 123: no exception ok 15020 - $vgbl{$lex}[$gbl]{"x$lex"} = 123: value ok 15021 - exists $vgbl{$lex}[$gbl]{"x$lex"}: no exception ok 15022 - exists $vgbl{$lex}[$gbl]{"x$lex"}: value ok 15023 - delete $vgbl{$lex}[$gbl]{"x$lex"}: no exception ok 15024 - delete $vgbl{$lex}[$gbl]{"x$lex"}: value ok 15025 - $vrlex->{$lex}[$gbl]{"x$lex"}: no exception ok 15026 - $vrlex->{$lex}[$gbl]{"x$lex"}: value ok 15027 - $vrlex->{$lex}[$gbl]{"x$lex"} = 123: no exception ok 15028 - $vrlex->{$lex}[$gbl]{"x$lex"} = 123: value ok 15029 - exists $vrlex->{$lex}[$gbl]{"x$lex"}: no exception ok 15030 - exists $vrlex->{$lex}[$gbl]{"x$lex"}: value ok 15031 - delete $vrlex->{$lex}[$gbl]{"x$lex"}: no exception ok 15032 - delete $vrlex->{$lex}[$gbl]{"x$lex"}: value ok 15033 - $vrgbl->{$lex}[$gbl]{"x$lex"}: no exception ok 15034 - $vrgbl->{$lex}[$gbl]{"x$lex"}: value ok 15035 - $vrgbl->{$lex}[$gbl]{"x$lex"} = 123: no exception ok 15036 - $vrgbl->{$lex}[$gbl]{"x$lex"} = 123: value ok 15037 - exists $vrgbl->{$lex}[$gbl]{"x$lex"}: no exception ok 15038 - exists $vrgbl->{$lex}[$gbl]{"x$lex"}: value ok 15039 - delete $vrgbl->{$lex}[$gbl]{"x$lex"}: no exception ok 15040 - delete $vrgbl->{$lex}[$gbl]{"x$lex"}: value ok 15041 - $vlex{$gbl}[$gbl]{"x$lex"}: no exception ok 15042 - $vlex{$gbl}[$gbl]{"x$lex"}: value ok 15043 - $vlex{$gbl}[$gbl]{"x$lex"} = 123: no exception ok 15044 - $vlex{$gbl}[$gbl]{"x$lex"} = 123: value ok 15045 - exists $vlex{$gbl}[$gbl]{"x$lex"}: no exception ok 15046 - exists $vlex{$gbl}[$gbl]{"x$lex"}: value ok 15047 - delete $vlex{$gbl}[$gbl]{"x$lex"}: no exception ok 15048 - delete $vlex{$gbl}[$gbl]{"x$lex"}: value ok 15049 - $vgbl{$gbl}[$gbl]{"x$lex"}: no exception ok 15050 - $vgbl{$gbl}[$gbl]{"x$lex"}: value ok 15051 - $vgbl{$gbl}[$gbl]{"x$lex"} = 123: no exception ok 15052 - $vgbl{$gbl}[$gbl]{"x$lex"} = 123: value ok 15053 - exists $vgbl{$gbl}[$gbl]{"x$lex"}: no exception ok 15054 - exists $vgbl{$gbl}[$gbl]{"x$lex"}: value ok 15055 - delete $vgbl{$gbl}[$gbl]{"x$lex"}: no exception ok 15056 - delete $vgbl{$gbl}[$gbl]{"x$lex"}: value ok 15057 - $vrlex->{$gbl}[$gbl]{"x$lex"}: no exception ok 15058 - $vrlex->{$gbl}[$gbl]{"x$lex"}: value ok 15059 - $vrlex->{$gbl}[$gbl]{"x$lex"} = 123: no exception ok 15060 - $vrlex->{$gbl}[$gbl]{"x$lex"} = 123: value ok 15061 - exists $vrlex->{$gbl}[$gbl]{"x$lex"}: no exception ok 15062 - exists $vrlex->{$gbl}[$gbl]{"x$lex"}: value ok 15063 - delete $vrlex->{$gbl}[$gbl]{"x$lex"}: no exception ok 15064 - delete $vrlex->{$gbl}[$gbl]{"x$lex"}: value ok 15065 - $vrgbl->{$gbl}[$gbl]{"x$lex"}: no exception ok 15066 - $vrgbl->{$gbl}[$gbl]{"x$lex"}: value ok 15067 - $vrgbl->{$gbl}[$gbl]{"x$lex"} = 123: no exception ok 15068 - $vrgbl->{$gbl}[$gbl]{"x$lex"} = 123: value ok 15069 - exists $vrgbl->{$gbl}[$gbl]{"x$lex"}: no exception ok 15070 - exists $vrgbl->{$gbl}[$gbl]{"x$lex"}: value ok 15071 - delete $vrgbl->{$gbl}[$gbl]{"x$lex"}: no exception ok 15072 - delete $vrgbl->{$gbl}[$gbl]{"x$lex"}: value ok 15073 - $vlex{"x$lex"}[$gbl]{"x$lex"}: no exception ok 15074 - $vlex{"x$lex"}[$gbl]{"x$lex"}: value ok 15075 - $vlex{"x$lex"}[$gbl]{"x$lex"} = 123: no exception ok 15076 - $vlex{"x$lex"}[$gbl]{"x$lex"} = 123: value ok 15077 - exists $vlex{"x$lex"}[$gbl]{"x$lex"}: no exception ok 15078 - exists $vlex{"x$lex"}[$gbl]{"x$lex"}: value ok 15079 - delete $vlex{"x$lex"}[$gbl]{"x$lex"}: no exception ok 15080 - delete $vlex{"x$lex"}[$gbl]{"x$lex"}: value ok 15081 - $vgbl{"x$lex"}[$gbl]{"x$lex"}: no exception ok 15082 - $vgbl{"x$lex"}[$gbl]{"x$lex"}: value ok 15083 - $vgbl{"x$lex"}[$gbl]{"x$lex"} = 123: no exception ok 15084 - $vgbl{"x$lex"}[$gbl]{"x$lex"} = 123: value ok 15085 - exists $vgbl{"x$lex"}[$gbl]{"x$lex"}: no exception ok 15086 - exists $vgbl{"x$lex"}[$gbl]{"x$lex"}: value ok 15087 - delete $vgbl{"x$lex"}[$gbl]{"x$lex"}: no exception ok 15088 - delete $vgbl{"x$lex"}[$gbl]{"x$lex"}: value ok 15089 - $vrlex->{"x$lex"}[$gbl]{"x$lex"}: no exception ok 15090 - $vrlex->{"x$lex"}[$gbl]{"x$lex"}: value ok 15091 - $vrlex->{"x$lex"}[$gbl]{"x$lex"} = 123: no exception ok 15092 - $vrlex->{"x$lex"}[$gbl]{"x$lex"} = 123: value ok 15093 - exists $vrlex->{"x$lex"}[$gbl]{"x$lex"}: no exception ok 15094 - exists $vrlex->{"x$lex"}[$gbl]{"x$lex"}: value ok 15095 - delete $vrlex->{"x$lex"}[$gbl]{"x$lex"}: no exception ok 15096 - delete $vrlex->{"x$lex"}[$gbl]{"x$lex"}: value ok 15097 - $vrgbl->{"x$lex"}[$gbl]{"x$lex"}: no exception ok 15098 - $vrgbl->{"x$lex"}[$gbl]{"x$lex"}: value ok 15099 - $vrgbl->{"x$lex"}[$gbl]{"x$lex"} = 123: no exception ok 15100 - $vrgbl->{"x$lex"}[$gbl]{"x$lex"} = 123: value ok 15101 - exists $vrgbl->{"x$lex"}[$gbl]{"x$lex"}: no exception ok 15102 - exists $vrgbl->{"x$lex"}[$gbl]{"x$lex"}: value ok 15103 - delete $vrgbl->{"x$lex"}[$gbl]{"x$lex"}: no exception ok 15104 - delete $vrgbl->{"x$lex"}[$gbl]{"x$lex"}: value ok 15105 - $vlex[0][$lex+1]{"x$lex"}: no exception ok 15106 - $vlex[0][$lex+1]{"x$lex"}: value ok 15107 - $vlex[0][$lex+1]{"x$lex"} = 123: no exception ok 15108 - $vlex[0][$lex+1]{"x$lex"} = 123: value ok 15109 - exists $vlex[0][$lex+1]{"x$lex"}: no exception ok 15110 - exists $vlex[0][$lex+1]{"x$lex"}: value ok 15111 - delete $vlex[0][$lex+1]{"x$lex"}: no exception ok 15112 - delete $vlex[0][$lex+1]{"x$lex"}: value ok 15113 - $vgbl[0][$lex+1]{"x$lex"}: no exception ok 15114 - $vgbl[0][$lex+1]{"x$lex"}: value ok 15115 - $vgbl[0][$lex+1]{"x$lex"} = 123: no exception ok 15116 - $vgbl[0][$lex+1]{"x$lex"} = 123: value ok 15117 - exists $vgbl[0][$lex+1]{"x$lex"}: no exception ok 15118 - exists $vgbl[0][$lex+1]{"x$lex"}: value ok 15119 - delete $vgbl[0][$lex+1]{"x$lex"}: no exception ok 15120 - delete $vgbl[0][$lex+1]{"x$lex"}: value ok 15121 - $vrlex->[0][$lex+1]{"x$lex"}: no exception ok 15122 - $vrlex->[0][$lex+1]{"x$lex"}: value ok 15123 - $vrlex->[0][$lex+1]{"x$lex"} = 123: no exception ok 15124 - $vrlex->[0][$lex+1]{"x$lex"} = 123: value ok 15125 - exists $vrlex->[0][$lex+1]{"x$lex"}: no exception ok 15126 - exists $vrlex->[0][$lex+1]{"x$lex"}: value ok 15127 - delete $vrlex->[0][$lex+1]{"x$lex"}: no exception ok 15128 - delete $vrlex->[0][$lex+1]{"x$lex"}: value ok 15129 - $vrgbl->[0][$lex+1]{"x$lex"}: no exception ok 15130 - $vrgbl->[0][$lex+1]{"x$lex"}: value ok 15131 - $vrgbl->[0][$lex+1]{"x$lex"} = 123: no exception ok 15132 - $vrgbl->[0][$lex+1]{"x$lex"} = 123: value ok 15133 - exists $vrgbl->[0][$lex+1]{"x$lex"}: no exception ok 15134 - exists $vrgbl->[0][$lex+1]{"x$lex"}: value ok 15135 - delete $vrgbl->[0][$lex+1]{"x$lex"}: no exception ok 15136 - delete $vrgbl->[0][$lex+1]{"x$lex"}: value ok 15137 - $vlex[$lex][$lex+1]{"x$lex"}: no exception ok 15138 - $vlex[$lex][$lex+1]{"x$lex"}: value ok 15139 - $vlex[$lex][$lex+1]{"x$lex"} = 123: no exception ok 15140 - $vlex[$lex][$lex+1]{"x$lex"} = 123: value ok 15141 - exists $vlex[$lex][$lex+1]{"x$lex"}: no exception ok 15142 - exists $vlex[$lex][$lex+1]{"x$lex"}: value ok 15143 - delete $vlex[$lex][$lex+1]{"x$lex"}: no exception ok 15144 - delete $vlex[$lex][$lex+1]{"x$lex"}: value ok 15145 - $vgbl[$lex][$lex+1]{"x$lex"}: no exception ok 15146 - $vgbl[$lex][$lex+1]{"x$lex"}: value ok 15147 - $vgbl[$lex][$lex+1]{"x$lex"} = 123: no exception ok 15148 - $vgbl[$lex][$lex+1]{"x$lex"} = 123: value ok 15149 - exists $vgbl[$lex][$lex+1]{"x$lex"}: no exception ok 15150 - exists $vgbl[$lex][$lex+1]{"x$lex"}: value ok 15151 - delete $vgbl[$lex][$lex+1]{"x$lex"}: no exception ok 15152 - delete $vgbl[$lex][$lex+1]{"x$lex"}: value ok 15153 - $vrlex->[$lex][$lex+1]{"x$lex"}: no exception ok 15154 - $vrlex->[$lex][$lex+1]{"x$lex"}: value ok 15155 - $vrlex->[$lex][$lex+1]{"x$lex"} = 123: no exception ok 15156 - $vrlex->[$lex][$lex+1]{"x$lex"} = 123: value ok 15157 - exists $vrlex->[$lex][$lex+1]{"x$lex"}: no exception ok 15158 - exists $vrlex->[$lex][$lex+1]{"x$lex"}: value ok 15159 - delete $vrlex->[$lex][$lex+1]{"x$lex"}: no exception ok 15160 - delete $vrlex->[$lex][$lex+1]{"x$lex"}: value ok 15161 - $vrgbl->[$lex][$lex+1]{"x$lex"}: no exception ok 15162 - $vrgbl->[$lex][$lex+1]{"x$lex"}: value ok 15163 - $vrgbl->[$lex][$lex+1]{"x$lex"} = 123: no exception ok 15164 - $vrgbl->[$lex][$lex+1]{"x$lex"} = 123: value ok 15165 - exists $vrgbl->[$lex][$lex+1]{"x$lex"}: no exception ok 15166 - exists $vrgbl->[$lex][$lex+1]{"x$lex"}: value ok 15167 - delete $vrgbl->[$lex][$lex+1]{"x$lex"}: no exception ok 15168 - delete $vrgbl->[$lex][$lex+1]{"x$lex"}: value ok 15169 - $vlex[$gbl][$lex+1]{"x$lex"}: no exception ok 15170 - $vlex[$gbl][$lex+1]{"x$lex"}: value ok 15171 - $vlex[$gbl][$lex+1]{"x$lex"} = 123: no exception ok 15172 - $vlex[$gbl][$lex+1]{"x$lex"} = 123: value ok 15173 - exists $vlex[$gbl][$lex+1]{"x$lex"}: no exception ok 15174 - exists $vlex[$gbl][$lex+1]{"x$lex"}: value ok 15175 - delete $vlex[$gbl][$lex+1]{"x$lex"}: no exception ok 15176 - delete $vlex[$gbl][$lex+1]{"x$lex"}: value ok 15177 - $vgbl[$gbl][$lex+1]{"x$lex"}: no exception ok 15178 - $vgbl[$gbl][$lex+1]{"x$lex"}: value ok 15179 - $vgbl[$gbl][$lex+1]{"x$lex"} = 123: no exception ok 15180 - $vgbl[$gbl][$lex+1]{"x$lex"} = 123: value ok 15181 - exists $vgbl[$gbl][$lex+1]{"x$lex"}: no exception ok 15182 - exists $vgbl[$gbl][$lex+1]{"x$lex"}: value ok 15183 - delete $vgbl[$gbl][$lex+1]{"x$lex"}: no exception ok 15184 - delete $vgbl[$gbl][$lex+1]{"x$lex"}: value ok 15185 - $vrlex->[$gbl][$lex+1]{"x$lex"}: no exception ok 15186 - $vrlex->[$gbl][$lex+1]{"x$lex"}: value ok 15187 - $vrlex->[$gbl][$lex+1]{"x$lex"} = 123: no exception ok 15188 - $vrlex->[$gbl][$lex+1]{"x$lex"} = 123: value ok 15189 - exists $vrlex->[$gbl][$lex+1]{"x$lex"}: no exception ok 15190 - exists $vrlex->[$gbl][$lex+1]{"x$lex"}: value ok 15191 - delete $vrlex->[$gbl][$lex+1]{"x$lex"}: no exception ok 15192 - delete $vrlex->[$gbl][$lex+1]{"x$lex"}: value ok 15193 - $vrgbl->[$gbl][$lex+1]{"x$lex"}: no exception ok 15194 - $vrgbl->[$gbl][$lex+1]{"x$lex"}: value ok 15195 - $vrgbl->[$gbl][$lex+1]{"x$lex"} = 123: no exception ok 15196 - $vrgbl->[$gbl][$lex+1]{"x$lex"} = 123: value ok 15197 - exists $vrgbl->[$gbl][$lex+1]{"x$lex"}: no exception ok 15198 - exists $vrgbl->[$gbl][$lex+1]{"x$lex"}: value ok 15199 - delete $vrgbl->[$gbl][$lex+1]{"x$lex"}: no exception ok 15200 - delete $vrgbl->[$gbl][$lex+1]{"x$lex"}: value ok 15201 - $vlex[$lex+1][$lex+1]{"x$lex"}: no exception ok 15202 - $vlex[$lex+1][$lex+1]{"x$lex"}: value ok 15203 - $vlex[$lex+1][$lex+1]{"x$lex"} = 123: no exception ok 15204 - $vlex[$lex+1][$lex+1]{"x$lex"} = 123: value ok 15205 - exists $vlex[$lex+1][$lex+1]{"x$lex"}: no exception ok 15206 - exists $vlex[$lex+1][$lex+1]{"x$lex"}: value ok 15207 - delete $vlex[$lex+1][$lex+1]{"x$lex"}: no exception ok 15208 - delete $vlex[$lex+1][$lex+1]{"x$lex"}: value ok 15209 - $vgbl[$lex+1][$lex+1]{"x$lex"}: no exception ok 15210 - $vgbl[$lex+1][$lex+1]{"x$lex"}: value ok 15211 - $vgbl[$lex+1][$lex+1]{"x$lex"} = 123: no exception ok 15212 - $vgbl[$lex+1][$lex+1]{"x$lex"} = 123: value ok 15213 - exists $vgbl[$lex+1][$lex+1]{"x$lex"}: no exception ok 15214 - exists $vgbl[$lex+1][$lex+1]{"x$lex"}: value ok 15215 - delete $vgbl[$lex+1][$lex+1]{"x$lex"}: no exception ok 15216 - delete $vgbl[$lex+1][$lex+1]{"x$lex"}: value ok 15217 - $vrlex->[$lex+1][$lex+1]{"x$lex"}: no exception ok 15218 - $vrlex->[$lex+1][$lex+1]{"x$lex"}: value ok 15219 - $vrlex->[$lex+1][$lex+1]{"x$lex"} = 123: no exception ok 15220 - $vrlex->[$lex+1][$lex+1]{"x$lex"} = 123: value ok 15221 - exists $vrlex->[$lex+1][$lex+1]{"x$lex"}: no exception ok 15222 - exists $vrlex->[$lex+1][$lex+1]{"x$lex"}: value ok 15223 - delete $vrlex->[$lex+1][$lex+1]{"x$lex"}: no exception ok 15224 - delete $vrlex->[$lex+1][$lex+1]{"x$lex"}: value ok 15225 - $vrgbl->[$lex+1][$lex+1]{"x$lex"}: no exception ok 15226 - $vrgbl->[$lex+1][$lex+1]{"x$lex"}: value ok 15227 - $vrgbl->[$lex+1][$lex+1]{"x$lex"} = 123: no exception ok 15228 - $vrgbl->[$lex+1][$lex+1]{"x$lex"} = 123: value ok 15229 - exists $vrgbl->[$lex+1][$lex+1]{"x$lex"}: no exception ok 15230 - exists $vrgbl->[$lex+1][$lex+1]{"x$lex"}: value ok 15231 - delete $vrgbl->[$lex+1][$lex+1]{"x$lex"}: no exception ok 15232 - delete $vrgbl->[$lex+1][$lex+1]{"x$lex"}: value ok 15233 - $vlex{foo}[$lex+1]{"x$lex"}: no exception ok 15234 - $vlex{foo}[$lex+1]{"x$lex"}: value ok 15235 - $vlex{foo}[$lex+1]{"x$lex"} = 123: no exception ok 15236 - $vlex{foo}[$lex+1]{"x$lex"} = 123: value ok 15237 - exists $vlex{foo}[$lex+1]{"x$lex"}: no exception ok 15238 - exists $vlex{foo}[$lex+1]{"x$lex"}: value ok 15239 - delete $vlex{foo}[$lex+1]{"x$lex"}: no exception ok 15240 - delete $vlex{foo}[$lex+1]{"x$lex"}: value ok 15241 - $vgbl{foo}[$lex+1]{"x$lex"}: no exception ok 15242 - $vgbl{foo}[$lex+1]{"x$lex"}: value ok 15243 - $vgbl{foo}[$lex+1]{"x$lex"} = 123: no exception ok 15244 - $vgbl{foo}[$lex+1]{"x$lex"} = 123: value ok 15245 - exists $vgbl{foo}[$lex+1]{"x$lex"}: no exception ok 15246 - exists $vgbl{foo}[$lex+1]{"x$lex"}: value ok 15247 - delete $vgbl{foo}[$lex+1]{"x$lex"}: no exception ok 15248 - delete $vgbl{foo}[$lex+1]{"x$lex"}: value ok 15249 - $vrlex->{foo}[$lex+1]{"x$lex"}: no exception ok 15250 - $vrlex->{foo}[$lex+1]{"x$lex"}: value ok 15251 - $vrlex->{foo}[$lex+1]{"x$lex"} = 123: no exception ok 15252 - $vrlex->{foo}[$lex+1]{"x$lex"} = 123: value ok 15253 - exists $vrlex->{foo}[$lex+1]{"x$lex"}: no exception ok 15254 - exists $vrlex->{foo}[$lex+1]{"x$lex"}: value ok 15255 - delete $vrlex->{foo}[$lex+1]{"x$lex"}: no exception ok 15256 - delete $vrlex->{foo}[$lex+1]{"x$lex"}: value ok 15257 - $vrgbl->{foo}[$lex+1]{"x$lex"}: no exception ok 15258 - $vrgbl->{foo}[$lex+1]{"x$lex"}: value ok 15259 - $vrgbl->{foo}[$lex+1]{"x$lex"} = 123: no exception ok 15260 - $vrgbl->{foo}[$lex+1]{"x$lex"} = 123: value ok 15261 - exists $vrgbl->{foo}[$lex+1]{"x$lex"}: no exception ok 15262 - exists $vrgbl->{foo}[$lex+1]{"x$lex"}: value ok 15263 - delete $vrgbl->{foo}[$lex+1]{"x$lex"}: no exception ok 15264 - delete $vrgbl->{foo}[$lex+1]{"x$lex"}: value ok 15265 - $vlex{$lex}[$lex+1]{"x$lex"}: no exception ok 15266 - $vlex{$lex}[$lex+1]{"x$lex"}: value ok 15267 - $vlex{$lex}[$lex+1]{"x$lex"} = 123: no exception ok 15268 - $vlex{$lex}[$lex+1]{"x$lex"} = 123: value ok 15269 - exists $vlex{$lex}[$lex+1]{"x$lex"}: no exception ok 15270 - exists $vlex{$lex}[$lex+1]{"x$lex"}: value ok 15271 - delete $vlex{$lex}[$lex+1]{"x$lex"}: no exception ok 15272 - delete $vlex{$lex}[$lex+1]{"x$lex"}: value ok 15273 - $vgbl{$lex}[$lex+1]{"x$lex"}: no exception ok 15274 - $vgbl{$lex}[$lex+1]{"x$lex"}: value ok 15275 - $vgbl{$lex}[$lex+1]{"x$lex"} = 123: no exception ok 15276 - $vgbl{$lex}[$lex+1]{"x$lex"} = 123: value ok 15277 - exists $vgbl{$lex}[$lex+1]{"x$lex"}: no exception ok 15278 - exists $vgbl{$lex}[$lex+1]{"x$lex"}: value ok 15279 - delete $vgbl{$lex}[$lex+1]{"x$lex"}: no exception ok 15280 - delete $vgbl{$lex}[$lex+1]{"x$lex"}: value ok 15281 - $vrlex->{$lex}[$lex+1]{"x$lex"}: no exception ok 15282 - $vrlex->{$lex}[$lex+1]{"x$lex"}: value ok 15283 - $vrlex->{$lex}[$lex+1]{"x$lex"} = 123: no exception ok 15284 - $vrlex->{$lex}[$lex+1]{"x$lex"} = 123: value ok 15285 - exists $vrlex->{$lex}[$lex+1]{"x$lex"}: no exception ok 15286 - exists $vrlex->{$lex}[$lex+1]{"x$lex"}: value ok 15287 - delete $vrlex->{$lex}[$lex+1]{"x$lex"}: no exception ok 15288 - delete $vrlex->{$lex}[$lex+1]{"x$lex"}: value ok 15289 - $vrgbl->{$lex}[$lex+1]{"x$lex"}: no exception ok 15290 - $vrgbl->{$lex}[$lex+1]{"x$lex"}: value ok 15291 - $vrgbl->{$lex}[$lex+1]{"x$lex"} = 123: no exception ok 15292 - $vrgbl->{$lex}[$lex+1]{"x$lex"} = 123: value ok 15293 - exists $vrgbl->{$lex}[$lex+1]{"x$lex"}: no exception ok 15294 - exists $vrgbl->{$lex}[$lex+1]{"x$lex"}: value ok 15295 - delete $vrgbl->{$lex}[$lex+1]{"x$lex"}: no exception ok 15296 - delete $vrgbl->{$lex}[$lex+1]{"x$lex"}: value ok 15297 - $vlex{$gbl}[$lex+1]{"x$lex"}: no exception ok 15298 - $vlex{$gbl}[$lex+1]{"x$lex"}: value ok 15299 - $vlex{$gbl}[$lex+1]{"x$lex"} = 123: no exception ok 15300 - $vlex{$gbl}[$lex+1]{"x$lex"} = 123: value ok 15301 - exists $vlex{$gbl}[$lex+1]{"x$lex"}: no exception ok 15302 - exists $vlex{$gbl}[$lex+1]{"x$lex"}: value ok 15303 - delete $vlex{$gbl}[$lex+1]{"x$lex"}: no exception ok 15304 - delete $vlex{$gbl}[$lex+1]{"x$lex"}: value ok 15305 - $vgbl{$gbl}[$lex+1]{"x$lex"}: no exception ok 15306 - $vgbl{$gbl}[$lex+1]{"x$lex"}: value ok 15307 - $vgbl{$gbl}[$lex+1]{"x$lex"} = 123: no exception ok 15308 - $vgbl{$gbl}[$lex+1]{"x$lex"} = 123: value ok 15309 - exists $vgbl{$gbl}[$lex+1]{"x$lex"}: no exception ok 15310 - exists $vgbl{$gbl}[$lex+1]{"x$lex"}: value ok 15311 - delete $vgbl{$gbl}[$lex+1]{"x$lex"}: no exception ok 15312 - delete $vgbl{$gbl}[$lex+1]{"x$lex"}: value ok 15313 - $vrlex->{$gbl}[$lex+1]{"x$lex"}: no exception ok 15314 - $vrlex->{$gbl}[$lex+1]{"x$lex"}: value ok 15315 - $vrlex->{$gbl}[$lex+1]{"x$lex"} = 123: no exception ok 15316 - $vrlex->{$gbl}[$lex+1]{"x$lex"} = 123: value ok 15317 - exists $vrlex->{$gbl}[$lex+1]{"x$lex"}: no exception ok 15318 - exists $vrlex->{$gbl}[$lex+1]{"x$lex"}: value ok 15319 - delete $vrlex->{$gbl}[$lex+1]{"x$lex"}: no exception ok 15320 - delete $vrlex->{$gbl}[$lex+1]{"x$lex"}: value ok 15321 - $vrgbl->{$gbl}[$lex+1]{"x$lex"}: no exception ok 15322 - $vrgbl->{$gbl}[$lex+1]{"x$lex"}: value ok 15323 - $vrgbl->{$gbl}[$lex+1]{"x$lex"} = 123: no exception ok 15324 - $vrgbl->{$gbl}[$lex+1]{"x$lex"} = 123: value ok 15325 - exists $vrgbl->{$gbl}[$lex+1]{"x$lex"}: no exception ok 15326 - exists $vrgbl->{$gbl}[$lex+1]{"x$lex"}: value ok 15327 - delete $vrgbl->{$gbl}[$lex+1]{"x$lex"}: no exception ok 15328 - delete $vrgbl->{$gbl}[$lex+1]{"x$lex"}: value ok 15329 - $vlex{"x$lex"}[$lex+1]{"x$lex"}: no exception ok 15330 - $vlex{"x$lex"}[$lex+1]{"x$lex"}: value ok 15331 - $vlex{"x$lex"}[$lex+1]{"x$lex"} = 123: no exception ok 15332 - $vlex{"x$lex"}[$lex+1]{"x$lex"} = 123: value ok 15333 - exists $vlex{"x$lex"}[$lex+1]{"x$lex"}: no exception ok 15334 - exists $vlex{"x$lex"}[$lex+1]{"x$lex"}: value ok 15335 - delete $vlex{"x$lex"}[$lex+1]{"x$lex"}: no exception ok 15336 - delete $vlex{"x$lex"}[$lex+1]{"x$lex"}: value ok 15337 - $vgbl{"x$lex"}[$lex+1]{"x$lex"}: no exception ok 15338 - $vgbl{"x$lex"}[$lex+1]{"x$lex"}: value ok 15339 - $vgbl{"x$lex"}[$lex+1]{"x$lex"} = 123: no exception ok 15340 - $vgbl{"x$lex"}[$lex+1]{"x$lex"} = 123: value ok 15341 - exists $vgbl{"x$lex"}[$lex+1]{"x$lex"}: no exception ok 15342 - exists $vgbl{"x$lex"}[$lex+1]{"x$lex"}: value ok 15343 - delete $vgbl{"x$lex"}[$lex+1]{"x$lex"}: no exception ok 15344 - delete $vgbl{"x$lex"}[$lex+1]{"x$lex"}: value ok 15345 - $vrlex->{"x$lex"}[$lex+1]{"x$lex"}: no exception ok 15346 - $vrlex->{"x$lex"}[$lex+1]{"x$lex"}: value ok 15347 - $vrlex->{"x$lex"}[$lex+1]{"x$lex"} = 123: no exception ok 15348 - $vrlex->{"x$lex"}[$lex+1]{"x$lex"} = 123: value ok 15349 - exists $vrlex->{"x$lex"}[$lex+1]{"x$lex"}: no exception ok 15350 - exists $vrlex->{"x$lex"}[$lex+1]{"x$lex"}: value ok 15351 - delete $vrlex->{"x$lex"}[$lex+1]{"x$lex"}: no exception ok 15352 - delete $vrlex->{"x$lex"}[$lex+1]{"x$lex"}: value ok 15353 - $vrgbl->{"x$lex"}[$lex+1]{"x$lex"}: no exception ok 15354 - $vrgbl->{"x$lex"}[$lex+1]{"x$lex"}: value ok 15355 - $vrgbl->{"x$lex"}[$lex+1]{"x$lex"} = 123: no exception ok 15356 - $vrgbl->{"x$lex"}[$lex+1]{"x$lex"} = 123: value ok 15357 - exists $vrgbl->{"x$lex"}[$lex+1]{"x$lex"}: no exception ok 15358 - exists $vrgbl->{"x$lex"}[$lex+1]{"x$lex"}: value ok 15359 - delete $vrgbl->{"x$lex"}[$lex+1]{"x$lex"}: no exception ok 15360 - delete $vrgbl->{"x$lex"}[$lex+1]{"x$lex"}: value ok 15361 - $vlex[0]{foo}{"x$lex"}: no exception ok 15362 - $vlex[0]{foo}{"x$lex"}: value ok 15363 - $vlex[0]{foo}{"x$lex"} = 123: no exception ok 15364 - $vlex[0]{foo}{"x$lex"} = 123: value ok 15365 - exists $vlex[0]{foo}{"x$lex"}: no exception ok 15366 - exists $vlex[0]{foo}{"x$lex"}: value ok 15367 - delete $vlex[0]{foo}{"x$lex"}: no exception ok 15368 - delete $vlex[0]{foo}{"x$lex"}: value ok 15369 - $vgbl[0]{foo}{"x$lex"}: no exception ok 15370 - $vgbl[0]{foo}{"x$lex"}: value ok 15371 - $vgbl[0]{foo}{"x$lex"} = 123: no exception ok 15372 - $vgbl[0]{foo}{"x$lex"} = 123: value ok 15373 - exists $vgbl[0]{foo}{"x$lex"}: no exception ok 15374 - exists $vgbl[0]{foo}{"x$lex"}: value ok 15375 - delete $vgbl[0]{foo}{"x$lex"}: no exception ok 15376 - delete $vgbl[0]{foo}{"x$lex"}: value ok 15377 - $vrlex->[0]{foo}{"x$lex"}: no exception ok 15378 - $vrlex->[0]{foo}{"x$lex"}: value ok 15379 - $vrlex->[0]{foo}{"x$lex"} = 123: no exception ok 15380 - $vrlex->[0]{foo}{"x$lex"} = 123: value ok 15381 - exists $vrlex->[0]{foo}{"x$lex"}: no exception ok 15382 - exists $vrlex->[0]{foo}{"x$lex"}: value ok 15383 - delete $vrlex->[0]{foo}{"x$lex"}: no exception ok 15384 - delete $vrlex->[0]{foo}{"x$lex"}: value ok 15385 - $vrgbl->[0]{foo}{"x$lex"}: no exception ok 15386 - $vrgbl->[0]{foo}{"x$lex"}: value ok 15387 - $vrgbl->[0]{foo}{"x$lex"} = 123: no exception ok 15388 - $vrgbl->[0]{foo}{"x$lex"} = 123: value ok 15389 - exists $vrgbl->[0]{foo}{"x$lex"}: no exception ok 15390 - exists $vrgbl->[0]{foo}{"x$lex"}: value ok 15391 - delete $vrgbl->[0]{foo}{"x$lex"}: no exception ok 15392 - delete $vrgbl->[0]{foo}{"x$lex"}: value ok 15393 - $vlex[$lex]{foo}{"x$lex"}: no exception ok 15394 - $vlex[$lex]{foo}{"x$lex"}: value ok 15395 - $vlex[$lex]{foo}{"x$lex"} = 123: no exception ok 15396 - $vlex[$lex]{foo}{"x$lex"} = 123: value ok 15397 - exists $vlex[$lex]{foo}{"x$lex"}: no exception ok 15398 - exists $vlex[$lex]{foo}{"x$lex"}: value ok 15399 - delete $vlex[$lex]{foo}{"x$lex"}: no exception ok 15400 - delete $vlex[$lex]{foo}{"x$lex"}: value ok 15401 - $vgbl[$lex]{foo}{"x$lex"}: no exception ok 15402 - $vgbl[$lex]{foo}{"x$lex"}: value ok 15403 - $vgbl[$lex]{foo}{"x$lex"} = 123: no exception ok 15404 - $vgbl[$lex]{foo}{"x$lex"} = 123: value ok 15405 - exists $vgbl[$lex]{foo}{"x$lex"}: no exception ok 15406 - exists $vgbl[$lex]{foo}{"x$lex"}: value ok 15407 - delete $vgbl[$lex]{foo}{"x$lex"}: no exception ok 15408 - delete $vgbl[$lex]{foo}{"x$lex"}: value ok 15409 - $vrlex->[$lex]{foo}{"x$lex"}: no exception ok 15410 - $vrlex->[$lex]{foo}{"x$lex"}: value ok 15411 - $vrlex->[$lex]{foo}{"x$lex"} = 123: no exception ok 15412 - $vrlex->[$lex]{foo}{"x$lex"} = 123: value ok 15413 - exists $vrlex->[$lex]{foo}{"x$lex"}: no exception ok 15414 - exists $vrlex->[$lex]{foo}{"x$lex"}: value ok 15415 - delete $vrlex->[$lex]{foo}{"x$lex"}: no exception ok 15416 - delete $vrlex->[$lex]{foo}{"x$lex"}: value ok 15417 - $vrgbl->[$lex]{foo}{"x$lex"}: no exception ok 15418 - $vrgbl->[$lex]{foo}{"x$lex"}: value ok 15419 - $vrgbl->[$lex]{foo}{"x$lex"} = 123: no exception ok 15420 - $vrgbl->[$lex]{foo}{"x$lex"} = 123: value ok 15421 - exists $vrgbl->[$lex]{foo}{"x$lex"}: no exception ok 15422 - exists $vrgbl->[$lex]{foo}{"x$lex"}: value ok 15423 - delete $vrgbl->[$lex]{foo}{"x$lex"}: no exception ok 15424 - delete $vrgbl->[$lex]{foo}{"x$lex"}: value ok 15425 - $vlex[$gbl]{foo}{"x$lex"}: no exception ok 15426 - $vlex[$gbl]{foo}{"x$lex"}: value ok 15427 - $vlex[$gbl]{foo}{"x$lex"} = 123: no exception ok 15428 - $vlex[$gbl]{foo}{"x$lex"} = 123: value ok 15429 - exists $vlex[$gbl]{foo}{"x$lex"}: no exception ok 15430 - exists $vlex[$gbl]{foo}{"x$lex"}: value ok 15431 - delete $vlex[$gbl]{foo}{"x$lex"}: no exception ok 15432 - delete $vlex[$gbl]{foo}{"x$lex"}: value ok 15433 - $vgbl[$gbl]{foo}{"x$lex"}: no exception ok 15434 - $vgbl[$gbl]{foo}{"x$lex"}: value ok 15435 - $vgbl[$gbl]{foo}{"x$lex"} = 123: no exception ok 15436 - $vgbl[$gbl]{foo}{"x$lex"} = 123: value ok 15437 - exists $vgbl[$gbl]{foo}{"x$lex"}: no exception ok 15438 - exists $vgbl[$gbl]{foo}{"x$lex"}: value ok 15439 - delete $vgbl[$gbl]{foo}{"x$lex"}: no exception ok 15440 - delete $vgbl[$gbl]{foo}{"x$lex"}: value ok 15441 - $vrlex->[$gbl]{foo}{"x$lex"}: no exception ok 15442 - $vrlex->[$gbl]{foo}{"x$lex"}: value ok 15443 - $vrlex->[$gbl]{foo}{"x$lex"} = 123: no exception ok 15444 - $vrlex->[$gbl]{foo}{"x$lex"} = 123: value ok 15445 - exists $vrlex->[$gbl]{foo}{"x$lex"}: no exception ok 15446 - exists $vrlex->[$gbl]{foo}{"x$lex"}: value ok 15447 - delete $vrlex->[$gbl]{foo}{"x$lex"}: no exception ok 15448 - delete $vrlex->[$gbl]{foo}{"x$lex"}: value ok 15449 - $vrgbl->[$gbl]{foo}{"x$lex"}: no exception ok 15450 - $vrgbl->[$gbl]{foo}{"x$lex"}: value ok 15451 - $vrgbl->[$gbl]{foo}{"x$lex"} = 123: no exception ok 15452 - $vrgbl->[$gbl]{foo}{"x$lex"} = 123: value ok 15453 - exists $vrgbl->[$gbl]{foo}{"x$lex"}: no exception ok 15454 - exists $vrgbl->[$gbl]{foo}{"x$lex"}: value ok 15455 - delete $vrgbl->[$gbl]{foo}{"x$lex"}: no exception ok 15456 - delete $vrgbl->[$gbl]{foo}{"x$lex"}: value ok 15457 - $vlex[$lex+1]{foo}{"x$lex"}: no exception ok 15458 - $vlex[$lex+1]{foo}{"x$lex"}: value ok 15459 - $vlex[$lex+1]{foo}{"x$lex"} = 123: no exception ok 15460 - $vlex[$lex+1]{foo}{"x$lex"} = 123: value ok 15461 - exists $vlex[$lex+1]{foo}{"x$lex"}: no exception ok 15462 - exists $vlex[$lex+1]{foo}{"x$lex"}: value ok 15463 - delete $vlex[$lex+1]{foo}{"x$lex"}: no exception ok 15464 - delete $vlex[$lex+1]{foo}{"x$lex"}: value ok 15465 - $vgbl[$lex+1]{foo}{"x$lex"}: no exception ok 15466 - $vgbl[$lex+1]{foo}{"x$lex"}: value ok 15467 - $vgbl[$lex+1]{foo}{"x$lex"} = 123: no exception ok 15468 - $vgbl[$lex+1]{foo}{"x$lex"} = 123: value ok 15469 - exists $vgbl[$lex+1]{foo}{"x$lex"}: no exception ok 15470 - exists $vgbl[$lex+1]{foo}{"x$lex"}: value ok 15471 - delete $vgbl[$lex+1]{foo}{"x$lex"}: no exception ok 15472 - delete $vgbl[$lex+1]{foo}{"x$lex"}: value ok 15473 - $vrlex->[$lex+1]{foo}{"x$lex"}: no exception ok 15474 - $vrlex->[$lex+1]{foo}{"x$lex"}: value ok 15475 - $vrlex->[$lex+1]{foo}{"x$lex"} = 123: no exception ok 15476 - $vrlex->[$lex+1]{foo}{"x$lex"} = 123: value ok 15477 - exists $vrlex->[$lex+1]{foo}{"x$lex"}: no exception ok 15478 - exists $vrlex->[$lex+1]{foo}{"x$lex"}: value ok 15479 - delete $vrlex->[$lex+1]{foo}{"x$lex"}: no exception ok 15480 - delete $vrlex->[$lex+1]{foo}{"x$lex"}: value ok 15481 - $vrgbl->[$lex+1]{foo}{"x$lex"}: no exception ok 15482 - $vrgbl->[$lex+1]{foo}{"x$lex"}: value ok 15483 - $vrgbl->[$lex+1]{foo}{"x$lex"} = 123: no exception ok 15484 - $vrgbl->[$lex+1]{foo}{"x$lex"} = 123: value ok 15485 - exists $vrgbl->[$lex+1]{foo}{"x$lex"}: no exception ok 15486 - exists $vrgbl->[$lex+1]{foo}{"x$lex"}: value ok 15487 - delete $vrgbl->[$lex+1]{foo}{"x$lex"}: no exception ok 15488 - delete $vrgbl->[$lex+1]{foo}{"x$lex"}: value ok 15489 - $vlex{foo}{foo}{"x$lex"}: no exception ok 15490 - $vlex{foo}{foo}{"x$lex"}: value ok 15491 - $vlex{foo}{foo}{"x$lex"} = 123: no exception ok 15492 - $vlex{foo}{foo}{"x$lex"} = 123: value ok 15493 - exists $vlex{foo}{foo}{"x$lex"}: no exception ok 15494 - exists $vlex{foo}{foo}{"x$lex"}: value ok 15495 - delete $vlex{foo}{foo}{"x$lex"}: no exception ok 15496 - delete $vlex{foo}{foo}{"x$lex"}: value ok 15497 - $vgbl{foo}{foo}{"x$lex"}: no exception ok 15498 - $vgbl{foo}{foo}{"x$lex"}: value ok 15499 - $vgbl{foo}{foo}{"x$lex"} = 123: no exception ok 15500 - $vgbl{foo}{foo}{"x$lex"} = 123: value ok 15501 - exists $vgbl{foo}{foo}{"x$lex"}: no exception ok 15502 - exists $vgbl{foo}{foo}{"x$lex"}: value ok 15503 - delete $vgbl{foo}{foo}{"x$lex"}: no exception ok 15504 - delete $vgbl{foo}{foo}{"x$lex"}: value ok 15505 - $vrlex->{foo}{foo}{"x$lex"}: no exception ok 15506 - $vrlex->{foo}{foo}{"x$lex"}: value ok 15507 - $vrlex->{foo}{foo}{"x$lex"} = 123: no exception ok 15508 - $vrlex->{foo}{foo}{"x$lex"} = 123: value ok 15509 - exists $vrlex->{foo}{foo}{"x$lex"}: no exception ok 15510 - exists $vrlex->{foo}{foo}{"x$lex"}: value ok 15511 - delete $vrlex->{foo}{foo}{"x$lex"}: no exception ok 15512 - delete $vrlex->{foo}{foo}{"x$lex"}: value ok 15513 - $vrgbl->{foo}{foo}{"x$lex"}: no exception ok 15514 - $vrgbl->{foo}{foo}{"x$lex"}: value ok 15515 - $vrgbl->{foo}{foo}{"x$lex"} = 123: no exception ok 15516 - $vrgbl->{foo}{foo}{"x$lex"} = 123: value ok 15517 - exists $vrgbl->{foo}{foo}{"x$lex"}: no exception ok 15518 - exists $vrgbl->{foo}{foo}{"x$lex"}: value ok 15519 - delete $vrgbl->{foo}{foo}{"x$lex"}: no exception ok 15520 - delete $vrgbl->{foo}{foo}{"x$lex"}: value ok 15521 - $vlex{$lex}{foo}{"x$lex"}: no exception ok 15522 - $vlex{$lex}{foo}{"x$lex"}: value ok 15523 - $vlex{$lex}{foo}{"x$lex"} = 123: no exception ok 15524 - $vlex{$lex}{foo}{"x$lex"} = 123: value ok 15525 - exists $vlex{$lex}{foo}{"x$lex"}: no exception ok 15526 - exists $vlex{$lex}{foo}{"x$lex"}: value ok 15527 - delete $vlex{$lex}{foo}{"x$lex"}: no exception ok 15528 - delete $vlex{$lex}{foo}{"x$lex"}: value ok 15529 - $vgbl{$lex}{foo}{"x$lex"}: no exception ok 15530 - $vgbl{$lex}{foo}{"x$lex"}: value ok 15531 - $vgbl{$lex}{foo}{"x$lex"} = 123: no exception ok 15532 - $vgbl{$lex}{foo}{"x$lex"} = 123: value ok 15533 - exists $vgbl{$lex}{foo}{"x$lex"}: no exception ok 15534 - exists $vgbl{$lex}{foo}{"x$lex"}: value ok 15535 - delete $vgbl{$lex}{foo}{"x$lex"}: no exception ok 15536 - delete $vgbl{$lex}{foo}{"x$lex"}: value ok 15537 - $vrlex->{$lex}{foo}{"x$lex"}: no exception ok 15538 - $vrlex->{$lex}{foo}{"x$lex"}: value ok 15539 - $vrlex->{$lex}{foo}{"x$lex"} = 123: no exception ok 15540 - $vrlex->{$lex}{foo}{"x$lex"} = 123: value ok 15541 - exists $vrlex->{$lex}{foo}{"x$lex"}: no exception ok 15542 - exists $vrlex->{$lex}{foo}{"x$lex"}: value ok 15543 - delete $vrlex->{$lex}{foo}{"x$lex"}: no exception ok 15544 - delete $vrlex->{$lex}{foo}{"x$lex"}: value ok 15545 - $vrgbl->{$lex}{foo}{"x$lex"}: no exception ok 15546 - $vrgbl->{$lex}{foo}{"x$lex"}: value ok 15547 - $vrgbl->{$lex}{foo}{"x$lex"} = 123: no exception ok 15548 - $vrgbl->{$lex}{foo}{"x$lex"} = 123: value ok 15549 - exists $vrgbl->{$lex}{foo}{"x$lex"}: no exception ok 15550 - exists $vrgbl->{$lex}{foo}{"x$lex"}: value ok 15551 - delete $vrgbl->{$lex}{foo}{"x$lex"}: no exception ok 15552 - delete $vrgbl->{$lex}{foo}{"x$lex"}: value ok 15553 - $vlex{$gbl}{foo}{"x$lex"}: no exception ok 15554 - $vlex{$gbl}{foo}{"x$lex"}: value ok 15555 - $vlex{$gbl}{foo}{"x$lex"} = 123: no exception ok 15556 - $vlex{$gbl}{foo}{"x$lex"} = 123: value ok 15557 - exists $vlex{$gbl}{foo}{"x$lex"}: no exception ok 15558 - exists $vlex{$gbl}{foo}{"x$lex"}: value ok 15559 - delete $vlex{$gbl}{foo}{"x$lex"}: no exception ok 15560 - delete $vlex{$gbl}{foo}{"x$lex"}: value ok 15561 - $vgbl{$gbl}{foo}{"x$lex"}: no exception ok 15562 - $vgbl{$gbl}{foo}{"x$lex"}: value ok 15563 - $vgbl{$gbl}{foo}{"x$lex"} = 123: no exception ok 15564 - $vgbl{$gbl}{foo}{"x$lex"} = 123: value ok 15565 - exists $vgbl{$gbl}{foo}{"x$lex"}: no exception ok 15566 - exists $vgbl{$gbl}{foo}{"x$lex"}: value ok 15567 - delete $vgbl{$gbl}{foo}{"x$lex"}: no exception ok 15568 - delete $vgbl{$gbl}{foo}{"x$lex"}: value ok 15569 - $vrlex->{$gbl}{foo}{"x$lex"}: no exception ok 15570 - $vrlex->{$gbl}{foo}{"x$lex"}: value ok 15571 - $vrlex->{$gbl}{foo}{"x$lex"} = 123: no exception ok 15572 - $vrlex->{$gbl}{foo}{"x$lex"} = 123: value ok 15573 - exists $vrlex->{$gbl}{foo}{"x$lex"}: no exception ok 15574 - exists $vrlex->{$gbl}{foo}{"x$lex"}: value ok 15575 - delete $vrlex->{$gbl}{foo}{"x$lex"}: no exception ok 15576 - delete $vrlex->{$gbl}{foo}{"x$lex"}: value ok 15577 - $vrgbl->{$gbl}{foo}{"x$lex"}: no exception ok 15578 - $vrgbl->{$gbl}{foo}{"x$lex"}: value ok 15579 - $vrgbl->{$gbl}{foo}{"x$lex"} = 123: no exception ok 15580 - $vrgbl->{$gbl}{foo}{"x$lex"} = 123: value ok 15581 - exists $vrgbl->{$gbl}{foo}{"x$lex"}: no exception ok 15582 - exists $vrgbl->{$gbl}{foo}{"x$lex"}: value ok 15583 - delete $vrgbl->{$gbl}{foo}{"x$lex"}: no exception ok 15584 - delete $vrgbl->{$gbl}{foo}{"x$lex"}: value ok 15585 - $vlex{"x$lex"}{foo}{"x$lex"}: no exception ok 15586 - $vlex{"x$lex"}{foo}{"x$lex"}: value ok 15587 - $vlex{"x$lex"}{foo}{"x$lex"} = 123: no exception ok 15588 - $vlex{"x$lex"}{foo}{"x$lex"} = 123: value ok 15589 - exists $vlex{"x$lex"}{foo}{"x$lex"}: no exception ok 15590 - exists $vlex{"x$lex"}{foo}{"x$lex"}: value ok 15591 - delete $vlex{"x$lex"}{foo}{"x$lex"}: no exception ok 15592 - delete $vlex{"x$lex"}{foo}{"x$lex"}: value ok 15593 - $vgbl{"x$lex"}{foo}{"x$lex"}: no exception ok 15594 - $vgbl{"x$lex"}{foo}{"x$lex"}: value ok 15595 - $vgbl{"x$lex"}{foo}{"x$lex"} = 123: no exception ok 15596 - $vgbl{"x$lex"}{foo}{"x$lex"} = 123: value ok 15597 - exists $vgbl{"x$lex"}{foo}{"x$lex"}: no exception ok 15598 - exists $vgbl{"x$lex"}{foo}{"x$lex"}: value ok 15599 - delete $vgbl{"x$lex"}{foo}{"x$lex"}: no exception ok 15600 - delete $vgbl{"x$lex"}{foo}{"x$lex"}: value ok 15601 - $vrlex->{"x$lex"}{foo}{"x$lex"}: no exception ok 15602 - $vrlex->{"x$lex"}{foo}{"x$lex"}: value ok 15603 - $vrlex->{"x$lex"}{foo}{"x$lex"} = 123: no exception ok 15604 - $vrlex->{"x$lex"}{foo}{"x$lex"} = 123: value ok 15605 - exists $vrlex->{"x$lex"}{foo}{"x$lex"}: no exception ok 15606 - exists $vrlex->{"x$lex"}{foo}{"x$lex"}: value ok 15607 - delete $vrlex->{"x$lex"}{foo}{"x$lex"}: no exception ok 15608 - delete $vrlex->{"x$lex"}{foo}{"x$lex"}: value ok 15609 - $vrgbl->{"x$lex"}{foo}{"x$lex"}: no exception ok 15610 - $vrgbl->{"x$lex"}{foo}{"x$lex"}: value ok 15611 - $vrgbl->{"x$lex"}{foo}{"x$lex"} = 123: no exception ok 15612 - $vrgbl->{"x$lex"}{foo}{"x$lex"} = 123: value ok 15613 - exists $vrgbl->{"x$lex"}{foo}{"x$lex"}: no exception ok 15614 - exists $vrgbl->{"x$lex"}{foo}{"x$lex"}: value ok 15615 - delete $vrgbl->{"x$lex"}{foo}{"x$lex"}: no exception ok 15616 - delete $vrgbl->{"x$lex"}{foo}{"x$lex"}: value ok 15617 - $vlex[0]{$lex}{"x$lex"}: no exception ok 15618 - $vlex[0]{$lex}{"x$lex"}: value ok 15619 - $vlex[0]{$lex}{"x$lex"} = 123: no exception ok 15620 - $vlex[0]{$lex}{"x$lex"} = 123: value ok 15621 - exists $vlex[0]{$lex}{"x$lex"}: no exception ok 15622 - exists $vlex[0]{$lex}{"x$lex"}: value ok 15623 - delete $vlex[0]{$lex}{"x$lex"}: no exception ok 15624 - delete $vlex[0]{$lex}{"x$lex"}: value ok 15625 - $vgbl[0]{$lex}{"x$lex"}: no exception ok 15626 - $vgbl[0]{$lex}{"x$lex"}: value ok 15627 - $vgbl[0]{$lex}{"x$lex"} = 123: no exception ok 15628 - $vgbl[0]{$lex}{"x$lex"} = 123: value ok 15629 - exists $vgbl[0]{$lex}{"x$lex"}: no exception ok 15630 - exists $vgbl[0]{$lex}{"x$lex"}: value ok 15631 - delete $vgbl[0]{$lex}{"x$lex"}: no exception ok 15632 - delete $vgbl[0]{$lex}{"x$lex"}: value ok 15633 - $vrlex->[0]{$lex}{"x$lex"}: no exception ok 15634 - $vrlex->[0]{$lex}{"x$lex"}: value ok 15635 - $vrlex->[0]{$lex}{"x$lex"} = 123: no exception ok 15636 - $vrlex->[0]{$lex}{"x$lex"} = 123: value ok 15637 - exists $vrlex->[0]{$lex}{"x$lex"}: no exception ok 15638 - exists $vrlex->[0]{$lex}{"x$lex"}: value ok 15639 - delete $vrlex->[0]{$lex}{"x$lex"}: no exception ok 15640 - delete $vrlex->[0]{$lex}{"x$lex"}: value ok 15641 - $vrgbl->[0]{$lex}{"x$lex"}: no exception ok 15642 - $vrgbl->[0]{$lex}{"x$lex"}: value ok 15643 - $vrgbl->[0]{$lex}{"x$lex"} = 123: no exception ok 15644 - $vrgbl->[0]{$lex}{"x$lex"} = 123: value ok 15645 - exists $vrgbl->[0]{$lex}{"x$lex"}: no exception ok 15646 - exists $vrgbl->[0]{$lex}{"x$lex"}: value ok 15647 - delete $vrgbl->[0]{$lex}{"x$lex"}: no exception ok 15648 - delete $vrgbl->[0]{$lex}{"x$lex"}: value ok 15649 - $vlex[$lex]{$lex}{"x$lex"}: no exception ok 15650 - $vlex[$lex]{$lex}{"x$lex"}: value ok 15651 - $vlex[$lex]{$lex}{"x$lex"} = 123: no exception ok 15652 - $vlex[$lex]{$lex}{"x$lex"} = 123: value ok 15653 - exists $vlex[$lex]{$lex}{"x$lex"}: no exception ok 15654 - exists $vlex[$lex]{$lex}{"x$lex"}: value ok 15655 - delete $vlex[$lex]{$lex}{"x$lex"}: no exception ok 15656 - delete $vlex[$lex]{$lex}{"x$lex"}: value ok 15657 - $vgbl[$lex]{$lex}{"x$lex"}: no exception ok 15658 - $vgbl[$lex]{$lex}{"x$lex"}: value ok 15659 - $vgbl[$lex]{$lex}{"x$lex"} = 123: no exception ok 15660 - $vgbl[$lex]{$lex}{"x$lex"} = 123: value ok 15661 - exists $vgbl[$lex]{$lex}{"x$lex"}: no exception ok 15662 - exists $vgbl[$lex]{$lex}{"x$lex"}: value ok 15663 - delete $vgbl[$lex]{$lex}{"x$lex"}: no exception ok 15664 - delete $vgbl[$lex]{$lex}{"x$lex"}: value ok 15665 - $vrlex->[$lex]{$lex}{"x$lex"}: no exception ok 15666 - $vrlex->[$lex]{$lex}{"x$lex"}: value ok 15667 - $vrlex->[$lex]{$lex}{"x$lex"} = 123: no exception ok 15668 - $vrlex->[$lex]{$lex}{"x$lex"} = 123: value ok 15669 - exists $vrlex->[$lex]{$lex}{"x$lex"}: no exception ok 15670 - exists $vrlex->[$lex]{$lex}{"x$lex"}: value ok 15671 - delete $vrlex->[$lex]{$lex}{"x$lex"}: no exception ok 15672 - delete $vrlex->[$lex]{$lex}{"x$lex"}: value ok 15673 - $vrgbl->[$lex]{$lex}{"x$lex"}: no exception ok 15674 - $vrgbl->[$lex]{$lex}{"x$lex"}: value ok 15675 - $vrgbl->[$lex]{$lex}{"x$lex"} = 123: no exception ok 15676 - $vrgbl->[$lex]{$lex}{"x$lex"} = 123: value ok 15677 - exists $vrgbl->[$lex]{$lex}{"x$lex"}: no exception ok 15678 - exists $vrgbl->[$lex]{$lex}{"x$lex"}: value ok 15679 - delete $vrgbl->[$lex]{$lex}{"x$lex"}: no exception ok 15680 - delete $vrgbl->[$lex]{$lex}{"x$lex"}: value ok 15681 - $vlex[$gbl]{$lex}{"x$lex"}: no exception ok 15682 - $vlex[$gbl]{$lex}{"x$lex"}: value ok 15683 - $vlex[$gbl]{$lex}{"x$lex"} = 123: no exception ok 15684 - $vlex[$gbl]{$lex}{"x$lex"} = 123: value ok 15685 - exists $vlex[$gbl]{$lex}{"x$lex"}: no exception ok 15686 - exists $vlex[$gbl]{$lex}{"x$lex"}: value ok 15687 - delete $vlex[$gbl]{$lex}{"x$lex"}: no exception ok 15688 - delete $vlex[$gbl]{$lex}{"x$lex"}: value ok 15689 - $vgbl[$gbl]{$lex}{"x$lex"}: no exception ok 15690 - $vgbl[$gbl]{$lex}{"x$lex"}: value ok 15691 - $vgbl[$gbl]{$lex}{"x$lex"} = 123: no exception ok 15692 - $vgbl[$gbl]{$lex}{"x$lex"} = 123: value ok 15693 - exists $vgbl[$gbl]{$lex}{"x$lex"}: no exception ok 15694 - exists $vgbl[$gbl]{$lex}{"x$lex"}: value ok 15695 - delete $vgbl[$gbl]{$lex}{"x$lex"}: no exception ok 15696 - delete $vgbl[$gbl]{$lex}{"x$lex"}: value ok 15697 - $vrlex->[$gbl]{$lex}{"x$lex"}: no exception ok 15698 - $vrlex->[$gbl]{$lex}{"x$lex"}: value ok 15699 - $vrlex->[$gbl]{$lex}{"x$lex"} = 123: no exception ok 15700 - $vrlex->[$gbl]{$lex}{"x$lex"} = 123: value ok 15701 - exists $vrlex->[$gbl]{$lex}{"x$lex"}: no exception ok 15702 - exists $vrlex->[$gbl]{$lex}{"x$lex"}: value ok 15703 - delete $vrlex->[$gbl]{$lex}{"x$lex"}: no exception ok 15704 - delete $vrlex->[$gbl]{$lex}{"x$lex"}: value ok 15705 - $vrgbl->[$gbl]{$lex}{"x$lex"}: no exception ok 15706 - $vrgbl->[$gbl]{$lex}{"x$lex"}: value ok 15707 - $vrgbl->[$gbl]{$lex}{"x$lex"} = 123: no exception ok 15708 - $vrgbl->[$gbl]{$lex}{"x$lex"} = 123: value ok 15709 - exists $vrgbl->[$gbl]{$lex}{"x$lex"}: no exception ok 15710 - exists $vrgbl->[$gbl]{$lex}{"x$lex"}: value ok 15711 - delete $vrgbl->[$gbl]{$lex}{"x$lex"}: no exception ok 15712 - delete $vrgbl->[$gbl]{$lex}{"x$lex"}: value ok 15713 - $vlex[$lex+1]{$lex}{"x$lex"}: no exception ok 15714 - $vlex[$lex+1]{$lex}{"x$lex"}: value ok 15715 - $vlex[$lex+1]{$lex}{"x$lex"} = 123: no exception ok 15716 - $vlex[$lex+1]{$lex}{"x$lex"} = 123: value ok 15717 - exists $vlex[$lex+1]{$lex}{"x$lex"}: no exception ok 15718 - exists $vlex[$lex+1]{$lex}{"x$lex"}: value ok 15719 - delete $vlex[$lex+1]{$lex}{"x$lex"}: no exception ok 15720 - delete $vlex[$lex+1]{$lex}{"x$lex"}: value ok 15721 - $vgbl[$lex+1]{$lex}{"x$lex"}: no exception ok 15722 - $vgbl[$lex+1]{$lex}{"x$lex"}: value ok 15723 - $vgbl[$lex+1]{$lex}{"x$lex"} = 123: no exception ok 15724 - $vgbl[$lex+1]{$lex}{"x$lex"} = 123: value ok 15725 - exists $vgbl[$lex+1]{$lex}{"x$lex"}: no exception ok 15726 - exists $vgbl[$lex+1]{$lex}{"x$lex"}: value ok 15727 - delete $vgbl[$lex+1]{$lex}{"x$lex"}: no exception ok 15728 - delete $vgbl[$lex+1]{$lex}{"x$lex"}: value ok 15729 - $vrlex->[$lex+1]{$lex}{"x$lex"}: no exception ok 15730 - $vrlex->[$lex+1]{$lex}{"x$lex"}: value ok 15731 - $vrlex->[$lex+1]{$lex}{"x$lex"} = 123: no exception ok 15732 - $vrlex->[$lex+1]{$lex}{"x$lex"} = 123: value ok 15733 - exists $vrlex->[$lex+1]{$lex}{"x$lex"}: no exception ok 15734 - exists $vrlex->[$lex+1]{$lex}{"x$lex"}: value ok 15735 - delete $vrlex->[$lex+1]{$lex}{"x$lex"}: no exception ok 15736 - delete $vrlex->[$lex+1]{$lex}{"x$lex"}: value ok 15737 - $vrgbl->[$lex+1]{$lex}{"x$lex"}: no exception ok 15738 - $vrgbl->[$lex+1]{$lex}{"x$lex"}: value ok 15739 - $vrgbl->[$lex+1]{$lex}{"x$lex"} = 123: no exception ok 15740 - $vrgbl->[$lex+1]{$lex}{"x$lex"} = 123: value ok 15741 - exists $vrgbl->[$lex+1]{$lex}{"x$lex"}: no exception ok 15742 - exists $vrgbl->[$lex+1]{$lex}{"x$lex"}: value ok 15743 - delete $vrgbl->[$lex+1]{$lex}{"x$lex"}: no exception ok 15744 - delete $vrgbl->[$lex+1]{$lex}{"x$lex"}: value ok 15745 - $vlex{foo}{$lex}{"x$lex"}: no exception ok 15746 - $vlex{foo}{$lex}{"x$lex"}: value ok 15747 - $vlex{foo}{$lex}{"x$lex"} = 123: no exception ok 15748 - $vlex{foo}{$lex}{"x$lex"} = 123: value ok 15749 - exists $vlex{foo}{$lex}{"x$lex"}: no exception ok 15750 - exists $vlex{foo}{$lex}{"x$lex"}: value ok 15751 - delete $vlex{foo}{$lex}{"x$lex"}: no exception ok 15752 - delete $vlex{foo}{$lex}{"x$lex"}: value ok 15753 - $vgbl{foo}{$lex}{"x$lex"}: no exception ok 15754 - $vgbl{foo}{$lex}{"x$lex"}: value ok 15755 - $vgbl{foo}{$lex}{"x$lex"} = 123: no exception ok 15756 - $vgbl{foo}{$lex}{"x$lex"} = 123: value ok 15757 - exists $vgbl{foo}{$lex}{"x$lex"}: no exception ok 15758 - exists $vgbl{foo}{$lex}{"x$lex"}: value ok 15759 - delete $vgbl{foo}{$lex}{"x$lex"}: no exception ok 15760 - delete $vgbl{foo}{$lex}{"x$lex"}: value ok 15761 - $vrlex->{foo}{$lex}{"x$lex"}: no exception ok 15762 - $vrlex->{foo}{$lex}{"x$lex"}: value ok 15763 - $vrlex->{foo}{$lex}{"x$lex"} = 123: no exception ok 15764 - $vrlex->{foo}{$lex}{"x$lex"} = 123: value ok 15765 - exists $vrlex->{foo}{$lex}{"x$lex"}: no exception ok 15766 - exists $vrlex->{foo}{$lex}{"x$lex"}: value ok 15767 - delete $vrlex->{foo}{$lex}{"x$lex"}: no exception ok 15768 - delete $vrlex->{foo}{$lex}{"x$lex"}: value ok 15769 - $vrgbl->{foo}{$lex}{"x$lex"}: no exception ok 15770 - $vrgbl->{foo}{$lex}{"x$lex"}: value ok 15771 - $vrgbl->{foo}{$lex}{"x$lex"} = 123: no exception ok 15772 - $vrgbl->{foo}{$lex}{"x$lex"} = 123: value ok 15773 - exists $vrgbl->{foo}{$lex}{"x$lex"}: no exception ok 15774 - exists $vrgbl->{foo}{$lex}{"x$lex"}: value ok 15775 - delete $vrgbl->{foo}{$lex}{"x$lex"}: no exception ok 15776 - delete $vrgbl->{foo}{$lex}{"x$lex"}: value ok 15777 - $vlex{$lex}{$lex}{"x$lex"}: no exception ok 15778 - $vlex{$lex}{$lex}{"x$lex"}: value ok 15779 - $vlex{$lex}{$lex}{"x$lex"} = 123: no exception ok 15780 - $vlex{$lex}{$lex}{"x$lex"} = 123: value ok 15781 - exists $vlex{$lex}{$lex}{"x$lex"}: no exception ok 15782 - exists $vlex{$lex}{$lex}{"x$lex"}: value ok 15783 - delete $vlex{$lex}{$lex}{"x$lex"}: no exception ok 15784 - delete $vlex{$lex}{$lex}{"x$lex"}: value ok 15785 - $vgbl{$lex}{$lex}{"x$lex"}: no exception ok 15786 - $vgbl{$lex}{$lex}{"x$lex"}: value ok 15787 - $vgbl{$lex}{$lex}{"x$lex"} = 123: no exception ok 15788 - $vgbl{$lex}{$lex}{"x$lex"} = 123: value ok 15789 - exists $vgbl{$lex}{$lex}{"x$lex"}: no exception ok 15790 - exists $vgbl{$lex}{$lex}{"x$lex"}: value ok 15791 - delete $vgbl{$lex}{$lex}{"x$lex"}: no exception ok 15792 - delete $vgbl{$lex}{$lex}{"x$lex"}: value ok 15793 - $vrlex->{$lex}{$lex}{"x$lex"}: no exception ok 15794 - $vrlex->{$lex}{$lex}{"x$lex"}: value ok 15795 - $vrlex->{$lex}{$lex}{"x$lex"} = 123: no exception ok 15796 - $vrlex->{$lex}{$lex}{"x$lex"} = 123: value ok 15797 - exists $vrlex->{$lex}{$lex}{"x$lex"}: no exception ok 15798 - exists $vrlex->{$lex}{$lex}{"x$lex"}: value ok 15799 - delete $vrlex->{$lex}{$lex}{"x$lex"}: no exception ok 15800 - delete $vrlex->{$lex}{$lex}{"x$lex"}: value ok 15801 - $vrgbl->{$lex}{$lex}{"x$lex"}: no exception ok 15802 - $vrgbl->{$lex}{$lex}{"x$lex"}: value ok 15803 - $vrgbl->{$lex}{$lex}{"x$lex"} = 123: no exception ok 15804 - $vrgbl->{$lex}{$lex}{"x$lex"} = 123: value ok 15805 - exists $vrgbl->{$lex}{$lex}{"x$lex"}: no exception ok 15806 - exists $vrgbl->{$lex}{$lex}{"x$lex"}: value ok 15807 - delete $vrgbl->{$lex}{$lex}{"x$lex"}: no exception ok 15808 - delete $vrgbl->{$lex}{$lex}{"x$lex"}: value ok 15809 - $vlex{$gbl}{$lex}{"x$lex"}: no exception ok 15810 - $vlex{$gbl}{$lex}{"x$lex"}: value ok 15811 - $vlex{$gbl}{$lex}{"x$lex"} = 123: no exception ok 15812 - $vlex{$gbl}{$lex}{"x$lex"} = 123: value ok 15813 - exists $vlex{$gbl}{$lex}{"x$lex"}: no exception ok 15814 - exists $vlex{$gbl}{$lex}{"x$lex"}: value ok 15815 - delete $vlex{$gbl}{$lex}{"x$lex"}: no exception ok 15816 - delete $vlex{$gbl}{$lex}{"x$lex"}: value ok 15817 - $vgbl{$gbl}{$lex}{"x$lex"}: no exception ok 15818 - $vgbl{$gbl}{$lex}{"x$lex"}: value ok 15819 - $vgbl{$gbl}{$lex}{"x$lex"} = 123: no exception ok 15820 - $vgbl{$gbl}{$lex}{"x$lex"} = 123: value ok 15821 - exists $vgbl{$gbl}{$lex}{"x$lex"}: no exception ok 15822 - exists $vgbl{$gbl}{$lex}{"x$lex"}: value ok 15823 - delete $vgbl{$gbl}{$lex}{"x$lex"}: no exception ok 15824 - delete $vgbl{$gbl}{$lex}{"x$lex"}: value ok 15825 - $vrlex->{$gbl}{$lex}{"x$lex"}: no exception ok 15826 - $vrlex->{$gbl}{$lex}{"x$lex"}: value ok 15827 - $vrlex->{$gbl}{$lex}{"x$lex"} = 123: no exception ok 15828 - $vrlex->{$gbl}{$lex}{"x$lex"} = 123: value ok 15829 - exists $vrlex->{$gbl}{$lex}{"x$lex"}: no exception ok 15830 - exists $vrlex->{$gbl}{$lex}{"x$lex"}: value ok 15831 - delete $vrlex->{$gbl}{$lex}{"x$lex"}: no exception ok 15832 - delete $vrlex->{$gbl}{$lex}{"x$lex"}: value ok 15833 - $vrgbl->{$gbl}{$lex}{"x$lex"}: no exception ok 15834 - $vrgbl->{$gbl}{$lex}{"x$lex"}: value ok 15835 - $vrgbl->{$gbl}{$lex}{"x$lex"} = 123: no exception ok 15836 - $vrgbl->{$gbl}{$lex}{"x$lex"} = 123: value ok 15837 - exists $vrgbl->{$gbl}{$lex}{"x$lex"}: no exception ok 15838 - exists $vrgbl->{$gbl}{$lex}{"x$lex"}: value ok 15839 - delete $vrgbl->{$gbl}{$lex}{"x$lex"}: no exception ok 15840 - delete $vrgbl->{$gbl}{$lex}{"x$lex"}: value ok 15841 - $vlex{"x$lex"}{$lex}{"x$lex"}: no exception ok 15842 - $vlex{"x$lex"}{$lex}{"x$lex"}: value ok 15843 - $vlex{"x$lex"}{$lex}{"x$lex"} = 123: no exception ok 15844 - $vlex{"x$lex"}{$lex}{"x$lex"} = 123: value ok 15845 - exists $vlex{"x$lex"}{$lex}{"x$lex"}: no exception ok 15846 - exists $vlex{"x$lex"}{$lex}{"x$lex"}: value ok 15847 - delete $vlex{"x$lex"}{$lex}{"x$lex"}: no exception ok 15848 - delete $vlex{"x$lex"}{$lex}{"x$lex"}: value ok 15849 - $vgbl{"x$lex"}{$lex}{"x$lex"}: no exception ok 15850 - $vgbl{"x$lex"}{$lex}{"x$lex"}: value ok 15851 - $vgbl{"x$lex"}{$lex}{"x$lex"} = 123: no exception ok 15852 - $vgbl{"x$lex"}{$lex}{"x$lex"} = 123: value ok 15853 - exists $vgbl{"x$lex"}{$lex}{"x$lex"}: no exception ok 15854 - exists $vgbl{"x$lex"}{$lex}{"x$lex"}: value ok 15855 - delete $vgbl{"x$lex"}{$lex}{"x$lex"}: no exception ok 15856 - delete $vgbl{"x$lex"}{$lex}{"x$lex"}: value ok 15857 - $vrlex->{"x$lex"}{$lex}{"x$lex"}: no exception ok 15858 - $vrlex->{"x$lex"}{$lex}{"x$lex"}: value ok 15859 - $vrlex->{"x$lex"}{$lex}{"x$lex"} = 123: no exception ok 15860 - $vrlex->{"x$lex"}{$lex}{"x$lex"} = 123: value ok 15861 - exists $vrlex->{"x$lex"}{$lex}{"x$lex"}: no exception ok 15862 - exists $vrlex->{"x$lex"}{$lex}{"x$lex"}: value ok 15863 - delete $vrlex->{"x$lex"}{$lex}{"x$lex"}: no exception ok 15864 - delete $vrlex->{"x$lex"}{$lex}{"x$lex"}: value ok 15865 - $vrgbl->{"x$lex"}{$lex}{"x$lex"}: no exception ok 15866 - $vrgbl->{"x$lex"}{$lex}{"x$lex"}: value ok 15867 - $vrgbl->{"x$lex"}{$lex}{"x$lex"} = 123: no exception ok 15868 - $vrgbl->{"x$lex"}{$lex}{"x$lex"} = 123: value ok 15869 - exists $vrgbl->{"x$lex"}{$lex}{"x$lex"}: no exception ok 15870 - exists $vrgbl->{"x$lex"}{$lex}{"x$lex"}: value ok 15871 - delete $vrgbl->{"x$lex"}{$lex}{"x$lex"}: no exception ok 15872 - delete $vrgbl->{"x$lex"}{$lex}{"x$lex"}: value ok 15873 - $vlex[0]{$gbl}{"x$lex"}: no exception ok 15874 - $vlex[0]{$gbl}{"x$lex"}: value ok 15875 - $vlex[0]{$gbl}{"x$lex"} = 123: no exception ok 15876 - $vlex[0]{$gbl}{"x$lex"} = 123: value ok 15877 - exists $vlex[0]{$gbl}{"x$lex"}: no exception ok 15878 - exists $vlex[0]{$gbl}{"x$lex"}: value ok 15879 - delete $vlex[0]{$gbl}{"x$lex"}: no exception ok 15880 - delete $vlex[0]{$gbl}{"x$lex"}: value ok 15881 - $vgbl[0]{$gbl}{"x$lex"}: no exception ok 15882 - $vgbl[0]{$gbl}{"x$lex"}: value ok 15883 - $vgbl[0]{$gbl}{"x$lex"} = 123: no exception ok 15884 - $vgbl[0]{$gbl}{"x$lex"} = 123: value ok 15885 - exists $vgbl[0]{$gbl}{"x$lex"}: no exception ok 15886 - exists $vgbl[0]{$gbl}{"x$lex"}: value ok 15887 - delete $vgbl[0]{$gbl}{"x$lex"}: no exception ok 15888 - delete $vgbl[0]{$gbl}{"x$lex"}: value ok 15889 - $vrlex->[0]{$gbl}{"x$lex"}: no exception ok 15890 - $vrlex->[0]{$gbl}{"x$lex"}: value ok 15891 - $vrlex->[0]{$gbl}{"x$lex"} = 123: no exception ok 15892 - $vrlex->[0]{$gbl}{"x$lex"} = 123: value ok 15893 - exists $vrlex->[0]{$gbl}{"x$lex"}: no exception ok 15894 - exists $vrlex->[0]{$gbl}{"x$lex"}: value ok 15895 - delete $vrlex->[0]{$gbl}{"x$lex"}: no exception ok 15896 - delete $vrlex->[0]{$gbl}{"x$lex"}: value ok 15897 - $vrgbl->[0]{$gbl}{"x$lex"}: no exception ok 15898 - $vrgbl->[0]{$gbl}{"x$lex"}: value ok 15899 - $vrgbl->[0]{$gbl}{"x$lex"} = 123: no exception ok 15900 - $vrgbl->[0]{$gbl}{"x$lex"} = 123: value ok 15901 - exists $vrgbl->[0]{$gbl}{"x$lex"}: no exception ok 15902 - exists $vrgbl->[0]{$gbl}{"x$lex"}: value ok 15903 - delete $vrgbl->[0]{$gbl}{"x$lex"}: no exception ok 15904 - delete $vrgbl->[0]{$gbl}{"x$lex"}: value ok 15905 - $vlex[$lex]{$gbl}{"x$lex"}: no exception ok 15906 - $vlex[$lex]{$gbl}{"x$lex"}: value ok 15907 - $vlex[$lex]{$gbl}{"x$lex"} = 123: no exception ok 15908 - $vlex[$lex]{$gbl}{"x$lex"} = 123: value ok 15909 - exists $vlex[$lex]{$gbl}{"x$lex"}: no exception ok 15910 - exists $vlex[$lex]{$gbl}{"x$lex"}: value ok 15911 - delete $vlex[$lex]{$gbl}{"x$lex"}: no exception ok 15912 - delete $vlex[$lex]{$gbl}{"x$lex"}: value ok 15913 - $vgbl[$lex]{$gbl}{"x$lex"}: no exception ok 15914 - $vgbl[$lex]{$gbl}{"x$lex"}: value ok 15915 - $vgbl[$lex]{$gbl}{"x$lex"} = 123: no exception ok 15916 - $vgbl[$lex]{$gbl}{"x$lex"} = 123: value ok 15917 - exists $vgbl[$lex]{$gbl}{"x$lex"}: no exception ok 15918 - exists $vgbl[$lex]{$gbl}{"x$lex"}: value ok 15919 - delete $vgbl[$lex]{$gbl}{"x$lex"}: no exception ok 15920 - delete $vgbl[$lex]{$gbl}{"x$lex"}: value ok 15921 - $vrlex->[$lex]{$gbl}{"x$lex"}: no exception ok 15922 - $vrlex->[$lex]{$gbl}{"x$lex"}: value ok 15923 - $vrlex->[$lex]{$gbl}{"x$lex"} = 123: no exception ok 15924 - $vrlex->[$lex]{$gbl}{"x$lex"} = 123: value ok 15925 - exists $vrlex->[$lex]{$gbl}{"x$lex"}: no exception ok 15926 - exists $vrlex->[$lex]{$gbl}{"x$lex"}: value ok 15927 - delete $vrlex->[$lex]{$gbl}{"x$lex"}: no exception ok 15928 - delete $vrlex->[$lex]{$gbl}{"x$lex"}: value ok 15929 - $vrgbl->[$lex]{$gbl}{"x$lex"}: no exception ok 15930 - $vrgbl->[$lex]{$gbl}{"x$lex"}: value ok 15931 - $vrgbl->[$lex]{$gbl}{"x$lex"} = 123: no exception ok 15932 - $vrgbl->[$lex]{$gbl}{"x$lex"} = 123: value ok 15933 - exists $vrgbl->[$lex]{$gbl}{"x$lex"}: no exception ok 15934 - exists $vrgbl->[$lex]{$gbl}{"x$lex"}: value ok 15935 - delete $vrgbl->[$lex]{$gbl}{"x$lex"}: no exception ok 15936 - delete $vrgbl->[$lex]{$gbl}{"x$lex"}: value ok 15937 - $vlex[$gbl]{$gbl}{"x$lex"}: no exception ok 15938 - $vlex[$gbl]{$gbl}{"x$lex"}: value ok 15939 - $vlex[$gbl]{$gbl}{"x$lex"} = 123: no exception ok 15940 - $vlex[$gbl]{$gbl}{"x$lex"} = 123: value ok 15941 - exists $vlex[$gbl]{$gbl}{"x$lex"}: no exception ok 15942 - exists $vlex[$gbl]{$gbl}{"x$lex"}: value ok 15943 - delete $vlex[$gbl]{$gbl}{"x$lex"}: no exception ok 15944 - delete $vlex[$gbl]{$gbl}{"x$lex"}: value ok 15945 - $vgbl[$gbl]{$gbl}{"x$lex"}: no exception ok 15946 - $vgbl[$gbl]{$gbl}{"x$lex"}: value ok 15947 - $vgbl[$gbl]{$gbl}{"x$lex"} = 123: no exception ok 15948 - $vgbl[$gbl]{$gbl}{"x$lex"} = 123: value ok 15949 - exists $vgbl[$gbl]{$gbl}{"x$lex"}: no exception ok 15950 - exists $vgbl[$gbl]{$gbl}{"x$lex"}: value ok 15951 - delete $vgbl[$gbl]{$gbl}{"x$lex"}: no exception ok 15952 - delete $vgbl[$gbl]{$gbl}{"x$lex"}: value ok 15953 - $vrlex->[$gbl]{$gbl}{"x$lex"}: no exception ok 15954 - $vrlex->[$gbl]{$gbl}{"x$lex"}: value ok 15955 - $vrlex->[$gbl]{$gbl}{"x$lex"} = 123: no exception ok 15956 - $vrlex->[$gbl]{$gbl}{"x$lex"} = 123: value ok 15957 - exists $vrlex->[$gbl]{$gbl}{"x$lex"}: no exception ok 15958 - exists $vrlex->[$gbl]{$gbl}{"x$lex"}: value ok 15959 - delete $vrlex->[$gbl]{$gbl}{"x$lex"}: no exception ok 15960 - delete $vrlex->[$gbl]{$gbl}{"x$lex"}: value ok 15961 - $vrgbl->[$gbl]{$gbl}{"x$lex"}: no exception ok 15962 - $vrgbl->[$gbl]{$gbl}{"x$lex"}: value ok 15963 - $vrgbl->[$gbl]{$gbl}{"x$lex"} = 123: no exception ok 15964 - $vrgbl->[$gbl]{$gbl}{"x$lex"} = 123: value ok 15965 - exists $vrgbl->[$gbl]{$gbl}{"x$lex"}: no exception ok 15966 - exists $vrgbl->[$gbl]{$gbl}{"x$lex"}: value ok 15967 - delete $vrgbl->[$gbl]{$gbl}{"x$lex"}: no exception ok 15968 - delete $vrgbl->[$gbl]{$gbl}{"x$lex"}: value ok 15969 - $vlex[$lex+1]{$gbl}{"x$lex"}: no exception ok 15970 - $vlex[$lex+1]{$gbl}{"x$lex"}: value ok 15971 - $vlex[$lex+1]{$gbl}{"x$lex"} = 123: no exception ok 15972 - $vlex[$lex+1]{$gbl}{"x$lex"} = 123: value ok 15973 - exists $vlex[$lex+1]{$gbl}{"x$lex"}: no exception ok 15974 - exists $vlex[$lex+1]{$gbl}{"x$lex"}: value ok 15975 - delete $vlex[$lex+1]{$gbl}{"x$lex"}: no exception ok 15976 - delete $vlex[$lex+1]{$gbl}{"x$lex"}: value ok 15977 - $vgbl[$lex+1]{$gbl}{"x$lex"}: no exception ok 15978 - $vgbl[$lex+1]{$gbl}{"x$lex"}: value ok 15979 - $vgbl[$lex+1]{$gbl}{"x$lex"} = 123: no exception ok 15980 - $vgbl[$lex+1]{$gbl}{"x$lex"} = 123: value ok 15981 - exists $vgbl[$lex+1]{$gbl}{"x$lex"}: no exception ok 15982 - exists $vgbl[$lex+1]{$gbl}{"x$lex"}: value ok 15983 - delete $vgbl[$lex+1]{$gbl}{"x$lex"}: no exception ok 15984 - delete $vgbl[$lex+1]{$gbl}{"x$lex"}: value ok 15985 - $vrlex->[$lex+1]{$gbl}{"x$lex"}: no exception ok 15986 - $vrlex->[$lex+1]{$gbl}{"x$lex"}: value ok 15987 - $vrlex->[$lex+1]{$gbl}{"x$lex"} = 123: no exception ok 15988 - $vrlex->[$lex+1]{$gbl}{"x$lex"} = 123: value ok 15989 - exists $vrlex->[$lex+1]{$gbl}{"x$lex"}: no exception ok 15990 - exists $vrlex->[$lex+1]{$gbl}{"x$lex"}: value ok 15991 - delete $vrlex->[$lex+1]{$gbl}{"x$lex"}: no exception ok 15992 - delete $vrlex->[$lex+1]{$gbl}{"x$lex"}: value ok 15993 - $vrgbl->[$lex+1]{$gbl}{"x$lex"}: no exception ok 15994 - $vrgbl->[$lex+1]{$gbl}{"x$lex"}: value ok 15995 - $vrgbl->[$lex+1]{$gbl}{"x$lex"} = 123: no exception ok 15996 - $vrgbl->[$lex+1]{$gbl}{"x$lex"} = 123: value ok 15997 - exists $vrgbl->[$lex+1]{$gbl}{"x$lex"}: no exception ok 15998 - exists $vrgbl->[$lex+1]{$gbl}{"x$lex"}: value ok 15999 - delete $vrgbl->[$lex+1]{$gbl}{"x$lex"}: no exception ok 16000 - delete $vrgbl->[$lex+1]{$gbl}{"x$lex"}: value ok 16001 - $vlex{foo}{$gbl}{"x$lex"}: no exception ok 16002 - $vlex{foo}{$gbl}{"x$lex"}: value ok 16003 - $vlex{foo}{$gbl}{"x$lex"} = 123: no exception ok 16004 - $vlex{foo}{$gbl}{"x$lex"} = 123: value ok 16005 - exists $vlex{foo}{$gbl}{"x$lex"}: no exception ok 16006 - exists $vlex{foo}{$gbl}{"x$lex"}: value ok 16007 - delete $vlex{foo}{$gbl}{"x$lex"}: no exception ok 16008 - delete $vlex{foo}{$gbl}{"x$lex"}: value ok 16009 - $vgbl{foo}{$gbl}{"x$lex"}: no exception ok 16010 - $vgbl{foo}{$gbl}{"x$lex"}: value ok 16011 - $vgbl{foo}{$gbl}{"x$lex"} = 123: no exception ok 16012 - $vgbl{foo}{$gbl}{"x$lex"} = 123: value ok 16013 - exists $vgbl{foo}{$gbl}{"x$lex"}: no exception ok 16014 - exists $vgbl{foo}{$gbl}{"x$lex"}: value ok 16015 - delete $vgbl{foo}{$gbl}{"x$lex"}: no exception ok 16016 - delete $vgbl{foo}{$gbl}{"x$lex"}: value ok 16017 - $vrlex->{foo}{$gbl}{"x$lex"}: no exception ok 16018 - $vrlex->{foo}{$gbl}{"x$lex"}: value ok 16019 - $vrlex->{foo}{$gbl}{"x$lex"} = 123: no exception ok 16020 - $vrlex->{foo}{$gbl}{"x$lex"} = 123: value ok 16021 - exists $vrlex->{foo}{$gbl}{"x$lex"}: no exception ok 16022 - exists $vrlex->{foo}{$gbl}{"x$lex"}: value ok 16023 - delete $vrlex->{foo}{$gbl}{"x$lex"}: no exception ok 16024 - delete $vrlex->{foo}{$gbl}{"x$lex"}: value ok 16025 - $vrgbl->{foo}{$gbl}{"x$lex"}: no exception ok 16026 - $vrgbl->{foo}{$gbl}{"x$lex"}: value ok 16027 - $vrgbl->{foo}{$gbl}{"x$lex"} = 123: no exception ok 16028 - $vrgbl->{foo}{$gbl}{"x$lex"} = 123: value ok 16029 - exists $vrgbl->{foo}{$gbl}{"x$lex"}: no exception ok 16030 - exists $vrgbl->{foo}{$gbl}{"x$lex"}: value ok 16031 - delete $vrgbl->{foo}{$gbl}{"x$lex"}: no exception ok 16032 - delete $vrgbl->{foo}{$gbl}{"x$lex"}: value ok 16033 - $vlex{$lex}{$gbl}{"x$lex"}: no exception ok 16034 - $vlex{$lex}{$gbl}{"x$lex"}: value ok 16035 - $vlex{$lex}{$gbl}{"x$lex"} = 123: no exception ok 16036 - $vlex{$lex}{$gbl}{"x$lex"} = 123: value ok 16037 - exists $vlex{$lex}{$gbl}{"x$lex"}: no exception ok 16038 - exists $vlex{$lex}{$gbl}{"x$lex"}: value ok 16039 - delete $vlex{$lex}{$gbl}{"x$lex"}: no exception ok 16040 - delete $vlex{$lex}{$gbl}{"x$lex"}: value ok 16041 - $vgbl{$lex}{$gbl}{"x$lex"}: no exception ok 16042 - $vgbl{$lex}{$gbl}{"x$lex"}: value ok 16043 - $vgbl{$lex}{$gbl}{"x$lex"} = 123: no exception ok 16044 - $vgbl{$lex}{$gbl}{"x$lex"} = 123: value ok 16045 - exists $vgbl{$lex}{$gbl}{"x$lex"}: no exception ok 16046 - exists $vgbl{$lex}{$gbl}{"x$lex"}: value ok 16047 - delete $vgbl{$lex}{$gbl}{"x$lex"}: no exception ok 16048 - delete $vgbl{$lex}{$gbl}{"x$lex"}: value ok 16049 - $vrlex->{$lex}{$gbl}{"x$lex"}: no exception ok 16050 - $vrlex->{$lex}{$gbl}{"x$lex"}: value ok 16051 - $vrlex->{$lex}{$gbl}{"x$lex"} = 123: no exception ok 16052 - $vrlex->{$lex}{$gbl}{"x$lex"} = 123: value ok 16053 - exists $vrlex->{$lex}{$gbl}{"x$lex"}: no exception ok 16054 - exists $vrlex->{$lex}{$gbl}{"x$lex"}: value ok 16055 - delete $vrlex->{$lex}{$gbl}{"x$lex"}: no exception ok 16056 - delete $vrlex->{$lex}{$gbl}{"x$lex"}: value ok 16057 - $vrgbl->{$lex}{$gbl}{"x$lex"}: no exception ok 16058 - $vrgbl->{$lex}{$gbl}{"x$lex"}: value ok 16059 - $vrgbl->{$lex}{$gbl}{"x$lex"} = 123: no exception ok 16060 - $vrgbl->{$lex}{$gbl}{"x$lex"} = 123: value ok 16061 - exists $vrgbl->{$lex}{$gbl}{"x$lex"}: no exception ok 16062 - exists $vrgbl->{$lex}{$gbl}{"x$lex"}: value ok 16063 - delete $vrgbl->{$lex}{$gbl}{"x$lex"}: no exception ok 16064 - delete $vrgbl->{$lex}{$gbl}{"x$lex"}: value ok 16065 - $vlex{$gbl}{$gbl}{"x$lex"}: no exception ok 16066 - $vlex{$gbl}{$gbl}{"x$lex"}: value ok 16067 - $vlex{$gbl}{$gbl}{"x$lex"} = 123: no exception ok 16068 - $vlex{$gbl}{$gbl}{"x$lex"} = 123: value ok 16069 - exists $vlex{$gbl}{$gbl}{"x$lex"}: no exception ok 16070 - exists $vlex{$gbl}{$gbl}{"x$lex"}: value ok 16071 - delete $vlex{$gbl}{$gbl}{"x$lex"}: no exception ok 16072 - delete $vlex{$gbl}{$gbl}{"x$lex"}: value ok 16073 - $vgbl{$gbl}{$gbl}{"x$lex"}: no exception ok 16074 - $vgbl{$gbl}{$gbl}{"x$lex"}: value ok 16075 - $vgbl{$gbl}{$gbl}{"x$lex"} = 123: no exception ok 16076 - $vgbl{$gbl}{$gbl}{"x$lex"} = 123: value ok 16077 - exists $vgbl{$gbl}{$gbl}{"x$lex"}: no exception ok 16078 - exists $vgbl{$gbl}{$gbl}{"x$lex"}: value ok 16079 - delete $vgbl{$gbl}{$gbl}{"x$lex"}: no exception ok 16080 - delete $vgbl{$gbl}{$gbl}{"x$lex"}: value ok 16081 - $vrlex->{$gbl}{$gbl}{"x$lex"}: no exception ok 16082 - $vrlex->{$gbl}{$gbl}{"x$lex"}: value ok 16083 - $vrlex->{$gbl}{$gbl}{"x$lex"} = 123: no exception ok 16084 - $vrlex->{$gbl}{$gbl}{"x$lex"} = 123: value ok 16085 - exists $vrlex->{$gbl}{$gbl}{"x$lex"}: no exception ok 16086 - exists $vrlex->{$gbl}{$gbl}{"x$lex"}: value ok 16087 - delete $vrlex->{$gbl}{$gbl}{"x$lex"}: no exception ok 16088 - delete $vrlex->{$gbl}{$gbl}{"x$lex"}: value ok 16089 - $vrgbl->{$gbl}{$gbl}{"x$lex"}: no exception ok 16090 - $vrgbl->{$gbl}{$gbl}{"x$lex"}: value ok 16091 - $vrgbl->{$gbl}{$gbl}{"x$lex"} = 123: no exception ok 16092 - $vrgbl->{$gbl}{$gbl}{"x$lex"} = 123: value ok 16093 - exists $vrgbl->{$gbl}{$gbl}{"x$lex"}: no exception ok 16094 - exists $vrgbl->{$gbl}{$gbl}{"x$lex"}: value ok 16095 - delete $vrgbl->{$gbl}{$gbl}{"x$lex"}: no exception ok 16096 - delete $vrgbl->{$gbl}{$gbl}{"x$lex"}: value ok 16097 - $vlex{"x$lex"}{$gbl}{"x$lex"}: no exception ok 16098 - $vlex{"x$lex"}{$gbl}{"x$lex"}: value ok 16099 - $vlex{"x$lex"}{$gbl}{"x$lex"} = 123: no exception ok 16100 - $vlex{"x$lex"}{$gbl}{"x$lex"} = 123: value ok 16101 - exists $vlex{"x$lex"}{$gbl}{"x$lex"}: no exception ok 16102 - exists $vlex{"x$lex"}{$gbl}{"x$lex"}: value ok 16103 - delete $vlex{"x$lex"}{$gbl}{"x$lex"}: no exception ok 16104 - delete $vlex{"x$lex"}{$gbl}{"x$lex"}: value ok 16105 - $vgbl{"x$lex"}{$gbl}{"x$lex"}: no exception ok 16106 - $vgbl{"x$lex"}{$gbl}{"x$lex"}: value ok 16107 - $vgbl{"x$lex"}{$gbl}{"x$lex"} = 123: no exception ok 16108 - $vgbl{"x$lex"}{$gbl}{"x$lex"} = 123: value ok 16109 - exists $vgbl{"x$lex"}{$gbl}{"x$lex"}: no exception ok 16110 - exists $vgbl{"x$lex"}{$gbl}{"x$lex"}: value ok 16111 - delete $vgbl{"x$lex"}{$gbl}{"x$lex"}: no exception ok 16112 - delete $vgbl{"x$lex"}{$gbl}{"x$lex"}: value ok 16113 - $vrlex->{"x$lex"}{$gbl}{"x$lex"}: no exception ok 16114 - $vrlex->{"x$lex"}{$gbl}{"x$lex"}: value ok 16115 - $vrlex->{"x$lex"}{$gbl}{"x$lex"} = 123: no exception ok 16116 - $vrlex->{"x$lex"}{$gbl}{"x$lex"} = 123: value ok 16117 - exists $vrlex->{"x$lex"}{$gbl}{"x$lex"}: no exception ok 16118 - exists $vrlex->{"x$lex"}{$gbl}{"x$lex"}: value ok 16119 - delete $vrlex->{"x$lex"}{$gbl}{"x$lex"}: no exception ok 16120 - delete $vrlex->{"x$lex"}{$gbl}{"x$lex"}: value ok 16121 - $vrgbl->{"x$lex"}{$gbl}{"x$lex"}: no exception ok 16122 - $vrgbl->{"x$lex"}{$gbl}{"x$lex"}: value ok 16123 - $vrgbl->{"x$lex"}{$gbl}{"x$lex"} = 123: no exception ok 16124 - $vrgbl->{"x$lex"}{$gbl}{"x$lex"} = 123: value ok 16125 - exists $vrgbl->{"x$lex"}{$gbl}{"x$lex"}: no exception ok 16126 - exists $vrgbl->{"x$lex"}{$gbl}{"x$lex"}: value ok 16127 - delete $vrgbl->{"x$lex"}{$gbl}{"x$lex"}: no exception ok 16128 - delete $vrgbl->{"x$lex"}{$gbl}{"x$lex"}: value ok 16129 - $vlex[0]{"x$lex"}{"x$lex"}: no exception ok 16130 - $vlex[0]{"x$lex"}{"x$lex"}: value ok 16131 - $vlex[0]{"x$lex"}{"x$lex"} = 123: no exception ok 16132 - $vlex[0]{"x$lex"}{"x$lex"} = 123: value ok 16133 - exists $vlex[0]{"x$lex"}{"x$lex"}: no exception ok 16134 - exists $vlex[0]{"x$lex"}{"x$lex"}: value ok 16135 - delete $vlex[0]{"x$lex"}{"x$lex"}: no exception ok 16136 - delete $vlex[0]{"x$lex"}{"x$lex"}: value ok 16137 - $vgbl[0]{"x$lex"}{"x$lex"}: no exception ok 16138 - $vgbl[0]{"x$lex"}{"x$lex"}: value ok 16139 - $vgbl[0]{"x$lex"}{"x$lex"} = 123: no exception ok 16140 - $vgbl[0]{"x$lex"}{"x$lex"} = 123: value ok 16141 - exists $vgbl[0]{"x$lex"}{"x$lex"}: no exception ok 16142 - exists $vgbl[0]{"x$lex"}{"x$lex"}: value ok 16143 - delete $vgbl[0]{"x$lex"}{"x$lex"}: no exception ok 16144 - delete $vgbl[0]{"x$lex"}{"x$lex"}: value ok 16145 - $vrlex->[0]{"x$lex"}{"x$lex"}: no exception ok 16146 - $vrlex->[0]{"x$lex"}{"x$lex"}: value ok 16147 - $vrlex->[0]{"x$lex"}{"x$lex"} = 123: no exception ok 16148 - $vrlex->[0]{"x$lex"}{"x$lex"} = 123: value ok 16149 - exists $vrlex->[0]{"x$lex"}{"x$lex"}: no exception ok 16150 - exists $vrlex->[0]{"x$lex"}{"x$lex"}: value ok 16151 - delete $vrlex->[0]{"x$lex"}{"x$lex"}: no exception ok 16152 - delete $vrlex->[0]{"x$lex"}{"x$lex"}: value ok 16153 - $vrgbl->[0]{"x$lex"}{"x$lex"}: no exception ok 16154 - $vrgbl->[0]{"x$lex"}{"x$lex"}: value ok 16155 - $vrgbl->[0]{"x$lex"}{"x$lex"} = 123: no exception ok 16156 - $vrgbl->[0]{"x$lex"}{"x$lex"} = 123: value ok 16157 - exists $vrgbl->[0]{"x$lex"}{"x$lex"}: no exception ok 16158 - exists $vrgbl->[0]{"x$lex"}{"x$lex"}: value ok 16159 - delete $vrgbl->[0]{"x$lex"}{"x$lex"}: no exception ok 16160 - delete $vrgbl->[0]{"x$lex"}{"x$lex"}: value ok 16161 - $vlex[$lex]{"x$lex"}{"x$lex"}: no exception ok 16162 - $vlex[$lex]{"x$lex"}{"x$lex"}: value ok 16163 - $vlex[$lex]{"x$lex"}{"x$lex"} = 123: no exception ok 16164 - $vlex[$lex]{"x$lex"}{"x$lex"} = 123: value ok 16165 - exists $vlex[$lex]{"x$lex"}{"x$lex"}: no exception ok 16166 - exists $vlex[$lex]{"x$lex"}{"x$lex"}: value ok 16167 - delete $vlex[$lex]{"x$lex"}{"x$lex"}: no exception ok 16168 - delete $vlex[$lex]{"x$lex"}{"x$lex"}: value ok 16169 - $vgbl[$lex]{"x$lex"}{"x$lex"}: no exception ok 16170 - $vgbl[$lex]{"x$lex"}{"x$lex"}: value ok 16171 - $vgbl[$lex]{"x$lex"}{"x$lex"} = 123: no exception ok 16172 - $vgbl[$lex]{"x$lex"}{"x$lex"} = 123: value ok 16173 - exists $vgbl[$lex]{"x$lex"}{"x$lex"}: no exception ok 16174 - exists $vgbl[$lex]{"x$lex"}{"x$lex"}: value ok 16175 - delete $vgbl[$lex]{"x$lex"}{"x$lex"}: no exception ok 16176 - delete $vgbl[$lex]{"x$lex"}{"x$lex"}: value ok 16177 - $vrlex->[$lex]{"x$lex"}{"x$lex"}: no exception ok 16178 - $vrlex->[$lex]{"x$lex"}{"x$lex"}: value ok 16179 - $vrlex->[$lex]{"x$lex"}{"x$lex"} = 123: no exception ok 16180 - $vrlex->[$lex]{"x$lex"}{"x$lex"} = 123: value ok 16181 - exists $vrlex->[$lex]{"x$lex"}{"x$lex"}: no exception ok 16182 - exists $vrlex->[$lex]{"x$lex"}{"x$lex"}: value ok 16183 - delete $vrlex->[$lex]{"x$lex"}{"x$lex"}: no exception ok 16184 - delete $vrlex->[$lex]{"x$lex"}{"x$lex"}: value ok 16185 - $vrgbl->[$lex]{"x$lex"}{"x$lex"}: no exception ok 16186 - $vrgbl->[$lex]{"x$lex"}{"x$lex"}: value ok 16187 - $vrgbl->[$lex]{"x$lex"}{"x$lex"} = 123: no exception ok 16188 - $vrgbl->[$lex]{"x$lex"}{"x$lex"} = 123: value ok 16189 - exists $vrgbl->[$lex]{"x$lex"}{"x$lex"}: no exception ok 16190 - exists $vrgbl->[$lex]{"x$lex"}{"x$lex"}: value ok 16191 - delete $vrgbl->[$lex]{"x$lex"}{"x$lex"}: no exception ok 16192 - delete $vrgbl->[$lex]{"x$lex"}{"x$lex"}: value ok 16193 - $vlex[$gbl]{"x$lex"}{"x$lex"}: no exception ok 16194 - $vlex[$gbl]{"x$lex"}{"x$lex"}: value ok 16195 - $vlex[$gbl]{"x$lex"}{"x$lex"} = 123: no exception ok 16196 - $vlex[$gbl]{"x$lex"}{"x$lex"} = 123: value ok 16197 - exists $vlex[$gbl]{"x$lex"}{"x$lex"}: no exception ok 16198 - exists $vlex[$gbl]{"x$lex"}{"x$lex"}: value ok 16199 - delete $vlex[$gbl]{"x$lex"}{"x$lex"}: no exception ok 16200 - delete $vlex[$gbl]{"x$lex"}{"x$lex"}: value ok 16201 - $vgbl[$gbl]{"x$lex"}{"x$lex"}: no exception ok 16202 - $vgbl[$gbl]{"x$lex"}{"x$lex"}: value ok 16203 - $vgbl[$gbl]{"x$lex"}{"x$lex"} = 123: no exception ok 16204 - $vgbl[$gbl]{"x$lex"}{"x$lex"} = 123: value ok 16205 - exists $vgbl[$gbl]{"x$lex"}{"x$lex"}: no exception ok 16206 - exists $vgbl[$gbl]{"x$lex"}{"x$lex"}: value ok 16207 - delete $vgbl[$gbl]{"x$lex"}{"x$lex"}: no exception ok 16208 - delete $vgbl[$gbl]{"x$lex"}{"x$lex"}: value ok 16209 - $vrlex->[$gbl]{"x$lex"}{"x$lex"}: no exception ok 16210 - $vrlex->[$gbl]{"x$lex"}{"x$lex"}: value ok 16211 - $vrlex->[$gbl]{"x$lex"}{"x$lex"} = 123: no exception ok 16212 - $vrlex->[$gbl]{"x$lex"}{"x$lex"} = 123: value ok 16213 - exists $vrlex->[$gbl]{"x$lex"}{"x$lex"}: no exception ok 16214 - exists $vrlex->[$gbl]{"x$lex"}{"x$lex"}: value ok 16215 - delete $vrlex->[$gbl]{"x$lex"}{"x$lex"}: no exception ok 16216 - delete $vrlex->[$gbl]{"x$lex"}{"x$lex"}: value ok 16217 - $vrgbl->[$gbl]{"x$lex"}{"x$lex"}: no exception ok 16218 - $vrgbl->[$gbl]{"x$lex"}{"x$lex"}: value ok 16219 - $vrgbl->[$gbl]{"x$lex"}{"x$lex"} = 123: no exception ok 16220 - $vrgbl->[$gbl]{"x$lex"}{"x$lex"} = 123: value ok 16221 - exists $vrgbl->[$gbl]{"x$lex"}{"x$lex"}: no exception ok 16222 - exists $vrgbl->[$gbl]{"x$lex"}{"x$lex"}: value ok 16223 - delete $vrgbl->[$gbl]{"x$lex"}{"x$lex"}: no exception ok 16224 - delete $vrgbl->[$gbl]{"x$lex"}{"x$lex"}: value ok 16225 - $vlex[$lex+1]{"x$lex"}{"x$lex"}: no exception ok 16226 - $vlex[$lex+1]{"x$lex"}{"x$lex"}: value ok 16227 - $vlex[$lex+1]{"x$lex"}{"x$lex"} = 123: no exception ok 16228 - $vlex[$lex+1]{"x$lex"}{"x$lex"} = 123: value ok 16229 - exists $vlex[$lex+1]{"x$lex"}{"x$lex"}: no exception ok 16230 - exists $vlex[$lex+1]{"x$lex"}{"x$lex"}: value ok 16231 - delete $vlex[$lex+1]{"x$lex"}{"x$lex"}: no exception ok 16232 - delete $vlex[$lex+1]{"x$lex"}{"x$lex"}: value ok 16233 - $vgbl[$lex+1]{"x$lex"}{"x$lex"}: no exception ok 16234 - $vgbl[$lex+1]{"x$lex"}{"x$lex"}: value ok 16235 - $vgbl[$lex+1]{"x$lex"}{"x$lex"} = 123: no exception ok 16236 - $vgbl[$lex+1]{"x$lex"}{"x$lex"} = 123: value ok 16237 - exists $vgbl[$lex+1]{"x$lex"}{"x$lex"}: no exception ok 16238 - exists $vgbl[$lex+1]{"x$lex"}{"x$lex"}: value ok 16239 - delete $vgbl[$lex+1]{"x$lex"}{"x$lex"}: no exception ok 16240 - delete $vgbl[$lex+1]{"x$lex"}{"x$lex"}: value ok 16241 - $vrlex->[$lex+1]{"x$lex"}{"x$lex"}: no exception ok 16242 - $vrlex->[$lex+1]{"x$lex"}{"x$lex"}: value ok 16243 - $vrlex->[$lex+1]{"x$lex"}{"x$lex"} = 123: no exception ok 16244 - $vrlex->[$lex+1]{"x$lex"}{"x$lex"} = 123: value ok 16245 - exists $vrlex->[$lex+1]{"x$lex"}{"x$lex"}: no exception ok 16246 - exists $vrlex->[$lex+1]{"x$lex"}{"x$lex"}: value ok 16247 - delete $vrlex->[$lex+1]{"x$lex"}{"x$lex"}: no exception ok 16248 - delete $vrlex->[$lex+1]{"x$lex"}{"x$lex"}: value ok 16249 - $vrgbl->[$lex+1]{"x$lex"}{"x$lex"}: no exception ok 16250 - $vrgbl->[$lex+1]{"x$lex"}{"x$lex"}: value ok 16251 - $vrgbl->[$lex+1]{"x$lex"}{"x$lex"} = 123: no exception ok 16252 - $vrgbl->[$lex+1]{"x$lex"}{"x$lex"} = 123: value ok 16253 - exists $vrgbl->[$lex+1]{"x$lex"}{"x$lex"}: no exception ok 16254 - exists $vrgbl->[$lex+1]{"x$lex"}{"x$lex"}: value ok 16255 - delete $vrgbl->[$lex+1]{"x$lex"}{"x$lex"}: no exception ok 16256 - delete $vrgbl->[$lex+1]{"x$lex"}{"x$lex"}: value ok 16257 - $vlex{foo}{"x$lex"}{"x$lex"}: no exception ok 16258 - $vlex{foo}{"x$lex"}{"x$lex"}: value ok 16259 - $vlex{foo}{"x$lex"}{"x$lex"} = 123: no exception ok 16260 - $vlex{foo}{"x$lex"}{"x$lex"} = 123: value ok 16261 - exists $vlex{foo}{"x$lex"}{"x$lex"}: no exception ok 16262 - exists $vlex{foo}{"x$lex"}{"x$lex"}: value ok 16263 - delete $vlex{foo}{"x$lex"}{"x$lex"}: no exception ok 16264 - delete $vlex{foo}{"x$lex"}{"x$lex"}: value ok 16265 - $vgbl{foo}{"x$lex"}{"x$lex"}: no exception ok 16266 - $vgbl{foo}{"x$lex"}{"x$lex"}: value ok 16267 - $vgbl{foo}{"x$lex"}{"x$lex"} = 123: no exception ok 16268 - $vgbl{foo}{"x$lex"}{"x$lex"} = 123: value ok 16269 - exists $vgbl{foo}{"x$lex"}{"x$lex"}: no exception ok 16270 - exists $vgbl{foo}{"x$lex"}{"x$lex"}: value ok 16271 - delete $vgbl{foo}{"x$lex"}{"x$lex"}: no exception ok 16272 - delete $vgbl{foo}{"x$lex"}{"x$lex"}: value ok 16273 - $vrlex->{foo}{"x$lex"}{"x$lex"}: no exception ok 16274 - $vrlex->{foo}{"x$lex"}{"x$lex"}: value ok 16275 - $vrlex->{foo}{"x$lex"}{"x$lex"} = 123: no exception ok 16276 - $vrlex->{foo}{"x$lex"}{"x$lex"} = 123: value ok 16277 - exists $vrlex->{foo}{"x$lex"}{"x$lex"}: no exception ok 16278 - exists $vrlex->{foo}{"x$lex"}{"x$lex"}: value ok 16279 - delete $vrlex->{foo}{"x$lex"}{"x$lex"}: no exception ok 16280 - delete $vrlex->{foo}{"x$lex"}{"x$lex"}: value ok 16281 - $vrgbl->{foo}{"x$lex"}{"x$lex"}: no exception ok 16282 - $vrgbl->{foo}{"x$lex"}{"x$lex"}: value ok 16283 - $vrgbl->{foo}{"x$lex"}{"x$lex"} = 123: no exception ok 16284 - $vrgbl->{foo}{"x$lex"}{"x$lex"} = 123: value ok 16285 - exists $vrgbl->{foo}{"x$lex"}{"x$lex"}: no exception ok 16286 - exists $vrgbl->{foo}{"x$lex"}{"x$lex"}: value ok 16287 - delete $vrgbl->{foo}{"x$lex"}{"x$lex"}: no exception ok 16288 - delete $vrgbl->{foo}{"x$lex"}{"x$lex"}: value ok 16289 - $vlex{$lex}{"x$lex"}{"x$lex"}: no exception ok 16290 - $vlex{$lex}{"x$lex"}{"x$lex"}: value ok 16291 - $vlex{$lex}{"x$lex"}{"x$lex"} = 123: no exception ok 16292 - $vlex{$lex}{"x$lex"}{"x$lex"} = 123: value ok 16293 - exists $vlex{$lex}{"x$lex"}{"x$lex"}: no exception ok 16294 - exists $vlex{$lex}{"x$lex"}{"x$lex"}: value ok 16295 - delete $vlex{$lex}{"x$lex"}{"x$lex"}: no exception ok 16296 - delete $vlex{$lex}{"x$lex"}{"x$lex"}: value ok 16297 - $vgbl{$lex}{"x$lex"}{"x$lex"}: no exception ok 16298 - $vgbl{$lex}{"x$lex"}{"x$lex"}: value ok 16299 - $vgbl{$lex}{"x$lex"}{"x$lex"} = 123: no exception ok 16300 - $vgbl{$lex}{"x$lex"}{"x$lex"} = 123: value ok 16301 - exists $vgbl{$lex}{"x$lex"}{"x$lex"}: no exception ok 16302 - exists $vgbl{$lex}{"x$lex"}{"x$lex"}: value ok 16303 - delete $vgbl{$lex}{"x$lex"}{"x$lex"}: no exception ok 16304 - delete $vgbl{$lex}{"x$lex"}{"x$lex"}: value ok 16305 - $vrlex->{$lex}{"x$lex"}{"x$lex"}: no exception ok 16306 - $vrlex->{$lex}{"x$lex"}{"x$lex"}: value ok 16307 - $vrlex->{$lex}{"x$lex"}{"x$lex"} = 123: no exception ok 16308 - $vrlex->{$lex}{"x$lex"}{"x$lex"} = 123: value ok 16309 - exists $vrlex->{$lex}{"x$lex"}{"x$lex"}: no exception ok 16310 - exists $vrlex->{$lex}{"x$lex"}{"x$lex"}: value ok 16311 - delete $vrlex->{$lex}{"x$lex"}{"x$lex"}: no exception ok 16312 - delete $vrlex->{$lex}{"x$lex"}{"x$lex"}: value ok 16313 - $vrgbl->{$lex}{"x$lex"}{"x$lex"}: no exception ok 16314 - $vrgbl->{$lex}{"x$lex"}{"x$lex"}: value ok 16315 - $vrgbl->{$lex}{"x$lex"}{"x$lex"} = 123: no exception ok 16316 - $vrgbl->{$lex}{"x$lex"}{"x$lex"} = 123: value ok 16317 - exists $vrgbl->{$lex}{"x$lex"}{"x$lex"}: no exception ok 16318 - exists $vrgbl->{$lex}{"x$lex"}{"x$lex"}: value ok 16319 - delete $vrgbl->{$lex}{"x$lex"}{"x$lex"}: no exception ok 16320 - delete $vrgbl->{$lex}{"x$lex"}{"x$lex"}: value ok 16321 - $vlex{$gbl}{"x$lex"}{"x$lex"}: no exception ok 16322 - $vlex{$gbl}{"x$lex"}{"x$lex"}: value ok 16323 - $vlex{$gbl}{"x$lex"}{"x$lex"} = 123: no exception ok 16324 - $vlex{$gbl}{"x$lex"}{"x$lex"} = 123: value ok 16325 - exists $vlex{$gbl}{"x$lex"}{"x$lex"}: no exception ok 16326 - exists $vlex{$gbl}{"x$lex"}{"x$lex"}: value ok 16327 - delete $vlex{$gbl}{"x$lex"}{"x$lex"}: no exception ok 16328 - delete $vlex{$gbl}{"x$lex"}{"x$lex"}: value ok 16329 - $vgbl{$gbl}{"x$lex"}{"x$lex"}: no exception ok 16330 - $vgbl{$gbl}{"x$lex"}{"x$lex"}: value ok 16331 - $vgbl{$gbl}{"x$lex"}{"x$lex"} = 123: no exception ok 16332 - $vgbl{$gbl}{"x$lex"}{"x$lex"} = 123: value ok 16333 - exists $vgbl{$gbl}{"x$lex"}{"x$lex"}: no exception ok 16334 - exists $vgbl{$gbl}{"x$lex"}{"x$lex"}: value ok 16335 - delete $vgbl{$gbl}{"x$lex"}{"x$lex"}: no exception ok 16336 - delete $vgbl{$gbl}{"x$lex"}{"x$lex"}: value ok 16337 - $vrlex->{$gbl}{"x$lex"}{"x$lex"}: no exception ok 16338 - $vrlex->{$gbl}{"x$lex"}{"x$lex"}: value ok 16339 - $vrlex->{$gbl}{"x$lex"}{"x$lex"} = 123: no exception ok 16340 - $vrlex->{$gbl}{"x$lex"}{"x$lex"} = 123: value ok 16341 - exists $vrlex->{$gbl}{"x$lex"}{"x$lex"}: no exception ok 16342 - exists $vrlex->{$gbl}{"x$lex"}{"x$lex"}: value ok 16343 - delete $vrlex->{$gbl}{"x$lex"}{"x$lex"}: no exception ok 16344 - delete $vrlex->{$gbl}{"x$lex"}{"x$lex"}: value ok 16345 - $vrgbl->{$gbl}{"x$lex"}{"x$lex"}: no exception ok 16346 - $vrgbl->{$gbl}{"x$lex"}{"x$lex"}: value ok 16347 - $vrgbl->{$gbl}{"x$lex"}{"x$lex"} = 123: no exception ok 16348 - $vrgbl->{$gbl}{"x$lex"}{"x$lex"} = 123: value ok 16349 - exists $vrgbl->{$gbl}{"x$lex"}{"x$lex"}: no exception ok 16350 - exists $vrgbl->{$gbl}{"x$lex"}{"x$lex"}: value ok 16351 - delete $vrgbl->{$gbl}{"x$lex"}{"x$lex"}: no exception ok 16352 - delete $vrgbl->{$gbl}{"x$lex"}{"x$lex"}: value ok 16353 - $vlex{"x$lex"}{"x$lex"}{"x$lex"}: no exception ok 16354 - $vlex{"x$lex"}{"x$lex"}{"x$lex"}: value ok 16355 - $vlex{"x$lex"}{"x$lex"}{"x$lex"} = 123: no exception ok 16356 - $vlex{"x$lex"}{"x$lex"}{"x$lex"} = 123: value ok 16357 - exists $vlex{"x$lex"}{"x$lex"}{"x$lex"}: no exception ok 16358 - exists $vlex{"x$lex"}{"x$lex"}{"x$lex"}: value ok 16359 - delete $vlex{"x$lex"}{"x$lex"}{"x$lex"}: no exception ok 16360 - delete $vlex{"x$lex"}{"x$lex"}{"x$lex"}: value ok 16361 - $vgbl{"x$lex"}{"x$lex"}{"x$lex"}: no exception ok 16362 - $vgbl{"x$lex"}{"x$lex"}{"x$lex"}: value ok 16363 - $vgbl{"x$lex"}{"x$lex"}{"x$lex"} = 123: no exception ok 16364 - $vgbl{"x$lex"}{"x$lex"}{"x$lex"} = 123: value ok 16365 - exists $vgbl{"x$lex"}{"x$lex"}{"x$lex"}: no exception ok 16366 - exists $vgbl{"x$lex"}{"x$lex"}{"x$lex"}: value ok 16367 - delete $vgbl{"x$lex"}{"x$lex"}{"x$lex"}: no exception ok 16368 - delete $vgbl{"x$lex"}{"x$lex"}{"x$lex"}: value ok 16369 - $vrlex->{"x$lex"}{"x$lex"}{"x$lex"}: no exception ok 16370 - $vrlex->{"x$lex"}{"x$lex"}{"x$lex"}: value ok 16371 - $vrlex->{"x$lex"}{"x$lex"}{"x$lex"} = 123: no exception ok 16372 - $vrlex->{"x$lex"}{"x$lex"}{"x$lex"} = 123: value ok 16373 - exists $vrlex->{"x$lex"}{"x$lex"}{"x$lex"}: no exception ok 16374 - exists $vrlex->{"x$lex"}{"x$lex"}{"x$lex"}: value ok 16375 - delete $vrlex->{"x$lex"}{"x$lex"}{"x$lex"}: no exception ok 16376 - delete $vrlex->{"x$lex"}{"x$lex"}{"x$lex"}: value ok 16377 - $vrgbl->{"x$lex"}{"x$lex"}{"x$lex"}: no exception ok 16378 - $vrgbl->{"x$lex"}{"x$lex"}{"x$lex"}: value ok 16379 - $vrgbl->{"x$lex"}{"x$lex"}{"x$lex"} = 123: no exception ok 16380 - $vrgbl->{"x$lex"}{"x$lex"}{"x$lex"} = 123: value ok 16381 - exists $vrgbl->{"x$lex"}{"x$lex"}{"x$lex"}: no exception ok 16382 - exists $vrgbl->{"x$lex"}{"x$lex"}{"x$lex"}: value ok 16383 - delete $vrgbl->{"x$lex"}{"x$lex"}{"x$lex"}: no exception ok 16384 - delete $vrgbl->{"x$lex"}{"x$lex"}{"x$lex"}: value ok # Using threads 2.25 # Using threads::shared 1.61 t/50-threads.t ........... ok 1 - fetch does not autovivify at thread 1 run 1 ok 2 - exists does not autovivify at thread 1 run 1 ok 3 - delete does not autovivify at thread 1 run 1 ok 4 - fetch in eval does not croak at thread 1 run 1 ok 5 - fetch in eval does not autovivify at thread 1 run 1 ok 6 - exists in eval does not croak at thread 1 run 1 ok 7 - exists in eval does not autovivify at thread 1 run 1 ok 8 - delete in eval does not croak at thread 1 run 1 ok 9 - delete in eval does not autovivify at thread 1 run 1 ok 10 - fetch does not autovivify at thread 1 run 2 ok 11 - exists does not autovivify at thread 1 run 2 ok 12 - delete does not autovivify at thread 1 run 2 ok 13 - fetch in eval does not croak at thread 1 run 2 ok 14 - fetch in eval does not autovivify at thread 1 run 2 ok 15 - exists in eval does not croak at thread 1 run 2 ok 16 - exists in eval does not autovivify at thread 1 run 2 ok 17 - delete in eval does not croak at thread 1 run 2 ok 18 - delete in eval does not autovivify at thread 1 run 2 ok 19 - fetch does not autovivify at thread 2 run 1 ok 20 - exists does not autovivify at thread 2 run 1 ok 21 - delete does not autovivify at thread 2 run 1 ok 22 - fetch in eval does not croak at thread 2 run 1 ok 23 - fetch in eval does not autovivify at thread 2 run 1 ok 24 - exists in eval does not croak at thread 2 run 1 ok 25 - exists in eval does not autovivify at thread 2 run 1 ok 26 - delete in eval does not croak at thread 2 run 1 ok 27 - delete in eval does not autovivify at thread 2 run 1 ok 28 - fetch does not autovivify at thread 2 run 2 ok 29 - exists does not autovivify at thread 2 run 2 ok 30 - delete does not autovivify at thread 2 run 2 ok 31 - fetch in eval does not croak at thread 2 run 2 ok 32 - fetch in eval does not autovivify at thread 2 run 2 ok 33 - exists in eval does not croak at thread 2 run 2 ok 34 - exists in eval does not autovivify at thread 2 run 2 ok 35 - delete in eval does not croak at thread 2 run 2 ok 36 - delete in eval does not autovivify at thread 2 run 2 ok 37 - fetch does not autovivify at thread 3 run 1 ok 38 - exists does not autovivify at thread 3 run 1 ok 39 - delete does not autovivify at thread 3 run 1 ok 40 - fetch in eval does not croak at thread 3 run 1 ok 41 - fetch in eval does not autovivify at thread 3 run 1 ok 42 - exists in eval does not croak at thread 3 run 1 ok 43 - exists in eval does not autovivify at thread 3 run 1 ok 44 - delete in eval does not croak at thread 3 run 1 ok 45 - delete in eval does not autovivify at thread 3 run 1 ok 46 - fetch does not autovivify at thread 3 run 2 ok 47 - exists does not autovivify at thread 3 run 2 ok 48 - delete does not autovivify at thread 3 run 2 ok 49 - fetch in eval does not croak at thread 3 run 2 ok 50 - fetch in eval does not autovivify at thread 3 run 2 ok 51 - exists in eval does not croak at thread 3 run 2 ok 52 - exists in eval does not autovivify at thread 3 run 2 ok 53 - delete in eval does not croak at thread 3 run 2 ok 54 - delete in eval does not autovivify at thread 3 run 2 ok 55 - fetch does not autovivify at thread 4 run 1 ok 56 - exists does not autovivify at thread 4 run 1 ok 57 - delete does not autovivify at thread 4 run 1 ok 58 - fetch in eval does not croak at thread 4 run 1 ok 59 - fetch in eval does not autovivify at thread 4 run 1 ok 60 - exists in eval does not croak at thread 4 run 1 ok 61 - exists in eval does not autovivify at thread 4 run 1 ok 62 - delete in eval does not croak at thread 4 run 1 ok 63 - delete in eval does not autovivify at thread 4 run 1 ok 64 - fetch does not autovivify at thread 4 run 2 ok 65 - exists does not autovivify at thread 4 run 2 ok 66 - delete does not autovivify at thread 4 run 2 ok 67 - fetch in eval does not croak at thread 4 run 2 ok 68 - fetch in eval does not autovivify at thread 4 run 2 ok 69 - exists in eval does not croak at thread 4 run 2 ok 70 - exists in eval does not autovivify at thread 4 run 2 ok 71 - delete in eval does not croak at thread 4 run 2 ok 72 - delete in eval does not autovivify at thread 4 run 2 ok 73 - fetch does not autovivify at thread 5 run 1 ok 74 - exists does not autovivify at thread 5 run 1 ok 75 - delete does not autovivify at thread 5 run 1 ok 76 - fetch in eval does not croak at thread 5 run 1 ok 77 - fetch in eval does not autovivify at thread 5 run 1 ok 78 - exists in eval does not croak at thread 5 run 1 ok 79 - exists in eval does not autovivify at thread 5 run 1 ok 80 - delete in eval does not croak at thread 5 run 1 ok 81 - delete in eval does not autovivify at thread 5 run 1 ok 82 - fetch does not autovivify at thread 5 run 2 ok 83 - exists does not autovivify at thread 5 run 2 ok 84 - delete does not autovivify at thread 5 run 2 ok 85 - fetch in eval does not croak at thread 5 run 2 ok 86 - fetch in eval does not autovivify at thread 5 run 2 ok 87 - exists in eval does not croak at thread 5 run 2 ok 88 - exists in eval does not autovivify at thread 5 run 2 ok 89 - delete in eval does not croak at thread 5 run 2 ok 90 - delete in eval does not autovivify at thread 5 run 2 ok 91 - fetch does not autovivify at thread 6 run 1 ok 92 - exists does not autovivify at thread 6 run 1 ok 93 - delete does not autovivify at thread 6 run 1 ok 94 - fetch in eval does not croak at thread 6 run 1 ok 95 - fetch in eval does not autovivify at thread 6 run 1 ok 96 - exists in eval does not croak at thread 6 run 1 ok 97 - exists in eval does not autovivify at thread 6 run 1 ok 98 - delete in eval does not croak at thread 6 run 1 ok 99 - delete in eval does not autovivify at thread 6 run 1 ok 100 - fetch does not autovivify at thread 6 run 2 ok 101 - exists does not autovivify at thread 6 run 2 ok 102 - delete does not autovivify at thread 6 run 2 ok 103 - fetch in eval does not croak at thread 6 run 2 ok 104 - fetch in eval does not autovivify at thread 6 run 2 ok 105 - exists in eval does not croak at thread 6 run 2 ok 106 - exists in eval does not autovivify at thread 6 run 2 ok 107 - delete in eval does not croak at thread 6 run 2 ok 108 - delete in eval does not autovivify at thread 6 run 2 ok 109 - fetch does not autovivify at thread 7 run 1 ok 110 - exists does not autovivify at thread 7 run 1 ok 111 - delete does not autovivify at thread 7 run 1 ok 112 - fetch in eval does not croak at thread 7 run 1 ok 113 - fetch in eval does not autovivify at thread 7 run 1 ok 114 - exists in eval does not croak at thread 7 run 1 ok 115 - exists in eval does not autovivify at thread 7 run 1 ok 116 - delete in eval does not croak at thread 7 run 1 ok 117 - delete in eval does not autovivify at thread 7 run 1 ok 118 - fetch does not autovivify at thread 7 run 2 ok 119 - exists does not autovivify at thread 7 run 2 ok 120 - delete does not autovivify at thread 7 run 2 ok 121 - fetch in eval does not croak at thread 7 run 2 ok 122 - fetch in eval does not autovivify at thread 7 run 2 ok 123 - exists in eval does not croak at thread 7 run 2 ok 124 - exists in eval does not autovivify at thread 7 run 2 ok 125 - delete in eval does not croak at thread 7 run 2 ok 126 - delete in eval does not autovivify at thread 7 run 2 ok 127 - fetch does not autovivify at thread 8 run 1 ok 128 - exists does not autovivify at thread 8 run 1 ok 129 - delete does not autovivify at thread 8 run 1 ok 130 - fetch in eval does not croak at thread 8 run 1 ok 131 - fetch in eval does not autovivify at thread 8 run 1 ok 132 - exists in eval does not croak at thread 8 run 1 ok 133 - exists in eval does not autovivify at thread 8 run 1 ok 134 - delete in eval does not croak at thread 8 run 1 ok 135 - delete in eval does not autovivify at thread 8 run 1 ok 136 - fetch does not autovivify at thread 8 run 2 ok 137 - exists does not autovivify at thread 8 run 2 ok 138 - delete does not autovivify at thread 8 run 2 ok 139 - fetch in eval does not croak at thread 8 run 2 ok 140 - fetch in eval does not autovivify at thread 8 run 2 ok 141 - exists in eval does not croak at thread 8 run 2 ok 142 - exists in eval does not autovivify at thread 8 run 2 ok 143 - delete in eval does not croak at thread 8 run 2 ok 144 - delete in eval does not autovivify at thread 8 run 2 ok 145 - fetch does not autovivify at thread 9 run 1 ok 146 - exists does not autovivify at thread 9 run 1 ok 147 - delete does not autovivify at thread 9 run 1 ok 148 - fetch in eval does not croak at thread 9 run 1 ok 149 - fetch in eval does not autovivify at thread 9 run 1 ok 150 - exists in eval does not croak at thread 9 run 1 ok 151 - exists in eval does not autovivify at thread 9 run 1 ok 152 - delete in eval does not croak at thread 9 run 1 ok 153 - delete in eval does not autovivify at thread 9 run 1 ok 154 - fetch does not autovivify at thread 9 run 2 ok 155 - exists does not autovivify at thread 9 run 2 ok 156 - delete does not autovivify at thread 9 run 2 ok 157 - fetch in eval does not croak at thread 9 run 2 ok 158 - fetch in eval does not autovivify at thread 9 run 2 ok 159 - exists in eval does not croak at thread 9 run 2 ok 160 - exists in eval does not autovivify at thread 9 run 2 ok 161 - delete in eval does not croak at thread 9 run 2 ok 162 - delete in eval does not autovivify at thread 9 run 2 ok 163 - fetch does not autovivify at thread 10 run 1 ok 164 - exists does not autovivify at thread 10 run 1 ok 165 - delete does not autovivify at thread 10 run 1 ok 166 - fetch in eval does not croak at thread 10 run 1 ok 167 - fetch in eval does not autovivify at thread 10 run 1 ok 168 - exists in eval does not croak at thread 10 run 1 ok 169 - exists in eval does not autovivify at thread 10 run 1 ok 170 - delete in eval does not croak at thread 10 run 1 ok 171 - delete in eval does not autovivify at thread 10 run 1 ok 172 - fetch does not autovivify at thread 10 run 2 ok 173 - exists does not autovivify at thread 10 run 2 ok 174 - delete does not autovivify at thread 10 run 2 ok 175 - fetch in eval does not croak at thread 10 run 2 ok 176 - fetch in eval does not autovivify at thread 10 run 2 ok 177 - exists in eval does not croak at thread 10 run 2 ok 178 - exists in eval does not autovivify at thread 10 run 2 ok 179 - delete in eval does not croak at thread 10 run 2 ok 180 - delete in eval does not autovivify at thread 10 run 2 ok 181 - done 1..181 ok # Using threads 2.25 # Using threads::shared 1.61 t/51-threads-teardown.t .. 1..2 ok 1 - loading the pragma in a thread and using it outside doesn't segfault ok 2 - autovivification can be loaded in eval STRING during global destruction at the end of a thread ok All tests successful. Files=18, Tests=44617, 7 wallclock secs ( 3.36 usr 0.17 sys + 6.26 cusr 0.46 csys = 10.25 CPU) Result: PASS make[1]: Leaving directory '/build/libautovivification-perl-0.18' fakeroot debian/rules binary dh binary dh: warning: Compatibility levels before 10 are deprecated (level 9 in use) dh_testroot dh_prep dh_auto_install dh_auto_install: warning: Compatibility levels before 10 are deprecated (level 9 in use) make -j1 install DESTDIR=/build/libautovivification-perl-0.18/debian/libautovivification-perl AM_UPDATE_INFO_DIR=no PREFIX=/usr make[1]: Entering directory '/build/libautovivification-perl-0.18' "/usr/bin/perl" -MExtUtils::Command::MM -e 'cp_nonempty' -- autovivification.bs blib/arch/auto/autovivification/autovivification.bs 644 Manifying 1 pod document Files found in blib/arch: installing files in blib/lib into architecture dependent library tree Installing /build/libautovivification-perl-0.18/debian/libautovivification-perl/usr/lib/x86_64-linux-gnu/perl5/5.32/auto/autovivification/autovivification.so Installing /build/libautovivification-perl-0.18/debian/libautovivification-perl/usr/lib/x86_64-linux-gnu/perl5/5.32/autovivification.pm Installing /build/libautovivification-perl-0.18/debian/libautovivification-perl/usr/share/man/man3/autovivification.3pm make[1]: Leaving directory '/build/libautovivification-perl-0.18' dh_installdocs dh_installdocs: warning: Compatibility levels before 10 are deprecated (level 9 in use) dh_installchangelogs dh_installchangelogs: warning: Compatibility levels before 10 are deprecated (level 9 in use) debian/rules override_dh_installexamples make[1]: Entering directory '/build/libautovivification-perl-0.18' dh_installexamples dh_installexamples: warning: Compatibility levels before 10 are deprecated (level 9 in use) sed -i '1s|^#!perl|#!/usr/bin/perl|' /build/libautovivification-perl-0.18/debian/libautovivification-perl/usr/share/doc/libautovivification-perl/examples/* make[1]: Leaving directory '/build/libautovivification-perl-0.18' dh_installman dh_installman: warning: Compatibility levels before 10 are deprecated (level 9 in use) dh_perl dh_link dh_strip_nondeterminism dh_compress dh_compress: warning: Compatibility levels before 10 are deprecated (level 9 in use) dh_fixperms dh_missing dh_missing: warning: Compatibility levels before 10 are deprecated (level 9 in use) dh_strip dh_strip: warning: Compatibility levels before 10 are deprecated (level 9 in use) dh_makeshlibs dh_makeshlibs: warning: Compatibility levels before 10 are deprecated (level 9 in use) dh_shlibdeps dh_shlibdeps: warning: Compatibility levels before 10 are deprecated (level 9 in use) dh_installdeb dh_installdeb: warning: Compatibility levels before 10 are deprecated (level 9 in use) dh_gencontrol dh_md5sums dh_builddeb dpkg-deb: building package 'libautovivification-perl' in '../libautovivification-perl_0.18-1_amd64.deb'. dpkg-deb: building package 'libautovivification-perl-dbgsym' in '../libautovivification-perl-dbgsym_0.18-1_amd64.deb'. dpkg-genbuildinfo --build=binary dpkg-genchanges --build=binary >../libautovivification-perl_0.18-1_amd64.changes dpkg-genchanges: info: binary-only upload (no source code included) dpkg-source --after-build . dpkg-buildpackage: info: binary-only upload (no source included) dpkg-genchanges: info: including full source code in upload I: copying local configuration I: unmounting dev/ptmx filesystem I: unmounting dev/pts filesystem I: unmounting dev/shm filesystem I: unmounting proc filesystem I: unmounting sys filesystem I: cleaning the build env I: removing directory /srv/workspace/pbuilder/216801 and its subdirectories I: Current time: Wed Feb 22 20:46:36 -12 2023 I: pbuilder-time-stamp: 1677141996 Fri Jan 21 02:23:36 UTC 2022 I: 1st build successful. Starting 2nd build on remote node ionos1-amd64.debian.net. Fri Jan 21 02:23:36 UTC 2022 I: Preparing to do remote build '2' on ionos1-amd64.debian.net. Fri Jan 21 02:24:10 UTC 2022 I: Deleting $TMPDIR on ionos1-amd64.debian.net. Fri Jan 21 02:24:10 UTC 2022 I: libautovivification-perl_0.18-1_amd64.changes: Format: 1.8 Date: Sun, 05 Nov 2017 10:15:10 +0200 Source: libautovivification-perl Binary: libautovivification-perl libautovivification-perl-dbgsym Architecture: amd64 Version: 0.18-1 Distribution: unstable Urgency: medium Maintainer: Debian Perl Group Changed-By: Damyan Ivanov Description: libautovivification-perl - pragma for lexically disabling autovivification Changes: libautovivification-perl (0.18-1) unstable; urgency=medium . * Team upload. * New upstream version 0.18 * declare conformance with Policy 4.1.1 (no changes needed) Checksums-Sha1: 41958a1b55b7fa7d076c5e5ee0cc5e906ebd572b 56724 libautovivification-perl-dbgsym_0.18-1_amd64.deb 253d70f36ee9296f250480c503f4ecfd61804ebd 5172 libautovivification-perl_0.18-1_amd64.buildinfo 0962c64487c887c168752fbe20253f2491a285d3 25236 libautovivification-perl_0.18-1_amd64.deb Checksums-Sha256: 8202197051a4173354cd21531b627ce061f49874ad082f4363b5d94e282f0171 56724 libautovivification-perl-dbgsym_0.18-1_amd64.deb f3d2488d9218b33e3314fb65272e94a6d209e0c7dcc79a76a48343985b318b92 5172 libautovivification-perl_0.18-1_amd64.buildinfo a9694970a6723bab9d1cb5173feb05dce160d676ac96f4b4d8c6c057fdba2386 25236 libautovivification-perl_0.18-1_amd64.deb Files: 327f4c914743190fd9d88d29958f6b39 56724 debug optional libautovivification-perl-dbgsym_0.18-1_amd64.deb e7f2b5fe694747b02a396fb38450eab2 5172 perl optional libautovivification-perl_0.18-1_amd64.buildinfo 80982451b15fc6378f01a52037d6660a 25236 perl optional libautovivification-perl_0.18-1_amd64.deb Fri Jan 21 02:24:12 UTC 2022 I: will be used to compare the two builds: # Profiling output for: /usr/bin/diffoscope --html /srv/reproducible-results/rbuild-debian/tmp.0RmhZIw1lG/libautovivification-perl_0.18-1.diffoscope.html --text /srv/reproducible-results/rbuild-debian/tmp.0RmhZIw1lG/libautovivification-perl_0.18-1.diffoscope.txt --json /srv/reproducible-results/rbuild-debian/tmp.0RmhZIw1lG/libautovivification-perl_0.18-1.diffoscope.json --profile=- /srv/reproducible-results/rbuild-debian/tmp.0RmhZIw1lG/b1/libautovivification-perl_0.18-1_amd64.changes /srv/reproducible-results/rbuild-debian/tmp.0RmhZIw1lG/b2/libautovivification-perl_0.18-1_amd64.changes ## command (total time: 0.000s) 0.000s 1 call cmp (internal) ## has_same_content_as (total time: 0.000s) 0.000s 1 call abc.DotChangesFile ## main (total time: 0.316s) 0.316s 2 calls outputs 0.000s 1 call cleanup ## recognizes (total time: 0.024s) 0.024s 10 calls diffoscope.comparators.binary.FilesystemFile 0.000s 8 calls abc.DotChangesFile Fri Jan 21 02:24:13 UTC 2022 I: found no differences in the changes files, and a .buildinfo file also exists. Fri Jan 21 02:24:13 UTC 2022 I: libautovivification-perl from bullseye built successfully and reproducibly on amd64. Fri Jan 21 02:24:15 UTC 2022 I: Submitting .buildinfo files to external archives: Fri Jan 21 02:24:15 UTC 2022 I: Submitting 8.0K b1/libautovivification-perl_0.18-1_amd64.buildinfo.asc Fri Jan 21 02:24:15 UTC 2022 I: Submitting 8.0K b2/libautovivification-perl_0.18-1_amd64.buildinfo.asc Fri Jan 21 02:24:16 UTC 2022 I: Done submitting .buildinfo files to http://buildinfo.debian.net/api/submit. Fri Jan 21 02:24:16 UTC 2022 I: Done submitting .buildinfo files. Fri Jan 21 02:24:16 UTC 2022 I: Removing signed libautovivification-perl_0.18-1_amd64.buildinfo.asc files: removed './b1/libautovivification-perl_0.18-1_amd64.buildinfo.asc' removed './b2/libautovivification-perl_0.18-1_amd64.buildinfo.asc'